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

⟦97771da34⟧

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

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5813       |X   |		.CONST	0x5813								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0dd0       |    |		.CONST	0x0dd0								; 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 0009       |    |		.CONST	0x0009								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0051       | Q  |		.CONST	0x0051								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 001c       |    |		.CONST	0x001c								; Number of locals
000b			INIT_0008:
000b 029a 005b  |   [|		Declare_Subprogram	INIT_0058,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0 = .DEBUG	0x000b,0x0f1a,0x0000,0x0000,0x0057,0x29a5,0x0000,0x118f
													; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 01c3  |    |		Declare_Subprogram	INIT_01c0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 029a 01db  |    |		Declare_Subprogram	INIT_01d8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 029a 0283  |    |		Declare_Subprogram	INIT_0280,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0x11,0xfffc
0013 00bf       |    |		Action	Accept_Activation
0014 e001       |    |		Load	0x0,0x1								; Debug Table 0x1 = .DEBUG	0x0014,0x0f24,0x0000,0x0000,0x0059,0x75c5,0x0000,0x0014
													; Debug Table 0x1.0x0 = 0x14,0xffff
0015 1b67       | g  |		Execute	Package,Field_Read,Field_Number 0x67
0016 0322       | "  |		Declare_Variable	Record
0017 4800       |H   |		Short_Literal	0x0
0018 00d9       |    |		Load_Top	At_Offset_1
0019 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
001a 4800       |H   |		Short_Literal	0x0
001b 00d9       |    |		Load_Top	At_Offset_1
001c 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
001d 4800       |H   |		Short_Literal	0x0
001e 00d9       |    |		Load_Top	At_Offset_1
001f 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0020 0092 0c48  |   H|		Action	Push_String_Extended,0xc48					; "CODE_DATABASE"
													; Debug Table 0x1.0x1 = 0x20,0xfffe
0022 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x2 = 0x22,0xfffd
0023 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x3 = 0x23,0xfffc
0024 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x4 = 0x24,0xfffb
0025 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x5 = 0x25,0xfffa
0026 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x6 = 0x26,0xfff9
0027 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x7 = 0x27,0xfff8
0028 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x8 = 0x28,0xfff7
0029 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x9 = 0x29,0xfff6
002a 029d 02ab  |    |		Declare_Subprogram	INIT_02a8,For_Outer_Call			; Debug Table 0x1.0xa = 0x2a,0xfff5
002c 029d 02c3  |    |		Declare_Subprogram	INIT_02c0,For_Outer_Call			; Debug Table 0x1.0xb = 0x2c,0xfff4
002e 029d 02d3  |    |		Declare_Subprogram	INIT_02d0,For_Outer_Call			; Debug Table 0x1.0xc = 0x2e,0xfff3
0030 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1.0xd = 0x30,0xfff2
0031 00c7       |    |		Action	Elaborate_Subprogram
0032 4803       |H   |		Short_Literal	0x3							; Debug Table 0x1.0xe = 0x32,0xfff1
0033 62dc       |b   |		Indirect_Literal	Discrete,0x310,{0x0069f40e, 0x0000b9b0}
0034 02a0       |    |		Declare_Subprogram	Null_Subprogram
0035 038c       |    |		Declare_Type	Package,Defined,Not_Elaborated
0036 e002       |    |		Load	0x0,0x2								; Debug Table 0x1.0xf = 0x36,0xfff0
0037 e003       |    |		Load	0x0,0x3
0038 e004       |    |		Load	0x0,0x4
0039 4803       |H   |		Short_Literal	0x3
003a e216       |    |		Load	0x1,0x16
003b 020e       |    |		Execute	Module,Augment_Imports
003c 00d8       |    |		Load_Top	At_Offset_0
003d 020d       |    |		Execute	Module,Elaborate
003e 0007       |    |		Action	Break_Optional
003f 029d 031b  |    |		Declare_Subprogram	INIT_0318,For_Outer_Call			; Debug Table 0x1.0x10 = 0x3f,0xffef
0041 029d 032b  |   +|		Declare_Subprogram	INIT_0328,For_Outer_Call			; Debug Table 0x1.0x11 = 0x41,0xffee
0043 029d 033b  |   ;|		Declare_Subprogram	INIT_0338,For_Outer_Call			; Debug Table 0x1.0x12 = 0x43,0xffed
0045 029d 034b  |   K|		Declare_Subprogram	INIT_0348,For_Outer_Call			; Debug Table 0x1.0x13 = 0x45,0xffec
0047 029d 03eb  |    |		Declare_Subprogram	INIT_03e8,For_Outer_Call			; Debug Table 0x1.0x14 = 0x47,0xffeb
0049 029d 0403  |    |		Declare_Subprogram	INIT_0400,For_Outer_Call			; Debug Table 0x1.0x15 = 0x49,0xffea
004b 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x16 = 0x4b,0xffe9
004c 00c7       |    |		Action	Elaborate_Subprogram
004d 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x17 = 0x4d,0xffe8
004e 00c7       |    |		Action	Elaborate_Subprogram
004f 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x18 = 0x4f,0xffe7
0050 00c7       |    |		Action	Elaborate_Subprogram
0051			BODY_0008:
0051 00bc       |    |		Action	Signal_Activated
0052 00bb       |    |		Action	Signal_Completion
0053 0000 0000  |    |		.BLANK	0000[0x5]
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 0079       | y  |		.CONST	0x0079								; Address of begin
0059 01b2       |    |		.CONST	0x01b2								; Address of exception handler
005a 000b       |    |		.CONST	0x000b								; Number of locals
005b			INIT_0058:
005b e001       |    |		Load	0x0,0x1								; Debug Table 0x2 = .DEBUG	0x005b,0x0f58,0x0001,0x0000,0x0057,0x29a5,0x0000,0x1190
													; Debug Table 0x2.0x0 = 0x5b,0xffff
005c 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
005d 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
005e e005       |    |		Load	0x0,0x5								; Debug Table 0x2.0x1 = 0x5e,0xfffe
005f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0060 02c7       |    |		Declare_Variable	Any
0061 00d8       |    |		Load_Top	At_Offset_0
0062 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0063 e001       |    |		Load	0x0,0x1								; Debug Table 0x2.0x2 = 0x63,0xfffd
0064 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0065 e006       |    |		Load	0x0,0x6								; Debug Table 0x2.0x3 = 0x65,0xfffc
0066 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0067 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0068 e006       |    |		Load	0x0,0x6								; Debug Table 0x2.0x4 = 0x68,0xfffb
0069 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
006a e006       |    |		Load	0x0,0x6								; Debug Table 0x2.0x5 = 0x6a,0xfffa
006b 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
006c 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
006d 02c7       |    |		Declare_Variable	Any
006e 00d8       |    |		Load_Top	At_Offset_0
006f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0070 e006       |    |		Load	0x0,0x6								; Debug Table 0x2.0x6 = 0x70,0xfff9
0071 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0072 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0073 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2.0x7 = 0x73,0xfff8
0074 e006       |    |		Load	0x0,0x6								; Debug Table 0x2.0x8 = 0x74,0xfff7
0075 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
0076 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0077 0092 0c49  |   I|		Action	Push_String_Extended,0xc49					; "?'C(ADA)"
													; Debug Table 0x2.0x9 = 0x77,0xfff6
0079			BODY_0058:
0079 e007       |    |		Load	0x0,0x7								; Debug Table 0x2.0xa = 0x79,0x1
007a 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
007b e5fc       |    |		Load	0x2,-0x4
007c e005       |    |		Load	0x0,0x5
007d 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
007e c403       |    |		Store	0x2,0x3
007f 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2.0xb = 0x7f,0x2
0080 e5fe       |    |		Load	0x2,-0x2
0081 4801       |H   |		Short_Literal	0x1
0082 e5f9       |    |		Load	0x2,-0x7
0083 e403       |    |		Load	0x2,0x3
0084 e5fd       |    |		Load	0x2,-0x3
0085 e001       |    |		Load	0x0,0x1
0086 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0087 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0088 a402       |    |		Store_Unchecked	0x2,0x2
0089 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2.0xc = 0x89,0x3
008a e006       |    |		Load	0x0,0x6
008b 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
008c 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
008d 701c       |p   |		Jump_Nonzero	0xaa
008e 4802       |H   |		Short_Literal	0x2							; Debug Table 0x2.0xd = 0x8e,0x4
008f e5ff       |    |		Load	0x2,-0x1
0090 e006       |    |		Load	0x0,0x6
0091 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0092 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
0093 0092 0c4a  |   J|		Action	Push_String_Extended,0xc4a					; " is not a world"
0095 01cc       |    |		Execute	Vector,Catenate
0096 e402       |    |		Load	0x2,0x2
0097 e001       |    |		Load	0x0,0x1
0098 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0099 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
009a e5f9       |    |		Load	0x2,-0x7							; Debug Table 0x2.0xe = 0x9a,0x5
009b 0120       |    |		Execute	Any,Is_Value
009c 6803       |h   |		Jump_Zero	0xa0
009d e008       |    |		Load	0x0,0x8
009e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
009f 7801       |x   |		Jump	0xa1
00a0 e5f9       |    |		Load	0x2,-0x7
00a1 00e1       |    |		Load_Encached	Boolean_Cache
00a2 e403       |    |		Load	0x2,0x3
00a3 e402       |    |		Load	0x2,0x2
00a4 e5fc       |    |		Load	0x2,-0x4
00a5 8213       |    |		Call	0x1,0x13
00a6 c403       |    |		Store	0x2,0x3
00a7 c5fa       |    |		Store	0x2,-0x6
00a8 c5f9       |    |		Store	0x2,-0x7
00a9 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6					; Debug Table 0x2.0xf = 0xa9,0x6
00aa e006       |    |		Load	0x0,0x6								; Debug Table 0x2.0x10 = 0xaa,0x7
00ab 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00ac e006       |    |		Load	0x0,0x6
00ad 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00ae 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
00af 625c       |b\  |		Indirect_Literal	Discrete,0x30c,{0x00000000, 0x00004000}
00b0 e403       |    |		Load	0x2,0x3
00b1 4800       |H   |		Short_Literal	0x0
00b2 e5ff       |    |		Load	0x2,-0x1
00b3 e006       |    |		Load	0x0,0x6
00b4 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00b5 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00b6 c405       |    |		Store	0x2,0x5
00b7 c406       |    |		Store	0x2,0x6
00b8 e406       |    |		Load	0x2,0x6								; Debug Table 0x2.0x11 = 0xb8,0x8
00b9 6825       |h%  |		Jump_Zero	0xdf
00ba 4802       |H   |		Short_Literal	0x2							; Debug Table 0x2.0x12 = 0xba,0x9
00bb 0092 0c4b  |   K|		Action	Push_String_Extended,0xc4b					; "Unable to get context for "
00bd e5ff       |    |		Load	0x2,-0x1
00be e006       |    |		Load	0x0,0x6
00bf 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00c0 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
00c1 01cc       |    |		Execute	Vector,Catenate
00c2 0092 0c4c  |   L|		Action	Push_String_Extended,0xc4c					; ", status => "
00c4 01cc       |    |		Execute	Vector,Catenate
00c5 e406       |    |		Load	0x2,0x6
00c6 e006       |    |		Load	0x0,0x6
00c7 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00c8 025e       | ^  |		Execute	Discrete,Convert
00c9 1c01       |    |		Execute_Immediate	Run_Utility,0x1
00ca 01cc       |    |		Execute	Vector,Catenate
00cb e402       |    |		Load	0x2,0x2
00cc e001       |    |		Load	0x0,0x1
00cd 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
00ce 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
00cf e5f9       |    |		Load	0x2,-0x7							; Debug Table 0x2.0x13 = 0xcf,0xa
00d0 0120       |    |		Execute	Any,Is_Value
00d1 6803       |h   |		Jump_Zero	0xd5
00d2 e008       |    |		Load	0x0,0x8
00d3 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00d4 7801       |x   |		Jump	0xd6
00d5 e5f9       |    |		Load	0x2,-0x7
00d6 00e1       |    |		Load_Encached	Boolean_Cache
00d7 e403       |    |		Load	0x2,0x3
00d8 e402       |    |		Load	0x2,0x2
00d9 e5fc       |    |		Load	0x2,-0x4
00da 8213       |    |		Call	0x1,0x13
00db c403       |    |		Store	0x2,0x3
00dc c5fa       |    |		Store	0x2,-0x6
00dd c5f9       |    |		Store	0x2,-0x7
00de 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6					; Debug Table 0x2.0x14 = 0xde,0xb
00df e006       |    |		Load	0x0,0x6								; Debug Table 0x2.0x15 = 0xdf,0xc
00e0 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00e1 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00e2 e407       |    |		Load	0x2,0x7
00e3 6228       |b(  |		Indirect_Literal	Discrete,0x30c,{0x00000000, 0x00004000}
00e4 e403       |    |		Load	0x2,0x3
00e5 e402       |    |		Load	0x2,0x2
00e6 e001       |    |		Load	0x0,0x1
00e7 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
00e8 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
00e9 4801       |H   |		Short_Literal	0x1
00ea 4800       |H   |		Short_Literal	0x0
00eb e405       |    |		Load	0x2,0x5
00ec e40b       |    |		Load	0x2,0xb
00ed e006       |    |		Load	0x0,0x6
00ee 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00ef 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
00f0 c407       |    |		Store	0x2,0x7
00f1 c408       |    |		Store	0x2,0x8
00f2 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x16 = 0xf2,0xd
00f3 0b03       |    |		Execute_Immediate	Case_Compare,0x3
00f4 7021       |p!  |		Jump_Nonzero	0x116
00f5 0b00       |    |		Execute_Immediate	Case_Compare,0x0
00f6 7029       |p)  |		Jump_Nonzero	0x120
00f7 4802       |H   |		Short_Literal	0x2							; Debug Table 0x2.0x17 = 0xf7,0x1b
00f8 0092 0c4d  |   M|		Action	Push_String_Extended,0xc4d					; "Unable to resolve ada objects in "
00fa e5ff       |    |		Load	0x2,-0x1
00fb e006       |    |		Load	0x0,0x6
00fc 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00fd 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
00fe 01cc       |    |		Execute	Vector,Catenate
00ff 0092 0c4e  |   N|		Action	Push_String_Extended,0xc4e					; ", because "
0101 01cc       |    |		Execute	Vector,Catenate
0102 6209       |b   |		Indirect_Literal	Discrete,0x30c,{0x00000000, 0x00004000}
0103 e403       |    |		Load	0x2,0x3
0104 e402       |    |		Load	0x2,0x2
0105 e001       |    |		Load	0x0,0x1
0106 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0107 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0108 4801       |H   |		Short_Literal	0x1
0109 4800       |H   |		Short_Literal	0x0
010a e405       |    |		Load	0x2,0x5
010b e40b       |    |		Load	0x2,0xb
010c e408       |    |		Load	0x2,0x8
010d e006       |    |		Load	0x0,0x6
010e 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
010f 1851       | Q  |		Execute	Package,Field_Execute,Field_Number 0x51
0110 01cc       |    |		Execute	Vector,Catenate
0111 e402       |    |		Load	0x2,0x2
0112 e001       |    |		Load	0x0,0x1
0113 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0114 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0115 7885       |x   |		Jump	0x19b
0116 e001       |    |		Load	0x0,0x1								; Debug Table 0x2.0x18 = 0x116,0xe
0117 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0118 4800       |H   |		Short_Literal	0x0
0119 e5ff       |    |		Load	0x2,-0x1
011a e402       |    |		Load	0x2,0x2
011b e001       |    |		Load	0x0,0x1
011c 1b6a       | j  |		Execute	Package,Field_Read,Field_Number 0x6a
011d 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
011e c404       |    |		Store	0x2,0x4
011f 787b       |x{  |		Jump	0x19b
0120 e001       |    |		Load	0x0,0x1								; Debug Table 0x2.0x19 = 0x120,0xf
0121 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0122 4800       |H   |		Short_Literal	0x0
0123 e5ff       |    |		Load	0x2,-0x1
0124 e402       |    |		Load	0x2,0x2
0125 e001       |    |		Load	0x0,0x1
0126 1b6a       | j  |		Execute	Package,Field_Read,Field_Number 0x6a
0127 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0128 c404       |    |		Store	0x2,0x4
0129 e404       |    |		Load	0x2,0x4								; Debug Table 0x2.0x1a = 0x129,0x10
012a e001       |    |		Load	0x0,0x1
012b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
012c 021e       |    |		Execute	Heap_Access,Maximum
012d 686d       |hm  |		Jump_Zero	0x19b
012e e5fb       |    |		Load	0x2,-0x5
012f 6806       |h   |		Jump_Zero	0x136
0130 e404       |    |		Load	0x2,0x4
0131 0217       |    |		Execute	Heap_Access,All_Reference
0132 3406       |4   |		Execute	Record,Field_Reference,Field_Number 0x6
0133 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0134 0d01       |    |		Execute_Immediate	Less,0x1
0135 7801       |x   |		Jump	0x137
0136 4801       |H   |		Short_Literal	0x1
0137 6863       |hc  |		Jump_Zero	0x19b
0138 e407       |    |		Load	0x2,0x7								; Debug Table 0x2.0x1b = 0x138,0x11
0139 e006       |    |		Load	0x0,0x6
013a 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
013b 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
013c c407       |    |		Store	0x2,0x7
013d 00cf       |    |		Action	Mark_Auxiliary
013e 7856       |xV  |		Jump	0x195
013f e006       |    |		Load	0x0,0x6								; Debug Table 0x2.0x1c = 0x13f,0x13
0140 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0141 00ec       |    |		Load_Encached	Diana_Tree_Cache
0142 61c9       |a   |		Indirect_Literal	Discrete,0x30c,{0x00000000, 0x00004000}
0143 e403       |    |		Load	0x2,0x3
0144 e407       |    |		Load	0x2,0x7
0145 e006       |    |		Load	0x0,0x6
0146 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0147 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0148 c409       |    |		Store	0x2,0x9
0149 c406       |    |		Store	0x2,0x6
014a e406       |    |		Load	0x2,0x6								; Debug Table 0x2.0x1d = 0x14a,0x14
014b 6816       |h   |		Jump_Zero	0x162
014c 4802       |H   |		Short_Literal	0x2							; Debug Table 0x2.0x1e = 0x14c,0x15
014d 0092 0c4f  |   O|		Action	Push_String_Extended,0xc4f					; "Unable to get diana root for "
014f e407       |    |		Load	0x2,0x7
0150 e006       |    |		Load	0x0,0x6
0151 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0152 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0153 01cc       |    |		Execute	Vector,Catenate
0154 0092 0c4c  |   L|		Action	Push_String_Extended,0xc4c					; ", status => "
0156 01cc       |    |		Execute	Vector,Catenate
0157 e406       |    |		Load	0x2,0x6
0158 e006       |    |		Load	0x0,0x6
0159 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
015a 025e       | ^  |		Execute	Discrete,Convert
015b 1c01       |    |		Execute_Immediate	Run_Utility,0x1
015c 01cc       |    |		Execute	Vector,Catenate
015d e402       |    |		Load	0x2,0x2
015e e001       |    |		Load	0x0,0x1
015f 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0160 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0161 782d       |x-  |		Jump	0x18f
0162 e006       |    |		Load	0x0,0x6								; Debug Table 0x2.0x1f = 0x162,0x16
0163 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0164 e006       |    |		Load	0x0,0x6
0165 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
0166 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0167 61a4       |a   |		Indirect_Literal	Discrete,0x30c,{0x00000000, 0x00004000}
0168 e402       |    |		Load	0x2,0x2
0169 e001       |    |		Load	0x0,0x1
016a 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
016b 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
016c e409       |    |		Load	0x2,0x9
016d e006       |    |		Load	0x0,0x6
016e 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
016f 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0170 c40a       |    |		Store	0x2,0xa
0171 c406       |    |		Store	0x2,0x6
0172 e406       |    |		Load	0x2,0x6								; Debug Table 0x2.0x20 = 0x172,0x17
0173 6816       |h   |		Jump_Zero	0x18a
0174 4802       |H   |		Short_Literal	0x2							; Debug Table 0x2.0x21 = 0x174,0x18
0175 0092 0c50  |   P|		Action	Push_String_Extended,0xc50					; "Unable to get declaration state for "
0177 e407       |    |		Load	0x2,0x7
0178 e006       |    |		Load	0x0,0x6
0179 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
017a 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
017b 01cc       |    |		Execute	Vector,Catenate
017c 0092 0c4c  |   L|		Action	Push_String_Extended,0xc4c					; ", status => "
017e 01cc       |    |		Execute	Vector,Catenate
017f e406       |    |		Load	0x2,0x6
0180 e006       |    |		Load	0x0,0x6
0181 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0182 025e       | ^  |		Execute	Discrete,Convert
0183 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0184 01cc       |    |		Execute	Vector,Catenate
0185 e402       |    |		Load	0x2,0x2
0186 e001       |    |		Load	0x0,0x1
0187 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0188 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0189 7805       |x   |		Jump	0x18f
018a 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x22 = 0x18a,0x19
018b e409       |    |		Load	0x2,0x9
018c e404       |    |		Load	0x2,0x4
018d e402       |    |		Load	0x2,0x2
018e 8215       |    |		Call	0x1,0x15
018f e407       |    |		Load	0x2,0x7								; Debug Table 0x2.0x23 = 0x18f,0x1a
0190 e006       |    |		Load	0x0,0x6
0191 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0192 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0193 c407       |    |		Store	0x2,0x7
0194 00c9       |    |		Action	Pop_Auxiliary_Loop
0195 e407       |    |		Load	0x2,0x7								; Debug Table 0x2.0x24 = 0x195,0x12
0196 e006       |    |		Load	0x0,0x6
0197 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0198 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0199 6fa5       |o   |		Jump_Zero	0x13f
019a 00ce       |    |		Action	Pop_Auxiliary
019b 00d1       |    |		Pop_Control	Pop_Count_1
019c e402       |    |		Load	0x2,0x2								; Debug Table 0x2.0x25 = 0x19c,0x1c
019d e001       |    |		Load	0x0,0x1
019e 1b6a       | j  |		Execute	Package,Field_Read,Field_Number 0x6a
019f 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01a0 e403       |    |		Load	0x2,0x3								; Debug Table 0x2.0x26 = 0x1a0,0x1d
01a1 4801       |H   |		Short_Literal	0x1
01a2 4801       |H   |		Short_Literal	0x1
01a3 e5fc       |    |		Load	0x2,-0x4
01a4 e005       |    |		Load	0x0,0x5
01a5 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
01a6 c403       |    |		Store	0x2,0x3
01a7 e402       |    |		Load	0x2,0x2								; Debug Table 0x2.0x27 = 0x1a7,0x1e
01a8 e001       |    |		Load	0x0,0x1
01a9 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
01aa 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
01ab c5f9       |    |		Store	0x2,-0x7
01ac e402       |    |		Load	0x2,0x2								; Debug Table 0x2.0x28 = 0x1ac,0x1f
01ad e001       |    |		Load	0x0,0x1
01ae 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
01af 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
01b0 a5fa       |    |		Store_Unchecked	0x2,-0x6
01b1 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
01b2			TRAP_0058:
01b2 0007       |    |		Action	Break_Optional
01b3 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x2.0x29 = 0x1b3,0x20
01b4 e402       |    |		Load	0x2,0x2
01b5 8009       |    |		Call	0x0,0x9
01b6 e402       |    |		Load	0x2,0x2								; Debug Table 0x2.0x2a = 0x1b6,0x21
01b7 e001       |    |		Load	0x0,0x1
01b8 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
01b9 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
01ba c5f9       |    |		Store	0x2,-0x7
01bb 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2.0x2b = 0x1bb,0x22
01bc a5fa       |    |		Store_Unchecked	0x2,-0x6
01bd 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
01be 0000 0000  |    |		.XXX[0x2]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01d4       |    |		.CONST	0x01d4								; Address of begin
01c1 0004       |    |		.CONST	0x0004								; Address of exception handler
01c2 0006       |    |		.CONST	0x0006								; Number of locals
01c3			INIT_01c0:
01c3 e006       |    |		Load	0x0,0x6								; Debug Table 0x3 = .DEBUG	0x01c3,0x0fb2,0x0001,0x0000,0x0057,0x29a5,0x0000,0x11bf
													; Debug Table 0x3.0x0 = 0x1c3,0xffff
01c4 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
01c5 02ff       |    |		Declare_Variable	Variant_Record
01c6 00d8       |    |		Load_Top	At_Offset_0
01c7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01c8 e006       |    |		Load	0x0,0x6								; Debug Table 0x3.0x1 = 0x1c8,0xfffe
01c9 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
01ca 02ff       |    |		Declare_Variable	Variant_Record
01cb 00d8       |    |		Load_Top	At_Offset_0
01cc 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01cd e001       |    |		Load	0x0,0x1								; Debug Table 0x3.0x2 = 0x1cd,0xfffd
01ce 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
01cf 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
01d0 029f 04db  |    |		Declare_Subprogram	INIT_04d8,For_Call				; Debug Table 0x3.0x3 = 0x1d0,0xfffc
01d2 029f 0513  |    |		Declare_Subprogram	INIT_0510,For_Call
01d4			BODY_01c0:
01d4 8406       |    |		Call	0x2,0x6								; Debug Table 0x3.0x4 = 0x1d4,0x1
01d5 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
01d6 0000 0000  |    |		.XXX[0x2]
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01f3       |    |		.CONST	0x01f3								; Address of begin
01d9 0272       | r  |		.CONST	0x0272								; Address of exception handler
01da 0008       |    |		.CONST	0x0008								; Number of locals
01db			INIT_01d8:
01db e001       |    |		Load	0x0,0x1								; Debug Table 0x4 = .DEBUG	0x01db,0x0fbe,0x0001,0x0000,0x0057,0x29a5,0x0000,0x11ea
													; Debug Table 0x4.0x0 = 0x1db,0xffff
01dc 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01dd e001       |    |		Load	0x0,0x1								; Debug Table 0x4.0x1 = 0x1dd,0xfffe
01de 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
01df 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
01e0 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x4.0x2 = 0x1e0,0xfffd
01e1 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x4.0x3 = 0x1e1,0xfffc
01e2 e006       |    |		Load	0x0,0x6								; Debug Table 0x4.0x4 = 0x1e2,0xfffb
01e3 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01e4 e006       |    |		Load	0x0,0x6								; Debug Table 0x4.0x5 = 0x1e4,0xfffa
01e5 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
01e6 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
01e7 02c7       |    |		Declare_Variable	Any
01e8 00d8       |    |		Load_Top	At_Offset_0
01e9 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01ea e005       |    |		Load	0x0,0x5								; Debug Table 0x4.0x6 = 0x1ea,0xfff9
01eb 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01ec 02c7       |    |		Declare_Variable	Any
01ed e007       |    |		Load	0x0,0x7
01ee 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
01ef e5fd       |    |		Load	0x2,-0x3
01f0 e005       |    |		Load	0x0,0x5
01f1 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
01f2 c408       |    |		Store	0x2,0x8
01f3			BODY_01d8:
01f3 4801       |H   |		Short_Literal	0x1							; Debug Table 0x4.0x7 = 0x1f3,0x1
01f4 e5fc       |    |		Load	0x2,-0x4
01f5 4801       |H   |		Short_Literal	0x1
01f6 e5fa       |    |		Load	0x2,-0x6
01f7 e408       |    |		Load	0x2,0x8
01f8 e5fe       |    |		Load	0x2,-0x2
01f9 e001       |    |		Load	0x0,0x1
01fa 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
01fb 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
01fc a403       |    |		Store_Unchecked	0x2,0x3
01fd e006       |    |		Load	0x0,0x6								; Debug Table 0x4.0x8 = 0x1fd,0x2
01fe 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01ff 00da       |    |		Load_Top	At_Offset_2
0200 0120       |    |		Execute	Any,Is_Value
0201 6804       |h   |		Jump_Zero	0x206
0202 e006       |    |		Load	0x0,0x6
0203 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0204 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
0205 7801       |x   |		Jump	0x207
0206 00da       |    |		Load_Top	At_Offset_2
0207 e006       |    |		Load	0x0,0x6
0208 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0209 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
020a 6101       |a   |		Indirect_Literal	Discrete,0x30c,{0x00000000, 0x00004000}
020b 4801       |H   |		Short_Literal	0x1
020c 4800       |H   |		Short_Literal	0x0
020d 4800       |H   |		Short_Literal	0x0
020e e408       |    |		Load	0x2,0x8
020f 4801       |H   |		Short_Literal	0x1
0210 e5ff       |    |		Load	0x2,-0x1
0211 e006       |    |		Load	0x0,0x6
0212 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0213 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0214 e006       |    |		Load	0x0,0x6
0215 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0216 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
0217 c405       |    |		Store	0x2,0x5
0218 c407       |    |		Store	0x2,0x7
0219 005b       | [  |		Store_Top	Discrete,At_Offset_3
021a 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0x9 = 0x21a,0x3
021b 6826       |h&  |		Jump_Zero	0x242
021c 4802       |H   |		Short_Literal	0x2							; Debug Table 0x4.0xa = 0x21c,0x4
021d 0092 0c51  |   Q|		Action	Push_String_Extended,0xc51					; "Can't open "
021f e5ff       |    |		Load	0x2,-0x1
0220 e006       |    |		Load	0x0,0x6
0221 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0222 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
0223 01cc       |    |		Execute	Vector,Catenate
0224 0092 0c52  |   R|		Action	Push_String_Extended,0xc52					; " ("
0226 01cc       |    |		Execute	Vector,Catenate
0227 e406       |    |		Load	0x2,0x6
0228 e006       |    |		Load	0x0,0x6
0229 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
022a 025e       | ^  |		Execute	Discrete,Convert
022b 1c01       |    |		Execute_Immediate	Run_Utility,0x1
022c 01cc       |    |		Execute	Vector,Catenate
022d 0092 0c53  |   S|		Action	Push_String_Extended,0xc53					; ")"
022f 01cc       |    |		Execute	Vector,Catenate
0230 e403       |    |		Load	0x2,0x3
0231 e001       |    |		Load	0x0,0x1
0232 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0233 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0234 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0xb = 0x234,0x5
0235 4801       |H   |		Short_Literal	0x1
0236 4800       |H   |		Short_Literal	0x0
0237 e5fd       |    |		Load	0x2,-0x3
0238 e005       |    |		Load	0x0,0x5
0239 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
023a c408       |    |		Store	0x2,0x8
023b e403       |    |		Load	0x2,0x3								; Debug Table 0x4.0xc = 0x23b,0x6
023c e001       |    |		Load	0x0,0x1
023d 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
023e 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
023f c5fa       |    |		Store	0x2,-0x6
0240 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0xd = 0x240,0x7
0241 a5fb       |    |		Store_Unchecked	0x2,-0x5
0242 e001       |    |		Load	0x0,0x1								; Debug Table 0x4.0xe = 0x242,0x8
0243 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0244 4800       |H   |		Short_Literal	0x0
0245 e405       |    |		Load	0x2,0x5
0246 e403       |    |		Load	0x2,0x3
0247 e001       |    |		Load	0x0,0x1
0248 1b6a       | j  |		Execute	Package,Field_Read,Field_Number 0x6a
0249 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
024a c402       |    |		Store	0x2,0x2
024b e402       |    |		Load	0x2,0x2								; Debug Table 0x4.0xf = 0x24b,0x9
024c e001       |    |		Load	0x0,0x1
024d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
024e 021e       |    |		Execute	Heap_Access,Maximum
024f 680a       |h   |		Jump_Zero	0x25a
0250 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0x10 = 0x250,0xa
0251 e405       |    |		Load	0x2,0x5
0252 e403       |    |		Load	0x2,0x3
0253 e00a       |    |		Load	0x0,0xa
0254 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0255 e405       |    |		Load	0x2,0x5
0256 e402       |    |		Load	0x2,0x2
0257 e403       |    |		Load	0x2,0x3
0258 e00a       |    |		Load	0x0,0xa
0259 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
025a e403       |    |		Load	0x2,0x3								; Debug Table 0x4.0x11 = 0x25a,0xb
025b e001       |    |		Load	0x0,0x1
025c 1b6a       | j  |		Execute	Package,Field_Read,Field_Number 0x6a
025d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
025e e403       |    |		Load	0x2,0x3								; Debug Table 0x4.0x12 = 0x25e,0xc
025f e001       |    |		Load	0x0,0x1
0260 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0261 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0262 a404       |    |		Store_Unchecked	0x2,0x4
0263 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x13 = 0x263,0xd
0264 4801       |H   |		Short_Literal	0x1
0265 e404       |    |		Load	0x2,0x4
0266 e5fd       |    |		Load	0x2,-0x3
0267 e005       |    |		Load	0x0,0x5
0268 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0269 c408       |    |		Store	0x2,0x8
026a e403       |    |		Load	0x2,0x3								; Debug Table 0x4.0x14 = 0x26a,0xe
026b e001       |    |		Load	0x0,0x1
026c 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
026d 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
026e c5fa       |    |		Store	0x2,-0x6
026f e404       |    |		Load	0x2,0x4								; Debug Table 0x4.0x15 = 0x26f,0xf
0270 a5fb       |    |		Store_Unchecked	0x2,-0x5
0271 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0272			TRAP_01d8:
0272 0007       |    |		Action	Break_Optional
0273 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x4.0x16 = 0x273,0x10
0274 e403       |    |		Load	0x2,0x3
0275 8009       |    |		Call	0x0,0x9
0276 e403       |    |		Load	0x2,0x3								; Debug Table 0x4.0x17 = 0x276,0x11
0277 e001       |    |		Load	0x0,0x1
0278 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0279 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
027a c5fa       |    |		Store	0x2,-0x6
027b 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0x18 = 0x27b,0x12
027c a5fb       |    |		Store_Unchecked	0x2,-0x5
027d 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
027e 0000 0000  |    |		.XXX[0x2]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0285       |    |		.CONST	0x0285								; Address of begin
0281 0004       |    |		.CONST	0x0004								; Address of exception handler
0282 0002       |    |		.CONST	0x0002								; Number of locals
0283			INIT_0280:
0283 e001       |    |		Load	0x0,0x1								; Debug Table 0x5 = .DEBUG	0x0283,0x0ff2,0x0002,0x0000,0x0057,0x29a5,0x0000,0x1215
													; Debug Table 0x5.0x0 = 0x283,0xffff
0284 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0285			BODY_0280:
0285 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x5.0x1 = 0x285,0x1
0286 7003       |p   |		Jump_Nonzero	0x28a
0287 e001       |    |		Load	0x0,0x1								; Debug Table 0x5.0x2 = 0x287,0x2
0288 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0289 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
028a e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x5.0x3 = 0x28a,0x3
028b 821b       |    |		Call	0x1,0x1b
028c 6808       |h   |		Jump_Zero	0x295
028d e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x5.0x4 = 0x28d,0x4
028e e5fd       |    |		Load	0x2,-0x3
028f e5fe       |    |		Load	0x2,-0x2
0290 e5ff       |    |		Load	0x2,-0x1
0291 821c       |    |		Call	0x1,0x1c
0292 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0293 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x5 = 0x293,0x5
0294 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0295 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x5.0x6 = 0x295,0x6
0296 0219       |    |		Execute	Heap_Access,All_Read
0297 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0298 e001       |    |		Load	0x0,0x1
0299 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
029a 00d9       |    |		Load_Top	At_Offset_1
029b e5ff       |    |		Load	0x2,-0x1
029c e5fc       |    |		Load	0x2,-0x4
029d e5fd       |    |		Load	0x2,-0x3
029e 8218       |    |		Call	0x1,0x18
029f 800b       |    |		Call	0x0,0xb
02a0 00d1       |    |		Pop_Control	Pop_Count_1
02a1 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
02a2 00d1       |    |		Pop_Control	Pop_Count_1
02a3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x7 = 0x2a3,0x7
02a4 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
02a5 0000 0000  |    |		.XXX[0x3]
02a7 0000       |    |
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02ab       |    |		.CONST	0x02ab								; Address of begin
02a9 0004       |    |		.CONST	0x0004								; Address of exception handler
02aa 0001       |    |		.CONST	0x0001								; Number of locals
02ab			BODY_02a8:
02ab			INIT_02a8:
02ab e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x6 = .DEBUG	0x02ab,0x1004,0x0001,0x0000,0x0059,0x75c5,0x0000,0x0082
													; Debug Table 0x6.0x0 = 0x2ab,0x1
02ac 4801       |H   |		Short_Literal	0x1
02ad 4800       |H   |		Short_Literal	0x0
02ae e5ff       |    |		Load	0x2,-0x1
02af e005       |    |		Load	0x0,0x5
02b0 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
02b1 c5fd       |    |		Store	0x2,-0x3
02b2 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0x1 = 0x2b2,0x2
02b3 e001       |    |		Load	0x0,0x1
02b4 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
02b5 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
02b6 c5fb       |    |		Store	0x2,-0x5
02b7 4800       |H   |		Short_Literal	0x0							; Debug Table 0x6.0x2 = 0x2b7,0x3
02b8 a5fc       |    |		Store_Unchecked	0x2,-0x4
02b9 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02ba 0000 0000  |    |		.BLANK	0000[0x6]
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02c3       |    |		.CONST	0x02c3								; Address of begin
02c1 0004       |    |		.CONST	0x0004								; Address of exception handler
02c2 0001       |    |		.CONST	0x0001								; Number of locals
02c3			BODY_02c0:
02c3			INIT_02c0:
02c3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7 = .DEBUG	0x02c3,0x100c,0x0002,0x0000,0x0059,0x75c5,0x0000,0x00bb
													; Debug Table 0x7.0x0 = 0x2c3,0x1
02c4 7002       |p   |		Jump_Nonzero	0x2c7
02c5 e00c       |    |		Load	0x0,0xc								; Debug Table 0x7.0x1 = 0x2c5,0x2
02c6 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
02c7 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x2 = 0x2c7,0x3
02c8 0217       |    |		Execute	Heap_Access,All_Reference
02c9 00db       |    |		Load_Top	At_Offset_3
02ca 800d       |    |		Call	0x0,0xd
02cb 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
02cc 0000 0000  |    |		.BLANK	0000[0x4]
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 02dd       |    |		.CONST	0x02dd								; Address of begin
02d1 0004       |    |		.CONST	0x0004								; Address of exception handler
02d2 0007       |    |		.CONST	0x0007								; Number of locals
02d3			INIT_02d0:
02d3 e001       |    |		Load	0x0,0x1								; Debug Table 0x8 = .DEBUG	0x02d3,0x1014,0x0001,0x0000,0x0059,0x75c5,0x0000,0x00e1
													; Debug Table 0x8.0x0 = 0x2d3,0xffff
02d4 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
02d5 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x8.0x1 = 0x2d5,0xfffe
02d6 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x8.0x2 = 0x2d6,0xfffd
02d7 029f 074b  |   K|		Declare_Subprogram	INIT_0748,For_Call				; Debug Table 0x8.0x3 = 0x2d7,0xfffc
02d9 029f 077b  |   {|		Declare_Subprogram	INIT_0778,For_Call
02db 029f 07a3  |    |		Declare_Subprogram	INIT_07a0,For_Call
02dd			BODY_02d0:
02dd 8405       |    |		Call	0x2,0x5								; Debug Table 0x8.0x4 = 0x2dd,0x1
02de a403       |    |		Store_Unchecked	0x2,0x3
02df 8406       |    |		Call	0x2,0x6								; Debug Table 0x8.0x5 = 0x2df,0x2
02e0 8405       |    |		Call	0x2,0x5								; Debug Table 0x8.0x6 = 0x2e0,0x3
02e1 a404       |    |		Store_Unchecked	0x2,0x4
02e2 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x8.0x7 = 0x2e2,0x4
02e3 e403       |    |		Load	0x2,0x3
02e4 027d       | }  |		Execute	Discrete,Greater
02e5 6822       |h"  |		Jump_Zero	0x308
02e6 e402       |    |		Load	0x2,0x2								; Debug Table 0x8.0x8 = 0x2e6,0x5
02e7 e001       |    |		Load	0x0,0x1
02e8 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
02e9 021f       |    |		Execute	Heap_Access,Equal
02ea 6801       |h   |		Jump_Zero	0x2ec
02eb 8407       |    |		Call	0x2,0x7								; Debug Table 0x8.0x9 = 0x2eb,0x6
02ec e402       |    |		Load	0x2,0x2								; Debug Table 0x8.0xa = 0x2ec,0x7
02ed e001       |    |		Load	0x0,0x1
02ee 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
02ef 021f       |    |		Execute	Heap_Access,Equal
02f0 7017       |p   |		Jump_Nonzero	0x308
02f1 4801       |H   |		Short_Literal	0x1							; Debug Table 0x8.0xb = 0x2f1,0x8
02f2 0092 0c54  |   T|		Action	Push_String_Extended,0xc54					; "Program_Library entry for unit "
02f4 e5fd       |    |		Load	0x2,-0x3
02f5 4976       |Iv  |		Short_Literal	0x176
02f6 00eb       |    |		Load_Encached	Diana_Cache
02f7 0098       |    |		Execute	Package,Field_Read_Dynamic
02f8 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
02f9 e006       |    |		Load	0x0,0x6
02fa 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
02fb 183d       | =  |		Execute	Package,Field_Execute,Field_Number 0x3d
02fc 01cc       |    |		Execute	Vector,Catenate
02fd 0092 0c55  |   U|		Action	Push_String_Extended,0xc55					; " will be considered to be corrupt"
02ff 01cc       |    |		Execute	Vector,Catenate
0300 e5ff       |    |		Load	0x2,-0x1
0301 e001       |    |		Load	0x0,0x1
0302 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0303 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0304 4801       |H   |		Short_Literal	0x1							; Debug Table 0x8.0xc = 0x304,0x9
0305 e402       |    |		Load	0x2,0x2
0306 0217       |    |		Execute	Heap_Access,All_Reference
0307 3820       |8   |		Execute	Record,Field_Write,Field_Number 0x20
0308 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0309 0000 0000  |    |		.XXX[0x3]
030b 0000       |    |
030c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0310 0069 f40e  | i  |		.LITERAL	{0x0069f40e, 0x0000b9b0}
0314 0000 0000  |    |		.BLANK	0000[0x4]
0318 ; --------------------------------------------------------------------------------------
0318 ; SUBPROGRAM
0318 ; --------------------------------------------------------------------------------------
0318 031b       |    |		.CONST	0x031b								; Address of begin
0319 0004       |    |		.CONST	0x0004								; Address of exception handler
031a 0001       |    |		.CONST	0x0001								; Number of locals
031b			BODY_0318:
031b			INIT_0318:
031b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9 = .DEBUG	0x031b,0x1030,0x0002,0x0000,0x0059,0x75c5,0x0000,0x0615
													; Debug Table 0x9.0x0 = 0x31b,0x1
031c 0217       |    |		Execute	Heap_Access,All_Reference
031d 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
031e 0b41       | A  |		Execute_Immediate	Case_Compare,0x41
031f 7006       |p   |		Jump_Nonzero	0x326
0320 0b3e       | >  |		Execute_Immediate	Case_Compare,0x3e
0321 7004       |p   |		Jump_Nonzero	0x326
0322 0b3d       | =  |		Execute_Immediate	Case_Compare,0x3d
0323 7002       |p   |		Jump_Nonzero	0x326
0324 4800       |H   |		Short_Literal	0x0							; Debug Table 0x9.0x1 = 0x324,0x3
0325 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0326 4801       |H   |		Short_Literal	0x1							; Debug Table 0x9.0x2 = 0x326,0x2
0327 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 032f       | /  |		.CONST	0x032f								; Address of begin
0329 0004       |    |		.CONST	0x0004								; Address of exception handler
032a 0003       |    |		.CONST	0x0003								; Number of locals
032b			INIT_0328:
032b 029f 07bb  |    |		Declare_Subprogram	INIT_07b8,For_Call				; Debug Table 0xa = .DEBUG	0x032b,0x1038,0x0002,0x0000,0x0059,0x75c5,0x0000,0x063d
													; Debug Table 0xa.0x0 = 0x32b,0xffff
032d 029f 07f3  |    |		Declare_Subprogram	INIT_07f0,For_Call
032f			BODY_0328:
032f 8403       |    |		Call	0x2,0x3								; Debug Table 0xa.0x1 = 0x32f,0x1
0330 4831       |H1  |		Short_Literal	0x31
0331 0257       | W  |		Execute	Discrete,Raise
0332 0000 0000  |    |		.BLANK	0000[0x6]
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 033b       | ;  |		.CONST	0x033b								; Address of begin
0339 0004       |    |		.CONST	0x0004								; Address of exception handler
033a 0001       |    |		.CONST	0x0001								; Number of locals
033b			BODY_0338:
033b			INIT_0338:
033b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb = .DEBUG	0x033b,0x103e,0x0002,0x0000,0x0059,0x75c5,0x0000,0x06d3
													; Debug Table 0xb.0x0 = 0x33b,0x1
033c 0217       |    |		Execute	Heap_Access,All_Reference
033d 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
033e 0217       |    |		Execute	Heap_Access,All_Reference
033f 0092 0c56  |   V|		Action	Push_String_Extended,0xc56					; "'SPEC"
0341 01cc       |    |		Execute	Vector,Catenate
0342 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0343 0000 0000  |    |		.BLANK	0000[0x5]
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 034d       | M  |		.CONST	0x034d								; Address of begin
0349 0004       |    |		.CONST	0x0004								; Address of exception handler
034a 0002       |    |		.CONST	0x0002								; Number of locals
034b			INIT_0348:
034b e001       |    |		Load	0x0,0x1								; Debug Table 0xc = .DEBUG	0x034b,0x1042,0x0002,0x0000,0x0059,0x75c5,0x0000,0x06eb
													; Debug Table 0xc.0x0 = 0x34b,0xffff
034c 1b66       | f  |		Execute	Package,Field_Read,Field_Number 0x66
034d			BODY_0348:
034d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xc.0x1 = 0x34d,0x1
034e 0217       |    |		Execute	Heap_Access,All_Reference
034f 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0350 0b3e       | >  |		Execute_Immediate	Case_Compare,0x3e
0351 700c       |p   |		Jump_Nonzero	0x35e
0352 0b47       | G  |		Execute_Immediate	Case_Compare,0x47
0353 7014       |p   |		Jump_Nonzero	0x368
0354 0b3d       | =  |		Execute_Immediate	Case_Compare,0x3d
0355 7015       |p   |		Jump_Nonzero	0x36b
0356 0b48       | H  |		Execute_Immediate	Case_Compare,0x48
0357 7033       |p3  |		Jump_Nonzero	0x38b
0358 0b49       | I  |		Execute_Immediate	Case_Compare,0x49
0359 7043       |pC  |		Jump_Nonzero	0x39d
035a 0b41       | A  |		Execute_Immediate	Case_Compare,0x41
035b 7065       |pe  |		Jump_Nonzero	0x3c1
035c 4887       |H   |		Short_Literal	0x87							; Debug Table 0xc.0x2 = 0x35c,0x27
035d 0257       | W  |		Execute	Discrete,Raise
035e e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xc.0x3 = 0x35e,0x2
035f 0217       |    |		Execute	Heap_Access,All_Reference
0360 3c0c       |<   |		Execute	Record,Field_Read,Field_Number 0xc
0361 6803       |h   |		Jump_Zero	0x365
0362 480f       |H   |		Short_Literal	0xf							; Debug Table 0xc.0x4 = 0x362,0x3
0363 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0364 787f       |x   |		Jump	0x3e4
0365 480b       |H   |		Short_Literal	0xb							; Debug Table 0xc.0x5 = 0x365,0x4
0366 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0367 787c       |x|  |		Jump	0x3e4
0368 480c       |H   |		Short_Literal	0xc							; Debug Table 0xc.0x6 = 0x368,0x5
0369 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
036a 7879       |xy  |		Jump	0x3e4
036b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xc.0x7 = 0x36b,0x6
036c 0217       |    |		Execute	Heap_Access,All_Reference
036d 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
036e 0b21       | !  |		Execute_Immediate	Case_Compare,0x21
036f 7006       |p   |		Jump_Nonzero	0x376
0370 0b33       | 3  |		Execute_Immediate	Case_Compare,0x33
0371 7004       |p   |		Jump_Nonzero	0x376
0372 0b2c       | ,  |		Execute_Immediate	Case_Compare,0x2c
0373 700c       |p   |		Jump_Nonzero	0x380
0374 4887       |H   |		Short_Literal	0x87							; Debug Table 0xc.0x8 = 0x374,0xd
0375 0257       | W  |		Execute	Discrete,Raise
0376 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xc.0x9 = 0x376,0x7
0377 0217       |    |		Execute	Heap_Access,All_Reference
0378 3c0c       |<   |		Execute	Record,Field_Read,Field_Number 0xc
0379 6803       |h   |		Jump_Zero	0x37d
037a 480a       |H   |		Short_Literal	0xa							; Debug Table 0xc.0xa = 0x37a,0x8
037b 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
037c 780c       |x   |		Jump	0x389
037d 4806       |H   |		Short_Literal	0x6							; Debug Table 0xc.0xb = 0x37d,0x9
037e 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
037f 7809       |x   |		Jump	0x389
0380 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xc.0xc = 0x380,0xa
0381 0217       |    |		Execute	Heap_Access,All_Reference
0382 3c0c       |<   |		Execute	Record,Field_Read,Field_Number 0xc
0383 6803       |h   |		Jump_Zero	0x387
0384 4805       |H   |		Short_Literal	0x5							; Debug Table 0xc.0xd = 0x384,0xb
0385 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0386 7802       |x   |		Jump	0x389
0387 4800       |H   |		Short_Literal	0x0							; Debug Table 0xc.0xe = 0x387,0xc
0388 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0389 00d1       |    |		Pop_Control	Pop_Count_1
038a 7859       |xY  |		Jump	0x3e4
038b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xc.0xf = 0x38b,0xf
038c 0217       |    |		Execute	Heap_Access,All_Reference
038d 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
038e 0b21       | !  |		Execute_Immediate	Case_Compare,0x21
038f 7006       |p   |		Jump_Nonzero	0x396
0390 0b33       | 3  |		Execute_Immediate	Case_Compare,0x33
0391 7004       |p   |		Jump_Nonzero	0x396
0392 0b2c       | ,  |		Execute_Immediate	Case_Compare,0x2c
0393 7005       |p   |		Jump_Nonzero	0x399
0394 4887       |H   |		Short_Literal	0x87							; Debug Table 0xc.0x10 = 0x394,0x12
0395 0257       | W  |		Execute	Discrete,Raise
0396 4807       |H   |		Short_Literal	0x7							; Debug Table 0xc.0x11 = 0x396,0x10
0397 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0398 7802       |x   |		Jump	0x39b
0399 4801       |H   |		Short_Literal	0x1							; Debug Table 0xc.0x12 = 0x399,0x11
039a 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
039b 00d1       |    |		Pop_Control	Pop_Count_1
039c 7847       |xG  |		Jump	0x3e4
039d e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xc.0x13 = 0x39d,0x14
039e 0217       |    |		Execute	Heap_Access,All_Reference
039f 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
03a0 0b48       | H  |		Execute_Immediate	Case_Compare,0x48
03a1 7006       |p   |		Jump_Nonzero	0x3a8
03a2 0b47       | G  |		Execute_Immediate	Case_Compare,0x47
03a3 7016       |p   |		Jump_Nonzero	0x3ba
03a4 0b46       | F  |		Execute_Immediate	Case_Compare,0x46
03a5 7017       |p   |		Jump_Nonzero	0x3bd
03a6 4887       |H   |		Short_Literal	0x87							; Debug Table 0xc.0x14 = 0x3a6,0x1c
03a7 0257       | W  |		Execute	Discrete,Raise
03a8 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xc.0x15 = 0x3a8,0x15
03a9 0217       |    |		Execute	Heap_Access,All_Reference
03aa 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
03ab 0b21       | !  |		Execute_Immediate	Case_Compare,0x21
03ac 7006       |p   |		Jump_Nonzero	0x3b3
03ad 0b33       | 3  |		Execute_Immediate	Case_Compare,0x33
03ae 7004       |p   |		Jump_Nonzero	0x3b3
03af 0b2c       | ,  |		Execute_Immediate	Case_Compare,0x2c
03b0 7005       |p   |		Jump_Nonzero	0x3b6
03b1 4887       |H   |		Short_Literal	0x87							; Debug Table 0xc.0x16 = 0x3b1,0x18
03b2 0257       | W  |		Execute	Discrete,Raise
03b3 4808       |H   |		Short_Literal	0x8							; Debug Table 0xc.0x17 = 0x3b3,0x16
03b4 a402       |    |		Store_Unchecked	0x2,0x2
03b5 7802       |x   |		Jump	0x3b8
03b6 4802       |H   |		Short_Literal	0x2							; Debug Table 0xc.0x18 = 0x3b6,0x17
03b7 a402       |    |		Store_Unchecked	0x2,0x2
03b8 00d1       |    |		Pop_Control	Pop_Count_1
03b9 7805       |x   |		Jump	0x3bf
03ba 480d       |H   |		Short_Literal	0xd							; Debug Table 0xc.0x19 = 0x3ba,0x1a
03bb 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
03bc 7802       |x   |		Jump	0x3bf
03bd 4810       |H   |		Short_Literal	0x10							; Debug Table 0xc.0x1a = 0x3bd,0x1b
03be 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
03bf 00d1       |    |		Pop_Control	Pop_Count_1
03c0 7823       |x#  |		Jump	0x3e4
03c1 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xc.0x1b = 0x3c1,0x1e
03c2 0217       |    |		Execute	Heap_Access,All_Reference
03c3 3c0d       |<   |		Execute	Record,Field_Read,Field_Number 0xd
03c4 681d       |h   |		Jump_Zero	0x3e2
03c5 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xc.0x1c = 0x3c5,0x1f
03c6 0217       |    |		Execute	Heap_Access,All_Reference
03c7 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
03c8 7003       |p   |		Jump_Nonzero	0x3cc
03c9 4804       |H   |		Short_Literal	0x4							; Debug Table 0xc.0x1d = 0x3c9,0x20
03ca 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
03cb 7818       |x   |		Jump	0x3e4
03cc e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xc.0x1e = 0x3cc,0x21
03cd 0217       |    |		Execute	Heap_Access,All_Reference
03ce 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
03cf 0217       |    |		Execute	Heap_Access,All_Reference
03d0 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
03d1 0217       |    |		Execute	Heap_Access,All_Reference
03d2 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
03d3 0b21       | !  |		Execute_Immediate	Case_Compare,0x21
03d4 7006       |p   |		Jump_Nonzero	0x3db
03d5 0b33       | 3  |		Execute_Immediate	Case_Compare,0x33
03d6 7004       |p   |		Jump_Nonzero	0x3db
03d7 0b2c       | ,  |		Execute_Immediate	Case_Compare,0x2c
03d8 7005       |p   |		Jump_Nonzero	0x3de
03d9 4887       |H   |		Short_Literal	0x87							; Debug Table 0xc.0x1f = 0x3d9,0x24
03da 0257       | W  |		Execute	Discrete,Raise
03db 4809       |H   |		Short_Literal	0x9							; Debug Table 0xc.0x20 = 0x3db,0x22
03dc 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
03dd 7802       |x   |		Jump	0x3e0
03de 4803       |H   |		Short_Literal	0x3							; Debug Table 0xc.0x21 = 0x3de,0x23
03df 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
03e0 00d1       |    |		Pop_Control	Pop_Count_1
03e1 7802       |x   |		Jump	0x3e4
03e2 480e       |H   |		Short_Literal	0xe							; Debug Table 0xc.0x22 = 0x3e2,0x26
03e3 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
03e4 00d1       |    |		Pop_Control	Pop_Count_1
03e5 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x23 = 0x3e5,0x29
03e6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03e7 0000       |    |		.XXX[0x1]
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03ed       |    |		.CONST	0x03ed								; Address of begin
03e9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ea 0002       |    |		.CONST	0x0002								; Number of locals
03eb			INIT_03e8:
03eb e002       |    |		Load	0x0,0x2								; Debug Table 0xd = .DEBUG	0x03eb,0x108c,0x0002,0x0000,0x0059,0x75c5,0x0000,0x082a
													; Debug Table 0xd.0x0 = 0x3eb,0xffff
03ec 1b22       | "  |		Execute	Package,Field_Read,Field_Number 0x22
03ed			BODY_03e8:
03ed 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xd.0x1 = 0x3ed,0x1
03ee 0217       |    |		Execute	Heap_Access,All_Reference
03ef 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
03f0 6802       |h   |		Jump_Zero	0x3f3
03f1 4801       |H   |		Short_Literal	0x1							; Debug Table 0xd.0x2 = 0x3f1,0x2
03f2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03f3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xd.0x3 = 0x3f3,0x3
03f4 0217       |    |		Execute	Heap_Access,All_Reference
03f5 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
03f6 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
03f7 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x4 = 0x3f7,0x4
03f8 7002       |p   |		Jump_Nonzero	0x3fb
03f9 4887       |H   |		Short_Literal	0x87
03fa 0257       | W  |		Execute	Discrete,Raise
03fb 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x5 = 0x3fb,0x5
03fc 0217       |    |		Execute	Heap_Access,All_Reference
03fd 3c11       |<   |		Execute	Record,Field_Read,Field_Number 0x11
03fe 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03ff 0000       |    |		.XXX[0x1]
0400 ; --------------------------------------------------------------------------------------
0400 ; SUBPROGRAM
0400 ; --------------------------------------------------------------------------------------
0400 0423       | #  |		.CONST	0x0423								; Address of begin
0401 0004       |    |		.CONST	0x0004								; Address of exception handler
0402 000b       |    |		.CONST	0x000b								; Number of locals
0403			INIT_0400:
0403 e001       |    |		Load	0x0,0x1								; Debug Table 0xe = .DEBUG	0x0403,0x109a,0x0002,0x0000,0x0059,0x75c5,0x0000,0x085b
													; Debug Table 0xe.0x0 = 0x403,0xffff
0404 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0405 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0xe.0x1 = 0x405,0xfffe
0406 8219       |    |		Call	0x1,0x19
0407 e002       |    |		Load	0x0,0x2								; Debug Table 0xe.0x2 = 0x407,0xfffd
0408 1b22       | "  |		Execute	Package,Field_Read,Field_Number 0x22
0409 e005       |    |		Load	0x0,0x5								; Debug Table 0xe.0x3 = 0x409,0xfffc
040a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
040b 02c7       |    |		Declare_Variable	Any
040c e5ff       |    |		Load	0x2,-0x1
040d e001       |    |		Load	0x0,0x1
040e 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
040f 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0410 c405       |    |		Store	0x2,0x5
0411 e006       |    |		Load	0x0,0x6								; Debug Table 0xe.0x4 = 0x411,0xfffb
0412 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0413 02c7       |    |		Declare_Variable	Any
0414 00d8       |    |		Load_Top	At_Offset_0
0415 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0416 e006       |    |		Load	0x0,0x6								; Debug Table 0xe.0x5 = 0x416,0xfffa
0417 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0418 e00e       |    |		Load	0x0,0xe								; Debug Table 0xe.0x6 = 0x418,0xfff9
0419 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
041a e00f       |    |		Load	0x0,0xf								; Debug Table 0xe.0x7 = 0x41a,0xfff8
041b 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
041c 0322       | "  |		Declare_Variable	Record
041d 00d8       |    |		Load_Top	At_Offset_0
041e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
041f 029f 0813  |    |		Declare_Subprogram	INIT_0810,For_Call				; Debug Table 0xe.0x8 = 0x41f,0xfff7
0421 029f 0883  |    |		Declare_Subprogram	INIT_0880,For_Call
0423			BODY_0400:
0423 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xe.0x9 = 0x423,0x1
0424 0219       |    |		Execute	Heap_Access,All_Read
0425 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0426 e001       |    |		Load	0x0,0x1
0427 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0428 00d9       |    |		Load_Top	At_Offset_1
0429 e5ff       |    |		Load	0x2,-0x1
042a e403       |    |		Load	0x2,0x3
042b 800b       |    |		Call	0x0,0xb
042c 00d1       |    |		Pop_Control	Pop_Count_1
042d c402       |    |		Store	0x2,0x2
042e 00d1       |    |		Pop_Control	Pop_Count_1
042f e402       |    |		Load	0x2,0x2								; Debug Table 0xe.0xa = 0x42f,0x2
0430 70a0       |p   |		Jump_Nonzero	0x4d1
0431 e001       |    |		Load	0x0,0x1								; Debug Table 0xe.0xb = 0x431,0x3
0432 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0433 e5fd       |    |		Load	0x2,-0x3
0434 8010       |    |		Call	0x0,0x10
0435 c402       |    |		Store	0x2,0x2
0436 4801       |H   |		Short_Literal	0x1							; Debug Table 0xe.0xc = 0x436,0x4
0437 e402       |    |		Load	0x2,0x2
0438 0217       |    |		Execute	Heap_Access,All_Reference
0439 380a       |8   |		Execute	Record,Field_Write,Field_Number 0xa
043a e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xe.0xd = 0x43a,0x5
043b e402       |    |		Load	0x2,0x2
043c 0217       |    |		Execute	Heap_Access,All_Reference
043d 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
043e 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0xe.0xe = 0x43e,0x6
043f 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0440 e402       |    |		Load	0x2,0x2
0441 0217       |    |		Execute	Heap_Access,All_Reference
0442 3810       |8   |		Execute	Record,Field_Write,Field_Number 0x10
0443 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0xe.0xf = 0x443,0x7
0444 0217       |    |		Execute	Heap_Access,All_Reference
0445 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0446 e5fd       |    |		Load	0x2,-0x3
0447 8011       |    |		Call	0x0,0x11
0448 e402       |    |		Load	0x2,0x2
0449 0217       |    |		Execute	Heap_Access,All_Reference
044a 3815       |8   |		Execute	Record,Field_Write,Field_Number 0x15
044b e211       |    |		Load	0x1,0x11							; Debug Table 0xe.0x10 = 0x44b,0x8
044c e402       |    |		Load	0x2,0x2
044d 0217       |    |		Execute	Heap_Access,All_Reference
044e 380e       |8   |		Execute	Record,Field_Write,Field_Number 0xe
044f 4800       |H   |		Short_Literal	0x0							; Debug Table 0xe.0x11 = 0x44f,0x9
0450 e402       |    |		Load	0x2,0x2
0451 0217       |    |		Execute	Heap_Access,All_Reference
0452 380c       |8   |		Execute	Record,Field_Write,Field_Number 0xc
0453 e402       |    |		Load	0x2,0x2								; Debug Table 0xe.0x12 = 0x453,0xa
0454 e402       |    |		Load	0x2,0x2
0455 0217       |    |		Execute	Heap_Access,All_Reference
0456 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0457 e001       |    |		Load	0x0,0x1								; Debug Table 0xe.0x13 = 0x457,0xb
0458 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0459 e402       |    |		Load	0x2,0x2
045a 0217       |    |		Execute	Heap_Access,All_Reference
045b 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
045c 4800       |H   |		Short_Literal	0x0							; Debug Table 0xe.0x14 = 0x45c,0xc
045d e402       |    |		Load	0x2,0x2
045e 0217       |    |		Execute	Heap_Access,All_Reference
045f 3818       |8   |		Execute	Record,Field_Write,Field_Number 0x18
0460 4800       |H   |		Short_Literal	0x0							; Debug Table 0xe.0x15 = 0x460,0xd
0461 e402       |    |		Load	0x2,0x2
0462 0217       |    |		Execute	Heap_Access,All_Reference
0463 3817       |8   |		Execute	Record,Field_Write,Field_Number 0x17
0464 4804       |H   |		Short_Literal	0x4							; Debug Table 0xe.0x16 = 0x464,0xe
0465 e402       |    |		Load	0x2,0x2
0466 0217       |    |		Execute	Heap_Access,All_Reference
0467 3813       |8   |		Execute	Record,Field_Write,Field_Number 0x13
0468 4800       |H   |		Short_Literal	0x0							; Debug Table 0xe.0x17 = 0x468,0xf
0469 e402       |    |		Load	0x2,0x2
046a 0217       |    |		Execute	Heap_Access,All_Reference
046b 3816       |8   |		Execute	Record,Field_Write,Field_Number 0x16
046c e403       |    |		Load	0x2,0x3								; Debug Table 0xe.0x18 = 0x46c,0x10
046d e5fd       |    |		Load	0x2,-0x3
046e 800d       |    |		Call	0x0,0xd
046f e402       |    |		Load	0x2,0x2
0470 0217       |    |		Execute	Heap_Access,All_Reference
0471 380b       |8   |		Execute	Record,Field_Write,Field_Number 0xb
0472 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0xe.0x19 = 0x472,0x11
0473 0217       |    |		Execute	Heap_Access,All_Reference
0474 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0475 6836       |h6  |		Jump_Zero	0x4ac
0476 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0xe.0x1a = 0x476,0x12
0477 0217       |    |		Execute	Heap_Access,All_Reference
0478 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0479 e006       |    |		Load	0x0,0x6
047a 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
047b 6804       |h   |		Jump_Zero	0x480
047c e402       |    |		Load	0x2,0x2								; Debug Table 0xe.0x1b = 0x47c,0x13
047d e5fc       |    |		Load	0x2,-0x4
047e 840a       |    |		Call	0x2,0xa
047f 7846       |xF  |		Jump	0x4c6
0480 e00e       |    |		Load	0x0,0xe								; Debug Table 0xe.0x1c = 0x480,0x14
0481 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0482 00db       |    |		Load_Top	At_Offset_3
0483 e405       |    |		Load	0x2,0x5
0484 62bf       |b   |		Indirect_Literal	Discrete,0x744,{0x00000000, 0x00028000}
0485 e5fc       |    |		Load	0x2,-0x4
0486 0217       |    |		Execute	Heap_Access,All_Reference
0487 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0488 e00f       |    |		Load	0x0,0xf
0489 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
048a 00d1       |    |		Pop_Control	Pop_Count_1
048b c408       |    |		Store	0x2,0x8
048c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xe.0x1d = 0x48c,0x15
048d 0f04       |    |		Execute_Immediate	Equal,0x4
048e 6804       |h   |		Jump_Zero	0x493
048f e402       |    |		Load	0x2,0x2								; Debug Table 0xe.0x1e = 0x48f,0x16
0490 e5fc       |    |		Load	0x2,-0x4
0491 840a       |    |		Call	0x2,0xa
0492 7833       |x3  |		Jump	0x4c6
0493 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0xe.0x1f = 0x493,0x17
0494 0217       |    |		Execute	Heap_Access,All_Reference
0495 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0496 e006       |    |		Load	0x0,0x6
0497 1b40       | @  |		Execute	Package,Field_Read,Field_Number 0x40
0498 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0499 c406       |    |		Store	0x2,0x6
049a 4801       |H   |		Short_Literal	0x1							; Debug Table 0xe.0x20 = 0x49a,0x18
049b e406       |    |		Load	0x2,0x6
049c e5ff       |    |		Load	0x2,-0x1
049d e001       |    |		Load	0x0,0x1
049e 1b6a       | j  |		Execute	Package,Field_Read,Field_Number 0x6a
049f 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
04a0 e402       |    |		Load	0x2,0x2
04a1 0217       |    |		Execute	Heap_Access,All_Reference
04a2 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
04a3 e406       |    |		Load	0x2,0x6								; Debug Table 0xe.0x21 = 0x4a3,0x19
04a4 e5ff       |    |		Load	0x2,-0x1
04a5 e001       |    |		Load	0x0,0x1
04a6 1b6a       | j  |		Execute	Package,Field_Read,Field_Number 0x6a
04a7 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
04a8 e402       |    |		Load	0x2,0x2
04a9 0217       |    |		Execute	Heap_Access,All_Reference
04aa 380c       |8   |		Execute	Record,Field_Write,Field_Number 0xc
04ab 781a       |x   |		Jump	0x4c6
04ac e5fc       |    |		Load	0x2,-0x4							; Debug Table 0xe.0x22 = 0x4ac,0x1a
04ad 0217       |    |		Execute	Heap_Access,All_Reference
04ae 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
04af a404       |    |		Store_Unchecked	0x2,0x4
04b0 e404       |    |		Load	0x2,0x4								; Debug Table 0xe.0x23 = 0x4b0,0x1b
04b1 7002       |p   |		Jump_Nonzero	0x4b4
04b2 4887       |H   |		Short_Literal	0x87
04b3 0257       | W  |		Execute	Discrete,Raise
04b4 e404       |    |		Load	0x2,0x4								; Debug Table 0xe.0x24 = 0x4b4,0x1c
04b5 821a       |    |		Call	0x1,0x1a
04b6 e402       |    |		Load	0x2,0x2
04b7 0217       |    |		Execute	Heap_Access,All_Reference
04b8 3811       |8   |		Execute	Record,Field_Write,Field_Number 0x11
04b9 4801       |H   |		Short_Literal	0x1							; Debug Table 0xe.0x25 = 0x4b9,0x1d
04ba e402       |    |		Load	0x2,0x2
04bb 0217       |    |		Execute	Heap_Access,All_Reference
04bc 3814       |8   |		Execute	Record,Field_Write,Field_Number 0x14
04bd e5fc       |    |		Load	0x2,-0x4							; Debug Table 0xe.0x26 = 0x4bd,0x1e
04be 0217       |    |		Execute	Heap_Access,All_Reference
04bf 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
04c0 e5fd       |    |		Load	0x2,-0x3
04c1 8011       |    |		Call	0x0,0x11
04c2 e402       |    |		Load	0x2,0x2
04c3 0217       |    |		Execute	Heap_Access,All_Reference
04c4 3815       |8   |		Execute	Record,Field_Write,Field_Number 0x15
04c5 840b       |    |		Call	0x2,0xb								; Debug Table 0xe.0x27 = 0x4c5,0x1f
04c6 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xe.0x28 = 0x4c6,0x20
04c7 0219       |    |		Execute	Heap_Access,All_Read
04c8 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
04c9 00d8       |    |		Load_Top	At_Offset_0
04ca e5ff       |    |		Load	0x2,-0x1
04cb e402       |    |		Load	0x2,0x2
04cc e402       |    |		Load	0x2,0x2
04cd 0217       |    |		Execute	Heap_Access,All_Reference
04ce 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
04cf 8012       |    |		Call	0x0,0x12
04d0 00d2       |    |		Pop_Control	Pop_Count_2
04d1 e402       |    |		Load	0x2,0x2								; Debug Table 0xe.0x29 = 0x4d1,0x21
04d2 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
04d3 0000 0000  |    |		.BLANK	0000[0x5]
04d8 ; --------------------------------------------------------------------------------------
04d8 ; SUBPROGRAM
04d8 ; --------------------------------------------------------------------------------------
04d8 0507       |    |		.CONST	0x0507								; Address of begin
04d9 0004       |    |		.CONST	0x0004								; Address of exception handler
04da 000c       |    |		.CONST	0x000c								; Number of locals
04db			INIT_04d8:
04db 00f0       |    |		Load_Encached	Segment_Cache						; Debug Table 0xf = .DEBUG	0x04db,0x10f0,0x0001,0x0000,0x0059,0x75c5,0x0000,0x0b47
													; Debug Table 0xf.0x0 = 0x4db,0xffff
04dc e013       |    |		Load	0x0,0x13							; Debug Table 0xf.0x1 = 0x4dc,0xfffe
04dd 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
04de 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
04df e013       |    |		Load	0x0,0x13							; Debug Table 0xf.0x2 = 0x4df,0xfffd
04e0 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
04e1 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
04e2 029f 08ab  |    |		Declare_Subprogram	INIT_08a8,For_Call				; Debug Table 0xf.0x3 = 0x4e2,0xfffc
04e4 625b       |b[  |		Indirect_Literal	Discrete,0x740,{0x00000000, 0x005975c5}		; Debug Table 0xf.0x4 = 0x4e4,0xfffb
04e5 6256       |bV  |		Indirect_Literal	Discrete,0x73c,{0x00000000, 0x00000bb8}
04e6 4805       |H   |		Short_Literal	0x5
04e7 4803       |H   |		Short_Literal	0x3
04e8 0099       |    |		Action	Reference_Dynamic
04e9 e216       |    |		Load	0x1,0x16
04ea 0387       |    |		Declare_Variable	Package
04eb 00d8       |    |		Load_Top	At_Offset_0
04ec 020f       |    |		Execute	Module,Activate
04ed 029f 08d3  |    |		Declare_Subprogram	INIT_08d0,For_Call				; Debug Table 0xf.0x5 = 0x4ed,0xfffa
04ef 029f 0913  |    |		Declare_Subprogram	INIT_0910,For_Call				; Debug Table 0xf.0x6 = 0x4ef,0xfff9
04f1 624e       |bN  |		Indirect_Literal	Discrete,0x740,{0x00000000, 0x005975c5}		; Debug Table 0xf.0x7 = 0x4f1,0xfff8
04f2 6245       |bE  |		Indirect_Literal	Discrete,0x738,{0x00000000, 0x00000e96}
04f3 4808       |H   |		Short_Literal	0x8
04f4 4803       |H   |		Short_Literal	0x3
04f5 0099       |    |		Action	Reference_Dynamic
04f6 e216       |    |		Load	0x1,0x16
04f7 0387       |    |		Declare_Variable	Package
04f8 00d8       |    |		Load_Top	At_Offset_0
04f9 020f       |    |		Execute	Module,Activate
04fa 029f 0943  |   C|		Declare_Subprogram	INIT_0940,For_Call				; Debug Table 0xf.0x8 = 0x4fa,0xfff7
04fc 6243       |bC  |		Indirect_Literal	Discrete,0x740,{0x00000000, 0x005975c5}		; Debug Table 0xf.0x9 = 0x4fc,0xfff6
04fd 6236       |b6  |		Indirect_Literal	Discrete,0x734,{0x00000000, 0x00000f0f}
04fe 480a       |H   |		Short_Literal	0xa
04ff 4803       |H   |		Short_Literal	0x3
0500 0099       |    |		Action	Reference_Dynamic
0501 e216       |    |		Load	0x1,0x16
0502 0387       |    |		Declare_Variable	Package
0503 00d8       |    |		Load_Top	At_Offset_0
0504 020f       |    |		Execute	Module,Activate
0505 029f 0953  |   S|		Declare_Subprogram	INIT_0950,For_Call
0507			BODY_04d8:
0507 860c       |    |		Call	0x3,0xc								; Debug Table 0xf.0xa = 0x507,0x1
0508 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0509 0000 0000  |    |		.BLANK	0000[0x7]
0510 ; --------------------------------------------------------------------------------------
0510 ; SUBPROGRAM
0510 ; --------------------------------------------------------------------------------------
0510 053a       | :  |		.CONST	0x053a								; Address of begin
0511 0726       | &  |		.CONST	0x0726								; Address of exception handler
0512 000e       |    |		.CONST	0x000e								; Number of locals
0513			INIT_0510:
0513 e006       |    |		Load	0x0,0x6								; Debug Table 0x10 = .DEBUG	0x0513,0x1108,0x0004,0x0000,0x0059,0x75c5,0x0000,0x12c7
													; Debug Table 0x10.0x0 = 0x513,0xffff
0514 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0515 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0516 e004       |    |		Load	0x0,0x4								; Debug Table 0x10.0x1 = 0x516,0xfffe
0517 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
0518 e001       |    |		Load	0x0,0x1								; Debug Table 0x10.0x2 = 0x518,0xfffd
0519 1b64       | d  |		Execute	Package,Field_Read,Field_Number 0x64
051a 0322       | "  |		Declare_Variable	Record
051b 00d8       |    |		Load_Top	At_Offset_0
051c 1c00       |    |		Execute_Immediate	Run_Utility,0x0
051d e001       |    |		Load	0x0,0x1								; Debug Table 0x10.0x3 = 0x51d,0xfffc
051e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
051f e006       |    |		Load	0x0,0x6								; Debug Table 0x10.0x4 = 0x51f,0xfffb
0520 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0521 02c7       |    |		Declare_Variable	Any
0522 00d8       |    |		Load_Top	At_Offset_0
0523 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0524 e006       |    |		Load	0x0,0x6								; Debug Table 0x10.0x5 = 0x524,0xfffa
0525 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0526 e006       |    |		Load	0x0,0x6								; Debug Table 0x10.0x6 = 0x526,0xfff9
0527 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0528 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0529 e004       |    |		Load	0x0,0x4								; Debug Table 0x10.0x7 = 0x529,0xfff8
052a 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
052b 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x10.0x8 = 0x52b,0xfff7
052c e005       |    |		Load	0x0,0x5								; Debug Table 0x10.0x9 = 0x52c,0xfff6
052d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
052e 02c7       |    |		Declare_Variable	Any
052f 00d8       |    |		Load_Top	At_Offset_0
0530 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0531 e008       |    |		Load	0x0,0x8								; Debug Table 0x10.0xa = 0x531,0xfff5
0532 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0533 02c7       |    |		Declare_Variable	Any
0534 00d8       |    |		Load_Top	At_Offset_0
0535 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0536 e006       |    |		Load	0x0,0x6								; Debug Table 0x10.0xb = 0x536,0xfff4
0537 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0538 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0539 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x10.0xc = 0x539,0xfff3
053a			BODY_0510:
053a e007       |    |		Load	0x0,0x7								; Debug Table 0x10.0xd = 0x53a,0x1
053b 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
053c e5fd       |    |		Load	0x2,-0x3
053d e005       |    |		Load	0x0,0x5
053e 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
053f c60b       |    |		Store	0x3,0xb
0540 4800       |H   |		Short_Literal	0x0							; Debug Table 0x10.0xe = 0x540,0x2
0541 4800       |H   |		Short_Literal	0x0
0542 4801       |H   |		Short_Literal	0x1
0543 e5fa       |    |		Load	0x2,-0x6
0544 e60b       |    |		Load	0x3,0xb
0545 e5fe       |    |		Load	0x2,-0x2
0546 e001       |    |		Load	0x0,0x1
0547 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0548 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0549 a404       |    |		Store_Unchecked	0x2,0x4
054a e006       |    |		Load	0x0,0x6								; Debug Table 0x10.0xf = 0x54a,0x3
054b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
054c e006       |    |		Load	0x0,0x6
054d 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
054e 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
054f 65bc       |e   |		Indirect_Literal	Discrete,0x30c,{0x00000000, 0x00004000}
0550 e60b       |    |		Load	0x3,0xb
0551 4800       |H   |		Short_Literal	0x0
0552 e5ff       |    |		Load	0x2,-0x1
0553 e006       |    |		Load	0x0,0x6
0554 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0555 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0556 c602       |    |		Store	0x3,0x2
0557 c607       |    |		Store	0x3,0x7
0558 e607       |    |		Load	0x3,0x7								; Debug Table 0x10.0x10 = 0x558,0x4
0559 6826       |h&  |		Jump_Zero	0x580
055a 4802       |H   |		Short_Literal	0x2							; Debug Table 0x10.0x11 = 0x55a,0x5
055b 0092 0c4b  |   K|		Action	Push_String_Extended,0xc4b					; "Unable to get context for "
055d e5ff       |    |		Load	0x2,-0x1
055e e006       |    |		Load	0x0,0x6
055f 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0560 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
0561 01cc       |    |		Execute	Vector,Catenate
0562 0092 0c4c  |   L|		Action	Push_String_Extended,0xc4c					; ", status => "
0564 01cc       |    |		Execute	Vector,Catenate
0565 e607       |    |		Load	0x3,0x7
0566 e006       |    |		Load	0x0,0x6
0567 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0568 025e       | ^  |		Execute	Discrete,Convert
0569 1c01       |    |		Execute_Immediate	Run_Utility,0x1
056a 01cc       |    |		Execute	Vector,Catenate
056b e404       |    |		Load	0x2,0x4
056c e001       |    |		Load	0x0,0x1
056d 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
056e 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
056f e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x10.0x12 = 0x56f,0x6
0570 0120       |    |		Execute	Any,Is_Value
0571 6803       |h   |		Jump_Zero	0x575
0572 e008       |    |		Load	0x0,0x8
0573 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0574 7801       |x   |		Jump	0x576
0575 e5fa       |    |		Load	0x2,-0x6
0576 00e1       |    |		Load_Encached	Boolean_Cache
0577 e60b       |    |		Load	0x3,0xb
0578 e404       |    |		Load	0x2,0x4
0579 e5fd       |    |		Load	0x2,-0x3
057a 8213       |    |		Call	0x1,0x13
057b c60b       |    |		Store	0x3,0xb
057c c5fb       |    |		Store	0x2,-0x5
057d c5fa       |    |		Store	0x2,-0x6
057e 00cc       |    |		Action	Pop_Block							; Debug Table 0x10.0x13 = 0x57e,0x7
057f 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0580 e006       |    |		Load	0x0,0x6								; Debug Table 0x10.0x14 = 0x580,0x8
0581 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0582 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0583 e402       |    |		Load	0x2,0x2
0584 6587       |e   |		Indirect_Literal	Discrete,0x30c,{0x00000000, 0x00004000}
0585 e60b       |    |		Load	0x3,0xb
0586 4800       |H   |		Short_Literal	0x0
0587 e602       |    |		Load	0x3,0x2
0588 e212       |    |		Load	0x1,0x12
0589 e006       |    |		Load	0x0,0x6
058a 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
058b 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
058c 00d1       |    |		Pop_Control	Pop_Count_1
058d c608       |    |		Store	0x3,0x8
058e e608       |    |		Load	0x3,0x8								; Debug Table 0x10.0x15 = 0x58e,0x9
058f 6834       |h4  |		Jump_Zero	0x5c4
0590 4802       |H   |		Short_Literal	0x2							; Debug Table 0x10.0x16 = 0x590,0xa
0591 0092 0c57  |   W|		Action	Push_String_Extended,0xc57					; "Unable to resolve "
0593 e212       |    |		Load	0x1,0x12
0594 01cc       |    |		Execute	Vector,Catenate
0595 0092 0c58  |   X|		Action	Push_String_Extended,0xc58					; " in "
0597 01cc       |    |		Execute	Vector,Catenate
0598 e5ff       |    |		Load	0x2,-0x1
0599 e006       |    |		Load	0x0,0x6
059a 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
059b 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
059c 01cc       |    |		Execute	Vector,Catenate
059d 0092 0c4e  |   N|		Action	Push_String_Extended,0xc4e					; ", because "
059f 01cc       |    |		Execute	Vector,Catenate
05a0 656b       |ek  |		Indirect_Literal	Discrete,0x30c,{0x00000000, 0x00004000}
05a1 e60b       |    |		Load	0x3,0xb
05a2 e404       |    |		Load	0x2,0x4
05a3 e001       |    |		Load	0x0,0x1
05a4 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
05a5 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
05a6 4801       |H   |		Short_Literal	0x1
05a7 4800       |H   |		Short_Literal	0x0
05a8 e602       |    |		Load	0x3,0x2
05a9 e212       |    |		Load	0x1,0x12
05aa e608       |    |		Load	0x3,0x8
05ab e006       |    |		Load	0x0,0x6
05ac 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
05ad 1851       | Q  |		Execute	Package,Field_Execute,Field_Number 0x51
05ae 01cc       |    |		Execute	Vector,Catenate
05af e404       |    |		Load	0x2,0x4
05b0 e001       |    |		Load	0x0,0x1
05b1 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
05b2 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
05b3 e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x10.0x17 = 0x5b3,0xb
05b4 0120       |    |		Execute	Any,Is_Value
05b5 6803       |h   |		Jump_Zero	0x5b9
05b6 e008       |    |		Load	0x0,0x8
05b7 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
05b8 7801       |x   |		Jump	0x5ba
05b9 e5fa       |    |		Load	0x2,-0x6
05ba 00e1       |    |		Load_Encached	Boolean_Cache
05bb e60b       |    |		Load	0x3,0xb
05bc e404       |    |		Load	0x2,0x4
05bd e5fd       |    |		Load	0x2,-0x3
05be 8213       |    |		Call	0x1,0x13
05bf c60b       |    |		Store	0x3,0xb
05c0 c5fb       |    |		Store	0x2,-0x5
05c1 c5fa       |    |		Store	0x2,-0x6
05c2 00cc       |    |		Action	Pop_Block							; Debug Table 0x10.0x18 = 0x5c2,0xc
05c3 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
05c4 e001       |    |		Load	0x0,0x1								; Debug Table 0x10.0x19 = 0x5c4,0xd
05c5 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
05c6 4801       |H   |		Short_Literal	0x1
05c7 e5ff       |    |		Load	0x2,-0x1
05c8 e404       |    |		Load	0x2,0x4
05c9 e001       |    |		Load	0x0,0x1
05ca 1b6a       | j  |		Execute	Package,Field_Read,Field_Number 0x6a
05cb 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
05cc c605       |    |		Store	0x3,0x5
05cd e605       |    |		Load	0x3,0x5								; Debug Table 0x10.0x1a = 0x5cd,0xe
05ce 7011       |p   |		Jump_Nonzero	0x5e0
05cf e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x10.0x1b = 0x5cf,0xf
05d0 0120       |    |		Execute	Any,Is_Value
05d1 6803       |h   |		Jump_Zero	0x5d5
05d2 e008       |    |		Load	0x0,0x8
05d3 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
05d4 7801       |x   |		Jump	0x5d6
05d5 e5fa       |    |		Load	0x2,-0x6
05d6 00e1       |    |		Load_Encached	Boolean_Cache
05d7 e60b       |    |		Load	0x3,0xb
05d8 e404       |    |		Load	0x2,0x4
05d9 e5fd       |    |		Load	0x2,-0x3
05da 8213       |    |		Call	0x1,0x13
05db c60b       |    |		Store	0x3,0xb
05dc c5fb       |    |		Store	0x2,-0x5
05dd c5fa       |    |		Store	0x2,-0x6
05de 00cc       |    |		Action	Pop_Block							; Debug Table 0x10.0x1c = 0x5de,0x10
05df 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
05e0 e605       |    |		Load	0x3,0x5								; Debug Table 0x10.0x1d = 0x5e0,0x11
05e1 e001       |    |		Load	0x0,0x1
05e2 1b6b       | k  |		Execute	Package,Field_Read,Field_Number 0x6b
05e3 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
05e4 c606       |    |		Store	0x3,0x6
05e5 e006       |    |		Load	0x0,0x6								; Debug Table 0x10.0x1e = 0x5e5,0x12
05e6 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
05e7 e403       |    |		Load	0x2,0x3
05e8 6523       |e#  |		Indirect_Literal	Discrete,0x30c,{0x00000000, 0x00004000}
05e9 e60b       |    |		Load	0x3,0xb
05ea 4800       |H   |		Short_Literal	0x0
05eb e606       |    |		Load	0x3,0x6
05ec e006       |    |		Load	0x0,0x6
05ed 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
05ee 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
05ef 00d1       |    |		Pop_Control	Pop_Count_1
05f0 c607       |    |		Store	0x3,0x7
05f1 e607       |    |		Load	0x3,0x7								; Debug Table 0x10.0x1f = 0x5f1,0x13
05f2 6826       |h&  |		Jump_Zero	0x619
05f3 4802       |H   |		Short_Literal	0x2							; Debug Table 0x10.0x20 = 0x5f3,0x14
05f4 0092 0c59  |   Y|		Action	Push_String_Extended,0xc59					; "Unable to get version for "
05f6 e606       |    |		Load	0x3,0x6
05f7 e006       |    |		Load	0x0,0x6
05f8 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
05f9 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
05fa 01cc       |    |		Execute	Vector,Catenate
05fb 0092 0c4c  |   L|		Action	Push_String_Extended,0xc4c					; ", status => "
05fd 01cc       |    |		Execute	Vector,Catenate
05fe e607       |    |		Load	0x3,0x7
05ff e006       |    |		Load	0x0,0x6
0600 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0601 025e       | ^  |		Execute	Discrete,Convert
0602 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0603 01cc       |    |		Execute	Vector,Catenate
0604 e404       |    |		Load	0x2,0x4
0605 e001       |    |		Load	0x0,0x1
0606 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0607 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0608 e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x10.0x21 = 0x608,0x15
0609 0120       |    |		Execute	Any,Is_Value
060a 6803       |h   |		Jump_Zero	0x60e
060b e008       |    |		Load	0x0,0x8
060c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
060d 7801       |x   |		Jump	0x60f
060e e5fa       |    |		Load	0x2,-0x6
060f 00e1       |    |		Load_Encached	Boolean_Cache
0610 e60b       |    |		Load	0x3,0xb
0611 e404       |    |		Load	0x2,0x4
0612 e5fd       |    |		Load	0x2,-0x3
0613 8213       |    |		Call	0x1,0x13
0614 c60b       |    |		Store	0x3,0xb
0615 c5fb       |    |		Store	0x2,-0x5
0616 c5fa       |    |		Store	0x2,-0x6
0617 00cc       |    |		Action	Pop_Block							; Debug Table 0x10.0x22 = 0x617,0x16
0618 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0619 e004       |    |		Load	0x0,0x4								; Debug Table 0x10.0x23 = 0x619,0x17
061a 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
061b e004       |    |		Load	0x0,0x4
061c 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
061d 4801       |H   |		Short_Literal	0x1
061e e60b       |    |		Load	0x3,0xb
061f e402       |    |		Load	0x2,0x2
0620 e004       |    |		Load	0x0,0x4
0621 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0622 c603       |    |		Store	0x3,0x3
0623 c609       |    |		Store	0x3,0x9
0624 e609       |    |		Load	0x3,0x9								; Debug Table 0x10.0x24 = 0x624,0x18
0625 682b       |h+  |		Jump_Zero	0x651
0626 4802       |H   |		Short_Literal	0x2							; Debug Table 0x10.0x25 = 0x626,0x19
0627 0092 0c5a  |   Z|		Action	Push_String_Extended,0xc5a					; "Unable to open "
0629 e5ff       |    |		Load	0x2,-0x1
062a e006       |    |		Load	0x0,0x6
062b 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
062c 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
062d 01cc       |    |		Execute	Vector,Catenate
062e 0092 0c5b  |   [|		Action	Push_String_Extended,0xc5b					; "."
0630 01cc       |    |		Execute	Vector,Catenate
0631 e212       |    |		Load	0x1,0x12
0632 01cc       |    |		Execute	Vector,Catenate
0633 0092 0c4c  |   L|		Action	Push_String_Extended,0xc4c					; ", status => "
0635 01cc       |    |		Execute	Vector,Catenate
0636 e609       |    |		Load	0x3,0x9
0637 e004       |    |		Load	0x0,0x4
0638 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
0639 025e       | ^  |		Execute	Discrete,Convert
063a 1c01       |    |		Execute_Immediate	Run_Utility,0x1
063b 01cc       |    |		Execute	Vector,Catenate
063c e404       |    |		Load	0x2,0x4
063d e001       |    |		Load	0x0,0x1
063e 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
063f 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0640 e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x10.0x26 = 0x640,0x1a
0641 0120       |    |		Execute	Any,Is_Value
0642 6803       |h   |		Jump_Zero	0x646
0643 e008       |    |		Load	0x0,0x8
0644 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0645 7801       |x   |		Jump	0x647
0646 e5fa       |    |		Load	0x2,-0x6
0647 00e1       |    |		Load_Encached	Boolean_Cache
0648 e60b       |    |		Load	0x3,0xb
0649 e404       |    |		Load	0x2,0x4
064a e5fd       |    |		Load	0x2,-0x3
064b 8213       |    |		Call	0x1,0x13
064c c60b       |    |		Store	0x3,0xb
064d c5fb       |    |		Store	0x2,-0x5
064e c5fa       |    |		Store	0x2,-0x6
064f 00cc       |    |		Action	Pop_Block							; Debug Table 0x10.0x27 = 0x64f,0x1b
0650 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0651 e006       |    |		Load	0x0,0x6								; Debug Table 0x10.0x28 = 0x651,0x1c
0652 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0653 e604       |    |		Load	0x3,0x4
0654 64b7       |d   |		Indirect_Literal	Discrete,0x30c,{0x00000000, 0x00004000}
0655 e60b       |    |		Load	0x3,0xb
0656 e5ff       |    |		Load	0x2,-0x1
0657 e006       |    |		Load	0x0,0x6
0658 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
0659 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
065a 00d1       |    |		Pop_Control	Pop_Count_1
065b c607       |    |		Store	0x3,0x7
065c e607       |    |		Load	0x3,0x7								; Debug Table 0x10.0x29 = 0x65c,0x1d
065d 6826       |h&  |		Jump_Zero	0x684
065e 4802       |H   |		Short_Literal	0x2							; Debug Table 0x10.0x2a = 0x65e,0x1e
065f 0092 0c5c  |   \|		Action	Push_String_Extended,0xc5c					; "Unable to get target key for "
0661 e5ff       |    |		Load	0x2,-0x1
0662 e006       |    |		Load	0x0,0x6
0663 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0664 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
0665 01cc       |    |		Execute	Vector,Catenate
0666 0092 0c5d  |   ]|		Action	Push_String_Extended,0xc5d					; " status => "
0668 01cc       |    |		Execute	Vector,Catenate
0669 e607       |    |		Load	0x3,0x7
066a e006       |    |		Load	0x0,0x6
066b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
066c 025e       | ^  |		Execute	Discrete,Convert
066d 1c01       |    |		Execute_Immediate	Run_Utility,0x1
066e 01cc       |    |		Execute	Vector,Catenate
066f e404       |    |		Load	0x2,0x4
0670 e001       |    |		Load	0x0,0x1
0671 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0672 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0673 e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x10.0x2b = 0x673,0x1f
0674 0120       |    |		Execute	Any,Is_Value
0675 6803       |h   |		Jump_Zero	0x679
0676 e008       |    |		Load	0x0,0x8
0677 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0678 7801       |x   |		Jump	0x67a
0679 e5fa       |    |		Load	0x2,-0x6
067a 00e1       |    |		Load_Encached	Boolean_Cache
067b e60b       |    |		Load	0x3,0xb
067c e404       |    |		Load	0x2,0x4
067d e5fd       |    |		Load	0x2,-0x3
067e 8213       |    |		Call	0x1,0x13
067f c60b       |    |		Store	0x3,0xb
0680 c5fb       |    |		Store	0x2,-0x5
0681 c5fa       |    |		Store	0x2,-0x6
0682 00cc       |    |		Action	Pop_Block							; Debug Table 0x10.0x2c = 0x682,0x20
0683 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0684 4800       |H   |		Short_Literal	0x0							; Debug Table 0x10.0x2d = 0x684,0x21
0685 e014       |    |		Load	0x0,0x14
0686 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
0687 e604       |    |		Load	0x3,0x4
0688 e015       |    |		Load	0x0,0x15
0689 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
068a 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
068b 0e03       |    |		Execute_Immediate	Not_Equal,0x3
068c 6823       |h#  |		Jump_Zero	0x6b0
068d 4802       |H   |		Short_Literal	0x2							; Debug Table 0x10.0x2e = 0x68d,0x22
068e 0092 0c5e  |   ^|		Action	Push_String_Extended,0xc5e					; "Target key "
0690 e604       |    |		Load	0x3,0x4
0691 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0692 e014       |    |		Load	0x0,0x14
0693 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0694 0122       | "  |		Execute	Any,Make_Root_Type
0695 025e       | ^  |		Execute	Discrete,Convert
0696 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0697 01cc       |    |		Execute	Vector,Catenate
0698 0092 0c5f  |   _|		Action	Push_String_Extended,0xc5f					; " of enclosing world is illegal"
069a 01cc       |    |		Execute	Vector,Catenate
069b e404       |    |		Load	0x2,0x4
069c e001       |    |		Load	0x0,0x1
069d 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
069e 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
069f e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x10.0x2f = 0x69f,0x23
06a0 0120       |    |		Execute	Any,Is_Value
06a1 6803       |h   |		Jump_Zero	0x6a5
06a2 e008       |    |		Load	0x0,0x8
06a3 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
06a4 7801       |x   |		Jump	0x6a6
06a5 e5fa       |    |		Load	0x2,-0x6
06a6 00e1       |    |		Load_Encached	Boolean_Cache
06a7 e60b       |    |		Load	0x3,0xb
06a8 e404       |    |		Load	0x2,0x4
06a9 e5fd       |    |		Load	0x2,-0x3
06aa 8213       |    |		Call	0x1,0x13
06ab c60b       |    |		Store	0x3,0xb
06ac c5fb       |    |		Store	0x2,-0x5
06ad c5fa       |    |		Store	0x2,-0x6
06ae 00cc       |    |		Action	Pop_Block							; Debug Table 0x10.0x30 = 0x6ae,0x24
06af 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
06b0 4801       |H   |		Short_Literal	0x1							; Debug Table 0x10.0x31 = 0x6b0,0x25
06b1 e605       |    |		Load	0x3,0x5
06b2 0217       |    |		Execute	Heap_Access,All_Reference
06b3 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
06b4 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x10.0x32 = 0x6b4,0x26
06b5 e404       |    |		Load	0x2,0x4
06b6 e001       |    |		Load	0x0,0x1
06b7 1b6a       | j  |		Execute	Package,Field_Read,Field_Number 0x6a
06b8 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
06b9 e605       |    |		Load	0x3,0x5
06ba 0217       |    |		Execute	Heap_Access,All_Reference
06bb 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
06bc 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x10.0x33 = 0x6bc,0x27
06bd e604       |    |		Load	0x3,0x4
06be e605       |    |		Load	0x3,0x5
06bf e603       |    |		Load	0x3,0x3
06c0 8405       |    |		Call	0x2,0x5
06c1 e404       |    |		Load	0x2,0x4								; Debug Table 0x10.0x34 = 0x6c1,0x28
06c2 e001       |    |		Load	0x0,0x1
06c3 1b6a       | j  |		Execute	Package,Field_Read,Field_Number 0x6a
06c4 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
06c5 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x10.0x35 = 0x6c5,0x29
06c6 684b       |hK  |		Jump_Zero	0x712
06c7 e006       |    |		Load	0x0,0x6								; Debug Table 0x10.0x36 = 0x6c7,0x2a
06c8 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
06c9 00f1       |    |		Load_Encached	Diana_Temp_Seq
06ca e006       |    |		Load	0x0,0x6
06cb 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
06cc 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
06cd e60c       |    |		Load	0x3,0xc
06ce 0120       |    |		Execute	Any,Is_Value
06cf 6803       |h   |		Jump_Zero	0x6d3
06d0 e008       |    |		Load	0x0,0x8
06d1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
06d2 7801       |x   |		Jump	0x6d4
06d3 e60c       |    |		Load	0x3,0xc
06d4 00a2 030c  |    |		Action	Push_Discrete_Extended
06d6 e60b       |    |		Load	0x3,0xb
06d7 4800       |H   |		Short_Literal	0x0
06d8 e006       |    |		Load	0x0,0x6
06d9 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
06da 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
06db e006       |    |		Load	0x0,0x6
06dc 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
06dd e402       |    |		Load	0x2,0x2
06de e006       |    |		Load	0x0,0x6
06df 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
06e0 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
06e1 c60c       |    |		Store	0x3,0xc
06e2 c60d       |    |		Store	0x3,0xd
06e3 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
06e4 c607       |    |		Store	0x3,0x7
06e5 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0x37 = 0x6e5,0x2b
06e6 e404       |    |		Load	0x2,0x4
06e7 e001       |    |		Load	0x0,0x1
06e8 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
06e9 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
06ea e607       |    |		Load	0x3,0x7								; Debug Table 0x10.0x38 = 0x6ea,0x2c
06eb 6826       |h&  |		Jump_Zero	0x712
06ec 4802       |H   |		Short_Literal	0x2							; Debug Table 0x10.0x39 = 0x6ec,0x2d
06ed 0092 0c60  |   `|		Action	Push_String_Extended,0xc60					; "Unable to destroy "
06ef e402       |    |		Load	0x2,0x2
06f0 e006       |    |		Load	0x0,0x6
06f1 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
06f2 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
06f3 01cc       |    |		Execute	Vector,Catenate
06f4 0092 0c4c  |   L|		Action	Push_String_Extended,0xc4c					; ", status => "
06f6 01cc       |    |		Execute	Vector,Catenate
06f7 e607       |    |		Load	0x3,0x7
06f8 e006       |    |		Load	0x0,0x6
06f9 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
06fa 025e       | ^  |		Execute	Discrete,Convert
06fb 1c01       |    |		Execute_Immediate	Run_Utility,0x1
06fc 01cc       |    |		Execute	Vector,Catenate
06fd e404       |    |		Load	0x2,0x4
06fe e001       |    |		Load	0x0,0x1
06ff 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0700 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0701 e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x10.0x3a = 0x701,0x2e
0702 0120       |    |		Execute	Any,Is_Value
0703 6803       |h   |		Jump_Zero	0x707
0704 e008       |    |		Load	0x0,0x8
0705 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0706 7801       |x   |		Jump	0x708
0707 e5fa       |    |		Load	0x2,-0x6
0708 00e1       |    |		Load_Encached	Boolean_Cache
0709 e60b       |    |		Load	0x3,0xb
070a e404       |    |		Load	0x2,0x4
070b e5fd       |    |		Load	0x2,-0x3
070c 8213       |    |		Call	0x1,0x13
070d c60b       |    |		Store	0x3,0xb
070e c5fb       |    |		Store	0x2,-0x5
070f c5fa       |    |		Store	0x2,-0x6
0710 00cc       |    |		Action	Pop_Block							; Debug Table 0x10.0x3b = 0x710,0x2f
0711 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0712 e404       |    |		Load	0x2,0x4								; Debug Table 0x10.0x3c = 0x712,0x30
0713 e001       |    |		Load	0x0,0x1
0714 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0715 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0716 a60a       |    |		Store_Unchecked	0x3,0xa
0717 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x10.0x3d = 0x717,0x31
0718 4801       |H   |		Short_Literal	0x1
0719 e60a       |    |		Load	0x3,0xa
071a e5fd       |    |		Load	0x2,-0x3
071b e005       |    |		Load	0x0,0x5
071c 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
071d c60b       |    |		Store	0x3,0xb
071e e404       |    |		Load	0x2,0x4								; Debug Table 0x10.0x3e = 0x71e,0x32
071f e001       |    |		Load	0x0,0x1
0720 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0721 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0722 c5fa       |    |		Store	0x2,-0x6
0723 e60a       |    |		Load	0x3,0xa								; Debug Table 0x10.0x3f = 0x723,0x33
0724 a5fb       |    |		Store_Unchecked	0x2,-0x5
0725 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0726			TRAP_0510:
0726 0007       |    |		Action	Break_Optional
0727 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x10.0x40 = 0x727,0x34
0728 e404       |    |		Load	0x2,0x4
0729 8009       |    |		Call	0x0,0x9
072a e404       |    |		Load	0x2,0x4								; Debug Table 0x10.0x41 = 0x72a,0x35
072b e001       |    |		Load	0x0,0x1
072c 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
072d 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
072e c5fa       |    |		Store	0x2,-0x6
072f 4800       |H   |		Short_Literal	0x0							; Debug Table 0x10.0x42 = 0x72f,0x36
0730 a5fb       |    |		Store_Unchecked	0x2,-0x5
0731 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0732 0000 0000  |    |		.XXX[0x2]
0734 0000 0000  |    |		.LITERAL	{0x00000000, 0x00000f0f}
0738 0000 0000  |    |		.LITERAL	{0x00000000, 0x00000e96}
073c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00000bb8}
0740 0000 0000  |    |		.LITERAL	{0x00000000, 0x005975c5}
0744 0000 0000  |    |		.LITERAL	{0x00000000, 0x00028000}
0748 ; --------------------------------------------------------------------------------------
0748 ; SUBPROGRAM
0748 ; --------------------------------------------------------------------------------------
0748 0756       | V  |		.CONST	0x0756								; Address of begin
0749 0004       |    |		.CONST	0x0004								; Address of exception handler
074a 0003       |    |		.CONST	0x0003								; Number of locals
074b			INIT_0748:
074b 0007       |    |		Action	Break_Optional							; Debug Table 0x11 = .DEBUG	0x074b,0x1190,0x0002,0x0000,0x0059,0x75c5,0x0000,0x0107
													; Debug Table 0x11.0x0 = 0x74b,0xffff
074c 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x11.0x1 = 0x74c,0xfffe
074d 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
074e e008       |    |		Load	0x0,0x8								; Debug Table 0x11.0x2 = 0x74e,0xfffd
074f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0750 02c7       |    |		Declare_Variable	Any
0751 e5ff       |    |		Load	0x2,-0x1
0752 e001       |    |		Load	0x0,0x1
0753 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0754 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0755 c603       |    |		Store	0x3,0x3
0756			BODY_0748:
0756 00cf       |    |		Action	Mark_Auxiliary
0757 780c       |x   |		Jump	0x764
0758 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x11.0x3 = 0x758,0x2
0759 00da       |    |		Load_Top	At_Offset_2
075a e008       |    |		Load	0x0,0x8
075b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
075c 0c02       |    |		Execute_Immediate	Greater_Equal,0x2
075d 0273       | s  |		Execute	Discrete,Plus
075e 005b       | [  |		Store_Top	Discrete,At_Offset_3
075f 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x11.0x4 = 0x75f,0x3
0760 e008       |    |		Load	0x0,0x8
0761 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0762 c603       |    |		Store	0x3,0x3
0763 00c9       |    |		Action	Pop_Auxiliary_Loop
0764 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x11.0x5 = 0x764,0x1
0765 e008       |    |		Load	0x0,0x8
0766 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0767 6ff0       |o   |		Jump_Zero	0x758
0768 00ce       |    |		Action	Pop_Auxiliary
0769 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x11.0x6 = 0x769,0x4
076a e001       |    |		Load	0x0,0x1
076b 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
076c 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
076d 00da       |    |		Load_Top	At_Offset_2
076e 0f00       |    |		Execute_Immediate	Equal,0x0
076f 027f       |    |		Execute	Discrete,Equal
0770 7002       |p   |		Jump_Nonzero	0x773
0771 4887       |H   |		Short_Literal	0x87
0772 0257       | W  |		Execute	Discrete,Raise
0773 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x11.0x7 = 0x773,0x5
0774 00ca       |    |		Action	Exit_Nullary_Function
0775 0000 0000  |    |		.XXX[0x3]
0777 0000       |    |
0778 ; --------------------------------------------------------------------------------------
0778 ; SUBPROGRAM
0778 ; --------------------------------------------------------------------------------------
0778 077f       |    |		.CONST	0x077f								; Address of begin
0779 0795       |    |		.CONST	0x0795								; Address of exception handler
077a 0003       |    |		.CONST	0x0003								; Number of locals
077b			INIT_0778:
077b 029f 099b  |    |		Declare_Subprogram	INIT_0998,For_Call				; Debug Table 0x12 = .DEBUG	0x077b,0x11a2,0x0004,0x0000,0x0059,0x75c5,0x0000,0x0210
077d 029f 09b3  |    |		Declare_Subprogram	INIT_09b0,For_Call
077f			BODY_0778:
077f e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x12.0x0 = 0x77f,0x1
0780 4604       |F   |		Jump_Case	0x5
0781 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; case 0x0
0782 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; case 0x1
0783 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; case 0x2
0784 7801       |x   |		Jump	0x786								; case 0x3
0785 780d       |x   |		Jump	0x793								; case 0x4
0786 e001       |    |		Load	0x0,0x1								; Debug Table 0x12.0x1 = 0x786,0x2
0787 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0788 e5fd       |    |		Load	0x2,-0x3
0789 e5ff       |    |		Load	0x2,-0x1
078a e00a       |    |		Load	0x0,0xa
078b 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
078c e5fd       |    |		Load	0x2,-0x3
078d e5fe       |    |		Load	0x2,-0x2
078e e5ff       |    |		Load	0x2,-0x1
078f e00a       |    |		Load	0x0,0xa
0790 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0791 c402       |    |		Store	0x2,0x2
0792 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0793 8602       |    |		Call	0x3,0x2								; Debug Table 0x12.0x2 = 0x793,0x3
0794 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0795			TRAP_0778:
0795 6246       |bF  |		Indirect_Literal	Discrete,0x9dc,{0x00000000, 0x59718502}
0796 010f       |    |		Execute	Exception,Equal
0797 6801       |h   |		Jump_Zero	0x799
0798 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x12.0x3 = 0x798,0x5
0799 8603       |    |		Call	0x3,0x3								; Debug Table 0x12.0x4 = 0x799,0x6
079a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
079b 0000 0000  |    |		.BLANK	0000[0x5]
07a0 ; --------------------------------------------------------------------------------------
07a0 ; SUBPROGRAM
07a0 ; --------------------------------------------------------------------------------------
07a0 07a3       |    |		.CONST	0x07a3								; Address of begin
07a1 07b2       |    |		.CONST	0x07b2								; Address of exception handler
07a2 0001       |    |		.CONST	0x0001								; Number of locals
07a3			BODY_07a0:
07a3			INIT_07a0:
07a3 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x13 = .DEBUG	0x07a3,0x11ae,0x0004,0x0000,0x0059,0x75c5,0x0000,0x0234
													; Debug Table 0x13.0x0 = 0x7a3,0x1
07a4 0219       |    |		Execute	Heap_Access,All_Read
07a5 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
07a6 e001       |    |		Load	0x0,0x1
07a7 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
07a8 00d9       |    |		Load_Top	At_Offset_1
07a9 e5ff       |    |		Load	0x2,-0x1
07aa e5fd       |    |		Load	0x2,-0x3
07ab e5ff       |    |		Load	0x2,-0x1
07ac e00a       |    |		Load	0x0,0xa
07ad 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
07ae 800b       |    |		Call	0x0,0xb
07af 00d1       |    |		Pop_Control	Pop_Count_1
07b0 c402       |    |		Store	0x2,0x2
07b1 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
07b2			TRAP_07a0:
07b2 0007       |    |		Action	Break_Optional
07b3 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x13.0x1 = 0x7b3,0x2
07b4 0000 0000  |    |		.BLANK	0000[0x4]
07b8 ; --------------------------------------------------------------------------------------
07b8 ; SUBPROGRAM
07b8 ; --------------------------------------------------------------------------------------
07b8 07bb       |    |		.CONST	0x07bb								; Address of begin
07b9 0004       |    |		.CONST	0x0004								; Address of exception handler
07ba 0001       |    |		.CONST	0x0001								; Number of locals
07bb			BODY_07b8:
07bb			INIT_07b8:
07bb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x14 = .DEBUG	0x07bb,0x11b4,0x0002,0x0000,0x0059,0x75c5,0x0000,0x064b
													; Debug Table 0x14.0x0 = 0x7bb,0x1
07bc 0217       |    |		Execute	Heap_Access,All_Reference
07bd 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
07be 6806       |h   |		Jump_Zero	0x7c5
07bf 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x14.0x1 = 0x7bf,0x2
07c0 0217       |    |		Execute	Heap_Access,All_Reference
07c1 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
07c2 0217       |    |		Execute	Heap_Access,All_Reference
07c3 0335       | 5  |		Declare_Variable	Array,Duplicate
07c4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07c5 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x14.0x2 = 0x7c5,0x3
07c6 0217       |    |		Execute	Heap_Access,All_Reference
07c7 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
07c8 0217       |    |		Execute	Heap_Access,All_Reference
07c9 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
07ca 0217       |    |		Execute	Heap_Access,All_Reference
07cb 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
07cc 680a       |h   |		Jump_Zero	0x7d7
07cd 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x14.0x3 = 0x7cd,0x4
07ce 0217       |    |		Execute	Heap_Access,All_Reference
07cf 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
07d0 0217       |    |		Execute	Heap_Access,All_Reference
07d1 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
07d2 0217       |    |		Execute	Heap_Access,All_Reference
07d3 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
07d4 0217       |    |		Execute	Heap_Access,All_Reference
07d5 0335       | 5  |		Declare_Variable	Array,Duplicate
07d6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07d7 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x14.0x4 = 0x7d7,0x5
07d8 0217       |    |		Execute	Heap_Access,All_Reference
07d9 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
07da 0217       |    |		Execute	Heap_Access,All_Reference
07db 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
07dc 6810       |h   |		Jump_Zero	0x7ed
07dd 482e       |H.  |		Short_Literal	0x2e							; Debug Table 0x14.0x5 = 0x7dd,0x6
07de 00db       |    |		Load_Top	At_Offset_3
07df 0217       |    |		Execute	Heap_Access,All_Reference
07e0 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
07e1 0217       |    |		Execute	Heap_Access,All_Reference
07e2 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
07e3 8402       |    |		Call	0x2,0x2
07e4 01cb       |    |		Execute	Vector,Append
07e5 00db       |    |		Load_Top	At_Offset_3
07e6 0217       |    |		Execute	Heap_Access,All_Reference
07e7 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
07e8 0217       |    |		Execute	Heap_Access,All_Reference
07e9 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
07ea 0217       |    |		Execute	Heap_Access,All_Reference
07eb 01cc       |    |		Execute	Vector,Catenate
07ec 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07ed 4831       |H1  |		Short_Literal	0x31
07ee 0257       | W  |		Execute	Discrete,Raise
07ef 0000       |    |		.XXX[0x1]
07f0 ; --------------------------------------------------------------------------------------
07f0 ; SUBPROGRAM
07f0 ; --------------------------------------------------------------------------------------
07f0 07fb       |    |		.CONST	0x07fb								; Address of begin
07f1 0004       |    |		.CONST	0x0004								; Address of exception handler
07f2 0002       |    |		.CONST	0x0002								; Number of locals
07f3			INIT_07f0:
07f3 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x15 = .DEBUG	0x07f3,0x11c2,0x0004,0x0000,0x0059,0x75c5,0x0000,0x06ce
													; Debug Table 0x15.0x0 = 0x7f3,0xffff
07f4 8402       |    |		Call	0x2,0x2
07f5 e5ff       |    |		Load	0x2,-0x1
07f6 0217       |    |		Execute	Heap_Access,All_Reference
07f7 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
07f8 0217       |    |		Execute	Heap_Access,All_Reference
07f9 8016       |    |		Call	0x0,0x16
07fa 8017       |    |		Call	0x0,0x17
07fb			BODY_07f0:
07fb e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x15.0x1 = 0x7fb,0x1
07fc 0217       |    |		Execute	Heap_Access,All_Reference
07fd 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
07fe 8217       |    |		Call	0x1,0x17
07ff 6806       |h   |		Jump_Zero	0x806
0800 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x15.0x2 = 0x800,0x2
0801 0092 0c56  |   V|		Action	Push_String_Extended,0xc56					; "'SPEC"
0803 01cc       |    |		Execute	Vector,Catenate
0804 00cb       |    |		Action	Pop_Block_With_Result
0805 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0806 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x15.0x3 = 0x806,0x3
0807 0092 0c61  |   a|		Action	Push_String_Extended,0xc61					; "'BODY"
0809 01cc       |    |		Execute	Vector,Catenate
080a 00cb       |    |		Action	Pop_Block_With_Result
080b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
080c 0000 0000  |    |		.BLANK	0000[0x4]
0810 ; --------------------------------------------------------------------------------------
0810 ; SUBPROGRAM
0810 ; --------------------------------------------------------------------------------------
0810 081b       |    |		.CONST	0x081b								; Address of begin
0811 0004       |    |		.CONST	0x0004								; Address of exception handler
0812 0003       |    |		.CONST	0x0003								; Number of locals
0813			INIT_0810:
0813 e006       |    |		Load	0x0,0x6								; Debug Table 0x16 = .DEBUG	0x0813,0x11cc,0x0001,0x0000,0x0059,0x75c5,0x0000,0x08b9
													; Debug Table 0x16.0x0 = 0x813,0xffff
0814 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0815 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0816 e006       |    |		Load	0x0,0x6								; Debug Table 0x16.0x1 = 0x816,0xfffe
0817 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0818 02c7       |    |		Declare_Variable	Any
0819 00d8       |    |		Load_Top	At_Offset_0
081a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
081b			BODY_0810:
081b e006       |    |		Load	0x0,0x6								; Debug Table 0x16.0x2 = 0x81b,0x1
081c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
081d 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
081e 00d9       |    |		Load_Top	At_Offset_1
081f 0120       |    |		Execute	Any,Is_Value
0820 6803       |h   |		Jump_Zero	0x824
0821 e006       |    |		Load	0x0,0x6
0822 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0823 7801       |x   |		Jump	0x825
0824 00d9       |    |		Load_Top	At_Offset_1
0825 61b2       |a   |		Indirect_Literal	Discrete,0x9d8,{0x00000000, 0x00004000}
0826 e5ff       |    |		Load	0x2,-0x1
0827 e001       |    |		Load	0x0,0x1
0828 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0829 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
082a e018       |    |		Load	0x0,0x18
082b 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
082c e006       |    |		Load	0x0,0x6
082d 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
082e 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
082f e7ff       |    |		Load	0x3,-0x1
0830 0217       |    |		Execute	Heap_Access,All_Reference
0831 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0832 0217       |    |		Execute	Heap_Access,All_Reference
0833 e006       |    |		Load	0x0,0x6
0834 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0835 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0836 c603       |    |		Store	0x3,0x3
0837 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0838 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x16.0x3 = 0x838,0x2
0839 682e       |h.  |		Jump_Zero	0x868
083a 4801       |H   |		Short_Literal	0x1							; Debug Table 0x16.0x4 = 0x83a,0x3
083b 0092 0c62  |   b|		Action	Push_String_Extended,0xc62					; "unable to resolve placeholder reference to "
083d e7ff       |    |		Load	0x3,-0x1
083e 0217       |    |		Execute	Heap_Access,All_Reference
083f 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0840 0217       |    |		Execute	Heap_Access,All_Reference
0841 01cc       |    |		Execute	Vector,Catenate
0842 0092 0c4e  |   N|		Action	Push_String_Extended,0xc4e					; ", because "
0844 01cc       |    |		Execute	Vector,Catenate
0845 6192       |a   |		Indirect_Literal	Discrete,0x9d8,{0x00000000, 0x00004000}
0846 e5ff       |    |		Load	0x2,-0x1
0847 e001       |    |		Load	0x0,0x1
0848 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0849 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
084a e5ff       |    |		Load	0x2,-0x1
084b e001       |    |		Load	0x0,0x1
084c 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
084d 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
084e 4801       |H   |		Short_Literal	0x1
084f 4800       |H   |		Short_Literal	0x0
0850 e018       |    |		Load	0x0,0x18
0851 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0852 e006       |    |		Load	0x0,0x6
0853 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0854 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0855 e7ff       |    |		Load	0x3,-0x1
0856 0217       |    |		Execute	Heap_Access,All_Reference
0857 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0858 0217       |    |		Execute	Heap_Access,All_Reference
0859 e602       |    |		Load	0x3,0x2
085a e006       |    |		Load	0x0,0x6
085b 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
085c 1851       | Q  |		Execute	Package,Field_Execute,Field_Number 0x51
085d 01cc       |    |		Execute	Vector,Catenate
085e e5ff       |    |		Load	0x2,-0x1
085f e001       |    |		Load	0x0,0x1
0860 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0861 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0862 e006       |    |		Load	0x0,0x6								; Debug Table 0x16.0x5 = 0x862,0x4
0863 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0864 e7fe       |    |		Load	0x3,-0x2
0865 0217       |    |		Execute	Heap_Access,All_Reference
0866 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
0867 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0868 4801       |H   |		Short_Literal	0x1							; Debug Table 0x16.0x6 = 0x868,0x5
0869 00d9       |    |		Load_Top	At_Offset_1
086a e5ff       |    |		Load	0x2,-0x1
086b e001       |    |		Load	0x0,0x1
086c 1b6a       | j  |		Execute	Package,Field_Read,Field_Number 0x6a
086d 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
086e e7fe       |    |		Load	0x3,-0x2
086f 0217       |    |		Execute	Heap_Access,All_Reference
0870 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
0871 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x16.0x7 = 0x871,0x6
0872 e5ff       |    |		Load	0x2,-0x1
0873 e001       |    |		Load	0x0,0x1
0874 1b6a       | j  |		Execute	Package,Field_Read,Field_Number 0x6a
0875 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0876 e7fe       |    |		Load	0x3,-0x2
0877 0217       |    |		Execute	Heap_Access,All_Reference
0878 380c       |8   |		Execute	Record,Field_Write,Field_Number 0xc
0879 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
087a 0000 0000  |    |		.BLANK	0000[0x6]
0880 ; --------------------------------------------------------------------------------------
0880 ; SUBPROGRAM
0880 ; --------------------------------------------------------------------------------------
0880 0883       |    |		.CONST	0x0883								; Address of begin
0881 089a       |    |		.CONST	0x089a								; Address of exception handler
0882 0001       |    |		.CONST	0x0001								; Number of locals
0883			BODY_0880:
0883			INIT_0880:
0883 e402       |    |		Load	0x2,0x2								; Debug Table 0x17 = .DEBUG	0x0883,0x11de,0x0004,0x0000,0x0059,0x75c5,0x0000,0x0a92
													; Debug Table 0x17.0x0 = 0x883,0x1
0884 e5fc       |    |		Load	0x2,-0x4
0885 e5fd       |    |		Load	0x2,-0x3
0886 e5fe       |    |		Load	0x2,-0x2
0887 e5ff       |    |		Load	0x2,-0x1
0888 e5fd       |    |		Load	0x2,-0x3
0889 e001       |    |		Load	0x0,0x1
088a 1b6b       | k  |		Execute	Package,Field_Read,Field_Number 0x6b
088b 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
088c 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
088d e013       |    |		Load	0x0,0x13
088e 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
088f e019       |    |		Load	0x0,0x19
0890 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
0891 00d8       |    |		Load_Top	At_Offset_0
0892 e019       |    |		Load	0x0,0x19
0893 183d       | =  |		Execute	Package,Field_Execute,Field_Number 0x3d
0894 7003       |p   |		Jump_Nonzero	0x898
0895 e01a       |    |		Load	0x0,0x1a
0896 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
0897 0257       | W  |		Execute	Discrete,Raise
0898 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
0899 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
089a			TRAP_0880:
089a e01a       |    |		Load	0x0,0x1a
089b 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
089c 010f       |    |		Execute	Exception,Equal
089d 7004       |p   |		Jump_Nonzero	0x8a2
089e e013       |    |		Load	0x0,0x13
089f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
08a0 010f       |    |		Execute	Exception,Equal
08a1 6804       |h   |		Jump_Zero	0x8a6
08a2 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x17.0x1 = 0x8a2,0x2
08a3 e5ff       |    |		Load	0x2,-0x1
08a4 801b       |    |		Call	0x0,0x1b
08a5 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
08a6 0100       |    |		Execute	Exception,Raise
08a7 0000       |    |		.XXX[0x1]
08a8 ; --------------------------------------------------------------------------------------
08a8 ; SUBPROGRAM
08a8 ; --------------------------------------------------------------------------------------
08a8 08ad       |    |		.CONST	0x08ad								; Address of begin
08a9 0004       |    |		.CONST	0x0004								; Address of exception handler
08aa 0002       |    |		.CONST	0x0002								; Number of locals
08ab			INIT_08a8:
08ab e001       |    |		Load	0x0,0x1								; Debug Table 0x18 = .DEBUG	0x08ab,0x11e4,0x0001,0x0000,0x0059,0x75c5,0x0000,0x0b77
													; Debug Table 0x18.0x0 = 0x8ab,0xffff
08ac 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
08ad			BODY_08a8:
08ad 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x18.0x1 = 0x8ad,0x1
08ae 681b       |h   |		Jump_Zero	0x8ca
08af 00db       |    |		Load_Top	At_Offset_3
08b0 821b       |    |		Call	0x1,0x1b
08b1 7018       |p   |		Jump_Nonzero	0x8ca
08b2 e001       |    |		Load	0x0,0x1								; Debug Table 0x18.0x2 = 0x8b2,0x2
08b3 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
08b4 e7fe       |    |		Load	0x3,-0x2
08b5 8010       |    |		Call	0x0,0x10
08b6 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
08b7 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x18.0x3 = 0x8b7,0x3
08b8 e7fe       |    |		Load	0x3,-0x2
08b9 8218       |    |		Call	0x1,0x18
08ba e7fe       |    |		Load	0x3,-0x2
08bb 800d       |    |		Call	0x0,0xd
08bc 00d9       |    |		Load_Top	At_Offset_1
08bd 0217       |    |		Execute	Heap_Access,All_Reference
08be 380b       |8   |		Execute	Record,Field_Write,Field_Number 0xb
08bf e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x18.0x4 = 0x8bf,0x4
08c0 0219       |    |		Execute	Heap_Access,All_Read
08c1 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
08c2 00d8       |    |		Load_Top	At_Offset_0
08c3 e404       |    |		Load	0x2,0x4
08c4 00db       |    |		Load_Top	At_Offset_3
08c5 e802       |    |		Load	0x4,0x2
08c6 0217       |    |		Execute	Heap_Access,All_Reference
08c7 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
08c8 8012       |    |		Call	0x0,0x12
08c9 00d2       |    |		Pop_Control	Pop_Count_2
08ca 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
08cb 0000 0000  |    |		.BLANK	0000[0x5]
08d0 ; --------------------------------------------------------------------------------------
08d0 ; SUBPROGRAM
08d0 ; --------------------------------------------------------------------------------------
08d0 08db       |    |		.CONST	0x08db								; Address of begin
08d1 0004       |    |		.CONST	0x0004								; Address of exception handler
08d2 0005       |    |		.CONST	0x0005								; Number of locals
08d3			INIT_08d0:
08d3 e001       |    |		Load	0x0,0x1								; Debug Table 0x19 = .DEBUG	0x08d3,0x11f0,0x0002,0x0000,0x0059,0x75c5,0x0000,0x0bbe
													; Debug Table 0x19.0x0 = 0x8d3,0xffff
08d4 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
08d5 e001       |    |		Load	0x0,0x1								; Debug Table 0x19.0x1 = 0x8d5,0xfffe
08d6 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
08d7 e001       |    |		Load	0x0,0x1								; Debug Table 0x19.0x2 = 0x8d7,0xfffd
08d8 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
08d9 e002       |    |		Load	0x0,0x2								; Debug Table 0x19.0x3 = 0x8d9,0xfffc
08da 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
08db			BODY_08d0:
08db e001       |    |		Load	0x0,0x1								; Debug Table 0x19.0x4 = 0x8db,0x1
08dc 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
08dd a802       |    |		Store_Unchecked	0x4,0x2
08de e001       |    |		Load	0x0,0x1								; Debug Table 0x19.0x5 = 0x8de,0x2
08df 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
08e0 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
08e1 e9ff       |    |		Load	0x4,-0x1							; Debug Table 0x19.0x6 = 0x8e1,0x3
08e2 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
08e3 00cf       |    |		Action	Mark_Auxiliary
08e4 7824       |x$  |		Jump	0x909
08e5 e001       |    |		Load	0x0,0x1								; Debug Table 0x19.0x7 = 0x8e5,0x5
08e6 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
08e7 e7fe       |    |		Load	0x3,-0x2
08e8 801c       |    |		Call	0x0,0x1c
08e9 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
08ea 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x19.0x8 = 0x8ea,0x6
08eb 0217       |    |		Execute	Heap_Access,All_Reference
08ec 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
08ed e7fe       |    |		Load	0x3,-0x2
08ee e7ff       |    |		Load	0x3,-0x1
08ef e404       |    |		Load	0x2,0x4
08f0 8210       |    |		Call	0x1,0x10
08f1 00db       |    |		Load_Top	At_Offset_3
08f2 0217       |    |		Execute	Heap_Access,All_Reference
08f3 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
08f4 e001       |    |		Load	0x0,0x1								; Debug Table 0x19.0x9 = 0x8f4,0x7
08f5 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
08f6 00db       |    |		Load_Top	At_Offset_3
08f7 0217       |    |		Execute	Heap_Access,All_Reference
08f8 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
08f9 e802       |    |		Load	0x4,0x2								; Debug Table 0x19.0xa = 0x8f9,0x8
08fa 7003       |p   |		Jump_Nonzero	0x8fe
08fb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x19.0xb = 0x8fb,0x9
08fc a802       |    |		Store_Unchecked	0x4,0x2
08fd 7804       |x   |		Jump	0x902
08fe 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x19.0xc = 0x8fe,0xa
08ff e803       |    |		Load	0x4,0x3
0900 0217       |    |		Execute	Heap_Access,All_Reference
0901 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0902 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x19.0xd = 0x902,0xb
0903 a803       |    |		Store_Unchecked	0x4,0x3
0904 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x19.0xe = 0x904,0xc
0905 0217       |    |		Execute	Heap_Access,All_Reference
0906 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0907 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0908 00c9       |    |		Action	Pop_Auxiliary_Loop
0909 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x19.0xf = 0x909,0x4
090a 77da       |w   |		Jump_Nonzero	0x8e5
090b 00ce       |    |		Action	Pop_Auxiliary
090c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x19.0x10 = 0x90c,0xd
090d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
090e 0000 0000  |    |		.XXX[0x2]
0910 ; --------------------------------------------------------------------------------------
0910 ; SUBPROGRAM
0910 ; --------------------------------------------------------------------------------------
0910 0927       | '  |		.CONST	0x0927								; Address of begin
0911 092e       | .  |		.CONST	0x092e								; Address of exception handler
0912 0008       |    |		.CONST	0x0008								; Number of locals
0913			INIT_0910:
0913 e001       |    |		Load	0x0,0x1								; Debug Table 0x1a = .DEBUG	0x0913,0x1214,0x0001,0x0000,0x0059,0x75c5,0x0000,0x0c2d
													; Debug Table 0x1a.0x0 = 0x913,0xffff
0914 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0915 e002       |    |		Load	0x0,0x2								; Debug Table 0x1a.0x1 = 0x915,0xfffe
0916 1b22       | "  |		Execute	Package,Field_Read,Field_Number 0x22
0917 e002       |    |		Load	0x0,0x2								; Debug Table 0x1a.0x2 = 0x917,0xfffd
0918 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
0919 e006       |    |		Load	0x0,0x6								; Debug Table 0x1a.0x3 = 0x919,0xfffc
091a 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
091b 02ff       |    |		Declare_Variable	Variant_Record
091c 00d8       |    |		Load_Top	At_Offset_0
091d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
091e e006       |    |		Load	0x0,0x6								; Debug Table 0x1a.0x4 = 0x91e,0xfffb
091f 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0920 02ff       |    |		Declare_Variable	Variant_Record
0921 00d8       |    |		Load_Top	At_Offset_0
0922 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0923 e00e       |    |		Load	0x0,0xe								; Debug Table 0x1a.0x5 = 0x923,0xfffa
0924 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0925 029f 09e3  |    |		Declare_Subprogram	INIT_09e0,For_Call
0927			BODY_0910:
0927 e9ff       |    |		Load	0x4,-0x1							; Debug Table 0x1a.0x6 = 0x927,0x1
0928 6804       |h   |		Jump_Zero	0x92d
0929 e9ff       |    |		Load	0x4,-0x1
092a 821b       |    |		Call	0x1,0x1b
092b 7001       |p   |		Jump_Nonzero	0x92d
092c 8808       |    |		Call	0x4,0x8								; Debug Table 0x1a.0x7 = 0x92c,0x2
092d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
092e			TRAP_0910:
092e e013       |    |		Load	0x0,0x13
092f 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0930 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
0931 010f       |    |		Execute	Exception,Equal
0932 7005       |p   |		Jump_Nonzero	0x938
0933 e013       |    |		Load	0x0,0x13
0934 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0935 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
0936 010f       |    |		Execute	Exception,Equal
0937 6802       |h   |		Jump_Zero	0x93a
0938 4887       |H   |		Short_Literal	0x87							; Debug Table 0x1a.0x8 = 0x938,0x3
0939 0257       | W  |		Execute	Discrete,Raise
093a 0100       |    |		Execute	Exception,Raise
093b 0000 0000  |    |		.BLANK	0000[0x5]
0940 ; --------------------------------------------------------------------------------------
0940 ; SUBPROGRAM
0940 ; --------------------------------------------------------------------------------------
0940 0947       | G  |		.CONST	0x0947								; Address of begin
0941 0004       |    |		.CONST	0x0004								; Address of exception handler
0942 0003       |    |		.CONST	0x0003								; Number of locals
0943			INIT_0940:
0943 e001       |    |		Load	0x0,0x1								; Debug Table 0x1b = .DEBUG	0x0943,0x1228,0x0001,0x0000,0x0059,0x75c5,0x0000,0x0e9c
													; Debug Table 0x1b.0x0 = 0x943,0xffff
0944 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0945 029f 0b33  |   3|		Declare_Subprogram	INIT_0b30,For_Call
0947			BODY_0940:
0947 e9ff       |    |		Load	0x4,-0x1							; Debug Table 0x1b.0x1 = 0x947,0x1
0948 6804       |h   |		Jump_Zero	0x94d
0949 e9ff       |    |		Load	0x4,-0x1
094a 821b       |    |		Call	0x1,0x1b
094b 7001       |p   |		Jump_Nonzero	0x94d
094c 8803       |    |		Call	0x4,0x3								; Debug Table 0x1b.0x2 = 0x94c,0x2
094d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
094e 0000 0000  |    |		.XXX[0x2]
0950 ; --------------------------------------------------------------------------------------
0950 ; SUBPROGRAM
0950 ; --------------------------------------------------------------------------------------
0950 095e       | ^  |		.CONST	0x095e								; Address of begin
0951 0004       |    |		.CONST	0x0004								; Address of exception handler
0952 0004       |    |		.CONST	0x0004								; Number of locals
0953			INIT_0950:
0953 00f0       |    |		Load_Encached	Segment_Cache						; Debug Table 0x1c = .DEBUG	0x0953,0x1230,0x0004,0x0000,0x0059,0x75c5,0x0000,0x0fa5
													; Debug Table 0x1c.0x0 = 0x953,0xffff
0954 e404       |    |		Load	0x2,0x4
0955 e001       |    |		Load	0x0,0x1
0956 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0957 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0958 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0959 e001       |    |		Load	0x0,0x1								; Debug Table 0x1c.0x1 = 0x959,0xfffe
095a 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
095b 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
095c 029f 0b4b  |   K|		Declare_Subprogram	INIT_0b48,For_Call
095e			BODY_0950:
095e e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x1c.0x2 = 0x95e,0x1
095f e001       |    |		Load	0x0,0x1
0960 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0961 a602       |    |		Store_Unchecked	0x3,0x2
0962 e7fd       |    |		Load	0x3,-0x3							; Debug Table 0x1c.0x3 = 0x962,0x2
0963 e7fe       |    |		Load	0x3,-0x2
0964 0217       |    |		Execute	Heap_Access,All_Reference
0965 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0966 e013       |    |		Load	0x0,0x13							; Debug Table 0x1c.0x4 = 0x966,0x3
0967 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0968 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0969 00db       |    |		Load_Top	At_Offset_3
096a e013       |    |		Load	0x0,0x13
096b 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
096c 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
096d c603       |    |		Store	0x3,0x3
096e 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1c.0x5 = 0x96e,0x4
096f e006       |    |		Load	0x0,0x6
0970 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0971 e006       |    |		Load	0x0,0x6
0972 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0973 e603       |    |		Load	0x3,0x3
0974 e013       |    |		Load	0x0,0x13
0975 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0976 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0977 e013       |    |		Load	0x0,0x13							; Debug Table 0x1c.0x6 = 0x977,0x5
0978 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0979 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
097a 00db       |    |		Load_Top	At_Offset_3
097b e013       |    |		Load	0x0,0x13
097c 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
097d 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
097e c604       |    |		Store	0x3,0x4
097f e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x1c.0x7 = 0x97f,0x6
0980 0219       |    |		Execute	Heap_Access,All_Read
0981 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0982 00d8       |    |		Load_Top	At_Offset_0
0983 e606       |    |		Load	0x3,0x6
0984 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0985 00d2       |    |		Pop_Control	Pop_Count_2
0986 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x1c.0x8 = 0x986,0x7
0987 0219       |    |		Execute	Heap_Access,All_Read
0988 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0989 00d8       |    |		Load_Top	At_Offset_0
098a e609       |    |		Load	0x3,0x9
098b 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
098c 00d2       |    |		Pop_Control	Pop_Count_2
098d e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x1c.0x9 = 0x98d,0x8
098e 0219       |    |		Execute	Heap_Access,All_Read
098f 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0990 00d8       |    |		Load_Top	At_Offset_0
0991 e60b       |    |		Load	0x3,0xb
0992 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0993 00d2       |    |		Pop_Control	Pop_Count_2
0994 8804       |    |		Call	0x4,0x4								; Debug Table 0x1c.0xa = 0x994,0x9
0995 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0996 0000 0000  |    |		.XXX[0x2]
0998 ; --------------------------------------------------------------------------------------
0998 ; SUBPROGRAM
0998 ; --------------------------------------------------------------------------------------
0998 099f       |    |		.CONST	0x099f								; Address of begin
0999 0004       |    |		.CONST	0x0004								; Address of exception handler
099a 0002       |    |		.CONST	0x0002								; Number of locals
099b			INIT_0998:
099b e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x1d = .DEBUG	0x099b,0x1248,0x0004,0x0000,0x0059,0x75c5,0x0000,0x01c1
													; Debug Table 0x1d.0x0 = 0x99b,0xffff
099c e5ff       |    |		Load	0x2,-0x1
099d e00a       |    |		Load	0x0,0xa
099e 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
099f			BODY_0998:
099f e001       |    |		Load	0x0,0x1								; Debug Table 0x1d.0x1 = 0x99f,0x1
09a0 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
09a1 00d9       |    |		Load_Top	At_Offset_1
09a2 e5fd       |    |		Load	0x2,-0x3
09a3 e5fe       |    |		Load	0x2,-0x2
09a4 e5ff       |    |		Load	0x2,-0x1
09a5 e00a       |    |		Load	0x0,0xa
09a6 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
09a7 c402       |    |		Store	0x2,0x2
09a8 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1d.0x2 = 0x9a8,0x2
09a9 00d9       |    |		Load_Top	At_Offset_1
09aa e5fd       |    |		Load	0x2,-0x3
09ab e5fe       |    |		Load	0x2,-0x2
09ac e5ff       |    |		Load	0x2,-0x1
09ad e00a       |    |		Load	0x0,0xa
09ae 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
09af 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
09b0 ; --------------------------------------------------------------------------------------
09b0 ; SUBPROGRAM
09b0 ; --------------------------------------------------------------------------------------
09b0 09b5       |    |		.CONST	0x09b5								; Address of begin
09b1 09cb       |    |		.CONST	0x09cb								; Address of exception handler
09b2 0002       |    |		.CONST	0x0002								; Number of locals
09b3			INIT_09b0:
09b3 e01d       |    |		Load	0x0,0x1d							; Debug Table 0x1e = .DEBUG	0x09b3,0x1250,0x0004,0x0000,0x0059,0x75c5,0x0000,0x020c
													; Debug Table 0x1e.0x0 = 0x9b3,0xffff
09b4 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
09b5			BODY_09b0:
09b5 4802       |H   |		Short_Literal	0x2							; Debug Table 0x1e.0x1 = 0x9b5,0x1
09b6 0092 0c63  |   c|		Action	Push_String_Extended,0xc63					; "Exception building Program_Library entry for unit "
09b8 e5fd       |    |		Load	0x2,-0x3
09b9 4976       |Iv  |		Short_Literal	0x176
09ba 00eb       |    |		Load_Encached	Diana_Cache
09bb 0098       |    |		Execute	Package,Field_Read_Dynamic
09bc 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
09bd e006       |    |		Load	0x0,0x6
09be 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
09bf 183d       | =  |		Execute	Package,Field_Execute,Field_Number 0x3d
09c0 01cc       |    |		Execute	Vector,Catenate
09c1 0092 0c64  |   d|		Action	Push_String_Extended,0xc64					; ": "
09c3 01cc       |    |		Execute	Vector,Catenate
09c4 00da       |    |		Load_Top	At_Offset_2
09c5 01cc       |    |		Execute	Vector,Catenate
09c6 e5ff       |    |		Load	0x2,-0x1
09c7 e001       |    |		Load	0x0,0x1
09c8 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
09c9 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
09ca 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
09cb			TRAP_09b0:
09cb 0007       |    |		Action	Break_Optional
09cc 4802       |H   |		Short_Literal	0x2							; Debug Table 0x1e.0x2 = 0x9cc,0x2
09cd 0092 0c65  |   e|		Action	Push_String_Extended,0xc65					; "Exception building a Program_Library entry: "
09cf 00db       |    |		Load_Top	At_Offset_3
09d0 01cc       |    |		Execute	Vector,Catenate
09d1 e5ff       |    |		Load	0x2,-0x1
09d2 e001       |    |		Load	0x0,0x1
09d3 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
09d4 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
09d5 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
09d6 0000 0000  |    |		.XXX[0x2]
09d8 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
09dc 0000 0000  |    |		.LITERAL	{0x00000000, 0x59718502}
09e0 ; --------------------------------------------------------------------------------------
09e0 ; SUBPROGRAM
09e0 ; --------------------------------------------------------------------------------------
09e0 09e6       |    |		.CONST	0x09e6								; Address of begin
09e1 0004       |    |		.CONST	0x0004								; Address of exception handler
09e2 0002       |    |		.CONST	0x0002								; Number of locals
09e3			INIT_09e0:
09e3 e9ff       |    |		Load	0x4,-0x1							; Debug Table 0x1f = .DEBUG	0x09e3,0x1258,0x0004,0x0000,0x0059,0x75c5,0x0000,0x0e7c
													; Debug Table 0x1f.0x0 = 0x9e3,0xffff
09e4 e7fe       |    |		Load	0x3,-0x2
09e5 8218       |    |		Call	0x1,0x18
09e6			BODY_09e0:
09e6 e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x1f.0x1 = 0x9e6,0x1
09e7 0219       |    |		Execute	Heap_Access,All_Read
09e8 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
09e9 e001       |    |		Load	0x0,0x1
09ea 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
09eb 00d9       |    |		Load_Top	At_Offset_1
09ec e404       |    |		Load	0x2,0x4
09ed ea02       |    |		Load	0x5,0x2
09ee 800b       |    |		Call	0x0,0xb
09ef 00d1       |    |		Pop_Control	Pop_Count_1
09f0 c802       |    |		Store	0x4,0x2
09f1 00d1       |    |		Pop_Control	Pop_Count_1
09f2 e9ff       |    |		Load	0x4,-0x1							; Debug Table 0x1f.0x2 = 0x9f2,0x2
09f3 0217       |    |		Execute	Heap_Access,All_Reference
09f4 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
09f5 a803       |    |		Store_Unchecked	0x4,0x3
09f6 e803       |    |		Load	0x4,0x3								; Debug Table 0x1f.0x3 = 0x9f6,0x3
09f7 7002       |p   |		Jump_Nonzero	0x9fa
09f8 4887       |H   |		Short_Literal	0x87
09f9 0257       | W  |		Execute	Discrete,Raise
09fa e803       |    |		Load	0x4,0x3								; Debug Table 0x1f.0x4 = 0x9fa,0x4
09fb 0217       |    |		Execute	Heap_Access,All_Reference
09fc 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
09fd e7fe       |    |		Load	0x3,-0x2
09fe e7ff       |    |		Load	0x3,-0x1
09ff e404       |    |		Load	0x2,0x4
0a00 8210       |    |		Call	0x1,0x10
0a01 e802       |    |		Load	0x4,0x2
0a02 0217       |    |		Execute	Heap_Access,All_Reference
0a03 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0a04 e803       |    |		Load	0x4,0x3								; Debug Table 0x1f.0x5 = 0xa04,0x5
0a05 0217       |    |		Execute	Heap_Access,All_Reference
0a06 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0a07 e7fe       |    |		Load	0x3,-0x2
0a08 e7ff       |    |		Load	0x3,-0x1
0a09 e404       |    |		Load	0x2,0x4
0a0a 8210       |    |		Call	0x1,0x10
0a0b e802       |    |		Load	0x4,0x2
0a0c 0217       |    |		Execute	Heap_Access,All_Reference
0a0d 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0a0e e802       |    |		Load	0x4,0x2								; Debug Table 0x1f.0x6 = 0xa0e,0x6
0a0f 0217       |    |		Execute	Heap_Access,All_Reference
0a10 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0a11 e802       |    |		Load	0x4,0x2
0a12 0217       |    |		Execute	Heap_Access,All_Reference
0a13 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0a14 021f       |    |		Execute	Heap_Access,Equal
0a15 6808       |h   |		Jump_Zero	0xa1e
0a16 e803       |    |		Load	0x4,0x3
0a17 8217       |    |		Call	0x1,0x17
0a18 6805       |h   |		Jump_Zero	0xa1e
0a19 e001       |    |		Load	0x0,0x1								; Debug Table 0x1f.0x7 = 0xa19,0x7
0a1a 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0a1b e802       |    |		Load	0x4,0x2
0a1c 0217       |    |		Execute	Heap_Access,All_Reference
0a1d 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0a1e e803       |    |		Load	0x4,0x3								; Debug Table 0x1f.0x8 = 0xa1e,0x8
0a1f 0217       |    |		Execute	Heap_Access,All_Reference
0a20 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0a21 e7fe       |    |		Load	0x3,-0x2
0a22 e7ff       |    |		Load	0x3,-0x1
0a23 e404       |    |		Load	0x2,0x4
0a24 8210       |    |		Call	0x1,0x10
0a25 e802       |    |		Load	0x4,0x2
0a26 0217       |    |		Execute	Heap_Access,All_Reference
0a27 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0a28 e803       |    |		Load	0x4,0x3								; Debug Table 0x1f.0x9 = 0xa28,0x9
0a29 0217       |    |		Execute	Heap_Access,All_Reference
0a2a 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0a2b 8607       |    |		Call	0x3,0x7
0a2c e802       |    |		Load	0x4,0x2
0a2d 0217       |    |		Execute	Heap_Access,All_Reference
0a2e 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0a2f e803       |    |		Load	0x4,0x3								; Debug Table 0x1f.0xa = 0xa2f,0xa
0a30 0217       |    |		Execute	Heap_Access,All_Reference
0a31 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0a32 8607       |    |		Call	0x3,0x7
0a33 e802       |    |		Load	0x4,0x2
0a34 0217       |    |		Execute	Heap_Access,All_Reference
0a35 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
0a36 e803       |    |		Load	0x4,0x3								; Debug Table 0x1f.0xb = 0xa36,0xb
0a37 0217       |    |		Execute	Heap_Access,All_Reference
0a38 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
0a39 8607       |    |		Call	0x3,0x7
0a3a e802       |    |		Load	0x4,0x2
0a3b 0217       |    |		Execute	Heap_Access,All_Reference
0a3c 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
0a3d e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x1f.0xc = 0xa3d,0xc
0a3e e802       |    |		Load	0x4,0x2
0a3f 0217       |    |		Execute	Heap_Access,All_Reference
0a40 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
0a41 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1f.0xd = 0xa41,0xd
0a42 e802       |    |		Load	0x4,0x2
0a43 0217       |    |		Execute	Heap_Access,All_Reference
0a44 380a       |8   |		Execute	Record,Field_Write,Field_Number 0xa
0a45 e803       |    |		Load	0x4,0x3								; Debug Table 0x1f.0xe = 0xa45,0xe
0a46 0217       |    |		Execute	Heap_Access,All_Reference
0a47 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0a48 7002       |p   |		Jump_Nonzero	0xa4b
0a49 4887       |H   |		Short_Literal	0x87
0a4a 0257       | W  |		Execute	Discrete,Raise
0a4b e803       |    |		Load	0x4,0x3								; Debug Table 0x1f.0xf = 0xa4b,0xf
0a4c 821a       |    |		Call	0x1,0x1a
0a4d e802       |    |		Load	0x4,0x2
0a4e 0217       |    |		Execute	Heap_Access,All_Reference
0a4f 3811       |8   |		Execute	Record,Field_Write,Field_Number 0x11
0a50 e803       |    |		Load	0x4,0x3								; Debug Table 0x1f.0x10 = 0xa50,0x10
0a51 0217       |    |		Execute	Heap_Access,All_Reference
0a52 3407       |4   |		Execute	Record,Field_Reference,Field_Number 0x7
0a53 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0a54 e805       |    |		Load	0x4,0x5
0a55 016d       | m  |		Execute	Variant_Record,Structure_Write
0a56 e805       |    |		Load	0x4,0x5								; Debug Table 0x1f.0x11 = 0xa56,0x11
0a57 801e       |    |		Call	0x0,0x1e
0a58 6806       |h   |		Jump_Zero	0xa5f
0a59 e001       |    |		Load	0x0,0x1								; Debug Table 0x1f.0x12 = 0xa59,0x12
0a5a 1b52       | R  |		Execute	Package,Field_Read,Field_Number 0x52
0a5b e802       |    |		Load	0x4,0x2
0a5c 0217       |    |		Execute	Heap_Access,All_Reference
0a5d 3812       |8   |		Execute	Record,Field_Write,Field_Number 0x12
0a5e 7841       |xA  |		Jump	0xaa0
0a5f 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1f.0x13 = 0xa5f,0x13
0a60 e802       |    |		Load	0x4,0x2
0a61 e803       |    |		Load	0x4,0x3
0a62 0217       |    |		Execute	Heap_Access,All_Reference
0a63 3407       |4   |		Execute	Record,Field_Reference,Field_Number 0x7
0a64 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0a65 e604       |    |		Load	0x3,0x4
0a66 e013       |    |		Load	0x0,0x13
0a67 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0a68 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0a69 e805       |    |		Load	0x4,0x5								; Debug Table 0x1f.0x14 = 0xa69,0x14
0a6a e806       |    |		Load	0x4,0x6
0a6b 016d       | m  |		Execute	Variant_Record,Structure_Write
0a6c e00e       |    |		Load	0x0,0xe								; Debug Table 0x1f.0x15 = 0xa6c,0x15
0a6d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0a6e 4800       |H   |		Short_Literal	0x0
0a6f e7fc       |    |		Load	0x3,-0x4
0a70 e806       |    |		Load	0x4,0x6
0a71 e01f       |    |		Load	0x0,0x1f
0a72 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
0a73 c807       |    |		Store	0x4,0x7
0a74 e807       |    |		Load	0x4,0x7								; Debug Table 0x1f.0x16 = 0xa74,0x16
0a75 6815       |h   |		Jump_Zero	0xa8b
0a76 4802       |H   |		Short_Literal	0x2							; Debug Table 0x1f.0x17 = 0xa76,0x17
0a77 0092 0c66  |   f|		Action	Push_String_Extended,0xc66					; "Unable to increment reference count for code segment of "
0a79 e802       |    |		Load	0x4,0x2
0a7a e001       |    |		Load	0x0,0x1
0a7b 1b6c       | l  |		Execute	Package,Field_Read,Field_Number 0x6c
0a7c 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0a7d 01cc       |    |		Execute	Vector,Catenate
0a7e 0092 0c67  |   g|		Action	Push_String_Extended,0xc67					; ", Status => "
0a80 01cc       |    |		Execute	Vector,Catenate
0a81 e807       |    |		Load	0x4,0x7
0a82 e00e       |    |		Load	0x0,0xe
0a83 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0a84 025e       | ^  |		Execute	Discrete,Convert
0a85 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0a86 01cc       |    |		Execute	Vector,Catenate
0a87 e404       |    |		Load	0x2,0x4
0a88 e001       |    |		Load	0x0,0x1
0a89 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0a8a 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0a8b e404       |    |		Load	0x2,0x4								; Debug Table 0x1f.0x18 = 0xa8b,0x18
0a8c e001       |    |		Load	0x0,0x1
0a8d 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0a8e 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0a8f 6810       |h   |		Jump_Zero	0xaa0
0a90 e001       |    |		Load	0x0,0x1								; Debug Table 0x1f.0x19 = 0xa90,0x19
0a91 1b52       | R  |		Execute	Package,Field_Read,Field_Number 0x52
0a92 e806       |    |		Load	0x4,0x6
0a93 e7fe       |    |		Load	0x3,-0x2
0a94 e001       |    |		Load	0x0,0x1
0a95 1857       | W  |		Execute	Package,Field_Execute,Field_Number 0x57
0a96 e802       |    |		Load	0x4,0x2
0a97 0217       |    |		Execute	Heap_Access,All_Reference
0a98 3812       |8   |		Execute	Record,Field_Write,Field_Number 0x12
0a99 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1f.0x1a = 0xa99,0x1a
0a9a e806       |    |		Load	0x4,0x6
0a9b e805       |    |		Load	0x4,0x5
0a9c e603       |    |		Load	0x3,0x3
0a9d e013       |    |		Load	0x0,0x13
0a9e 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0a9f 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0aa0 4804       |H   |		Short_Literal	0x4							; Debug Table 0x1f.0x1b = 0xaa0,0x1b
0aa1 e802       |    |		Load	0x4,0x2
0aa2 0217       |    |		Execute	Heap_Access,All_Reference
0aa3 3813       |8   |		Execute	Record,Field_Write,Field_Number 0x13
0aa4 e9ff       |    |		Load	0x4,-0x1							; Debug Table 0x1f.0x1c = 0xaa4,0x1c
0aa5 0217       |    |		Execute	Heap_Access,All_Reference
0aa6 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0aa7 e7fe       |    |		Load	0x3,-0x2
0aa8 8011       |    |		Call	0x0,0x11
0aa9 e802       |    |		Load	0x4,0x2
0aaa 0217       |    |		Execute	Heap_Access,All_Reference
0aab 3815       |8   |		Execute	Record,Field_Write,Field_Number 0x15
0aac 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1f.0x1d = 0xaac,0x1d
0aad e802       |    |		Load	0x4,0x2
0aae 0217       |    |		Execute	Heap_Access,All_Reference
0aaf 3817       |8   |		Execute	Record,Field_Write,Field_Number 0x17
0ab0 e001       |    |		Load	0x0,0x1								; Debug Table 0x1f.0x1e = 0xab0,0x1e
0ab1 1b3f       | ?  |		Execute	Package,Field_Read,Field_Number 0x3f
0ab2 e802       |    |		Load	0x4,0x2
0ab3 0217       |    |		Execute	Heap_Access,All_Reference
0ab4 381e       |8   |		Execute	Record,Field_Write,Field_Number 0x1e
0ab5 e001       |    |		Load	0x0,0x1								; Debug Table 0x1f.0x1f = 0xab5,0x1f
0ab6 1b4f       | O  |		Execute	Package,Field_Read,Field_Number 0x4f
0ab7 e802       |    |		Load	0x4,0x2
0ab8 0217       |    |		Execute	Heap_Access,All_Reference
0ab9 381f       |8   |		Execute	Record,Field_Write,Field_Number 0x1f
0aba 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1f.0x20 = 0xaba,0x20
0abb e802       |    |		Load	0x4,0x2
0abc 0217       |    |		Execute	Heap_Access,All_Reference
0abd 3819       |8   |		Execute	Record,Field_Write,Field_Number 0x19
0abe 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1f.0x21 = 0xabe,0x21
0abf e802       |    |		Load	0x4,0x2
0ac0 0217       |    |		Execute	Heap_Access,All_Reference
0ac1 3816       |8   |		Execute	Record,Field_Write,Field_Number 0x16
0ac2 e006       |    |		Load	0x0,0x6								; Debug Table 0x1f.0x22 = 0xac2,0x22
0ac3 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0ac4 e802       |    |		Load	0x4,0x2
0ac5 0217       |    |		Execute	Heap_Access,All_Reference
0ac6 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
0ac7 e211       |    |		Load	0x1,0x11							; Debug Table 0x1f.0x23 = 0xac7,0x23
0ac8 e802       |    |		Load	0x4,0x2
0ac9 0217       |    |		Execute	Heap_Access,All_Reference
0aca 380e       |8   |		Execute	Record,Field_Write,Field_Number 0xe
0acb e803       |    |		Load	0x4,0x3								; Debug Table 0x1f.0x24 = 0xacb,0x24
0acc 0217       |    |		Execute	Heap_Access,All_Reference
0acd 3c10       |<   |		Execute	Record,Field_Read,Field_Number 0x10
0ace e802       |    |		Load	0x4,0x2
0acf 0217       |    |		Execute	Heap_Access,All_Reference
0ad0 3818       |8   |		Execute	Record,Field_Write,Field_Number 0x18
0ad1 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x1f.0x25 = 0xad1,0x25
0ad2 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0ad3 e802       |    |		Load	0x4,0x2
0ad4 0217       |    |		Execute	Heap_Access,All_Reference
0ad5 3810       |8   |		Execute	Record,Field_Write,Field_Number 0x10
0ad6 e802       |    |		Load	0x4,0x2								; Debug Table 0x1f.0x26 = 0xad6,0x26
0ad7 0217       |    |		Execute	Heap_Access,All_Reference
0ad8 3c18       |<   |		Execute	Record,Field_Read,Field_Number 0x18
0ad9 684f       |hO  |		Jump_Zero	0xb29
0ada e803       |    |		Load	0x4,0x3								; Debug Table 0x1f.0x27 = 0xada,0x27
0adb 0217       |    |		Execute	Heap_Access,All_Reference
0adc 3c13       |<   |		Execute	Record,Field_Read,Field_Number 0x13
0add a804       |    |		Store_Unchecked	0x4,0x4
0ade e804       |    |		Load	0x4,0x4								; Debug Table 0x1f.0x28 = 0xade,0x28
0adf 7002       |p   |		Jump_Nonzero	0xae2
0ae0 4887       |H   |		Short_Literal	0x87
0ae1 0257       | W  |		Execute	Discrete,Raise
0ae2 e804       |    |		Load	0x4,0x4								; Debug Table 0x1f.0x29 = 0xae2,0x29
0ae3 0217       |    |		Execute	Heap_Access,All_Reference
0ae4 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0ae5 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0ae6 e805       |    |		Load	0x4,0x5
0ae7 016d       | m  |		Execute	Variant_Record,Structure_Write
0ae8 e805       |    |		Load	0x4,0x5								; Debug Table 0x1f.0x2a = 0xae8,0x2a
0ae9 e006       |    |		Load	0x0,0x6
0aea 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0aeb 6806       |h   |		Jump_Zero	0xaf2
0aec e001       |    |		Load	0x0,0x1								; Debug Table 0x1f.0x2b = 0xaec,0x2b
0aed 1b5b       | [  |		Execute	Package,Field_Read,Field_Number 0x5b
0aee e802       |    |		Load	0x4,0x2
0aef 0217       |    |		Execute	Heap_Access,All_Reference
0af0 381a       |8   |		Execute	Record,Field_Write,Field_Number 0x1a
0af1 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0af2 e805       |    |		Load	0x4,0x5								; Debug Table 0x1f.0x2c = 0xaf2,0x2c
0af3 e806       |    |		Load	0x4,0x6
0af4 016d       | m  |		Execute	Variant_Record,Structure_Write
0af5 e00e       |    |		Load	0x0,0xe								; Debug Table 0x1f.0x2d = 0xaf5,0x2d
0af6 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0af7 4800       |H   |		Short_Literal	0x0
0af8 e7fc       |    |		Load	0x3,-0x4
0af9 e806       |    |		Load	0x4,0x6
0afa e01f       |    |		Load	0x0,0x1f
0afb 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
0afc c807       |    |		Store	0x4,0x7
0afd e807       |    |		Load	0x4,0x7								; Debug Table 0x1f.0x2e = 0xafd,0x2e
0afe 6815       |h   |		Jump_Zero	0xb14
0aff 4802       |H   |		Short_Literal	0x2							; Debug Table 0x1f.0x2f = 0xaff,0x2f
0b00 0092 0c68  |   h|		Action	Push_String_Extended,0xc68					; "Unable to increment reference count for elab code segment of "
0b02 e802       |    |		Load	0x4,0x2
0b03 e001       |    |		Load	0x0,0x1
0b04 1b6c       | l  |		Execute	Package,Field_Read,Field_Number 0x6c
0b05 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0b06 01cc       |    |		Execute	Vector,Catenate
0b07 0092 0c67  |   g|		Action	Push_String_Extended,0xc67					; ", Status => "
0b09 01cc       |    |		Execute	Vector,Catenate
0b0a e807       |    |		Load	0x4,0x7
0b0b e00e       |    |		Load	0x0,0xe
0b0c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0b0d 025e       | ^  |		Execute	Discrete,Convert
0b0e 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0b0f 01cc       |    |		Execute	Vector,Catenate
0b10 e404       |    |		Load	0x2,0x4
0b11 e001       |    |		Load	0x0,0x1
0b12 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0b13 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0b14 e404       |    |		Load	0x2,0x4								; Debug Table 0x1f.0x30 = 0xb14,0x30
0b15 e001       |    |		Load	0x0,0x1
0b16 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0b17 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0b18 6810       |h   |		Jump_Zero	0xb29
0b19 e001       |    |		Load	0x0,0x1								; Debug Table 0x1f.0x31 = 0xb19,0x31
0b1a 1b52       | R  |		Execute	Package,Field_Read,Field_Number 0x52
0b1b e806       |    |		Load	0x4,0x6
0b1c e7fe       |    |		Load	0x3,-0x2
0b1d e001       |    |		Load	0x0,0x1
0b1e 1857       | W  |		Execute	Package,Field_Execute,Field_Number 0x57
0b1f e802       |    |		Load	0x4,0x2
0b20 0217       |    |		Execute	Heap_Access,All_Reference
0b21 381a       |8   |		Execute	Record,Field_Write,Field_Number 0x1a
0b22 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1f.0x32 = 0xb22,0x32
0b23 e806       |    |		Load	0x4,0x6
0b24 e805       |    |		Load	0x4,0x5
0b25 e603       |    |		Load	0x3,0x3
0b26 e013       |    |		Load	0x0,0x13
0b27 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0b28 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0b29 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0b2a 0000 0000  |    |		.BLANK	0000[0x6]
0b30 ; --------------------------------------------------------------------------------------
0b30 ; SUBPROGRAM
0b30 ; --------------------------------------------------------------------------------------
0b30 0b38       | 8  |		.CONST	0x0b38								; Address of begin
0b31 0004       |    |		.CONST	0x0004								; Address of exception handler
0b32 0003       |    |		.CONST	0x0003								; Number of locals
0b33			INIT_0b30:
0b33 e9ff       |    |		Load	0x4,-0x1							; Debug Table 0x20 = .DEBUG	0x0b33,0x12c0,0x0004,0x0000,0x0059,0x75c5,0x0000,0x0f07
													; Debug Table 0x20.0x0 = 0xb33,0xffff
0b34 e7fe       |    |		Load	0x3,-0x2
0b35 8218       |    |		Call	0x1,0x18
0b36 029f 0b73  |   s|		Declare_Subprogram	INIT_0b70,For_Call
0b38			BODY_0b30:
0b38 e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x20.0x1 = 0xb38,0x1
0b39 0219       |    |		Execute	Heap_Access,All_Read
0b3a 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0b3b e001       |    |		Load	0x0,0x1
0b3c 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0b3d 00d9       |    |		Load_Top	At_Offset_1
0b3e e404       |    |		Load	0x2,0x4
0b3f ea02       |    |		Load	0x5,0x2
0b40 800b       |    |		Call	0x0,0xb
0b41 00d1       |    |		Pop_Control	Pop_Count_1
0b42 c802       |    |		Store	0x4,0x2
0b43 00d1       |    |		Pop_Control	Pop_Count_1
0b44 8a03       |    |		Call	0x5,0x3								; Debug Table 0x20.0x2 = 0xb44,0x2
0b45 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0b46 0000 0000  |    |		.XXX[0x2]
0b48 ; --------------------------------------------------------------------------------------
0b48 ; SUBPROGRAM
0b48 ; --------------------------------------------------------------------------------------
0b48 0b4b       | K  |		.CONST	0x0b4b								; Address of begin
0b49 0b60       | `  |		.CONST	0x0b60								; Address of exception handler
0b4a 0001       |    |		.CONST	0x0001								; Number of locals
0b4b			BODY_0b48:
0b4b			INIT_0b48:
0b4b e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x21 = .DEBUG	0x0b4b,0x12c8,0x0004,0x0000,0x0059,0x75c5,0x0000,0x0fa2
													; Debug Table 0x21.0x0 = 0xb4b,0x1
0b4c e403       |    |		Load	0x2,0x3
0b4d e402       |    |		Load	0x2,0x2
0b4e e7fe       |    |		Load	0x3,-0x2
0b4f e7ff       |    |		Load	0x3,-0x1
0b50 e404       |    |		Load	0x2,0x4
0b51 e7fd       |    |		Load	0x3,-0x3
0b52 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0b53 e013       |    |		Load	0x0,0x13
0b54 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0b55 e019       |    |		Load	0x0,0x19
0b56 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
0b57 00d8       |    |		Load_Top	At_Offset_0
0b58 e019       |    |		Load	0x0,0x19
0b59 183d       | =  |		Execute	Package,Field_Execute,Field_Number 0x3d
0b5a 7003       |p   |		Jump_Nonzero	0xb5e
0b5b e01a       |    |		Load	0x0,0x1a
0b5c 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
0b5d 0257       | W  |		Execute	Discrete,Raise
0b5e 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
0b5f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0b60			TRAP_0b48:
0b60 e01a       |    |		Load	0x0,0x1a
0b61 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
0b62 010f       |    |		Execute	Exception,Equal
0b63 7004       |p   |		Jump_Nonzero	0xb68
0b64 e013       |    |		Load	0x0,0x13
0b65 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0b66 010f       |    |		Execute	Exception,Equal
0b67 6804       |h   |		Jump_Zero	0xb6c
0b68 e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x21.0x1 = 0xb68,0x2
0b69 e404       |    |		Load	0x2,0x4
0b6a 801b       |    |		Call	0x0,0x1b
0b6b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0b6c 0100       |    |		Execute	Exception,Raise
0b6d 0000 0000  |    |		.XXX[0x3]
0b6f 0000       |    |
0b70 ; --------------------------------------------------------------------------------------
0b70 ; SUBPROGRAM
0b70 ; --------------------------------------------------------------------------------------
0b70 0b73       | s  |		.CONST	0x0b73								; Address of begin
0b71 0b89       |    |		.CONST	0x0b89								; Address of exception handler
0b72 0001       |    |		.CONST	0x0001								; Number of locals
0b73			BODY_0b70:
0b73			INIT_0b70:
0b73 e604       |    |		Load	0x3,0x4								; Debug Table 0x22 = .DEBUG	0x0b73,0x12ce,0x0004,0x0000,0x0059,0x75c5,0x0000,0x0f04
													; Debug Table 0x22.0x0 = 0xb73,0x1
0b74 e603       |    |		Load	0x3,0x3
0b75 e802       |    |		Load	0x4,0x2
0b76 e9ff       |    |		Load	0x4,-0x1
0b77 e7fe       |    |		Load	0x3,-0x2
0b78 e7ff       |    |		Load	0x3,-0x1
0b79 e404       |    |		Load	0x2,0x4
0b7a e7fd       |    |		Load	0x3,-0x3
0b7b 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0b7c e013       |    |		Load	0x0,0x13
0b7d 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0b7e e019       |    |		Load	0x0,0x19
0b7f 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
0b80 00d8       |    |		Load_Top	At_Offset_0
0b81 e019       |    |		Load	0x0,0x19
0b82 183d       | =  |		Execute	Package,Field_Execute,Field_Number 0x3d
0b83 7003       |p   |		Jump_Nonzero	0xb87
0b84 e01a       |    |		Load	0x0,0x1a
0b85 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
0b86 0257       | W  |		Execute	Discrete,Raise
0b87 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
0b88 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0b89			TRAP_0b70:
0b89 e01a       |    |		Load	0x0,0x1a
0b8a 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
0b8b 010f       |    |		Execute	Exception,Equal
0b8c 7004       |p   |		Jump_Nonzero	0xb91
0b8d e013       |    |		Load	0x0,0x13
0b8e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0b8f 010f       |    |		Execute	Exception,Equal
0b90 6804       |h   |		Jump_Zero	0xb95
0b91 e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x22.0x1 = 0xb91,0x2
0b92 e404       |    |		Load	0x2,0x4
0b93 801b       |    |		Call	0x0,0x1b
0b94 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0b95 0100       |    |		Execute	Exception,Raise
0b96 0000 0000  |    |		.XXX[0x5]
0b98 0bbb 0004  |    |
0b9a 0019       |    |
0b9b 029a 0bcb  |    |		Declare_Subprogram	INIT_0bc8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x23 = .DEBUG	0x0b9b,0x12d4,0x4000,0x0000,0x0059,0x75c5,0x0000,0x04f2
													; Debug Table 0x23.0x0 = 0xb9b,0xffff
0b9d 00bf       |    |		Action	Accept_Activation
0b9e 60a5       |`   |		Indirect_Literal	Discrete,0xc44,{0x00000000, 0x005975c5}		; Debug Table 0x24 = .DEBUG	0x0b9e,0x12d8,0x4000,0x0000,0x0059,0x75c5,0x0000,0x050f
													; Debug Table 0x24.0x0 = 0xb9e,0xffff
0b9f 60a0       |`   |		Indirect_Literal	Discrete,0xc40,{0x00000000, 0x00000510}
0ba0 e001       |    |		Load	0x0,0x1
0ba1 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0ba2 e002       |    |		Load	0x0,0x2
0ba3 0387       |    |		Declare_Variable	Package
0ba4 00d8       |    |		Load_Top	At_Offset_0
0ba5 020f       |    |		Execute	Module,Activate
0ba6 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x24.0x1 = 0xba6,0xfffe
0ba7 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0ba8 029b 0bdb  |    |		Declare_Subprogram	INIT_0bd8,For_Outer_Call,Unelaborated		; Debug Table 0x24.0x2 = 0xba8,0xfffd
0baa 029d 0bfb  |    |		Declare_Subprogram	INIT_0bf8,For_Outer_Call			; Debug Table 0x24.0x3 = 0xbaa,0xfffc
0bac 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x24.0x4 = 0xbac,0xfffb
0bad 00c7       |    |		Action	Elaborate_Subprogram
0bae 029d 0c1b  |    |		Declare_Subprogram	INIT_0c18,For_Outer_Call			; Debug Table 0x24.0x5 = 0xbae,0xfffa
0bb0 e003       |    |		Load	0x0,0x3								; Debug Table 0x24.0x6 = 0xbb0,0xfff9
0bb1 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0bb2 1921       | !  |		Execute	Package,Field_Reference,Field_Number 0x21
0bb3 00c6       |    |		Action	Check_Subprogram_Elaborated
0bb4 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
0bb5 608e       |`   |		Indirect_Literal	Discrete,0xc44,{0x00000000, 0x005975c5}
0bb6 6085       |`   |		Indirect_Literal	Discrete,0xc3c,{0x00000000, 0x000005e8}
0bb7 4800       |H   |		Short_Literal	0x0
0bb8 0007       |    |		Action	Break_Optional
0bb9 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x24.0x7 = 0xbb9,0xfff8
0bba 00c7       |    |		Action	Elaborate_Subprogram
0bbb e211       |    |		Load	0x1,0x11							; Debug Table 0x24.0x8 = 0xbbb,0x1
0bbc 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0bbd e211       |    |		Load	0x1,0x11
0bbe 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0bbf c212       |    |		Store	0x1,0x12
0bc0 00bc       |    |		Action	Signal_Activated
0bc1 00bb       |    |		Action	Signal_Completion
0bc2 0000 0000  |    |		.BLANK	0000[0x6]
0bc8 ; --------------------------------------------------------------------------------------
0bc8 ; SUBPROGRAM
0bc8 ; --------------------------------------------------------------------------------------
0bc8 0bcb       |    |		.CONST	0x0bcb								; Address of begin
0bc9 0004       |    |		.CONST	0x0004								; Address of exception handler
0bca 0001       |    |		.CONST	0x0001								; Number of locals
0bcb			BODY_0bc8:
0bcb			INIT_0bc8:
0bcb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x25 = .DEBUG	0x0bcb,0x12ec,0x1001,0x0000,0x0059,0x75c5,0x0000,0x04ff
													; Debug Table 0x25.0x0 = 0xbcb,0x1
0bcc 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
0bcd 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
0bce e003       |    |		Load	0x0,0x3
0bcf 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0bd0 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0bd1 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0bd2 0000 0000  |    |		.BLANK	0000[0x6]
0bd8 ; --------------------------------------------------------------------------------------
0bd8 ; SUBPROGRAM
0bd8 ; --------------------------------------------------------------------------------------
0bd8 0bdb       |    |		.CONST	0x0bdb								; Address of begin
0bd9 0004       |    |		.CONST	0x0004								; Address of exception handler
0bda 0001       |    |		.CONST	0x0001								; Number of locals
0bdb			BODY_0bd8:
0bdb			INIT_0bd8:
0bdb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x26 = .DEBUG	0x0bdb,0x12f0,0x1001,0x0000,0x0059,0x75c5,0x0000,0x0521
													; Debug Table 0x26.0x0 = 0xbdb,0x1
0bdc e212       |    |		Load	0x1,0x12
0bdd e211       |    |		Load	0x1,0x11
0bde 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0bdf 7017       |p   |		Jump_Nonzero	0xbf7
0be0 e212       |    |		Load	0x1,0x12							; Debug Table 0x26.0x1 = 0xbe0,0x2
0be1 00db       |    |		Load_Top	At_Offset_3
0be2 e211       |    |		Load	0x1,0x11
0be3 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0be4 c212       |    |		Store	0x1,0x12
0be5 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x26.0x2 = 0xbe5,0x3
0be6 820f       |    |		Call	0x1,0xf
0be7 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x26.0x3 = 0xbe7,0x4
0be8 0217       |    |		Execute	Heap_Access,All_Reference
0be9 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0bea 680c       |h   |		Jump_Zero	0xbf7
0beb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x26.0x4 = 0xbeb,0x5
0bec 0217       |    |		Execute	Heap_Access,All_Reference
0bed 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0bee 0217       |    |		Execute	Heap_Access,All_Reference
0bef 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0bf0 8214       |    |		Call	0x1,0x14
0bf1 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x26.0x5 = 0xbf1,0x6
0bf2 0217       |    |		Execute	Heap_Access,All_Reference
0bf3 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0bf4 0217       |    |		Execute	Heap_Access,All_Reference
0bf5 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0bf6 8214       |    |		Call	0x1,0x14
0bf7 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0bf8 ; --------------------------------------------------------------------------------------
0bf8 ; SUBPROGRAM
0bf8 ; --------------------------------------------------------------------------------------
0bf8 0bfd       |    |		.CONST	0x0bfd								; Address of begin
0bf9 0004       |    |		.CONST	0x0004								; Address of exception handler
0bfa 0002       |    |		.CONST	0x0002								; Number of locals
0bfb			INIT_0bf8:
0bfb e001       |    |		Load	0x0,0x1								; Debug Table 0x27 = .DEBUG	0x0bfb,0x12fe,0x1001,0x0000,0x0059,0x75c5,0x0000,0x052b
													; Debug Table 0x27.0x0 = 0xbfb,0xffff
0bfc 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0bfd			BODY_0bf8:
0bfd 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x27.0x1 = 0xbfd,0x1
0bfe 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0bff 00cf       |    |		Action	Mark_Auxiliary
0c00 780d       |x   |		Jump	0xc0e
0c01 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x27.0x2 = 0xc01,0x3
0c02 0217       |    |		Execute	Heap_Access,All_Reference
0c03 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0c04 6804       |h   |		Jump_Zero	0xc09
0c05 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x27.0x3 = 0xc05,0x4
0c06 0217       |    |		Execute	Heap_Access,All_Reference
0c07 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0c08 8213       |    |		Call	0x1,0x13
0c09 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x27.0x4 = 0xc09,0x5
0c0a 0217       |    |		Execute	Heap_Access,All_Reference
0c0b 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0c0c 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0c0d 00c9       |    |		Action	Pop_Auxiliary_Loop
0c0e 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x27.0x5 = 0xc0e,0x2
0c0f 77f1       |w   |		Jump_Nonzero	0xc01
0c10 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0c11 0000 0000  |    |		.BLANK	0000[0x7]
0c18 ; --------------------------------------------------------------------------------------
0c18 ; SUBPROGRAM
0c18 ; --------------------------------------------------------------------------------------
0c18 0c1d       |    |		.CONST	0x0c1d								; Address of begin
0c19 0004       |    |		.CONST	0x0004								; Address of exception handler
0c1a 0002       |    |		.CONST	0x0002								; Number of locals
0c1b			INIT_0c18:
0c1b e001       |    |		Load	0x0,0x1								; Debug Table 0x28 = .DEBUG	0x0c1b,0x130c,0x1001,0x0000,0x0059,0x75c5,0x0000,0x05a0
													; Debug Table 0x28.0x0 = 0xc1b,0xffff
0c1c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0c1d			BODY_0c18:
0c1d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x28.0x1 = 0xc1d,0x1
0c1e 0217       |    |		Execute	Heap_Access,All_Reference
0c1f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0c20 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0c21 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x28.0x2 = 0xc21,0x2
0c22 8213       |    |		Call	0x1,0x13
0c23 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x28.0x3 = 0xc23,0x3
0c24 0217       |    |		Execute	Heap_Access,All_Reference
0c25 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0c26 6814       |h   |		Jump_Zero	0xc3b
0c27 00d8       |    |		Load_Top	At_Offset_0
0c28 0217       |    |		Execute	Heap_Access,All_Reference
0c29 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0c2a 0217       |    |		Execute	Heap_Access,All_Reference
0c2b 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0c2c 680e       |h   |		Jump_Zero	0xc3b
0c2d 00d8       |    |		Load_Top	At_Offset_0
0c2e 0217       |    |		Execute	Heap_Access,All_Reference
0c2f 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0c30 0217       |    |		Execute	Heap_Access,All_Reference
0c31 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0c32 00d9       |    |		Load_Top	At_Offset_1
0c33 021f       |    |		Execute	Heap_Access,Equal
0c34 7006       |p   |		Jump_Nonzero	0xc3b
0c35 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x28.0x4 = 0xc35,0x4
0c36 0217       |    |		Execute	Heap_Access,All_Reference
0c37 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0c38 0217       |    |		Execute	Heap_Access,All_Reference
0c39 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0c3a 8213       |    |		Call	0x1,0x13
0c3b 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0c3c 0000 0000  |    |		.LITERAL	{0x00000000, 0x000005e8}
0c40 0000 0000  |    |		.LITERAL	{0x00000000, 0x00000510}
0c44 0000 0000  |    |		.LITERAL	{0x00000000, 0x005975c5}
0c48 ; --------------------------------------------------------------------------------------
0c48 ; STRING TABLE
0c48 ; --------------------------------------------------------------------------------------
0c48 0044       | D  |		.STRTAB	0x0044->0x0c6a							; "CODE_DATABASE"
0c49 004f       | O  |		.STRTAB	0x004f->0x0c70							; "?'C(ADA)"
0c4a 0055       | U  |		.STRTAB	0x0055->0x0c74							; " is not a world"
0c4b 0062       | b  |		.STRTAB	0x0062->0x0c7c							; "Unable to get context for "
0c4c 007a       | z  |		.STRTAB	0x007a->0x0c89							; ", status => "
0c4d 0084       |    |		.STRTAB	0x0084->0x0c8f							; "Unable to resolve ada objects in "
0c4e 00a3       |    |		.STRTAB	0x00a3->0x0c9f							; ", because "
0c4f 00ab       |    |		.STRTAB	0x00ab->0x0ca4							; "Unable to get diana root for "
0c50 00c6       |    |		.STRTAB	0x00c6->0x0cb3							; "Unable to get declaration state for "
0c51 00e8       |    |		.STRTAB	0x00e8->0x0cc5							; "Can't open "
0c52 00f1       |    |		.STRTAB	0x00f1->0x0cca							; " ("
0c53 00f1       |    |		.STRTAB	0x00f1->0x0ccb							; ")"
0c54 00f0       |    |		.STRTAB	0x00f0->0x0ccc							; "Program_Library entry for unit "
0c55 010d       |    |		.STRTAB	0x010d->0x0cdb							; " will be considered to be corrupt"
0c56 012c       | ,  |		.STRTAB	0x012c->0x0cec							; "'SPEC"
0c57 012f       | /  |		.STRTAB	0x012f->0x0cee							; "Unable to resolve "
0c58 013f       | ?  |		.STRTAB	0x013f->0x0cf7							; " in "
0c59 0141       | A  |		.STRTAB	0x0141->0x0cf9							; "Unable to get version for "
0c5a 0159       | Y  |		.STRTAB	0x0159->0x0d06							; "Unable to open "
0c5b 0166       | f  |		.STRTAB	0x0166->0x0d0e							; "."
0c5c 0165       | e  |		.STRTAB	0x0165->0x0d0e							; "Unable to get target key for "
0c5d 0180       |    |		.STRTAB	0x0180->0x0d1d							; " status => "
0c5e 0189       |    |		.STRTAB	0x0189->0x0d22							; "Target key "
0c5f 0192       |    |		.STRTAB	0x0192->0x0d28							; " of enclosing world is illegal"
0c60 01ae       |    |		.STRTAB	0x01ae->0x0d37							; "Unable to destroy "
0c61 01be       |    |		.STRTAB	0x01be->0x0d40							; "'BODY"
0c62 01c1       |    |		.STRTAB	0x01c1->0x0d42							; "unable to resolve placeholder reference to "
0c63 01ea       |    |		.STRTAB	0x01ea->0x0d58							; "Exception building Program_Library entry for unit "
0c64 021a       |    |		.STRTAB	0x021a->0x0d71							; ": "
0c65 021a       |    |		.STRTAB	0x021a->0x0d72							; "Exception building a Program_Library entry: "
0c66 0244       | D  |		.STRTAB	0x0244->0x0d88							; "Unable to increment reference count for code segment of "
0c67 027a       | z  |		.STRTAB	0x027a->0x0da4							; ", Status => "
0c68 0284       |    |		.STRTAB	0x0284->0x0daa							; "Unable to increment reference count for elab code segment of "
0c69 02bf       |    |		.STREND 0x02bf->0x0dc8
0c6a 434f 4445  |CODE|		.STRTAB_STRINGS
0dc9 0000 0000  |    |		.BLANK	0000[0x7]
0dd0 ; --------------------------------------------------------------------------------------
0dd0 ; Debug Table
0dd0 ; --------------------------------------------------------------------------------------
0dd0 0003 0029  |   )|		.CONST	0x0003,0x0029
0dd2 000b 0f1a  |    |		.DEBUG	0x000b,0x0f1a,0x0000,0x0000,0x0057,0x29a5,0x0000,0x118f
0dda 0014 0f24  |   $|		.DEBUG	0x0014,0x0f24,0x0000,0x0000,0x0059,0x75c5,0x0000,0x0014
0de2 005b 0f58  | [ X|		.DEBUG	0x005b,0x0f58,0x0001,0x0000,0x0057,0x29a5,0x0000,0x1190
0dea 01c3 0fb2  |    |		.DEBUG	0x01c3,0x0fb2,0x0001,0x0000,0x0057,0x29a5,0x0000,0x11bf
0df2 01db 0fbe  |    |		.DEBUG	0x01db,0x0fbe,0x0001,0x0000,0x0057,0x29a5,0x0000,0x11ea
0dfa 0283 0ff2  |    |		.DEBUG	0x0283,0x0ff2,0x0002,0x0000,0x0057,0x29a5,0x0000,0x1215
0e02 02ab 1004  |    |		.DEBUG	0x02ab,0x1004,0x0001,0x0000,0x0059,0x75c5,0x0000,0x0082
0e0a 02c3 100c  |    |		.DEBUG	0x02c3,0x100c,0x0002,0x0000,0x0059,0x75c5,0x0000,0x00bb
0e12 02d3 1014  |    |		.DEBUG	0x02d3,0x1014,0x0001,0x0000,0x0059,0x75c5,0x0000,0x00e1
0e1a 031b 1030  |   0|		.DEBUG	0x031b,0x1030,0x0002,0x0000,0x0059,0x75c5,0x0000,0x0615
0e22 032b 1038  | + 8|		.DEBUG	0x032b,0x1038,0x0002,0x0000,0x0059,0x75c5,0x0000,0x063d
0e2a 033b 103e  | ; >|		.DEBUG	0x033b,0x103e,0x0002,0x0000,0x0059,0x75c5,0x0000,0x06d3
0e32 034b 1042  | K B|		.DEBUG	0x034b,0x1042,0x0002,0x0000,0x0059,0x75c5,0x0000,0x06eb
0e3a 03eb 108c  |    |		.DEBUG	0x03eb,0x108c,0x0002,0x0000,0x0059,0x75c5,0x0000,0x082a
0e42 0403 109a  |    |		.DEBUG	0x0403,0x109a,0x0002,0x0000,0x0059,0x75c5,0x0000,0x085b
0e4a 04db 10f0  |    |		.DEBUG	0x04db,0x10f0,0x0001,0x0000,0x0059,0x75c5,0x0000,0x0b47
0e52 0513 1108  |    |		.DEBUG	0x0513,0x1108,0x0004,0x0000,0x0059,0x75c5,0x0000,0x12c7
0e5a 074b 1190  | K  |		.DEBUG	0x074b,0x1190,0x0002,0x0000,0x0059,0x75c5,0x0000,0x0107
0e62 077b 11a2  | {  |		.DEBUG	0x077b,0x11a2,0x0004,0x0000,0x0059,0x75c5,0x0000,0x0210
0e6a 07a3 11ae  |    |		.DEBUG	0x07a3,0x11ae,0x0004,0x0000,0x0059,0x75c5,0x0000,0x0234
0e72 07bb 11b4  |    |		.DEBUG	0x07bb,0x11b4,0x0002,0x0000,0x0059,0x75c5,0x0000,0x064b
0e7a 07f3 11c2  |    |		.DEBUG	0x07f3,0x11c2,0x0004,0x0000,0x0059,0x75c5,0x0000,0x06ce
0e82 0813 11cc  |    |		.DEBUG	0x0813,0x11cc,0x0001,0x0000,0x0059,0x75c5,0x0000,0x08b9
0e8a 0883 11de  |    |		.DEBUG	0x0883,0x11de,0x0004,0x0000,0x0059,0x75c5,0x0000,0x0a92
0e92 08ab 11e4  |    |		.DEBUG	0x08ab,0x11e4,0x0001,0x0000,0x0059,0x75c5,0x0000,0x0b77
0e9a 08d3 11f0  |    |		.DEBUG	0x08d3,0x11f0,0x0002,0x0000,0x0059,0x75c5,0x0000,0x0bbe
0ea2 0913 1214  |    |		.DEBUG	0x0913,0x1214,0x0001,0x0000,0x0059,0x75c5,0x0000,0x0c2d
0eaa 0943 1228  | C (|		.DEBUG	0x0943,0x1228,0x0001,0x0000,0x0059,0x75c5,0x0000,0x0e9c
0eb2 0953 1230  | S 0|		.DEBUG	0x0953,0x1230,0x0004,0x0000,0x0059,0x75c5,0x0000,0x0fa5
0eba 099b 1248  |   H|		.DEBUG	0x099b,0x1248,0x0004,0x0000,0x0059,0x75c5,0x0000,0x01c1
0ec2 09b3 1250  |   P|		.DEBUG	0x09b3,0x1250,0x0004,0x0000,0x0059,0x75c5,0x0000,0x020c
0eca 09e3 1258  |   X|		.DEBUG	0x09e3,0x1258,0x0004,0x0000,0x0059,0x75c5,0x0000,0x0e7c
0ed2 0b33 12c0  | 3  |		.DEBUG	0x0b33,0x12c0,0x0004,0x0000,0x0059,0x75c5,0x0000,0x0f07
0eda 0b4b 12c8  | K  |		.DEBUG	0x0b4b,0x12c8,0x0004,0x0000,0x0059,0x75c5,0x0000,0x0fa2
0ee2 0b73 12ce  | s  |		.DEBUG	0x0b73,0x12ce,0x0004,0x0000,0x0059,0x75c5,0x0000,0x0f04
0eea 0b9b 12d4  |    |		.DEBUG	0x0b9b,0x12d4,0x4000,0x0000,0x0059,0x75c5,0x0000,0x04f2
0ef2 0b9e 12d8  |    |		.DEBUG	0x0b9e,0x12d8,0x4000,0x0000,0x0059,0x75c5,0x0000,0x050f
0efa 0bcb 12ec  |    |		.DEBUG	0x0bcb,0x12ec,0x1001,0x0000,0x0059,0x75c5,0x0000,0x04ff
0f02 0bdb 12f0  |    |		.DEBUG	0x0bdb,0x12f0,0x1001,0x0000,0x0059,0x75c5,0x0000,0x0521
0f0a 0bfb 12fe  |    |		.DEBUG	0x0bfb,0x12fe,0x1001,0x0000,0x0059,0x75c5,0x0000,0x052b
0f12 0c1b 130c  |    |		.DEBUG	0x0c1b,0x130c,0x1001,0x0000,0x0059,0x75c5,0x0000,0x05a0
0f1a ; --------------------------------------------------------------------------------------
0f1a ; Debug3 Subtable 0x0
0f1a ; --------------------------------------------------------------------------------------
0f1a 0004 0000  |    |		.DBG3TAB	0x0004,0x0000
0f1c 000b ffff  |    |		.CONST	0x000b,0xffff
0f1e 000d fffe  |    |		.CONST	0x000d,0xfffe
0f20 000f fffd  |    |		.CONST	0x000f,0xfffd
0f22 0011 fffc  |    |		.CONST	0x0011,0xfffc
0f24 ; --------------------------------------------------------------------------------------
0f24 ; Debug3 Subtable 0x1
0f24 ; --------------------------------------------------------------------------------------
0f24 0019 0000  |    |		.DBG3TAB	0x0019,0x0000
0f26 0014 ffff  |    |		.CONST	0x0014,0xffff
0f28 0020 fffe  |    |		.CONST	0x0020,0xfffe
0f2a 0022 fffd  | "  |		.CONST	0x0022,0xfffd
0f2c 0023 fffc  | #  |		.CONST	0x0023,0xfffc
0f2e 0024 fffb  | $  |		.CONST	0x0024,0xfffb
0f30 0025 fffa  | %  |		.CONST	0x0025,0xfffa
0f32 0026 fff9  | &  |		.CONST	0x0026,0xfff9
0f34 0027 fff8  | '  |		.CONST	0x0027,0xfff8
0f36 0028 fff7  | (  |		.CONST	0x0028,0xfff7
0f38 0029 fff6  | )  |		.CONST	0x0029,0xfff6
0f3a 002a fff5  | *  |		.CONST	0x002a,0xfff5
0f3c 002c fff4  | ,  |		.CONST	0x002c,0xfff4
0f3e 002e fff3  | .  |		.CONST	0x002e,0xfff3
0f40 0030 fff2  | 0  |		.CONST	0x0030,0xfff2
0f42 0032 fff1  | 2  |		.CONST	0x0032,0xfff1
0f44 0036 fff0  | 6  |		.CONST	0x0036,0xfff0
0f46 003f ffef  | ?  |		.CONST	0x003f,0xffef
0f48 0041 ffee  | A  |		.CONST	0x0041,0xffee
0f4a 0043 ffed  | C  |		.CONST	0x0043,0xffed
0f4c 0045 ffec  | E  |		.CONST	0x0045,0xffec
0f4e 0047 ffeb  | G  |		.CONST	0x0047,0xffeb
0f50 0049 ffea  | I  |		.CONST	0x0049,0xffea
0f52 004b ffe9  | K  |		.CONST	0x004b,0xffe9
0f54 004d ffe8  | M  |		.CONST	0x004d,0xffe8
0f56 004f ffe7  | O  |		.CONST	0x004f,0xffe7
0f58 ; --------------------------------------------------------------------------------------
0f58 ; Debug3 Subtable 0x2
0f58 ; --------------------------------------------------------------------------------------
0f58 000a 0022  |   "|		.DBG3TAB	0x000a,0x0022
0f5a 005b ffff  | [  |		.CONST	0x005b,0xffff
0f5c 005e fffe  | ^  |		.CONST	0x005e,0xfffe
0f5e 0063 fffd  | c  |		.CONST	0x0063,0xfffd
0f60 0065 fffc  | e  |		.CONST	0x0065,0xfffc
0f62 0068 fffb  | h  |		.CONST	0x0068,0xfffb
0f64 006a fffa  | j  |		.CONST	0x006a,0xfffa
0f66 0070 fff9  | p  |		.CONST	0x0070,0xfff9
0f68 0073 fff8  | s  |		.CONST	0x0073,0xfff8
0f6a 0074 fff7  | t  |		.CONST	0x0074,0xfff7
0f6c 0077 fff6  | w  |		.CONST	0x0077,0xfff6
0f6e 0079 0001  | y  |		.CONST	0x0079,0x0001
0f70 007f 0002  |    |		.CONST	0x007f,0x0002
0f72 0089 0003  |    |		.CONST	0x0089,0x0003
0f74 008e 0004  |    |		.CONST	0x008e,0x0004
0f76 009a 0005  |    |		.CONST	0x009a,0x0005
0f78 00a9 0006  |    |		.CONST	0x00a9,0x0006
0f7a 00aa 0007  |    |		.CONST	0x00aa,0x0007
0f7c 00b8 0008  |    |		.CONST	0x00b8,0x0008
0f7e 00ba 0009  |    |		.CONST	0x00ba,0x0009
0f80 00cf 000a  |    |		.CONST	0x00cf,0x000a
0f82 00de 000b  |    |		.CONST	0x00de,0x000b
0f84 00df 000c  |    |		.CONST	0x00df,0x000c
0f86 00f2 000d  |    |		.CONST	0x00f2,0x000d
0f88 00f7 001b  |    |		.CONST	0x00f7,0x001b
0f8a 0116 000e  |    |		.CONST	0x0116,0x000e
0f8c 0120 000f  |    |		.CONST	0x0120,0x000f
0f8e 0129 0010  | )  |		.CONST	0x0129,0x0010
0f90 0138 0011  | 8  |		.CONST	0x0138,0x0011
0f92 013f 0013  | ?  |		.CONST	0x013f,0x0013
0f94 014a 0014  | J  |		.CONST	0x014a,0x0014
0f96 014c 0015  | L  |		.CONST	0x014c,0x0015
0f98 0162 0016  | b  |		.CONST	0x0162,0x0016
0f9a 0172 0017  | r  |		.CONST	0x0172,0x0017
0f9c 0174 0018  | t  |		.CONST	0x0174,0x0018
0f9e 018a 0019  |    |		.CONST	0x018a,0x0019
0fa0 018f 001a  |    |		.CONST	0x018f,0x001a
0fa2 0195 0012  |    |		.CONST	0x0195,0x0012
0fa4 019c 001c  |    |		.CONST	0x019c,0x001c
0fa6 01a0 001d  |    |		.CONST	0x01a0,0x001d
0fa8 01a7 001e  |    |		.CONST	0x01a7,0x001e
0faa 01ac 001f  |    |		.CONST	0x01ac,0x001f
0fac 01b3 0020  |    |		.CONST	0x01b3,0x0020
0fae 01b6 0021  |   !|		.CONST	0x01b6,0x0021
0fb0 01bb 0022  |   "|		.CONST	0x01bb,0x0022
0fb2 ; --------------------------------------------------------------------------------------
0fb2 ; Debug3 Subtable 0x3
0fb2 ; --------------------------------------------------------------------------------------
0fb2 0004 0001  |    |		.DBG3TAB	0x0004,0x0001
0fb4 01c3 ffff  |    |		.CONST	0x01c3,0xffff
0fb6 01c8 fffe  |    |		.CONST	0x01c8,0xfffe
0fb8 01cd fffd  |    |		.CONST	0x01cd,0xfffd
0fba 01d0 fffc  |    |		.CONST	0x01d0,0xfffc
0fbc 01d4 0001  |    |		.CONST	0x01d4,0x0001
0fbe ; --------------------------------------------------------------------------------------
0fbe ; Debug3 Subtable 0x4
0fbe ; --------------------------------------------------------------------------------------
0fbe 0007 0012  |    |		.DBG3TAB	0x0007,0x0012
0fc0 01db ffff  |    |		.CONST	0x01db,0xffff
0fc2 01dd fffe  |    |		.CONST	0x01dd,0xfffe
0fc4 01e0 fffd  |    |		.CONST	0x01e0,0xfffd
0fc6 01e1 fffc  |    |		.CONST	0x01e1,0xfffc
0fc8 01e2 fffb  |    |		.CONST	0x01e2,0xfffb
0fca 01e4 fffa  |    |		.CONST	0x01e4,0xfffa
0fcc 01ea fff9  |    |		.CONST	0x01ea,0xfff9
0fce 01f3 0001  |    |		.CONST	0x01f3,0x0001
0fd0 01fd 0002  |    |		.CONST	0x01fd,0x0002
0fd2 021a 0003  |    |		.CONST	0x021a,0x0003
0fd4 021c 0004  |    |		.CONST	0x021c,0x0004
0fd6 0234 0005  | 4  |		.CONST	0x0234,0x0005
0fd8 023b 0006  | ;  |		.CONST	0x023b,0x0006
0fda 0240 0007  | @  |		.CONST	0x0240,0x0007
0fdc 0242 0008  | B  |		.CONST	0x0242,0x0008
0fde 024b 0009  | K  |		.CONST	0x024b,0x0009
0fe0 0250 000a  | P  |		.CONST	0x0250,0x000a
0fe2 025a 000b  | Z  |		.CONST	0x025a,0x000b
0fe4 025e 000c  | ^  |		.CONST	0x025e,0x000c
0fe6 0263 000d  | c  |		.CONST	0x0263,0x000d
0fe8 026a 000e  | j  |		.CONST	0x026a,0x000e
0fea 026f 000f  | o  |		.CONST	0x026f,0x000f
0fec 0273 0010  | s  |		.CONST	0x0273,0x0010
0fee 0276 0011  | v  |		.CONST	0x0276,0x0011
0ff0 027b 0012  | {  |		.CONST	0x027b,0x0012
0ff2 ; --------------------------------------------------------------------------------------
0ff2 ; Debug3 Subtable 0x5
0ff2 ; --------------------------------------------------------------------------------------
0ff2 0001 0007  |    |		.DBG3TAB	0x0001,0x0007
0ff4 0283 ffff  |    |		.CONST	0x0283,0xffff
0ff6 0285 0001  |    |		.CONST	0x0285,0x0001
0ff8 0287 0002  |    |		.CONST	0x0287,0x0002
0ffa 028a 0003  |    |		.CONST	0x028a,0x0003
0ffc 028d 0004  |    |		.CONST	0x028d,0x0004
0ffe 0293 0005  |    |		.CONST	0x0293,0x0005
1000 0295 0006  |    |		.CONST	0x0295,0x0006
1002 02a3 0007  |    |		.CONST	0x02a3,0x0007
1004 ; --------------------------------------------------------------------------------------
1004 ; Debug3 Subtable 0x6
1004 ; --------------------------------------------------------------------------------------
1004 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
1006 02ab 0001  |    |		.CONST	0x02ab,0x0001
1008 02b2 0002  |    |		.CONST	0x02b2,0x0002
100a 02b7 0003  |    |		.CONST	0x02b7,0x0003
100c ; --------------------------------------------------------------------------------------
100c ; Debug3 Subtable 0x7
100c ; --------------------------------------------------------------------------------------
100c 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
100e 02c3 0001  |    |		.CONST	0x02c3,0x0001
1010 02c5 0002  |    |		.CONST	0x02c5,0x0002
1012 02c7 0003  |    |		.CONST	0x02c7,0x0003
1014 ; --------------------------------------------------------------------------------------
1014 ; Debug3 Subtable 0x8
1014 ; --------------------------------------------------------------------------------------
1014 0004 0009  |    |		.DBG3TAB	0x0004,0x0009
1016 02d3 ffff  |    |		.CONST	0x02d3,0xffff
1018 02d5 fffe  |    |		.CONST	0x02d5,0xfffe
101a 02d6 fffd  |    |		.CONST	0x02d6,0xfffd
101c 02d7 fffc  |    |		.CONST	0x02d7,0xfffc
101e 02dd 0001  |    |		.CONST	0x02dd,0x0001
1020 02df 0002  |    |		.CONST	0x02df,0x0002
1022 02e0 0003  |    |		.CONST	0x02e0,0x0003
1024 02e2 0004  |    |		.CONST	0x02e2,0x0004
1026 02e6 0005  |    |		.CONST	0x02e6,0x0005
1028 02eb 0006  |    |		.CONST	0x02eb,0x0006
102a 02ec 0007  |    |		.CONST	0x02ec,0x0007
102c 02f1 0008  |    |		.CONST	0x02f1,0x0008
102e 0304 0009  |    |		.CONST	0x0304,0x0009
1030 ; --------------------------------------------------------------------------------------
1030 ; Debug3 Subtable 0x9
1030 ; --------------------------------------------------------------------------------------
1030 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
1032 031b 0001  |    |		.CONST	0x031b,0x0001
1034 0324 0003  | $  |		.CONST	0x0324,0x0003
1036 0326 0002  | &  |		.CONST	0x0326,0x0002
1038 ; --------------------------------------------------------------------------------------
1038 ; Debug3 Subtable 0xa
1038 ; --------------------------------------------------------------------------------------
1038 0001 0001  |    |		.DBG3TAB	0x0001,0x0001
103a 032b ffff  | +  |		.CONST	0x032b,0xffff
103c 032f 0001  | /  |		.CONST	0x032f,0x0001
103e ; --------------------------------------------------------------------------------------
103e ; Debug3 Subtable 0xb
103e ; --------------------------------------------------------------------------------------
103e 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
1040 033b 0001  | ;  |		.CONST	0x033b,0x0001
1042 ; --------------------------------------------------------------------------------------
1042 ; Debug3 Subtable 0xc
1042 ; --------------------------------------------------------------------------------------
1042 0001 0023  |   #|		.DBG3TAB	0x0001,0x0023
1044 034b ffff  | K  |		.CONST	0x034b,0xffff
1046 034d 0001  | M  |		.CONST	0x034d,0x0001
1048 035c 0027  | \ '|		.CONST	0x035c,0x0027
104a 035e 0002  | ^  |		.CONST	0x035e,0x0002
104c 0362 0003  | b  |		.CONST	0x0362,0x0003
104e 0365 0004  | e  |		.CONST	0x0365,0x0004
1050 0368 0005  | h  |		.CONST	0x0368,0x0005
1052 036b 0006  | k  |		.CONST	0x036b,0x0006
1054 0374 000d  | t  |		.CONST	0x0374,0x000d
1056 0376 0007  | v  |		.CONST	0x0376,0x0007
1058 037a 0008  | z  |		.CONST	0x037a,0x0008
105a 037d 0009  | }  |		.CONST	0x037d,0x0009
105c 0380 000a  |    |		.CONST	0x0380,0x000a
105e 0384 000b  |    |		.CONST	0x0384,0x000b
1060 0387 000c  |    |		.CONST	0x0387,0x000c
1062 038b 000f  |    |		.CONST	0x038b,0x000f
1064 0394 0012  |    |		.CONST	0x0394,0x0012
1066 0396 0010  |    |		.CONST	0x0396,0x0010
1068 0399 0011  |    |		.CONST	0x0399,0x0011
106a 039d 0014  |    |		.CONST	0x039d,0x0014
106c 03a6 001c  |    |		.CONST	0x03a6,0x001c
106e 03a8 0015  |    |		.CONST	0x03a8,0x0015
1070 03b1 0018  |    |		.CONST	0x03b1,0x0018
1072 03b3 0016  |    |		.CONST	0x03b3,0x0016
1074 03b6 0017  |    |		.CONST	0x03b6,0x0017
1076 03ba 001a  |    |		.CONST	0x03ba,0x001a
1078 03bd 001b  |    |		.CONST	0x03bd,0x001b
107a 03c1 001e  |    |		.CONST	0x03c1,0x001e
107c 03c5 001f  |    |		.CONST	0x03c5,0x001f
107e 03c9 0020  |    |		.CONST	0x03c9,0x0020
1080 03cc 0021  |   !|		.CONST	0x03cc,0x0021
1082 03d9 0024  |   $|		.CONST	0x03d9,0x0024
1084 03db 0022  |   "|		.CONST	0x03db,0x0022
1086 03de 0023  |   #|		.CONST	0x03de,0x0023
1088 03e2 0026  |   &|		.CONST	0x03e2,0x0026
108a 03e5 0029  |   )|		.CONST	0x03e5,0x0029
108c ; --------------------------------------------------------------------------------------
108c ; Debug3 Subtable 0xd
108c ; --------------------------------------------------------------------------------------
108c 0001 0005  |    |		.DBG3TAB	0x0001,0x0005
108e 03eb ffff  |    |		.CONST	0x03eb,0xffff
1090 03ed 0001  |    |		.CONST	0x03ed,0x0001
1092 03f1 0002  |    |		.CONST	0x03f1,0x0002
1094 03f3 0003  |    |		.CONST	0x03f3,0x0003
1096 03f7 0004  |    |		.CONST	0x03f7,0x0004
1098 03fb 0005  |    |		.CONST	0x03fb,0x0005
109a ; --------------------------------------------------------------------------------------
109a ; Debug3 Subtable 0xe
109a ; --------------------------------------------------------------------------------------
109a 0009 0021  |   !|		.DBG3TAB	0x0009,0x0021
109c 0403 ffff  |    |		.CONST	0x0403,0xffff
109e 0405 fffe  |    |		.CONST	0x0405,0xfffe
10a0 0407 fffd  |    |		.CONST	0x0407,0xfffd
10a2 0409 fffc  |    |		.CONST	0x0409,0xfffc
10a4 0411 fffb  |    |		.CONST	0x0411,0xfffb
10a6 0416 fffa  |    |		.CONST	0x0416,0xfffa
10a8 0418 fff9  |    |		.CONST	0x0418,0xfff9
10aa 041a fff8  |    |		.CONST	0x041a,0xfff8
10ac 041f fff7  |    |		.CONST	0x041f,0xfff7
10ae 0423 0001  | #  |		.CONST	0x0423,0x0001
10b0 042f 0002  | /  |		.CONST	0x042f,0x0002
10b2 0431 0003  | 1  |		.CONST	0x0431,0x0003
10b4 0436 0004  | 6  |		.CONST	0x0436,0x0004
10b6 043a 0005  | :  |		.CONST	0x043a,0x0005
10b8 043e 0006  | >  |		.CONST	0x043e,0x0006
10ba 0443 0007  | C  |		.CONST	0x0443,0x0007
10bc 044b 0008  | K  |		.CONST	0x044b,0x0008
10be 044f 0009  | O  |		.CONST	0x044f,0x0009
10c0 0453 000a  | S  |		.CONST	0x0453,0x000a
10c2 0457 000b  | W  |		.CONST	0x0457,0x000b
10c4 045c 000c  | \  |		.CONST	0x045c,0x000c
10c6 0460 000d  | `  |		.CONST	0x0460,0x000d
10c8 0464 000e  | d  |		.CONST	0x0464,0x000e
10ca 0468 000f  | h  |		.CONST	0x0468,0x000f
10cc 046c 0010  | l  |		.CONST	0x046c,0x0010
10ce 0472 0011  | r  |		.CONST	0x0472,0x0011
10d0 0476 0012  | v  |		.CONST	0x0476,0x0012
10d2 047c 0013  | |  |		.CONST	0x047c,0x0013
10d4 0480 0014  |    |		.CONST	0x0480,0x0014
10d6 048c 0015  |    |		.CONST	0x048c,0x0015
10d8 048f 0016  |    |		.CONST	0x048f,0x0016
10da 0493 0017  |    |		.CONST	0x0493,0x0017
10dc 049a 0018  |    |		.CONST	0x049a,0x0018
10de 04a3 0019  |    |		.CONST	0x04a3,0x0019
10e0 04ac 001a  |    |		.CONST	0x04ac,0x001a
10e2 04b0 001b  |    |		.CONST	0x04b0,0x001b
10e4 04b4 001c  |    |		.CONST	0x04b4,0x001c
10e6 04b9 001d  |    |		.CONST	0x04b9,0x001d
10e8 04bd 001e  |    |		.CONST	0x04bd,0x001e
10ea 04c5 001f  |    |		.CONST	0x04c5,0x001f
10ec 04c6 0020  |    |		.CONST	0x04c6,0x0020
10ee 04d1 0021  |   !|		.CONST	0x04d1,0x0021
10f0 ; --------------------------------------------------------------------------------------
10f0 ; Debug3 Subtable 0xf
10f0 ; --------------------------------------------------------------------------------------
10f0 000a 0001  |    |		.DBG3TAB	0x000a,0x0001
10f2 04db ffff  |    |		.CONST	0x04db,0xffff
10f4 04dc fffe  |    |		.CONST	0x04dc,0xfffe
10f6 04df fffd  |    |		.CONST	0x04df,0xfffd
10f8 04e2 fffc  |    |		.CONST	0x04e2,0xfffc
10fa 04e4 fffb  |    |		.CONST	0x04e4,0xfffb
10fc 04ed fffa  |    |		.CONST	0x04ed,0xfffa
10fe 04ef fff9  |    |		.CONST	0x04ef,0xfff9
1100 04f1 fff8  |    |		.CONST	0x04f1,0xfff8
1102 04fa fff7  |    |		.CONST	0x04fa,0xfff7
1104 04fc fff6  |    |		.CONST	0x04fc,0xfff6
1106 0507 0001  |    |		.CONST	0x0507,0x0001
1108 ; --------------------------------------------------------------------------------------
1108 ; Debug3 Subtable 0x10
1108 ; --------------------------------------------------------------------------------------
1108 000d 0036  |   6|		.DBG3TAB	0x000d,0x0036
110a 0513 ffff  |    |		.CONST	0x0513,0xffff
110c 0516 fffe  |    |		.CONST	0x0516,0xfffe
110e 0518 fffd  |    |		.CONST	0x0518,0xfffd
1110 051d fffc  |    |		.CONST	0x051d,0xfffc
1112 051f fffb  |    |		.CONST	0x051f,0xfffb
1114 0524 fffa  | $  |		.CONST	0x0524,0xfffa
1116 0526 fff9  | &  |		.CONST	0x0526,0xfff9
1118 0529 fff8  | )  |		.CONST	0x0529,0xfff8
111a 052b fff7  | +  |		.CONST	0x052b,0xfff7
111c 052c fff6  | ,  |		.CONST	0x052c,0xfff6
111e 0531 fff5  | 1  |		.CONST	0x0531,0xfff5
1120 0536 fff4  | 6  |		.CONST	0x0536,0xfff4
1122 0539 fff3  | 9  |		.CONST	0x0539,0xfff3
1124 053a 0001  | :  |		.CONST	0x053a,0x0001
1126 0540 0002  | @  |		.CONST	0x0540,0x0002
1128 054a 0003  | J  |		.CONST	0x054a,0x0003
112a 0558 0004  | X  |		.CONST	0x0558,0x0004
112c 055a 0005  | Z  |		.CONST	0x055a,0x0005
112e 056f 0006  | o  |		.CONST	0x056f,0x0006
1130 057e 0007  | ~  |		.CONST	0x057e,0x0007
1132 0580 0008  |    |		.CONST	0x0580,0x0008
1134 058e 0009  |    |		.CONST	0x058e,0x0009
1136 0590 000a  |    |		.CONST	0x0590,0x000a
1138 05b3 000b  |    |		.CONST	0x05b3,0x000b
113a 05c2 000c  |    |		.CONST	0x05c2,0x000c
113c 05c4 000d  |    |		.CONST	0x05c4,0x000d
113e 05cd 000e  |    |		.CONST	0x05cd,0x000e
1140 05cf 000f  |    |		.CONST	0x05cf,0x000f
1142 05de 0010  |    |		.CONST	0x05de,0x0010
1144 05e0 0011  |    |		.CONST	0x05e0,0x0011
1146 05e5 0012  |    |		.CONST	0x05e5,0x0012
1148 05f1 0013  |    |		.CONST	0x05f1,0x0013
114a 05f3 0014  |    |		.CONST	0x05f3,0x0014
114c 0608 0015  |    |		.CONST	0x0608,0x0015
114e 0617 0016  |    |		.CONST	0x0617,0x0016
1150 0619 0017  |    |		.CONST	0x0619,0x0017
1152 0624 0018  | $  |		.CONST	0x0624,0x0018
1154 0626 0019  | &  |		.CONST	0x0626,0x0019
1156 0640 001a  | @  |		.CONST	0x0640,0x001a
1158 064f 001b  | O  |		.CONST	0x064f,0x001b
115a 0651 001c  | Q  |		.CONST	0x0651,0x001c
115c 065c 001d  | \  |		.CONST	0x065c,0x001d
115e 065e 001e  | ^  |		.CONST	0x065e,0x001e
1160 0673 001f  | s  |		.CONST	0x0673,0x001f
1162 0682 0020  |    |		.CONST	0x0682,0x0020
1164 0684 0021  |   !|		.CONST	0x0684,0x0021
1166 068d 0022  |   "|		.CONST	0x068d,0x0022
1168 069f 0023  |   #|		.CONST	0x069f,0x0023
116a 06ae 0024  |   $|		.CONST	0x06ae,0x0024
116c 06b0 0025  |   %|		.CONST	0x06b0,0x0025
116e 06b4 0026  |   &|		.CONST	0x06b4,0x0026
1170 06bc 0027  |   '|		.CONST	0x06bc,0x0027
1172 06c1 0028  |   (|		.CONST	0x06c1,0x0028
1174 06c5 0029  |   )|		.CONST	0x06c5,0x0029
1176 06c7 002a  |   *|		.CONST	0x06c7,0x002a
1178 06e5 002b  |   +|		.CONST	0x06e5,0x002b
117a 06ea 002c  |   ,|		.CONST	0x06ea,0x002c
117c 06ec 002d  |   -|		.CONST	0x06ec,0x002d
117e 0701 002e  |   .|		.CONST	0x0701,0x002e
1180 0710 002f  |   /|		.CONST	0x0710,0x002f
1182 0712 0030  |   0|		.CONST	0x0712,0x0030
1184 0717 0031  |   1|		.CONST	0x0717,0x0031
1186 071e 0032  |   2|		.CONST	0x071e,0x0032
1188 0723 0033  | # 3|		.CONST	0x0723,0x0033
118a 0727 0034  | ' 4|		.CONST	0x0727,0x0034
118c 072a 0035  | * 5|		.CONST	0x072a,0x0035
118e 072f 0036  | / 6|		.CONST	0x072f,0x0036
1190 ; --------------------------------------------------------------------------------------
1190 ; Debug3 Subtable 0x11
1190 ; --------------------------------------------------------------------------------------
1190 0003 0005  |    |		.DBG3TAB	0x0003,0x0005
1192 074b ffff  | K  |		.CONST	0x074b,0xffff
1194 074c fffe  | L  |		.CONST	0x074c,0xfffe
1196 074e fffd  | N  |		.CONST	0x074e,0xfffd
1198 0758 0002  | X  |		.CONST	0x0758,0x0002
119a 075f 0003  | _  |		.CONST	0x075f,0x0003
119c 0764 0001  | d  |		.CONST	0x0764,0x0001
119e 0769 0004  | i  |		.CONST	0x0769,0x0004
11a0 0773 0005  | s  |		.CONST	0x0773,0x0005
11a2 ; --------------------------------------------------------------------------------------
11a2 ; Debug3 Subtable 0x12
11a2 ; --------------------------------------------------------------------------------------
11a2 0000 0005  |    |		.DBG3TAB	0x0000,0x0005
11a4 077f 0001  |    |		.CONST	0x077f,0x0001
11a6 0786 0002  |    |		.CONST	0x0786,0x0002
11a8 0793 0003  |    |		.CONST	0x0793,0x0003
11aa 0798 0005  |    |		.CONST	0x0798,0x0005
11ac 0799 0006  |    |		.CONST	0x0799,0x0006
11ae ; --------------------------------------------------------------------------------------
11ae ; Debug3 Subtable 0x13
11ae ; --------------------------------------------------------------------------------------
11ae 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
11b0 07a3 0001  |    |		.CONST	0x07a3,0x0001
11b2 07b3 0002  |    |		.CONST	0x07b3,0x0002
11b4 ; --------------------------------------------------------------------------------------
11b4 ; Debug3 Subtable 0x14
11b4 ; --------------------------------------------------------------------------------------
11b4 0000 0006  |    |		.DBG3TAB	0x0000,0x0006
11b6 07bb 0001  |    |		.CONST	0x07bb,0x0001
11b8 07bf 0002  |    |		.CONST	0x07bf,0x0002
11ba 07c5 0003  |    |		.CONST	0x07c5,0x0003
11bc 07cd 0004  |    |		.CONST	0x07cd,0x0004
11be 07d7 0005  |    |		.CONST	0x07d7,0x0005
11c0 07dd 0006  |    |		.CONST	0x07dd,0x0006
11c2 ; --------------------------------------------------------------------------------------
11c2 ; Debug3 Subtable 0x15
11c2 ; --------------------------------------------------------------------------------------
11c2 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
11c4 07f3 ffff  |    |		.CONST	0x07f3,0xffff
11c6 07fb 0001  |    |		.CONST	0x07fb,0x0001
11c8 0800 0002  |    |		.CONST	0x0800,0x0002
11ca 0806 0003  |    |		.CONST	0x0806,0x0003
11cc ; --------------------------------------------------------------------------------------
11cc ; Debug3 Subtable 0x16
11cc ; --------------------------------------------------------------------------------------
11cc 0002 0006  |    |		.DBG3TAB	0x0002,0x0006
11ce 0813 ffff  |    |		.CONST	0x0813,0xffff
11d0 0816 fffe  |    |		.CONST	0x0816,0xfffe
11d2 081b 0001  |    |		.CONST	0x081b,0x0001
11d4 0838 0002  | 8  |		.CONST	0x0838,0x0002
11d6 083a 0003  | :  |		.CONST	0x083a,0x0003
11d8 0862 0004  | b  |		.CONST	0x0862,0x0004
11da 0868 0005  | h  |		.CONST	0x0868,0x0005
11dc 0871 0006  | q  |		.CONST	0x0871,0x0006
11de ; --------------------------------------------------------------------------------------
11de ; Debug3 Subtable 0x17
11de ; --------------------------------------------------------------------------------------
11de 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
11e0 0883 0001  |    |		.CONST	0x0883,0x0001
11e2 08a2 0002  |    |		.CONST	0x08a2,0x0002
11e4 ; --------------------------------------------------------------------------------------
11e4 ; Debug3 Subtable 0x18
11e4 ; --------------------------------------------------------------------------------------
11e4 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
11e6 08ab ffff  |    |		.CONST	0x08ab,0xffff
11e8 08ad 0001  |    |		.CONST	0x08ad,0x0001
11ea 08b2 0002  |    |		.CONST	0x08b2,0x0002
11ec 08b7 0003  |    |		.CONST	0x08b7,0x0003
11ee 08bf 0004  |    |		.CONST	0x08bf,0x0004
11f0 ; --------------------------------------------------------------------------------------
11f0 ; Debug3 Subtable 0x19
11f0 ; --------------------------------------------------------------------------------------
11f0 0004 000d  |    |		.DBG3TAB	0x0004,0x000d
11f2 08d3 ffff  |    |		.CONST	0x08d3,0xffff
11f4 08d5 fffe  |    |		.CONST	0x08d5,0xfffe
11f6 08d7 fffd  |    |		.CONST	0x08d7,0xfffd
11f8 08d9 fffc  |    |		.CONST	0x08d9,0xfffc
11fa 08db 0001  |    |		.CONST	0x08db,0x0001
11fc 08de 0002  |    |		.CONST	0x08de,0x0002
11fe 08e1 0003  |    |		.CONST	0x08e1,0x0003
1200 08e5 0005  |    |		.CONST	0x08e5,0x0005
1202 08ea 0006  |    |		.CONST	0x08ea,0x0006
1204 08f4 0007  |    |		.CONST	0x08f4,0x0007
1206 08f9 0008  |    |		.CONST	0x08f9,0x0008
1208 08fb 0009  |    |		.CONST	0x08fb,0x0009
120a 08fe 000a  |    |		.CONST	0x08fe,0x000a
120c 0902 000b  |    |		.CONST	0x0902,0x000b
120e 0904 000c  |    |		.CONST	0x0904,0x000c
1210 0909 0004  |    |		.CONST	0x0909,0x0004
1212 090c 000d  |    |		.CONST	0x090c,0x000d
1214 ; --------------------------------------------------------------------------------------
1214 ; Debug3 Subtable 0x1a
1214 ; --------------------------------------------------------------------------------------
1214 0006 0003  |    |		.DBG3TAB	0x0006,0x0003
1216 0913 ffff  |    |		.CONST	0x0913,0xffff
1218 0915 fffe  |    |		.CONST	0x0915,0xfffe
121a 0917 fffd  |    |		.CONST	0x0917,0xfffd
121c 0919 fffc  |    |		.CONST	0x0919,0xfffc
121e 091e fffb  |    |		.CONST	0x091e,0xfffb
1220 0923 fffa  | #  |		.CONST	0x0923,0xfffa
1222 0927 0001  | '  |		.CONST	0x0927,0x0001
1224 092c 0002  | ,  |		.CONST	0x092c,0x0002
1226 0938 0003  | 8  |		.CONST	0x0938,0x0003
1228 ; --------------------------------------------------------------------------------------
1228 ; Debug3 Subtable 0x1b
1228 ; --------------------------------------------------------------------------------------
1228 0001 0002  |    |		.DBG3TAB	0x0001,0x0002
122a 0943 ffff  | C  |		.CONST	0x0943,0xffff
122c 0947 0001  | G  |		.CONST	0x0947,0x0001
122e 094c 0002  | L  |		.CONST	0x094c,0x0002
1230 ; --------------------------------------------------------------------------------------
1230 ; Debug3 Subtable 0x1c
1230 ; --------------------------------------------------------------------------------------
1230 0002 0009  |    |		.DBG3TAB	0x0002,0x0009
1232 0953 ffff  | S  |		.CONST	0x0953,0xffff
1234 0959 fffe  | Y  |		.CONST	0x0959,0xfffe
1236 095e 0001  | ^  |		.CONST	0x095e,0x0001
1238 0962 0002  | b  |		.CONST	0x0962,0x0002
123a 0966 0003  | f  |		.CONST	0x0966,0x0003
123c 096e 0004  | n  |		.CONST	0x096e,0x0004
123e 0977 0005  | w  |		.CONST	0x0977,0x0005
1240 097f 0006  |    |		.CONST	0x097f,0x0006
1242 0986 0007  |    |		.CONST	0x0986,0x0007
1244 098d 0008  |    |		.CONST	0x098d,0x0008
1246 0994 0009  |    |		.CONST	0x0994,0x0009
1248 ; --------------------------------------------------------------------------------------
1248 ; Debug3 Subtable 0x1d
1248 ; --------------------------------------------------------------------------------------
1248 0001 0002  |    |		.DBG3TAB	0x0001,0x0002
124a 099b ffff  |    |		.CONST	0x099b,0xffff
124c 099f 0001  |    |		.CONST	0x099f,0x0001
124e 09a8 0002  |    |		.CONST	0x09a8,0x0002
1250 ; --------------------------------------------------------------------------------------
1250 ; Debug3 Subtable 0x1e
1250 ; --------------------------------------------------------------------------------------
1250 0001 0002  |    |		.DBG3TAB	0x0001,0x0002
1252 09b3 ffff  |    |		.CONST	0x09b3,0xffff
1254 09b5 0001  |    |		.CONST	0x09b5,0x0001
1256 09cc 0002  |    |		.CONST	0x09cc,0x0002
1258 ; --------------------------------------------------------------------------------------
1258 ; Debug3 Subtable 0x1f
1258 ; --------------------------------------------------------------------------------------
1258 0001 0032  |   2|		.DBG3TAB	0x0001,0x0032
125a 09e3 ffff  |    |		.CONST	0x09e3,0xffff
125c 09e6 0001  |    |		.CONST	0x09e6,0x0001
125e 09f2 0002  |    |		.CONST	0x09f2,0x0002
1260 09f6 0003  |    |		.CONST	0x09f6,0x0003
1262 09fa 0004  |    |		.CONST	0x09fa,0x0004
1264 0a04 0005  |    |		.CONST	0x0a04,0x0005
1266 0a0e 0006  |    |		.CONST	0x0a0e,0x0006
1268 0a19 0007  |    |		.CONST	0x0a19,0x0007
126a 0a1e 0008  |    |		.CONST	0x0a1e,0x0008
126c 0a28 0009  | (  |		.CONST	0x0a28,0x0009
126e 0a2f 000a  | /  |		.CONST	0x0a2f,0x000a
1270 0a36 000b  | 6  |		.CONST	0x0a36,0x000b
1272 0a3d 000c  | =  |		.CONST	0x0a3d,0x000c
1274 0a41 000d  | A  |		.CONST	0x0a41,0x000d
1276 0a45 000e  | E  |		.CONST	0x0a45,0x000e
1278 0a4b 000f  | K  |		.CONST	0x0a4b,0x000f
127a 0a50 0010  | P  |		.CONST	0x0a50,0x0010
127c 0a56 0011  | V  |		.CONST	0x0a56,0x0011
127e 0a59 0012  | Y  |		.CONST	0x0a59,0x0012
1280 0a5f 0013  | _  |		.CONST	0x0a5f,0x0013
1282 0a69 0014  | i  |		.CONST	0x0a69,0x0014
1284 0a6c 0015  | l  |		.CONST	0x0a6c,0x0015
1286 0a74 0016  | t  |		.CONST	0x0a74,0x0016
1288 0a76 0017  | v  |		.CONST	0x0a76,0x0017
128a 0a8b 0018  |    |		.CONST	0x0a8b,0x0018
128c 0a90 0019  |    |		.CONST	0x0a90,0x0019
128e 0a99 001a  |    |		.CONST	0x0a99,0x001a
1290 0aa0 001b  |    |		.CONST	0x0aa0,0x001b
1292 0aa4 001c  |    |		.CONST	0x0aa4,0x001c
1294 0aac 001d  |    |		.CONST	0x0aac,0x001d
1296 0ab0 001e  |    |		.CONST	0x0ab0,0x001e
1298 0ab5 001f  |    |		.CONST	0x0ab5,0x001f
129a 0aba 0020  |    |		.CONST	0x0aba,0x0020
129c 0abe 0021  |   !|		.CONST	0x0abe,0x0021
129e 0ac2 0022  |   "|		.CONST	0x0ac2,0x0022
12a0 0ac7 0023  |   #|		.CONST	0x0ac7,0x0023
12a2 0acb 0024  |   $|		.CONST	0x0acb,0x0024
12a4 0ad1 0025  |   %|		.CONST	0x0ad1,0x0025
12a6 0ad6 0026  |   &|		.CONST	0x0ad6,0x0026
12a8 0ada 0027  |   '|		.CONST	0x0ada,0x0027
12aa 0ade 0028  |   (|		.CONST	0x0ade,0x0028
12ac 0ae2 0029  |   )|		.CONST	0x0ae2,0x0029
12ae 0ae8 002a  |   *|		.CONST	0x0ae8,0x002a
12b0 0aec 002b  |   +|		.CONST	0x0aec,0x002b
12b2 0af2 002c  |   ,|		.CONST	0x0af2,0x002c
12b4 0af5 002d  |   -|		.CONST	0x0af5,0x002d
12b6 0afd 002e  |   .|		.CONST	0x0afd,0x002e
12b8 0aff 002f  |   /|		.CONST	0x0aff,0x002f
12ba 0b14 0030  |   0|		.CONST	0x0b14,0x0030
12bc 0b19 0031  |   1|		.CONST	0x0b19,0x0031
12be 0b22 0032  | " 2|		.CONST	0x0b22,0x0032
12c0 ; --------------------------------------------------------------------------------------
12c0 ; Debug3 Subtable 0x20
12c0 ; --------------------------------------------------------------------------------------
12c0 0001 0002  |    |		.DBG3TAB	0x0001,0x0002
12c2 0b33 ffff  | 3  |		.CONST	0x0b33,0xffff
12c4 0b38 0001  | 8  |		.CONST	0x0b38,0x0001
12c6 0b44 0002  | D  |		.CONST	0x0b44,0x0002
12c8 ; --------------------------------------------------------------------------------------
12c8 ; Debug3 Subtable 0x21
12c8 ; --------------------------------------------------------------------------------------
12c8 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
12ca 0b4b 0001  | K  |		.CONST	0x0b4b,0x0001
12cc 0b68 0002  | h  |		.CONST	0x0b68,0x0002
12ce ; --------------------------------------------------------------------------------------
12ce ; Debug3 Subtable 0x22
12ce ; --------------------------------------------------------------------------------------
12ce 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
12d0 0b73 0001  | s  |		.CONST	0x0b73,0x0001
12d2 0b91 0002  |    |		.CONST	0x0b91,0x0002
12d4 ; --------------------------------------------------------------------------------------
12d4 ; Debug3 Subtable 0x23
12d4 ; --------------------------------------------------------------------------------------
12d4 0001 0000  |    |		.DBG3TAB	0x0001,0x0000
12d6 0b9b ffff  |    |		.CONST	0x0b9b,0xffff
12d8 ; --------------------------------------------------------------------------------------
12d8 ; Debug3 Subtable 0x24
12d8 ; --------------------------------------------------------------------------------------
12d8 0008 0001  |    |		.DBG3TAB	0x0008,0x0001
12da 0b9e ffff  |    |		.CONST	0x0b9e,0xffff
12dc 0ba6 fffe  |    |		.CONST	0x0ba6,0xfffe
12de 0ba8 fffd  |    |		.CONST	0x0ba8,0xfffd
12e0 0baa fffc  |    |		.CONST	0x0baa,0xfffc
12e2 0bac fffb  |    |		.CONST	0x0bac,0xfffb
12e4 0bae fffa  |    |		.CONST	0x0bae,0xfffa
12e6 0bb0 fff9  |    |		.CONST	0x0bb0,0xfff9
12e8 0bb9 fff8  |    |		.CONST	0x0bb9,0xfff8
12ea 0bbb 0001  |    |		.CONST	0x0bbb,0x0001
12ec ; --------------------------------------------------------------------------------------
12ec ; Debug3 Subtable 0x25
12ec ; --------------------------------------------------------------------------------------
12ec 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
12ee 0bcb 0001  |    |		.CONST	0x0bcb,0x0001
12f0 ; --------------------------------------------------------------------------------------
12f0 ; Debug3 Subtable 0x26
12f0 ; --------------------------------------------------------------------------------------
12f0 0000 0006  |    |		.DBG3TAB	0x0000,0x0006
12f2 0bdb 0001  |    |		.CONST	0x0bdb,0x0001
12f4 0be0 0002  |    |		.CONST	0x0be0,0x0002
12f6 0be5 0003  |    |		.CONST	0x0be5,0x0003
12f8 0be7 0004  |    |		.CONST	0x0be7,0x0004
12fa 0beb 0005  |    |		.CONST	0x0beb,0x0005
12fc 0bf1 0006  |    |		.CONST	0x0bf1,0x0006
12fe ; --------------------------------------------------------------------------------------
12fe ; Debug3 Subtable 0x27
12fe ; --------------------------------------------------------------------------------------
12fe 0001 0005  |    |		.DBG3TAB	0x0001,0x0005
1300 0bfb ffff  |    |		.CONST	0x0bfb,0xffff
1302 0bfd 0001  |    |		.CONST	0x0bfd,0x0001
1304 0c01 0003  |    |		.CONST	0x0c01,0x0003
1306 0c05 0004  |    |		.CONST	0x0c05,0x0004
1308 0c09 0005  |    |		.CONST	0x0c09,0x0005
130a 0c0e 0002  |    |		.CONST	0x0c0e,0x0002
130c ; --------------------------------------------------------------------------------------
130c ; Debug3 Subtable 0x28
130c ; --------------------------------------------------------------------------------------
130c 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
130e 0c1b ffff  |    |		.CONST	0x0c1b,0xffff
1310 0c1d 0001  |    |		.CONST	0x0c1d,0x0001
1312 0c21 0002  | !  |		.CONST	0x0c21,0x0002
1314 0c23 0003  | #  |		.CONST	0x0c23,0x0003
1316 0c35 0004  | 5  |		.CONST	0x0c35,0x0004
1318 0000 0000  |    |		.BLANK	0000[0xe8]