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

⟦2ce6af2c4⟧

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

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5813       |X   |		.CONST	0x5813								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 1270       | p  |		.CONST	0x1270								; 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 000d       |    |		.CONST	0x000d								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 009d       |    |		.CONST	0x009d								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 003b       | ;  |		.CONST	0x003b								; Number of locals
000b			INIT_0008:
000b 029a 00a3  |    |		Declare_Subprogram	INIT_00a0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0 = .DEBUG	0x000b,0x13fa,0x0000,0x0000,0x0057,0x9795,0x0000,0x11ad
													; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 019b  |    |		Declare_Subprogram	INIT_0198,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 029a 01fb  |    |		Declare_Subprogram	INIT_01f8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 029a 022b  |   +|		Declare_Subprogram	INIT_0228,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0x11,0xfffc
0013 029a 024b  |   K|		Declare_Subprogram	INIT_0248,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x13,0xfffb
0015 029a 0303  |    |		Declare_Subprogram	INIT_0300,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x15,0xfffa
0017 029a 0393  |    |		Declare_Subprogram	INIT_0390,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x17,0xfff9
0019 029a 03d3  |    |		Declare_Subprogram	INIT_03d0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x19,0xfff8
001b 029a 042b  |   +|		Declare_Subprogram	INIT_0428,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x1b,0xfff7
001d 029a 047b  |   {|		Declare_Subprogram	INIT_0478,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x1d,0xfff6
001f 029a 051b  |    |		Declare_Subprogram	INIT_0518,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x1f,0xfff5
0021 029a 0563  |   c|		Declare_Subprogram	INIT_0560,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x21,0xfff4
0023 029a 0583  |    |		Declare_Subprogram	INIT_0580,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xc = 0x23,0xfff3
0025 029a 05ab  |    |		Declare_Subprogram	INIT_05a8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xd = 0x25,0xfff2
0027 029a 05eb  |    |		Declare_Subprogram	INIT_05e8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xe = 0x27,0xfff1
0029 029a 06a3  |    |		Declare_Subprogram	INIT_06a0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xf = 0x29,0xfff0
002b 029a 073b  |   ;|		Declare_Subprogram	INIT_0738,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x10 = 0x2b,0xffef
002d 029a 077b  |   {|		Declare_Subprogram	INIT_0778,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x11 = 0x2d,0xffee
002f 029a 07b3  |    |		Declare_Subprogram	INIT_07b0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x12 = 0x2f,0xffed
0031 00bf       |    |		Action	Accept_Activation
0032 0007       |    |		Action	Break_Optional							; Debug Table 0x1 = .DEBUG	0x0032,0x1422,0x0000,0x0000,0x0057,0x98e5,0x0000,0x001e
													; Debug Table 0x1.0x0 = 0x32,0xffff
0033 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x1 = 0x33,0xfffe
0034 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x2 = 0x34,0xfffd
0035 4803       |H   |		Short_Literal	0x3							; Debug Table 0x1.0x3 = 0x35,0xfffc
0036 032a       | *  |		Declare_Type	Record,Incomplete
0037 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x4 = 0x37,0xfffb
0038 02a0       |    |		Declare_Subprogram	Null_Subprogram
0039 03ad       |    |		Declare_Type	Heap_Access,Defined
003a 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x5 = 0x3a,0xfffa
003b e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x6 = 0x3b,0xfff9
003c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
003d 00f1       |    |		Load_Encached	Diana_Temp_Seq
003e 00da       |    |		Load_Top	At_Offset_2
003f 029f 085b  |   [|		Declare_Subprogram	INIT_0858,For_Call
0041 e220       |    |		Load	0x1,0x20
0042 0326       | &  |		Complete_Type	Record,By_Defining
0043 0092 10b0  |    |		Action	Push_String_Extended,0x10b0					; "------------------------------------------------------------------------------"
													; Debug Table 0x1.0x7 = 0x43,0xfff8
0045 029d 0873  |   s|		Declare_Subprogram	INIT_0870,For_Outer_Call			; Debug Table 0x1.0x8 = 0x45,0xfff7
0047 029d 089b  |    |		Declare_Subprogram	INIT_0898,For_Outer_Call			; Debug Table 0x1.0x9 = 0x47,0xfff6
0049 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0xa = 0x49,0xfff5
004a 00c7       |    |		Action	Elaborate_Subprogram
004b 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a				; Debug Table 0x1.0xb = 0x4b,0xfff4
004c 00c7       |    |		Action	Elaborate_Subprogram
004d 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x1.0xc = 0x4d,0xfff3
004e 00c7       |    |		Action	Elaborate_Subprogram
004f 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19				; Debug Table 0x1.0xd = 0x4f,0xfff2
0050 00c7       |    |		Action	Elaborate_Subprogram
0051 029d 08d3  |    |		Declare_Subprogram	INIT_08d0,For_Outer_Call			; Debug Table 0x1.0xe = 0x51,0xfff1
0053 029d 08e3  |    |		Declare_Subprogram	INIT_08e0,For_Outer_Call			; Debug Table 0x1.0xf = 0x53,0xfff0
0055 029d 0963  |   c|		Declare_Subprogram	INIT_0960,For_Outer_Call			; Debug Table 0x1.0x10 = 0x55,0xffef
0057 029d 09eb  |    |		Declare_Subprogram	INIT_09e8,For_Outer_Call			; Debug Table 0x1.0x11 = 0x57,0xffee
0059 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x12 = 0x59,0xffed
005a 00c7       |    |		Action	Elaborate_Subprogram
005b 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x13 = 0x5b,0xffec
005c 00c7       |    |		Action	Elaborate_Subprogram
005d 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0x14 = 0x5d,0xffeb
005e 00c7       |    |		Action	Elaborate_Subprogram
005f 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0x15 = 0x5f,0xffea
0060 00c7       |    |		Action	Elaborate_Subprogram
0061 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0x16 = 0x61,0xffe9
0062 00c7       |    |		Action	Elaborate_Subprogram
0063 029d 0a7b  |   {|		Declare_Subprogram	INIT_0a78,For_Outer_Call			; Debug Table 0x1.0x17 = 0x63,0xffe8
0065 029d 0ab3  |    |		Declare_Subprogram	INIT_0ab0,For_Outer_Call			; Debug Table 0x1.0x18 = 0x65,0xffe7
0067 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x19 = 0x67,0xffe6
0068 00c7       |    |		Action	Elaborate_Subprogram
0069 029d 0af3  |    |		Declare_Subprogram	INIT_0af0,For_Outer_Call			; Debug Table 0x1.0x1a = 0x69,0xffe5
006b 029d 0b33  |   3|		Declare_Subprogram	INIT_0b30,For_Outer_Call			; Debug Table 0x1.0x1b = 0x6b,0xffe4
006d 029d 0b7b  |   {|		Declare_Subprogram	INIT_0b78,For_Outer_Call			; Debug Table 0x1.0x1c = 0x6d,0xffe3
006f 029d 0b9b  |    |		Declare_Subprogram	INIT_0b98,For_Outer_Call			; Debug Table 0x1.0x1d = 0x6f,0xffe2
0071 029d 0bcb  |    |		Declare_Subprogram	INIT_0bc8,For_Outer_Call			; Debug Table 0x1.0x1e = 0x71,0xffe1
0073 029d 0c0b  |    |		Declare_Subprogram	INIT_0c08,For_Outer_Call			; Debug Table 0x1.0x1f = 0x73,0xffe0
0075 029d 0c43  |   C|		Declare_Subprogram	INIT_0c40,For_Outer_Call			; Debug Table 0x1.0x20 = 0x75,0xffdf
0077 029d 0cb3  |    |		Declare_Subprogram	INIT_0cb0,For_Outer_Call			; Debug Table 0x1.0x21 = 0x77,0xffde
0079 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x22 = 0x79,0xffdd
007a 00c7       |    |		Action	Elaborate_Subprogram
007b 029d 0d7b  |   {|		Declare_Subprogram	INIT_0d78,For_Outer_Call			; Debug Table 0x1.0x23 = 0x7b,0xffdc
007d 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x24 = 0x7d,0xffdb
007e 00c7       |    |		Action	Elaborate_Subprogram
007f 029d 0de3  |    |		Declare_Subprogram	INIT_0de0,For_Outer_Call			; Debug Table 0x1.0x25 = 0x7f,0xffda
0081 029d 0dfb  |    |		Declare_Subprogram	INIT_0df8,For_Outer_Call			; Debug Table 0x1.0x26 = 0x81,0xffd9
0083 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x27 = 0x83,0xffd8
0084 00c7       |    |		Action	Elaborate_Subprogram
0085 029d 0e2b  |   +|		Declare_Subprogram	INIT_0e28,For_Outer_Call			; Debug Table 0x1.0x28 = 0x85,0xffd7
0087 029d 0e8b  |    |		Declare_Subprogram	INIT_0e88,For_Outer_Call			; Debug Table 0x1.0x29 = 0x87,0xffd6
0089 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b				; Debug Table 0x1.0x2a = 0x89,0xffd5
008a 00c7       |    |		Action	Elaborate_Subprogram
008b 029d 0eab  |    |		Declare_Subprogram	INIT_0ea8,For_Outer_Call			; Debug Table 0x1.0x2b = 0x8b,0xffd4
008d 029d 0f03  |    |		Declare_Subprogram	INIT_0f00,For_Outer_Call			; Debug Table 0x1.0x2c = 0x8d,0xffd3
008f 029d 0feb  |    |		Declare_Subprogram	INIT_0fe8,For_Outer_Call			; Debug Table 0x1.0x2d = 0x8f,0xffd2
0091 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1.0x2e = 0x91,0xffd1
0092 00c7       |    |		Action	Elaborate_Subprogram
0093 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e				; Debug Table 0x1.0x2f = 0x93,0xffd0
0094 00c7       |    |		Action	Elaborate_Subprogram
0095 029d 1023  |   #|		Declare_Subprogram	INIT_1020,For_Outer_Call			; Debug Table 0x1.0x30 = 0x95,0xffcf
0097 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d				; Debug Table 0x1.0x31 = 0x97,0xffce
0098 00c7       |    |		Action	Elaborate_Subprogram
0099 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c				; Debug Table 0x1.0x32 = 0x99,0xffcd
009a 00c7       |    |		Action	Elaborate_Subprogram
009b 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f				; Debug Table 0x1.0x33 = 0x9b,0xffcc
009c 00c7       |    |		Action	Elaborate_Subprogram
009d			BODY_0008:
009d 00bc       |    |		Action	Signal_Activated
009e 00bb       |    |		Action	Signal_Completion
009f 0000       |    |		.XXX[0x1]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00ba       |    |		.CONST	0x00ba								; Address of begin
00a1 017a       | z  |		.CONST	0x017a								; Address of exception handler
00a2 0007       |    |		.CONST	0x0007								; Number of locals
00a3			INIT_00a0:
00a3 e002       |    |		Load	0x0,0x2								; Debug Table 0x2 = .DEBUG	0x00a3,0x148c,0x0001,0x0000,0x0057,0x9795,0x0000,0x11ae
													; Debug Table 0x2.0x0 = 0xa3,0xffff
00a4 0007       |    |		Action	Break_Optional
00a5 e001       |    |		Load	0x0,0x1								; Debug Table 0x2.0x1 = 0xa5,0xfffe
00a6 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00a7 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
00a8 02c7       |    |		Declare_Variable	Any
00a9 00d8       |    |		Load_Top	At_Offset_0
00aa 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00ab 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x2.0x2 = 0xab,0xfffd
00ac e003       |    |		Load	0x0,0x3								; Debug Table 0x2.0x3 = 0xac,0xfffc
00ad 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00ae 02c7       |    |		Declare_Variable	Any
00af 00d8       |    |		Load_Top	At_Offset_0
00b0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00b1 e004       |    |		Load	0x0,0x4								; Debug Table 0x2.0x4 = 0xb1,0xfffb
00b2 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00b3 02c7       |    |		Declare_Variable	Any
00b4 00d8       |    |		Load_Top	At_Offset_0
00b5 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00b6 e005       |    |		Load	0x0,0x5								; Debug Table 0x2.0x5 = 0xb6,0xfffa
00b7 0322       | "  |		Declare_Variable	Record
00b8 00d8       |    |		Load_Top	At_Offset_0
00b9 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00ba			BODY_00a0:
00ba e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2.0x6 = 0xba,0x1
00bb 01db       |    |		Execute	Vector,Length
00bc 7005       |p   |		Jump_Nonzero	0xc2
00bd 0092 10b1  |    |		Action	Push_String_Extended,0x10b1					; "no pattern given"
													; Debug Table 0x2.0x7 = 0xbd,0x2
00bf e006       |    |		Load	0x0,0x6
00c0 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
00c1 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7					; Debug Table 0x2.0x8 = 0xc1,0x3
00c2 e403       |    |		Load	0x2,0x3								; Debug Table 0x2.0x9 = 0xc2,0x4
00c3 0120       |    |		Execute	Any,Is_Value
00c4 6804       |h   |		Jump_Zero	0xc9
00c5 e001       |    |		Load	0x0,0x1
00c6 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00c7 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
00c8 7801       |x   |		Jump	0xca
00c9 e403       |    |		Load	0x2,0x3
00ca e5fe       |    |		Load	0x2,-0x2
00cb 0092 10b2  |    |		Action	Push_String_Extended,0x10b2					; "'c(ada)"
00cd 01cc       |    |		Execute	Vector,Catenate
00ce 8229       | )  |		Call	0x1,0x29
00cf c403       |    |		Store	0x2,0x3
00d0 0007       |    |		Action	Break_Optional							; Debug Table 0x2.0xa = 0xd0,0x5
00d1 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2.0xb = 0xd1,0xfbff
00d2 8238       | 8  |		Call	0x1,0x38
00d3 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x2.0xc = 0xd3,0x401
00d4 6826       |h&  |		Jump_Zero	0xfb
00d5 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x2.0xd = 0xd5,0x402
00d6 680e       |h   |		Jump_Zero	0xe5
00d7 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2.0xe = 0xd7,0x403
00d8 e405       |    |		Load	0x2,0x5
00d9 e007       |    |		Load	0x0,0x7
00da 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
00db e008       |    |		Load	0x0,0x8
00dc 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
00dd 00db       |    |		Load_Top	At_Offset_3
00de e009       |    |		Load	0x0,0x9
00df 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
00e0 e003       |    |		Load	0x0,0x3
00e1 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
00e2 c405       |    |		Store	0x2,0x5
00e3 c406       |    |		Store	0x2,0x6
00e4 780b       |x   |		Jump	0xf0
00e5 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2.0xf = 0xe5,0x404
00e6 e405       |    |		Load	0x2,0x5
00e7 e007       |    |		Load	0x0,0x7
00e8 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
00e9 e008       |    |		Load	0x0,0x8
00ea 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
00eb 00db       |    |		Load_Top	At_Offset_3
00ec e003       |    |		Load	0x0,0x3
00ed 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
00ee c405       |    |		Store	0x2,0x5
00ef c406       |    |		Store	0x2,0x6
00f0 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2.0x10 = 0xf0,0x405
00f1 00db       |    |		Load_Top	At_Offset_3
00f2 e004       |    |		Load	0x0,0x4
00f3 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00f4 6806       |h   |		Jump_Zero	0xfb
00f5 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2.0x11 = 0xf5,0x406
00f6 e004       |    |		Load	0x0,0x4
00f7 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
00f8 e006       |    |		Load	0x0,0x6
00f9 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
00fa 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7					; Debug Table 0x2.0x12 = 0xfa,0x407
00fb 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2.0x13 = 0xfb,0x408
00fc 00da       |    |		Load_Top	At_Offset_2
00fd 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00fe 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2.0x14 = 0xfe,0x409
00ff 4809       |H   |		Short_Literal	0x9
0100 e5fa       |    |		Load	0x2,-0x6
0101 e00a       |    |		Load	0x0,0xa
0102 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0103 00d1       |    |		Pop_Control	Pop_Count_1
0104 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2.0x15 = 0x104,0x40a
0105 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0106 700f       |p   |		Jump_Nonzero	0x116
0107 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x2.0x16 = 0x107,0x40b
0108 e403       |    |		Load	0x2,0x3
0109 e007       |    |		Load	0x0,0x7
010a 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
010b e008       |    |		Load	0x0,0x8
010c 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
010d e402       |    |		Load	0x2,0x2
010e e5fc       |    |		Load	0x2,-0x4
010f e5fd       |    |		Load	0x2,-0x3
0110 e405       |    |		Load	0x2,0x5
0111 e408       |    |		Load	0x2,0x8
0112 823a       | :  |		Call	0x1,0x3a
0113 c403       |    |		Store	0x2,0x3
0114 c404       |    |		Store	0x2,0x4
0115 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
0116 e002       |    |		Load	0x0,0x2								; Debug Table 0x2.0x17 = 0x116,0x40c
0117 e001       |    |		Load	0x0,0x1
0118 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0119 00db       |    |		Load_Top	At_Offset_3
011a 4809       |H   |		Short_Literal	0x9
011b e00b       |    |		Load	0x0,0xb
011c 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
011d c402       |    |		Store	0x2,0x2
011e e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x2.0x18 = 0x11e,0x40d
011f e00c       |    |		Load	0x0,0xc
0120 01d7       |    |		Execute	Vector,Field_Read
0121 e402       |    |		Load	0x2,0x2
0122 0217       |    |		Execute	Heap_Access,All_Reference
0123 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
0124 0092 10b3  |    |		Action	Push_String_Extended,0x10b3					; "find of \x22"
													; Debug Table 0x2.0x19 = 0x124,0x40e
0126 00d9       |    |		Load_Top	At_Offset_1
0127 01cc       |    |		Execute	Vector,Catenate
0128 0092 10b4  |    |		Action	Push_String_Extended,0x10b4					; "\x22"
012a 01cc       |    |		Execute	Vector,Catenate
012b 00ea       |    |		Load_Encached	Null_String_Cache
012c e402       |    |		Load	0x2,0x2
012d 8224       | $  |		Call	0x1,0x24
012e 4802       |H   |		Short_Literal	0x2							; Debug Table 0x2.0x1a = 0x12e,0x40f
012f e402       |    |		Load	0x2,0x2
0130 0217       |    |		Execute	Heap_Access,All_Reference
0131 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0132 e402       |    |		Load	0x2,0x2								; Debug Table 0x2.0x1b = 0x132,0x410
0133 0217       |    |		Execute	Heap_Access,All_Reference
0134 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0135 0007       |    |		Action	Break_Optional
0136 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x2.0x1c = 0x136,0x801
0137 0007       |    |		Action	Break_Optional							; Debug Table 0x2.0x1d = 0x137,0x410
0138 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x2.0x1e = 0x138,0xc01
0139 e00d       |    |		Load	0x0,0xd								; Debug Table 0x2.0x1f = 0x139,0x801
013a 185c       | \  |		Execute	Package,Field_Execute,Field_Number 0x5c
013b e402       |    |		Load	0x2,0x2
013c 0217       |    |		Execute	Heap_Access,All_Reference
013d 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
013e 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x2.0x20 = 0x13e,0x411
013f e403       |    |		Load	0x2,0x3
0140 e402       |    |		Load	0x2,0x2
0141 0217       |    |		Execute	Heap_Access,All_Reference
0142 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0143 e402       |    |		Load	0x2,0x2
0144 e5fc       |    |		Load	0x2,-0x4
0145 e5fd       |    |		Load	0x2,-0x3
0146 e405       |    |		Load	0x2,0x5
0147 e408       |    |		Load	0x2,0x8
0148 823a       | :  |		Call	0x1,0x3a
0149 c403       |    |		Store	0x2,0x3
014a c404       |    |		Store	0x2,0x4
014b e402       |    |		Load	0x2,0x2								; Debug Table 0x2.0x21 = 0x14b,0x412
014c 0217       |    |		Execute	Heap_Access,All_Reference
014d 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
014e e00d       |    |		Load	0x0,0xd
014f 1843       | C  |		Execute	Package,Field_Execute,Field_Number 0x43
0150 e00d       |    |		Load	0x0,0xd
0151 1842       | B  |		Execute	Package,Field_Execute,Field_Number 0x42
0152 6815       |h   |		Jump_Zero	0x168
0153 0092 10b5  |    |		Action	Push_String_Extended,0x10b5					; "no matches found in "
													; Debug Table 0x2.0x22 = 0x153,0x413
0155 4820       |H   |		Short_Literal	0x20
0156 4800       |H   |		Short_Literal	0x0
0157 480a       |H   |		Short_Literal	0xa
0158 e404       |    |		Load	0x2,0x4
0159 e009       |    |		Load	0x0,0x9
015a 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
015b 01cc       |    |		Execute	Vector,Catenate
015c 0092 10b6  |    |		Action	Push_String_Extended,0x10b6					; " files"
015e 01cc       |    |		Execute	Vector,Catenate
015f e006       |    |		Load	0x0,0x6
0160 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0161 e402       |    |		Load	0x2,0x2								; Debug Table 0x2.0x23 = 0x161,0x414
0162 e00b       |    |		Load	0x0,0xb
0163 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0164 e402       |    |		Load	0x2,0x2								; Debug Table 0x2.0x24 = 0x164,0x415
0165 e00b       |    |		Load	0x0,0xb
0166 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0167 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
0168 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2.0x25 = 0x168,0x416
0169 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
016a e402       |    |		Load	0x2,0x2
016b e00e       |    |		Load	0x0,0xe
016c 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
016d e402       |    |		Load	0x2,0x2								; Debug Table 0x2.0x26 = 0x16d,0x417
016e e00b       |    |		Load	0x0,0xb
016f 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0170 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2.0x27 = 0x170,0x418
0171 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
0172 6806       |h   |		Jump_Zero	0x179
0173 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2.0x28 = 0x173,0x419
0174 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
0175 0217       |    |		Execute	Heap_Access,All_Reference
0176 e402       |    |		Load	0x2,0x2
0177 e00a       |    |		Load	0x0,0xa
0178 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0179 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
017a			TRAP_00a0:
017a 62a5       |b   |		Indirect_Literal	Discrete,0x420,{0x00000000, 0x57979502}
017b 010f       |    |		Execute	Exception,Equal
017c 6807       |h   |		Jump_Zero	0x184
017d e402       |    |		Load	0x2,0x2								; Debug Table 0x2.0x29 = 0x17d,0x6
017e e00b       |    |		Load	0x0,0xb
017f 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0180 e402       |    |		Load	0x2,0x2								; Debug Table 0x2.0x2a = 0x180,0x7
0181 e00b       |    |		Load	0x0,0xb
0182 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0183 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
0184 0092 10b7  |    |		Action	Push_String_Extended,0x10b7					; "unexpected exception "
													; Debug Table 0x2.0x2b = 0x184,0x8
0186 e00f       |    |		Load	0x0,0xf
0187 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0188 01cc       |    |		Execute	Vector,Catenate
0189 e006       |    |		Load	0x0,0x6
018a 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
018b e402       |    |		Load	0x2,0x2								; Debug Table 0x2.0x2c = 0x18b,0x9
018c e00b       |    |		Load	0x0,0xb
018d 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
018e e402       |    |		Load	0x2,0x2								; Debug Table 0x2.0x2d = 0x18e,0xa
018f e00b       |    |		Load	0x0,0xb
0190 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0191 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
0192 0000 0000  |    |		.BLANK	0000[0x6]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 01a2       |    |		.CONST	0x01a2								; Address of begin
0199 01eb       |    |		.CONST	0x01eb								; Address of exception handler
019a 0004       |    |		.CONST	0x0004								; Number of locals
019b			INIT_0198:
019b 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x3 = .DEBUG	0x019b,0x14ea,0x0001,0x0000,0x0057,0x9795,0x0000,0x11ca
													; Debug Table 0x3.0x0 = 0x19b,0xffff
019c e002       |    |		Load	0x0,0x2								; Debug Table 0x3.0x1 = 0x19c,0xfffe
019d 0007       |    |		Action	Break_Optional
019e e005       |    |		Load	0x0,0x5								; Debug Table 0x3.0x2 = 0x19e,0xfffd
019f 0322       | "  |		Declare_Variable	Record
01a0 00d8       |    |		Load_Top	At_Offset_0
01a1 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01a2			BODY_0198:
01a2 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x3.0x3 = 0x1a2,0x1
01a3 e5ff       |    |		Load	0x2,-0x1
01a4 822a       | *  |		Call	0x1,0x2a
01a5 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
01a6 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x4 = 0x1a6,0x2
01a7 4805       |H   |		Short_Literal	0x5
01a8 e5fc       |    |		Load	0x2,-0x4
01a9 e00a       |    |		Load	0x0,0xa
01aa 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
01ab 00d1       |    |		Pop_Control	Pop_Count_1
01ac e002       |    |		Load	0x0,0x2								; Debug Table 0x3.0x5 = 0x1ac,0x3
01ad e001       |    |		Load	0x0,0x1
01ae 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
01af 00da       |    |		Load_Top	At_Offset_2
01b0 4805       |H   |		Short_Literal	0x5
01b1 e00b       |    |		Load	0x0,0xb
01b2 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
01b3 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
01b4 4802       |H   |		Short_Literal	0x2							; Debug Table 0x3.0x6 = 0x1b4,0x4
01b5 00da       |    |		Load_Top	At_Offset_2
01b6 0217       |    |		Execute	Heap_Access,All_Reference
01b7 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
01b8 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x3.0x7 = 0x1b8,0x5
01b9 01db       |    |		Execute	Vector,Length
01ba 700b       |p   |		Jump_Nonzero	0x1c6
01bb 0092 10b8  |    |		Action	Push_String_Extended,0x10b8					; "menu of \x22"
													; Debug Table 0x3.0x8 = 0x1bb,0x6
01bd e5ff       |    |		Load	0x2,-0x1
01be 01cc       |    |		Execute	Vector,Catenate
01bf 0092 10b4  |    |		Action	Push_String_Extended,0x10b4					; "\x22"
01c1 01cc       |    |		Execute	Vector,Catenate
01c2 e5fe       |    |		Load	0x2,-0x2
01c3 00db       |    |		Load_Top	At_Offset_3
01c4 8224       | $  |		Call	0x1,0x24
01c5 7804       |x   |		Jump	0x1ca
01c6 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x3.0x9 = 0x1c6,0x7
01c7 e5fe       |    |		Load	0x2,-0x2
01c8 00db       |    |		Load_Top	At_Offset_3
01c9 8224       | $  |		Call	0x1,0x24
01ca 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3.0xa = 0x1ca,0x8
01cb 00da       |    |		Load_Top	At_Offset_2
01cc 0217       |    |		Execute	Heap_Access,All_Reference
01cd 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
01ce 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0xb = 0x1ce,0x9
01cf 0217       |    |		Execute	Heap_Access,All_Reference
01d0 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
01d1 00db       |    |		Load_Top	At_Offset_3
01d2 0007       |    |		Action	Break_Optional
01d3 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x3.0xc = 0x1d3,0x401
01d4 e00d       |    |		Load	0x0,0xd								; Debug Table 0x3.0xd = 0x1d4,0x9
01d5 185c       | \  |		Execute	Package,Field_Execute,Field_Number 0x5c
01d6 00da       |    |		Load_Top	At_Offset_2
01d7 0217       |    |		Execute	Heap_Access,All_Reference
01d8 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
01d9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0xe = 0x1d9,0xa
01da 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
01db 00da       |    |		Load_Top	At_Offset_2
01dc e00e       |    |		Load	0x0,0xe
01dd 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
01de 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0xf = 0x1de,0xb
01df e00b       |    |		Load	0x0,0xb
01e0 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
01e1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x10 = 0x1e1,0xc
01e2 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
01e3 6806       |h   |		Jump_Zero	0x1ea
01e4 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x11 = 0x1e4,0xd
01e5 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
01e6 0217       |    |		Execute	Heap_Access,All_Reference
01e7 00da       |    |		Load_Top	At_Offset_2
01e8 e00a       |    |		Load	0x0,0xa
01e9 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01ea 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
01eb			TRAP_0198:
01eb 6234       |b4  |		Indirect_Literal	Discrete,0x420,{0x00000000, 0x57979502}
01ec 010f       |    |		Execute	Exception,Equal
01ed 6801       |h   |		Jump_Zero	0x1ef
01ee 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5					; Debug Table 0x3.0x12 = 0x1ee,0xe
01ef 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x13 = 0x1ef,0xf
01f0 e00b       |    |		Load	0x0,0xb
01f1 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
01f2 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x14 = 0x1f2,0x10
01f3 e00b       |    |		Load	0x0,0xb
01f4 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
01f5 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
01f6 0000 0000  |    |		.XXX[0x2]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01ff       |    |		.CONST	0x01ff								; Address of begin
01f9 021e       |    |		.CONST	0x021e								; Address of exception handler
01fa 0002       |    |		.CONST	0x0002								; Number of locals
01fb			INIT_01f8:
01fb e005       |    |		Load	0x0,0x5								; Debug Table 0x4 = .DEBUG	0x01fb,0x1516,0x0001,0x0000,0x0057,0x9795,0x0000,0x11de
													; Debug Table 0x4.0x0 = 0x1fb,0xffff
01fc 0322       | "  |		Declare_Variable	Record
01fd 00d8       |    |		Load_Top	At_Offset_0
01fe 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01ff			BODY_01f8:
01ff 4801       |H   |		Short_Literal	0x1							; Debug Table 0x4.0x1 = 0x1ff,0x1
0200 00d9       |    |		Load_Top	At_Offset_1
0201 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0202 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x2 = 0x202,0x2
0203 480a       |H   |		Short_Literal	0xa
0204 e5fc       |    |		Load	0x2,-0x4
0205 e00a       |    |		Load	0x0,0xa
0206 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0207 00d1       |    |		Pop_Control	Pop_Count_1
0208 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x3 = 0x208,0x3
0209 3c10       |<   |		Execute	Record,Field_Read,Field_Number 0x10
020a 6804       |h   |		Jump_Zero	0x20f
020b e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x4.0x4 = 0x20b,0x4
020c e5ff       |    |		Load	0x2,-0x1
020d 8227       | '  |		Call	0x1,0x27
020e 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
020f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x5 = 0x20f,0x5
0210 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0211 7006       |p   |		Jump_Nonzero	0x218
0212 e010       |    |		Load	0x0,0x10							; Debug Table 0x4.0x6 = 0x212,0x6
0213 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0214 e5fe       |    |		Load	0x2,-0x2
0215 e5ff       |    |		Load	0x2,-0x1
0216 8011       |    |		Call	0x0,0x11
0217 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0218 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x7 = 0x218,0x7
0219 e5fd       |    |		Load	0x2,-0x3
021a e5fe       |    |		Load	0x2,-0x2
021b e5ff       |    |		Load	0x2,-0x1
021c 8228       | (  |		Call	0x1,0x28
021d 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
021e			TRAP_01f8:
021e 6201       |b   |		Indirect_Literal	Discrete,0x420,{0x00000000, 0x57979502}
021f 010f       |    |		Execute	Exception,Equal
0220 6801       |h   |		Jump_Zero	0x222
0221 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5					; Debug Table 0x4.0x8 = 0x221,0x8
0222 0100       |    |		Execute	Exception,Raise
0223 0000 0000  |    |		.BLANK	0000[0x5]
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 022f       | /  |		.CONST	0x022f								; Address of begin
0229 0243       | C  |		.CONST	0x0243								; Address of exception handler
022a 0002       |    |		.CONST	0x0002								; Number of locals
022b			INIT_0228:
022b e005       |    |		Load	0x0,0x5								; Debug Table 0x5 = .DEBUG	0x022b,0x152a,0x0001,0x0000,0x0057,0x9795,0x0000,0x11f2
													; Debug Table 0x5.0x0 = 0x22b,0xffff
022c 0322       | "  |		Declare_Variable	Record
022d 00d8       |    |		Load_Top	At_Offset_0
022e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
022f			BODY_0228:
022f 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5.0x1 = 0x22f,0x1
0230 00d9       |    |		Load_Top	At_Offset_1
0231 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0232 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x2 = 0x232,0x2
0233 4808       |H   |		Short_Literal	0x8
0234 e5fe       |    |		Load	0x2,-0x2
0235 e00a       |    |		Load	0x0,0xa
0236 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0237 00d1       |    |		Pop_Control	Pop_Count_1
0238 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x3 = 0x238,0x3
0239 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
023a 6804       |h   |		Jump_Zero	0x23f
023b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x4 = 0x23b,0x4
023c e5ff       |    |		Load	0x2,-0x1
023d 8232       | 2  |		Call	0x1,0x32
023e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
023f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x5 = 0x23f,0x5
0240 e5ff       |    |		Load	0x2,-0x1
0241 822f       | /  |		Call	0x1,0x2f
0242 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0243			TRAP_0228:
0243 61dc       |a   |		Indirect_Literal	Discrete,0x420,{0x00000000, 0x57979502}
0244 010f       |    |		Execute	Exception,Equal
0245 6801       |h   |		Jump_Zero	0x247
0246 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x5.0x6 = 0x246,0x6
0247 0100       |    |		Execute	Exception,Raise
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 0258       | X  |		.CONST	0x0258								; Address of begin
0249 02f7       |    |		.CONST	0x02f7								; Address of exception handler
024a 0007       |    |		.CONST	0x0007								; Number of locals
024b			INIT_0248:
024b e221       | !  |		Load	0x1,0x21							; Debug Table 0x6 = .DEBUG	0x024b,0x153a,0x0001,0x0000,0x0057,0x9795,0x0000,0x11fe
													; Debug Table 0x6.0x0 = 0x24b,0xffff
024c 0007       |    |		Action	Break_Optional
024d e002       |    |		Load	0x0,0x2								; Debug Table 0x6.0x1 = 0x24d,0xfffe
024e 0007       |    |		Action	Break_Optional
024f e005       |    |		Load	0x0,0x5								; Debug Table 0x6.0x2 = 0x24f,0xfffd
0250 0322       | "  |		Declare_Variable	Record
0251 00d8       |    |		Load_Top	At_Offset_0
0252 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0253 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x6.0x3 = 0x253,0xfffc
0254 e001       |    |		Load	0x0,0x1								; Debug Table 0x6.0x4 = 0x254,0xfffb
0255 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0256 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0257 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x6.0x5 = 0x257,0xfffa
0258			BODY_0248:
0258 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0x6 = 0x258,0x1
0259 4806       |H   |		Short_Literal	0x6
025a e5fe       |    |		Load	0x2,-0x2
025b e00a       |    |		Load	0x0,0xa
025c 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
025d 00d1       |    |		Pop_Control	Pop_Count_1
025e e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x6.0x7 = 0x25e,0x2
025f 4801       |H   |		Short_Literal	0x1
0260 0263       | c  |		Execute	Discrete,Above_Bound
0261 703d       |p=  |		Jump_Nonzero	0x29f
0262 4801       |H   |		Short_Literal	0x1							; Debug Table 0x6.0x8 = 0x262,0x3
0263 e012       |    |		Load	0x0,0x12
0264 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0265 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0266 e001       |    |		Load	0x0,0x1								; Debug Table 0x6.0x9 = 0x266,0x4
0267 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0268 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0269 e001       |    |		Load	0x0,0x1
026a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
026b e007       |    |		Load	0x0,0x7
026c 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
026d 4801       |H   |		Short_Literal	0x1
026e e013       |    |		Load	0x0,0x13
026f 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0270 c405       |    |		Store	0x2,0x5
0271 c406       |    |		Store	0x2,0x6
0272 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0xa = 0x272,0x5
0273 6816       |h   |		Jump_Zero	0x28a
0274 0092 10b9  |    |		Action	Push_String_Extended,0x10b9					; "Can't get declaration of"
													; Debug Table 0x6.0xb = 0x274,0x6
0276 00d9       |    |		Load_Top	At_Offset_1
0277 00e0       |    |		Load_Encached	Standard_Cache
0278 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0279 01cc       |    |		Execute	Vector,Catenate
027a 0092 10ba  |    |		Action	Push_String_Extended,0x10ba					; "'th item on mark stack ("
027c 01cc       |    |		Execute	Vector,Catenate
027d e406       |    |		Load	0x2,0x6
027e e001       |    |		Load	0x0,0x1
027f 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0280 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0281 025e       | ^  |		Execute	Discrete,Convert
0282 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0283 01cc       |    |		Execute	Vector,Catenate
0284 0092 10bb  |    |		Action	Push_String_Extended,0x10bb					; ")"
0286 01cc       |    |		Execute	Vector,Catenate
0287 e006       |    |		Load	0x0,0x6
0288 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0289 7814       |x   |		Jump	0x29e
028a e405       |    |		Load	0x2,0x5								; Debug Table 0x6.0xc = 0x28a,0x7
028b e014       |    |		Load	0x0,0x14
028c 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
028d 7010       |p   |		Jump_Nonzero	0x29e
028e 00da       |    |		Load_Top	At_Offset_2
028f e405       |    |		Load	0x2,0x5
0290 4975       |Iu  |		Short_Literal	0x175
0291 00eb       |    |		Load_Encached	Diana_Cache
0292 0098       |    |		Execute	Package,Field_Read_Dynamic
0293 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
0294 7009       |p   |		Jump_Nonzero	0x29e
0295 e402       |    |		Load	0x2,0x2								; Debug Table 0x6.0xd = 0x295,0x8
0296 e405       |    |		Load	0x2,0x5
0297 8233       | 3  |		Call	0x1,0x33
0298 c402       |    |		Store	0x2,0x2
0299 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0xe = 0x299,0x9
029a e405       |    |		Load	0x2,0x5
029b 00eb       |    |		Load_Encached	Diana_Cache
029c 1874       | t  |		Execute	Package,Field_Execute,Field_Number 0x74
029d 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
029e 3fc3       |?   |		Loop_Increasing	0x262
029f e402       |    |		Load	0x2,0x2								; Debug Table 0x6.0xf = 0x29f,0xa
02a0 7005       |p   |		Jump_Nonzero	0x2a6
02a1 0092 10bc  |    |		Action	Push_String_Extended,0x10bc					; "no displayable marks found"
													; Debug Table 0x6.0x10 = 0x2a1,0xb
02a3 e006       |    |		Load	0x0,0x6
02a4 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
02a5 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x6.0x11 = 0x2a5,0xc
02a6 e002       |    |		Load	0x0,0x2								; Debug Table 0x6.0x12 = 0x2a6,0xd
02a7 e001       |    |		Load	0x0,0x1
02a8 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
02a9 e404       |    |		Load	0x2,0x4
02aa 4806       |H   |		Short_Literal	0x6
02ab e00b       |    |		Load	0x0,0xb
02ac 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
02ad c403       |    |		Store	0x2,0x3
02ae 4806       |H   |		Short_Literal	0x6							; Debug Table 0x6.0x13 = 0x2ae,0xe
02af e403       |    |		Load	0x2,0x3
02b0 0217       |    |		Execute	Heap_Access,All_Reference
02b1 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
02b2 0092 10bd  |    |		Action	Push_String_Extended,0x10bd					; "marks"
													; Debug Table 0x6.0x14 = 0x2b2,0xf
02b4 00ea       |    |		Load_Encached	Null_String_Cache
02b5 e403       |    |		Load	0x2,0x3
02b6 8224       | $  |		Call	0x1,0x24
02b7 4802       |H   |		Short_Literal	0x2							; Debug Table 0x6.0x15 = 0x2b7,0x10
02b8 e403       |    |		Load	0x2,0x3
02b9 0217       |    |		Execute	Heap_Access,All_Reference
02ba 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
02bb e403       |    |		Load	0x2,0x3								; Debug Table 0x6.0x16 = 0x2bb,0x11
02bc 0217       |    |		Execute	Heap_Access,All_Reference
02bd 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
02be 0007       |    |		Action	Break_Optional
02bf 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x6.0x17 = 0x2bf,0x401
02c0 0007       |    |		Action	Break_Optional							; Debug Table 0x6.0x18 = 0x2c0,0x11
02c1 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x6.0x19 = 0x2c1,0x801
02c2 e00d       |    |		Load	0x0,0xd								; Debug Table 0x6.0x1a = 0x2c2,0x401
02c3 185c       | \  |		Execute	Package,Field_Execute,Field_Number 0x5c
02c4 e403       |    |		Load	0x2,0x3
02c5 0217       |    |		Execute	Heap_Access,All_Reference
02c6 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
02c7 781b       |x   |		Jump	0x2e3
02c8 e403       |    |		Load	0x2,0x3								; Debug Table 0x6.0x1b = 0x2c8,0x13
02c9 0217       |    |		Execute	Heap_Access,All_Reference
02ca 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
02cb e402       |    |		Load	0x2,0x2
02cc 0217       |    |		Execute	Heap_Access,All_Reference
02cd 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02ce e015       |    |		Load	0x0,0x15
02cf 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
02d0 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
02d1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x1c = 0x2d1,0x14
02d2 e00d       |    |		Load	0x0,0xd
02d3 185b       | [  |		Execute	Package,Field_Execute,Field_Number 0x5b
02d4 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
02d5 4802       |H   |		Short_Literal	0x2							; Debug Table 0x6.0x1d = 0x2d5,0x15
02d6 00d9       |    |		Load_Top	At_Offset_1
02d7 e402       |    |		Load	0x2,0x2
02d8 0217       |    |		Execute	Heap_Access,All_Reference
02d9 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02da e403       |    |		Load	0x2,0x3
02db 0217       |    |		Execute	Heap_Access,All_Reference
02dc 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
02dd e00d       |    |		Load	0x0,0xd
02de 185d       | ]  |		Execute	Package,Field_Execute,Field_Number 0x5d
02df e402       |    |		Load	0x2,0x2								; Debug Table 0x6.0x1e = 0x2df,0x16
02e0 0217       |    |		Execute	Heap_Access,All_Reference
02e1 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
02e2 a402       |    |		Store_Unchecked	0x2,0x2
02e3 e402       |    |		Load	0x2,0x2								; Debug Table 0x6.0x1f = 0x2e3,0x12
02e4 77e3       |w   |		Jump_Nonzero	0x2c8
02e5 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0x20 = 0x2e5,0x17
02e6 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
02e7 e403       |    |		Load	0x2,0x3
02e8 e00e       |    |		Load	0x0,0xe
02e9 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
02ea e403       |    |		Load	0x2,0x3								; Debug Table 0x6.0x21 = 0x2ea,0x18
02eb e00b       |    |		Load	0x0,0xb
02ec 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
02ed 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0x22 = 0x2ed,0x19
02ee 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
02ef 6806       |h   |		Jump_Zero	0x2f6
02f0 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0x23 = 0x2f0,0x1a
02f1 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
02f2 0217       |    |		Execute	Heap_Access,All_Reference
02f3 e403       |    |		Load	0x2,0x3
02f4 e00a       |    |		Load	0x0,0xa
02f5 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02f6 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02f7			TRAP_0248:
02f7 0007       |    |		Action	Break_Optional
02f8 e403       |    |		Load	0x2,0x3								; Debug Table 0x6.0x24 = 0x2f8,0x1b
02f9 e00b       |    |		Load	0x0,0xb
02fa 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
02fb e403       |    |		Load	0x2,0x3								; Debug Table 0x6.0x25 = 0x2fb,0x1c
02fc e00b       |    |		Load	0x0,0xb
02fd 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
02fe 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02ff 0000       |    |		.XXX[0x1]
0300 ; --------------------------------------------------------------------------------------
0300 ; SUBPROGRAM
0300 ; --------------------------------------------------------------------------------------
0300 030e       |    |		.CONST	0x030e								; Address of begin
0301 0386       |    |		.CONST	0x0386								; Address of exception handler
0302 0006       |    |		.CONST	0x0006								; Number of locals
0303			INIT_0300:
0303 e002       |    |		Load	0x0,0x2								; Debug Table 0x7 = .DEBUG	0x0303,0x1588,0x0001,0x0000,0x0057,0x9795,0x0000,0x120a
													; Debug Table 0x7.0x0 = 0x303,0xffff
0304 0007       |    |		Action	Break_Optional
0305 e005       |    |		Load	0x0,0x5								; Debug Table 0x7.0x1 = 0x305,0xfffe
0306 0322       | "  |		Declare_Variable	Record
0307 00d8       |    |		Load_Top	At_Offset_0
0308 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0309 e016       |    |		Load	0x0,0x16							; Debug Table 0x7.0x2 = 0x309,0xfffd
030a 1b2f       | /  |		Execute	Package,Field_Read,Field_Number 0x2f
030b e016       |    |		Load	0x0,0x16							; Debug Table 0x7.0x3 = 0x30b,0xfffc
030c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
030d 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x7.0x4 = 0x30d,0xfffb
030e			BODY_0300:
030e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x5 = 0x30e,0x1
030f 4803       |H   |		Short_Literal	0x3
0310 e5fe       |    |		Load	0x2,-0x2
0311 e00a       |    |		Load	0x0,0xa
0312 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0313 00d1       |    |		Pop_Control	Pop_Count_1
0314 e002       |    |		Load	0x0,0x2								; Debug Table 0x7.0x6 = 0x314,0x2
0315 e001       |    |		Load	0x0,0x1
0316 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0317 e403       |    |		Load	0x2,0x3
0318 4803       |H   |		Short_Literal	0x3
0319 e00b       |    |		Load	0x0,0xb
031a 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
031b c402       |    |		Store	0x2,0x2
031c e402       |    |		Load	0x2,0x2								; Debug Table 0x7.0x7 = 0x31c,0x3
031d 0217       |    |		Execute	Heap_Access,All_Reference
031e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
031f e017       |    |		Load	0x0,0x17
0320 1842       | B  |		Execute	Package,Field_Execute,Field_Number 0x42
0321 021f       |    |		Execute	Heap_Access,Equal
0322 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0323 480c       |H   |		Short_Literal	0xc							; Debug Table 0x7.0x8 = 0x323,0x4
0324 e402       |    |		Load	0x2,0x2
0325 0217       |    |		Execute	Heap_Access,All_Reference
0326 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
0327 0092 10be  |    |		Action	Push_String_Extended,0x10be					; "hold stack"
													; Debug Table 0x7.0x9 = 0x327,0x5
0329 00ea       |    |		Load_Encached	Null_String_Cache
032a e402       |    |		Load	0x2,0x2
032b 8224       | $  |		Call	0x1,0x24
032c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0xa = 0x32c,0x6
032d 6804       |h   |		Jump_Zero	0x332
032e e402       |    |		Load	0x2,0x2								; Debug Table 0x7.0xb = 0x32e,0x7
032f e018       |    |		Load	0x0,0x18
0330 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0331 780c       |x   |		Jump	0x33e
0332 e402       |    |		Load	0x2,0x2								; Debug Table 0x7.0xc = 0x332,0x8
0333 e018       |    |		Load	0x0,0x18
0334 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0335 e402       |    |		Load	0x2,0x2								; Debug Table 0x7.0xd = 0x335,0x9
0336 0217       |    |		Execute	Heap_Access,All_Reference
0337 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0338 e017       |    |		Load	0x0,0x17
0339 1869       | i  |		Execute	Package,Field_Execute,Field_Number 0x69
033a 4801       |H   |		Short_Literal	0x1
033b e402       |    |		Load	0x2,0x2
033c e018       |    |		Load	0x0,0x18
033d 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
033e e402       |    |		Load	0x2,0x2								; Debug Table 0x7.0xe = 0x33e,0xa
033f 0219       |    |		Execute	Heap_Access,All_Read
0340 00d8       |    |		Load_Top	At_Offset_0
0341 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0342 e402       |    |		Load	0x2,0x2
0343 0217       |    |		Execute	Heap_Access,All_Reference
0344 3c20       |<   |		Execute	Record,Field_Read,Field_Number 0x20
0345 0217       |    |		Execute	Heap_Access,All_Reference
0346 e017       |    |		Load	0x0,0x17
0347 1878       | x  |		Execute	Package,Field_Execute,Field_Number 0x78
0348 00d9       |    |		Load_Top	At_Offset_1
0349 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
034a 00d1       |    |		Pop_Control	Pop_Count_1
034b e402       |    |		Load	0x2,0x2								; Debug Table 0x7.0xf = 0x34b,0xb
034c e018       |    |		Load	0x0,0x18
034d 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
034e 4801       |H   |		Short_Literal	0x1							; Debug Table 0x7.0x10 = 0x34e,0xc
034f e403       |    |		Load	0x2,0x3
0350 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0351 e402       |    |		Load	0x2,0x2
0352 e018       |    |		Load	0x0,0x18
0353 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0354 e016       |    |		Load	0x0,0x16							; Debug Table 0x7.0x11 = 0x354,0xd
0355 1b2f       | /  |		Execute	Package,Field_Read,Field_Number 0x2f
0356 e017       |    |		Load	0x0,0x17
0357 1b3f       | ?  |		Execute	Package,Field_Read,Field_Number 0x3f
0358 00ea       |    |		Load_Encached	Null_String_Cache
0359 e402       |    |		Load	0x2,0x2
035a 0217       |    |		Execute	Heap_Access,All_Reference
035b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
035c e017       |    |		Load	0x0,0x17
035d 187f       |    |		Execute	Package,Field_Execute,Field_Number 0x7f
035e 005b       | [  |		Store_Top	Discrete,At_Offset_3
035f e402       |    |		Load	0x2,0x2								; Debug Table 0x7.0x12 = 0x35f,0xe
0360 0217       |    |		Execute	Heap_Access,All_Reference
0361 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0362 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0363 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x7.0x13 = 0x363,0xf
0364 4801       |H   |		Short_Literal	0x1
0365 0263       | c  |		Execute	Discrete,Above_Bound
0366 700e       |p   |		Jump_Nonzero	0x375
0367 4801       |H   |		Short_Literal	0x1							; Debug Table 0x7.0x14 = 0x367,0x10
0368 e012       |    |		Load	0x0,0x12
0369 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
036a 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
036b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x15 = 0x36b,0x11
036c e007       |    |		Load	0x0,0x7
036d 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
036e 4803       |H   |		Short_Literal	0x3
036f e013       |    |		Load	0x0,0x13
0370 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0371 e402       |    |		Load	0x2,0x2
0372 8235       | 5  |		Call	0x1,0x35
0373 c405       |    |		Store	0x2,0x5
0374 3ff2       |?   |		Loop_Increasing	0x367
0375 0092 10bf  |    |		Action	Push_String_Extended,0x10bf					; "<IMAGE>"
													; Debug Table 0x7.0x16 = 0x375,0x12
0377 e019       |    |		Load	0x0,0x19
0378 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0379 e402       |    |		Load	0x2,0x2								; Debug Table 0x7.0x17 = 0x379,0x13
037a e00b       |    |		Load	0x0,0xb
037b 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
037c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x18 = 0x37c,0x14
037d 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
037e 6806       |h   |		Jump_Zero	0x385
037f 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x19 = 0x37f,0x15
0380 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
0381 0217       |    |		Execute	Heap_Access,All_Reference
0382 e402       |    |		Load	0x2,0x2
0383 e00a       |    |		Load	0x0,0xa
0384 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0385 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0386			TRAP_0300:
0386 0007       |    |		Action	Break_Optional
0387 e402       |    |		Load	0x2,0x2								; Debug Table 0x7.0x1a = 0x387,0x16
0388 e00b       |    |		Load	0x0,0xb
0389 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
038a e402       |    |		Load	0x2,0x2								; Debug Table 0x7.0x1b = 0x38a,0x17
038b e00b       |    |		Load	0x0,0xb
038c 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
038d 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
038e 0000 0000  |    |		.XXX[0x2]
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 0399       |    |		.CONST	0x0399								; Address of begin
0391 03c8       |    |		.CONST	0x03c8								; Address of exception handler
0392 0003       |    |		.CONST	0x0003								; Number of locals
0393			INIT_0390:
0393 e002       |    |		Load	0x0,0x2								; Debug Table 0x8 = .DEBUG	0x0393,0x15c2,0x0001,0x0000,0x0057,0x9795,0x0000,0x1216
													; Debug Table 0x8.0x0 = 0x393,0xffff
0394 0007       |    |		Action	Break_Optional
0395 e005       |    |		Load	0x0,0x5								; Debug Table 0x8.0x1 = 0x395,0xfffe
0396 0322       | "  |		Declare_Variable	Record
0397 00d8       |    |		Load_Top	At_Offset_0
0398 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0399			BODY_0390:
0399 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x8.0x2 = 0x399,0x1
039a 4801       |H   |		Short_Literal	0x1
039b e5fe       |    |		Load	0x2,-0x2
039c e00a       |    |		Load	0x0,0xa
039d 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
039e 00d1       |    |		Pop_Control	Pop_Count_1
039f e002       |    |		Load	0x0,0x2								; Debug Table 0x8.0x3 = 0x39f,0x2
03a0 e001       |    |		Load	0x0,0x1
03a1 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
03a2 00da       |    |		Load_Top	At_Offset_2
03a3 4801       |H   |		Short_Literal	0x1
03a4 e00b       |    |		Load	0x0,0xb
03a5 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
03a6 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
03a7 480a       |H   |		Short_Literal	0xa							; Debug Table 0x8.0x4 = 0x3a7,0x3
03a8 00da       |    |		Load_Top	At_Offset_2
03a9 0217       |    |		Execute	Heap_Access,All_Reference
03aa 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
03ab 4801       |H   |		Short_Literal	0x1							; Debug Table 0x8.0x5 = 0x3ab,0x4
03ac 00da       |    |		Load_Top	At_Offset_2
03ad 0217       |    |		Execute	Heap_Access,All_Reference
03ae 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
03af 0092 10c0  |    |		Action	Push_String_Extended,0x10c0					; "name resolution"
													; Debug Table 0x8.0x6 = 0x3af,0x5
03b1 e5ff       |    |		Load	0x2,-0x1
03b2 00db       |    |		Load_Top	At_Offset_3
03b3 8224       | $  |		Call	0x1,0x24
03b4 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x8.0x7 = 0x3b4,0x6
03b5 00d9       |    |		Load_Top	At_Offset_1
03b6 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
03b7 00db       |    |		Load_Top	At_Offset_3
03b8 e00e       |    |		Load	0x0,0xe
03b9 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
03ba c5fd       |    |		Store	0x2,-0x3
03bb 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x8.0x8 = 0x3bb,0x7
03bc e00b       |    |		Load	0x0,0xb
03bd 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
03be 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x8.0x9 = 0x3be,0x8
03bf 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
03c0 6806       |h   |		Jump_Zero	0x3c7
03c1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x8.0xa = 0x3c1,0x9
03c2 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
03c3 0217       |    |		Execute	Heap_Access,All_Reference
03c4 00da       |    |		Load_Top	At_Offset_2
03c5 e00a       |    |		Load	0x0,0xa
03c6 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03c7 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03c8			TRAP_0390:
03c8 0007       |    |		Action	Break_Optional
03c9 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x8.0xb = 0x3c9,0xa
03ca e00b       |    |		Load	0x0,0xb
03cb 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
03cc 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x8.0xc = 0x3cc,0xb
03cd e00b       |    |		Load	0x0,0xb
03ce 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
03cf 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03d0 ; --------------------------------------------------------------------------------------
03d0 ; SUBPROGRAM
03d0 ; --------------------------------------------------------------------------------------
03d0 03d9       |    |		.CONST	0x03d9								; Address of begin
03d1 0415       |    |		.CONST	0x0415								; Address of exception handler
03d2 0003       |    |		.CONST	0x0003								; Number of locals
03d3			INIT_03d0:
03d3 e002       |    |		Load	0x0,0x2								; Debug Table 0x9 = .DEBUG	0x03d3,0x15de,0x0001,0x0000,0x0057,0x9795,0x0000,0x1228
													; Debug Table 0x9.0x0 = 0x3d3,0xffff
03d4 0007       |    |		Action	Break_Optional
03d5 e005       |    |		Load	0x0,0x5								; Debug Table 0x9.0x1 = 0x3d5,0xfffe
03d6 0322       | "  |		Declare_Variable	Record
03d7 00d8       |    |		Load_Top	At_Offset_0
03d8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03d9			BODY_03d0:
03d9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x2 = 0x3d9,0x1
03da 4804       |H   |		Short_Literal	0x4
03db e5fd       |    |		Load	0x2,-0x3
03dc e00a       |    |		Load	0x0,0xa
03dd 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
03de 00d1       |    |		Pop_Control	Pop_Count_1
03df e002       |    |		Load	0x0,0x2								; Debug Table 0x9.0x3 = 0x3df,0x2
03e0 e001       |    |		Load	0x0,0x1
03e1 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
03e2 00da       |    |		Load_Top	At_Offset_2
03e3 4804       |H   |		Short_Literal	0x4
03e4 e00b       |    |		Load	0x0,0xb
03e5 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
03e6 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
03e7 0092 10c1  |    |		Action	Push_String_Extended,0x10c1					; "coding"
													; Debug Table 0x9.0x4 = 0x3e7,0x3
03e9 e5ff       |    |		Load	0x2,-0x1
03ea 00db       |    |		Load_Top	At_Offset_3
03eb 8224       | $  |		Call	0x1,0x24
03ec 4802       |H   |		Short_Literal	0x2							; Debug Table 0x9.0x5 = 0x3ec,0x4
03ed 00da       |    |		Load_Top	At_Offset_2
03ee 0217       |    |		Execute	Heap_Access,All_Reference
03ef 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
03f0 4801       |H   |		Short_Literal	0x1							; Debug Table 0x9.0x6 = 0x3f0,0x5
03f1 00da       |    |		Load_Top	At_Offset_2
03f2 0217       |    |		Execute	Heap_Access,All_Reference
03f3 380c       |8   |		Execute	Record,Field_Write,Field_Number 0xc
03f4 4802       |H   |		Short_Literal	0x2							; Debug Table 0x9.0x7 = 0x3f4,0x6
03f5 00da       |    |		Load_Top	At_Offset_2
03f6 0217       |    |		Execute	Heap_Access,All_Reference
03f7 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
03f8 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0x8 = 0x3f8,0x7
03f9 0217       |    |		Execute	Heap_Access,All_Reference
03fa 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
03fb e5fe       |    |		Load	0x2,-0x2
03fc 0007       |    |		Action	Break_Optional
03fd 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x9.0x9 = 0x3fd,0x401
03fe e00d       |    |		Load	0x0,0xd								; Debug Table 0x9.0xa = 0x3fe,0x7
03ff 185c       | \  |		Execute	Package,Field_Execute,Field_Number 0x5c
0400 00da       |    |		Load_Top	At_Offset_2
0401 0217       |    |		Execute	Heap_Access,All_Reference
0402 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
0403 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0xb = 0x403,0x8
0404 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0405 00da       |    |		Load_Top	At_Offset_2
0406 e00e       |    |		Load	0x0,0xe
0407 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0408 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0xc = 0x408,0x9
0409 e00b       |    |		Load	0x0,0xb
040a 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
040b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0xd = 0x40b,0xa
040c 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
040d 6806       |h   |		Jump_Zero	0x414
040e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0xe = 0x40e,0xb
040f 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
0410 0217       |    |		Execute	Heap_Access,All_Reference
0411 00da       |    |		Load_Top	At_Offset_2
0412 e00a       |    |		Load	0x0,0xa
0413 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0414 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0415			TRAP_03d0:
0415 0007       |    |		Action	Break_Optional
0416 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9.0xf = 0x416,0xc
0417 e00b       |    |		Load	0x0,0xb
0418 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0419 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9.0x10 = 0x419,0xd
041a e00b       |    |		Load	0x0,0xb
041b 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
041c 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
041d 0000 0000  |    |		.XXX[0x3]
041f 0000       |    |
0420 0000 0000  |    |		.LITERAL	{0x00000000, 0x57979502}
0424 0000 0000  |    |		.BLANK	0000[0x4]
0428 ; --------------------------------------------------------------------------------------
0428 ; SUBPROGRAM
0428 ; --------------------------------------------------------------------------------------
0428 0431       | 1  |		.CONST	0x0431								; Address of begin
0429 046d       | m  |		.CONST	0x046d								; Address of exception handler
042a 0003       |    |		.CONST	0x0003								; Number of locals
042b			INIT_0428:
042b e002       |    |		Load	0x0,0x2								; Debug Table 0xa = .DEBUG	0x042b,0x1602,0x0001,0x0000,0x0057,0x9795,0x0000,0x123a
													; Debug Table 0xa.0x0 = 0x42b,0xffff
042c 0007       |    |		Action	Break_Optional
042d e005       |    |		Load	0x0,0x5								; Debug Table 0xa.0x1 = 0x42d,0xfffe
042e 0322       | "  |		Declare_Variable	Record
042f 00d8       |    |		Load_Top	At_Offset_0
0430 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0431			BODY_0428:
0431 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0x2 = 0x431,0x1
0432 4802       |H   |		Short_Literal	0x2
0433 e5fd       |    |		Load	0x2,-0x3
0434 e00a       |    |		Load	0x0,0xa
0435 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0436 00d1       |    |		Pop_Control	Pop_Count_1
0437 e002       |    |		Load	0x0,0x2								; Debug Table 0xa.0x3 = 0x437,0x2
0438 e001       |    |		Load	0x0,0x1
0439 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
043a 00da       |    |		Load_Top	At_Offset_2
043b 4802       |H   |		Short_Literal	0x2
043c e00b       |    |		Load	0x0,0xb
043d 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
043e 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
043f 0092 10c2  |    |		Action	Push_String_Extended,0x10c2					; "obsolescence"
													; Debug Table 0xa.0x4 = 0x43f,0x3
0441 e5ff       |    |		Load	0x2,-0x1
0442 00db       |    |		Load_Top	At_Offset_3
0443 8224       | $  |		Call	0x1,0x24
0444 4802       |H   |		Short_Literal	0x2							; Debug Table 0xa.0x5 = 0x444,0x4
0445 00da       |    |		Load_Top	At_Offset_2
0446 0217       |    |		Execute	Heap_Access,All_Reference
0447 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
0448 4801       |H   |		Short_Literal	0x1							; Debug Table 0xa.0x6 = 0x448,0x5
0449 00da       |    |		Load_Top	At_Offset_2
044a 0217       |    |		Execute	Heap_Access,All_Reference
044b 380c       |8   |		Execute	Record,Field_Write,Field_Number 0xc
044c 4802       |H   |		Short_Literal	0x2							; Debug Table 0xa.0x7 = 0x44c,0x6
044d 00da       |    |		Load_Top	At_Offset_2
044e 0217       |    |		Execute	Heap_Access,All_Reference
044f 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0450 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xa.0x8 = 0x450,0x7
0451 0217       |    |		Execute	Heap_Access,All_Reference
0452 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0453 e5fe       |    |		Load	0x2,-0x2
0454 0007       |    |		Action	Break_Optional
0455 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0xa.0x9 = 0x455,0x401
0456 e00d       |    |		Load	0x0,0xd								; Debug Table 0xa.0xa = 0x456,0x7
0457 185c       | \  |		Execute	Package,Field_Execute,Field_Number 0x5c
0458 00da       |    |		Load_Top	At_Offset_2
0459 0217       |    |		Execute	Heap_Access,All_Reference
045a 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
045b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0xb = 0x45b,0x8
045c 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
045d 00da       |    |		Load_Top	At_Offset_2
045e e00e       |    |		Load	0x0,0xe
045f 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0460 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xa.0xc = 0x460,0x9
0461 e00b       |    |		Load	0x0,0xb
0462 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0463 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0xd = 0x463,0xa
0464 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
0465 6806       |h   |		Jump_Zero	0x46c
0466 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0xe = 0x466,0xb
0467 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
0468 0217       |    |		Execute	Heap_Access,All_Reference
0469 00da       |    |		Load_Top	At_Offset_2
046a e00a       |    |		Load	0x0,0xa
046b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
046c 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
046d			TRAP_0428:
046d 0007       |    |		Action	Break_Optional
046e 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0xf = 0x46e,0xc
046f e00b       |    |		Load	0x0,0xb
0470 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0471 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x10 = 0x471,0xd
0472 e00b       |    |		Load	0x0,0xb
0473 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0474 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0475 0000 0000  |    |		.XXX[0x3]
0477 0000       |    |
0478 ; --------------------------------------------------------------------------------------
0478 ; SUBPROGRAM
0478 ; --------------------------------------------------------------------------------------
0478 0489       |    |		.CONST	0x0489								; Address of begin
0479 0510       |    |		.CONST	0x0510								; Address of exception handler
047a 0006       |    |		.CONST	0x0006								; Number of locals
047b			INIT_0478:
047b e002       |    |		Load	0x0,0x2								; Debug Table 0xb = .DEBUG	0x047b,0x1626,0x0001,0x0000,0x0057,0x9795,0x0000,0x124c
													; Debug Table 0xb.0x0 = 0x47b,0xffff
047c 0007       |    |		Action	Break_Optional
047d e01a       |    |		Load	0x0,0x1a							; Debug Table 0xb.0x1 = 0x47d,0xfffe
047e 02ff       |    |		Declare_Variable	Variant_Record
047f 00d8       |    |		Load_Top	At_Offset_0
0480 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0481 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0xb.0x2 = 0x481,0xfffd
0482 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0xb.0x3 = 0x482,0xfffc
0483 e5fd       |    |		Load	0x2,-0x3
0484 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0485 e005       |    |		Load	0x0,0x5								; Debug Table 0xb.0x4 = 0x485,0xfffb
0486 0322       | "  |		Declare_Variable	Record
0487 00d8       |    |		Load_Top	At_Offset_0
0488 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0489			BODY_0478:
0489 e01b       |    |		Load	0x0,0x1b							; Debug Table 0xb.0x5 = 0x489,0x1
048a 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
048b 00d9       |    |		Load_Top	At_Offset_1
048c 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
048d e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xb.0x6 = 0x48d,0x2
048e 00d9       |    |		Load_Top	At_Offset_1
048f 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0490 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x7 = 0x490,0x3
0491 480c       |H   |		Short_Literal	0xc
0492 e5fc       |    |		Load	0x2,-0x4
0493 e00a       |    |		Load	0x0,0xa
0494 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0495 00d1       |    |		Pop_Control	Pop_Count_1
0496 e002       |    |		Load	0x0,0x2								; Debug Table 0xb.0x8 = 0x496,0x4
0497 00d9       |    |		Load_Top	At_Offset_1
0498 480c       |H   |		Short_Literal	0xc
0499 e5ff       |    |		Load	0x2,-0x1
049a e00b       |    |		Load	0x0,0xb
049b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
049c c402       |    |		Store	0x2,0x2
049d 4802       |H   |		Short_Literal	0x2							; Debug Table 0xb.0x9 = 0x49d,0x5
049e e402       |    |		Load	0x2,0x2
049f 0217       |    |		Execute	Heap_Access,All_Reference
04a0 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
04a1 4802       |H   |		Short_Literal	0x2							; Debug Table 0xb.0xa = 0x4a1,0x6
04a2 e402       |    |		Load	0x2,0x2
04a3 0217       |    |		Execute	Heap_Access,All_Reference
04a4 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
04a5 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0xb.0xb = 0x4a5,0x7
04a6 e403       |    |		Load	0x2,0x3
04a7 e402       |    |		Load	0x2,0x2
04a8 e5ff       |    |		Load	0x2,-0x1
04a9 e00a       |    |		Load	0x0,0xa
04aa 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
04ab 00d1       |    |		Pop_Control	Pop_Count_1
04ac 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
04ad e01c       |    |		Load	0x0,0x1c							; Debug Table 0xb.0xc = 0x4ad,0x8
04ae e402       |    |		Load	0x2,0x2
04af 0217       |    |		Execute	Heap_Access,All_Reference
04b0 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
04b1 039c       |    |		Declare_Variable	Heap_Access,By_Allocation
04b2 00d8       |    |		Load_Top	At_Offset_0
04b3 0217       |    |		Execute	Heap_Access,All_Reference
04b4 1c00       |    |		Execute_Immediate	Run_Utility,0x0
04b5 e402       |    |		Load	0x2,0x2
04b6 0217       |    |		Execute	Heap_Access,All_Reference
04b7 381c       |8   |		Execute	Record,Field_Write,Field_Number 0x1c
04b8 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0xd = 0x4b8,0x9
04b9 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xb.0xe = 0x4b9,0xa
04ba e402       |    |		Load	0x2,0x2
04bb 0217       |    |		Execute	Heap_Access,All_Reference
04bc 3c1c       |<   |		Execute	Record,Field_Read,Field_Number 0x1c
04bd 0217       |    |		Execute	Heap_Access,All_Reference
04be 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
04bf e402       |    |		Load	0x2,0x2								; Debug Table 0xb.0xf = 0x4bf,0xb
04c0 0217       |    |		Execute	Heap_Access,All_Reference
04c1 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
04c2 0007       |    |		Action	Break_Optional
04c3 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0xb.0x10 = 0x4c3,0x401
04c4 e404       |    |		Load	0x2,0x4								; Debug Table 0xb.0x11 = 0x4c4,0xb
04c5 e00d       |    |		Load	0x0,0xd
04c6 185c       | \  |		Execute	Package,Field_Execute,Field_Number 0x5c
04c7 e402       |    |		Load	0x2,0x2
04c8 0217       |    |		Execute	Heap_Access,All_Reference
04c9 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
04ca 7813       |x   |		Jump	0x4de
04cb 4801       |H   |		Short_Literal	0x1							; Debug Table 0xb.0x12 = 0x4cb,0xd
04cc 0007       |    |		Action	Break_Optional
04cd 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0xb.0x13 = 0x4cd,0x801
04ce 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x14 = 0x4ce,0xd
04cf 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xb.0x15 = 0x4cf,0xc01
04d0 0217       |    |		Execute	Heap_Access,All_Reference
04d1 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
04d2 e01d       |    |		Load	0x0,0x1d							; Debug Table 0xb.0x16 = 0x4d2,0x801
04d3 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
04d4 e402       |    |		Load	0x2,0x2
04d5 0217       |    |		Execute	Heap_Access,All_Reference
04d6 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
04d7 e00d       |    |		Load	0x0,0xd
04d8 185e       | ^  |		Execute	Package,Field_Execute,Field_Number 0x5e
04d9 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x17 = 0x4d9,0xe
04da 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xb.0x18 = 0x4da,0x1001
04db 0217       |    |		Execute	Heap_Access,All_Reference
04dc 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
04dd 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2					; Debug Table 0xb.0x19 = 0x4dd,0xe
04de 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x1a = 0x4de,0xc
04df 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xb.0x1b = 0x4df,0x1401
04e0 021d       |    |		Execute	Heap_Access,Is_Null
04e1 6fe9       |o   |		Jump_Zero	0x4cb							; Debug Table 0xb.0x1c = 0x4e1,0xc
04e2 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x1d = 0x4e2,0xf
04e3 3c0f       |<   |		Execute	Record,Field_Read,Field_Number 0xf
04e4 6811       |h   |		Jump_Zero	0x4f6
04e5 0092 10c2  |    |		Action	Push_String_Extended,0x10c2					; "obsolescence"
													; Debug Table 0xb.0x1e = 0x4e5,0x10
04e7 0092 10c3  |    |		Action	Push_String_Extended,0x10c3					; "Units that are obsolesced by demoting "
04e9 4fff       |O   |		Short_Literal	-0x1
04ea e403       |    |		Load	0x2,0x3
04eb e01e       |    |		Load	0x0,0x1e
04ec 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
04ed 01cc       |    |		Execute	Vector,Catenate
04ee e402       |    |		Load	0x2,0x2
04ef 8224       | $  |		Call	0x1,0x24
04f0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x1f = 0x4f0,0x11
04f1 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
04f2 e402       |    |		Load	0x2,0x2
04f3 e00e       |    |		Load	0x0,0xe
04f4 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
04f5 780d       |x   |		Jump	0x503
04f6 4802       |H   |		Short_Literal	0x2							; Debug Table 0xb.0x20 = 0x4f6,0x12
04f7 e402       |    |		Load	0x2,0x2
04f8 0217       |    |		Execute	Heap_Access,All_Reference
04f9 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
04fa 4803       |H   |		Short_Literal	0x3							; Debug Table 0xb.0x21 = 0x4fa,0x13
04fb e402       |    |		Load	0x2,0x2
04fc 0217       |    |		Execute	Heap_Access,All_Reference
04fd 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
04fe 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x22 = 0x4fe,0x14
04ff 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0500 e402       |    |		Load	0x2,0x2
0501 e00e       |    |		Load	0x0,0xe
0502 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0503 e402       |    |		Load	0x2,0x2								; Debug Table 0xb.0x23 = 0x503,0x15
0504 e00b       |    |		Load	0x0,0xb
0505 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0506 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x24 = 0x506,0x16
0507 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
0508 6806       |h   |		Jump_Zero	0x50f
0509 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x25 = 0x509,0x17
050a 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
050b 0217       |    |		Execute	Heap_Access,All_Reference
050c e402       |    |		Load	0x2,0x2
050d e00a       |    |		Load	0x0,0xa
050e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
050f 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0510			TRAP_0478:
0510 0007       |    |		Action	Break_Optional
0511 e402       |    |		Load	0x2,0x2								; Debug Table 0xb.0x26 = 0x511,0x18
0512 e00b       |    |		Load	0x0,0xb
0513 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0514 e402       |    |		Load	0x2,0x2								; Debug Table 0xb.0x27 = 0x514,0x19
0515 e00b       |    |		Load	0x0,0xb
0516 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0517 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0518 ; --------------------------------------------------------------------------------------
0518 ; SUBPROGRAM
0518 ; --------------------------------------------------------------------------------------
0518 0521       | !  |		.CONST	0x0521								; Address of begin
0519 0004       |    |		.CONST	0x0004								; Address of exception handler
051a 0003       |    |		.CONST	0x0003								; Number of locals
051b			INIT_0518:
051b e005       |    |		Load	0x0,0x5								; Debug Table 0xc = .DEBUG	0x051b,0x1678,0x0001,0x0000,0x0057,0x9795,0x0000,0x1264
													; Debug Table 0xc.0x0 = 0x51b,0xffff
051c 0322       | "  |		Declare_Variable	Record
051d 00d8       |    |		Load_Top	At_Offset_0
051e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
051f e002       |    |		Load	0x0,0x2								; Debug Table 0xc.0x1 = 0x51f,0xfffe
0520 0007       |    |		Action	Break_Optional
0521			BODY_0518:
0521 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xc.0x2 = 0x521,0x1
0522 4807       |H   |		Short_Literal	0x7
0523 e5fc       |    |		Load	0x2,-0x4
0524 e00a       |    |		Load	0x0,0xa
0525 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0526 00d1       |    |		Pop_Control	Pop_Count_1
0527 e002       |    |		Load	0x0,0x2								; Debug Table 0xc.0x3 = 0x527,0x2
0528 e001       |    |		Load	0x0,0x1
0529 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
052a 00db       |    |		Load_Top	At_Offset_3
052b 4807       |H   |		Short_Literal	0x7
052c e00b       |    |		Load	0x0,0xb
052d 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
052e 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
052f e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xc.0x4 = 0x52f,0x3
0530 e00c       |    |		Load	0x0,0xc
0531 01d7       |    |		Execute	Vector,Field_Read
0532 00d9       |    |		Load_Top	At_Offset_1
0533 0217       |    |		Execute	Heap_Access,All_Reference
0534 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
0535 4802       |H   |		Short_Literal	0x2							; Debug Table 0xc.0x5 = 0x535,0x4
0536 00d9       |    |		Load_Top	At_Offset_1
0537 0217       |    |		Execute	Heap_Access,All_Reference
0538 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0539 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x6 = 0x539,0x5
053a 0217       |    |		Execute	Heap_Access,All_Reference
053b 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
053c 0007       |    |		Action	Break_Optional
053d 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0xc.0x7 = 0x53d,0x401
053e 0007       |    |		Action	Break_Optional							; Debug Table 0xc.0x8 = 0x53e,0x5
053f 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0xc.0x9 = 0x53f,0x801
0540 e00d       |    |		Load	0x0,0xd								; Debug Table 0xc.0xa = 0x540,0x401
0541 185c       | \  |		Execute	Package,Field_Execute,Field_Number 0x5c
0542 00d9       |    |		Load_Top	At_Offset_1
0543 0217       |    |		Execute	Heap_Access,All_Reference
0544 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
0545 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xc.0xb = 0x545,0x6
0546 01db       |    |		Execute	Vector,Length
0547 6805       |h   |		Jump_Zero	0x54d
0548 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xc.0xc = 0x548,0x7
0549 e5ff       |    |		Load	0x2,-0x1
054a 00da       |    |		Load_Top	At_Offset_2
054b 8224       | $  |		Call	0x1,0x24
054c 7805       |x   |		Jump	0x552
054d 0092 10c4  |    |		Action	Push_String_Extended,0x10c4					; "ada_menu"
													; Debug Table 0xc.0xd = 0x54d,0x8
054f e5ff       |    |		Load	0x2,-0x1
0550 00da       |    |		Load_Top	At_Offset_2
0551 8224       | $  |		Call	0x1,0x24
0552 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0xe = 0x552,0x9
0553 e5fb       |    |		Load	0x2,-0x5
0554 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0555 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xc.0xf = 0x555,0xa
0556 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0557 e5fb       |    |		Load	0x2,-0x5
0558 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0559 4800       |H   |		Short_Literal	0x0							; Debug Table 0xc.0x10 = 0x559,0xb
055a e5fb       |    |		Load	0x2,-0x5
055b 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
055c 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
055d 0000 0000  |    |		.XXX[0x3]
055f 0000       |    |
0560 ; --------------------------------------------------------------------------------------
0560 ; SUBPROGRAM
0560 ; --------------------------------------------------------------------------------------
0560 0563       | c  |		.CONST	0x0563								; Address of begin
0561 0004       |    |		.CONST	0x0004								; Address of exception handler
0562 0001       |    |		.CONST	0x0001								; Number of locals
0563			BODY_0560:
0563			INIT_0560:
0563 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xd = .DEBUG	0x0563,0x169c,0x0001,0x0000,0x0057,0x9795,0x0000,0x127c
													; Debug Table 0xd.0x0 = 0x563,0x1
0564 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0565 7007       |p   |		Jump_Nonzero	0x56d
0566 0092 10c5  |    |		Action	Push_String_Extended,0x10c5					; "menu passed to display_menu is null"
													; Debug Table 0xd.0x1 = 0x566,0x2
0568 e006       |    |		Load	0x0,0x6
0569 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
056a 4800       |H   |		Short_Literal	0x0							; Debug Table 0xd.0x2 = 0x56a,0x3
056b a5fe       |    |		Store_Unchecked	0x2,-0x2
056c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
056d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xd.0x3 = 0x56d,0x4
056e 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
056f 00db       |    |		Load_Top	At_Offset_3
0570 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0571 e00e       |    |		Load	0x0,0xe
0572 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0573 4801       |H   |		Short_Literal	0x1							; Debug Table 0xd.0x4 = 0x573,0x5
0574 00db       |    |		Load_Top	At_Offset_3
0575 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0576 4801       |H   |		Short_Literal	0x1							; Debug Table 0xd.0x5 = 0x576,0x6
0577 a5fe       |    |		Store_Unchecked	0x2,-0x2
0578 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0579 0000 0000  |    |		.BLANK	0000[0x7]
0580 ; --------------------------------------------------------------------------------------
0580 ; SUBPROGRAM
0580 ; --------------------------------------------------------------------------------------
0580 0583       |    |		.CONST	0x0583								; Address of begin
0581 0004       |    |		.CONST	0x0004								; Address of exception handler
0582 0001       |    |		.CONST	0x0001								; Number of locals
0583			BODY_0580:
0583			INIT_0580:
0583 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xe = .DEBUG	0x0583,0x16aa,0x0001,0x0000,0x0057,0x9795,0x0000,0x1288
													; Debug Table 0xe.0x0 = 0x583,0x1
0584 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0585 7007       |p   |		Jump_Nonzero	0x58d
0586 0092 10c6  |    |		Action	Push_String_Extended,0x10c6					; "menu passed to erase_menu is null"
													; Debug Table 0xe.0x1 = 0x586,0x2
0588 e006       |    |		Load	0x0,0x6
0589 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
058a 4800       |H   |		Short_Literal	0x0							; Debug Table 0xe.0x2 = 0x58a,0x3
058b a5fe       |    |		Store_Unchecked	0x2,-0x2
058c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
058d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xe.0x3 = 0x58d,0x4
058e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
058f 0217       |    |		Execute	Heap_Access,All_Reference
0590 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0591 e017       |    |		Load	0x0,0x17
0592 1869       | i  |		Execute	Package,Field_Execute,Field_Number 0x69
0593 00db       |    |		Load_Top	At_Offset_3
0594 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0595 0217       |    |		Execute	Heap_Access,All_Reference
0596 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0597 e5ff       |    |		Load	0x2,-0x1
0598 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0599 e018       |    |		Load	0x0,0x18
059a 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
059b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xe.0x4 = 0x59b,0x5
059c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
059d 0217       |    |		Execute	Heap_Access,All_Reference
059e 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
059f e00d       |    |		Load	0x0,0xd
05a0 1853       | S  |		Execute	Package,Field_Execute,Field_Number 0x53
05a1 4800       |H   |		Short_Literal	0x0							; Debug Table 0xe.0x5 = 0x5a1,0x6
05a2 00db       |    |		Load_Top	At_Offset_3
05a3 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
05a4 4801       |H   |		Short_Literal	0x1							; Debug Table 0xe.0x6 = 0x5a4,0x7
05a5 a5fe       |    |		Store_Unchecked	0x2,-0x2
05a6 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
05a7 0000       |    |		.XXX[0x1]
05a8 ; --------------------------------------------------------------------------------------
05a8 ; SUBPROGRAM
05a8 ; --------------------------------------------------------------------------------------
05a8 05ac       |    |		.CONST	0x05ac								; Address of begin
05a9 0004       |    |		.CONST	0x0004								; Address of exception handler
05aa 0002       |    |		.CONST	0x0002								; Number of locals
05ab			INIT_05a8:
05ab 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0xf = .DEBUG	0x05ab,0x16ba,0x0001,0x0000,0x0057,0x9795,0x0000,0x1294
													; Debug Table 0xf.0x0 = 0x5ab,0xffff
05ac			BODY_05a8:
05ac 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xf.0x1 = 0x5ac,0x1
05ad 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
05ae 7007       |p   |		Jump_Nonzero	0x5b6
05af 0092 10c7  |    |		Action	Push_String_Extended,0x10c7					; "menu passed to add_unit is null"
													; Debug Table 0xf.0x2 = 0x5af,0x2
05b1 e006       |    |		Load	0x0,0x6
05b2 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
05b3 4800       |H   |		Short_Literal	0x0							; Debug Table 0xf.0x3 = 0x5b3,0x3
05b4 a5fc       |    |		Store_Unchecked	0x2,-0x4
05b5 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
05b6 0007       |    |		Action	Break_Optional							; Debug Table 0xf.0x4 = 0x5b6,0x4
05b7 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xf.0x5 = 0x5b7,0x401
05b8 021d       |    |		Execute	Heap_Access,Is_Null
05b9 680a       |h   |		Jump_Zero	0x5c4							; Debug Table 0xf.0x6 = 0x5b9,0x4
05ba 4802       |H   |		Short_Literal	0x2							; Debug Table 0xf.0x7 = 0x5ba,0x5
05bb e5fd       |    |		Load	0x2,-0x3
05bc e5fe       |    |		Load	0x2,-0x2
05bd e5ff       |    |		Load	0x2,-0x1
05be 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
05bf 0217       |    |		Execute	Heap_Access,All_Reference
05c0 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
05c1 e00d       |    |		Load	0x0,0xd
05c2 185d       | ]  |		Execute	Package,Field_Execute,Field_Number 0x5d
05c3 7815       |x   |		Jump	0x5d9
05c4 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xf.0x8 = 0x5c4,0x6
05c5 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
05c6 0217       |    |		Execute	Heap_Access,All_Reference
05c7 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
05c8 e5fd       |    |		Load	0x2,-0x3
05c9 e015       |    |		Load	0x0,0x15
05ca 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
05cb 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
05cc 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xf.0x9 = 0x5cc,0x7
05cd e00d       |    |		Load	0x0,0xd
05ce 185b       | [  |		Execute	Package,Field_Execute,Field_Number 0x5b
05cf 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
05d0 4802       |H   |		Short_Literal	0x2							; Debug Table 0xf.0xa = 0x5d0,0x8
05d1 00d9       |    |		Load_Top	At_Offset_1
05d2 e5fe       |    |		Load	0x2,-0x2
05d3 e5ff       |    |		Load	0x2,-0x1
05d4 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
05d5 0217       |    |		Execute	Heap_Access,All_Reference
05d6 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
05d7 e00d       |    |		Load	0x0,0xd
05d8 185d       | ]  |		Execute	Package,Field_Execute,Field_Number 0x5d
05d9 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xf.0xb = 0x5d9,0x9
05da 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
05db 6806       |h   |		Jump_Zero	0x5e2
05dc 4801       |H   |		Short_Literal	0x1							; Debug Table 0xf.0xc = 0x5dc,0xa
05dd 4800       |H   |		Short_Literal	0x0
05de e5ff       |    |		Load	0x2,-0x1
05df 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
05e0 e00e       |    |		Load	0x0,0xe
05e1 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
05e2 4801       |H   |		Short_Literal	0x1							; Debug Table 0xf.0xd = 0x5e2,0xb
05e3 a5fc       |    |		Store_Unchecked	0x2,-0x4
05e4 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
05e5 0000 0000  |    |		.XXX[0x3]
05e7 0000       |    |
05e8 ; --------------------------------------------------------------------------------------
05e8 ; SUBPROGRAM
05e8 ; --------------------------------------------------------------------------------------
05e8 0601       |    |		.CONST	0x0601								; Address of begin
05e9 0695       |    |		.CONST	0x0695								; Address of exception handler
05ea 0008       |    |		.CONST	0x0008								; Number of locals
05eb			INIT_05e8:
05eb e016       |    |		Load	0x0,0x16							; Debug Table 0x10 = .DEBUG	0x05eb,0x16d8,0x0001,0x0000,0x0057,0x9795,0x0000,0x12ac
													; Debug Table 0x10.0x0 = 0x5eb,0xffff
05ec 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
05ed e016       |    |		Load	0x0,0x16							; Debug Table 0x10.0x1 = 0x5ed,0xfffe
05ee 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
05ef e01f       |    |		Load	0x0,0x1f							; Debug Table 0x10.0x2 = 0x5ef,0xfffd
05f0 0322       | "  |		Declare_Variable	Record
05f1 00d8       |    |		Load_Top	At_Offset_0
05f2 1c00       |    |		Execute_Immediate	Run_Utility,0x0
05f3 e003       |    |		Load	0x0,0x3								; Debug Table 0x10.0x3 = 0x5f3,0xfffc
05f4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
05f5 02c7       |    |		Declare_Variable	Any
05f6 00d8       |    |		Load_Top	At_Offset_0
05f7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
05f8 e004       |    |		Load	0x0,0x4								; Debug Table 0x10.0x4 = 0x5f8,0xfffb
05f9 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
05fa 02c7       |    |		Declare_Variable	Any
05fb 00d8       |    |		Load_Top	At_Offset_0
05fc 1c00       |    |		Execute_Immediate	Run_Utility,0x0
05fd 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x10.0x5 = 0x5fd,0xfffa
05fe 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
05ff 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x10.0x6 = 0x5ff,0xfff9
0600 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0601			BODY_05e8:
0601 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x10.0x7 = 0x601,0x1
0602 6818       |h   |		Jump_Zero	0x61b
0603 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0x8 = 0x603,0x2
0604 e405       |    |		Load	0x2,0x5
0605 e007       |    |		Load	0x0,0x7
0606 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0607 e008       |    |		Load	0x0,0x8
0608 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0609 e5fe       |    |		Load	0x2,-0x2
060a e009       |    |		Load	0x0,0x9
060b 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
060c e003       |    |		Load	0x0,0x3
060d 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
060e c405       |    |		Store	0x2,0x5
060f c406       |    |		Store	0x2,0x6
0610 4801       |H   |		Short_Literal	0x1							; Debug Table 0x10.0x9 = 0x610,0x3
0611 00db       |    |		Load_Top	At_Offset_3
0612 e004       |    |		Load	0x0,0x4
0613 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0614 6806       |h   |		Jump_Zero	0x61b
0615 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0xa = 0x615,0x4
0616 e004       |    |		Load	0x0,0x4
0617 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0618 e006       |    |		Load	0x0,0x6
0619 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
061a 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6					; Debug Table 0x10.0xb = 0x61a,0x5
061b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x10.0xc = 0x61b,0x6
061c 0217       |    |		Execute	Heap_Access,All_Reference
061d 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
061e a402       |    |		Store_Unchecked	0x2,0x2
061f e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x10.0xd = 0x61f,0x7
0620 0217       |    |		Execute	Heap_Access,All_Reference
0621 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0622 e017       |    |		Load	0x0,0x17
0623 1869       | i  |		Execute	Package,Field_Execute,Field_Number 0x69
0624 a403       |    |		Store_Unchecked	0x2,0x3
0625 782b       |x+  |		Jump	0x651
0626 e402       |    |		Load	0x2,0x2								; Debug Table 0x10.0xe = 0x626,0x9
0627 e5ff       |    |		Load	0x2,-0x1
0628 0217       |    |		Execute	Heap_Access,All_Reference
0629 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
062a e017       |    |		Load	0x0,0x17
062b 1868       | h  |		Execute	Package,Field_Execute,Field_Number 0x68
062c e404       |    |		Load	0x2,0x4
062d 017d       | }  |		Execute	Record,Structure_Write
062e e404       |    |		Load	0x2,0x4								; Debug Table 0x10.0xf = 0x62e,0xa
062f 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0630 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0631 681b       |h   |		Jump_Zero	0x64d
0632 e404       |    |		Load	0x2,0x4
0633 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0634 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
0635 e01d       |    |		Load	0x0,0x1d
0636 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0637 6815       |h   |		Jump_Zero	0x64d
0638 e020       |    |		Load	0x0,0x20
0639 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
063a e404       |    |		Load	0x2,0x4
063b 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
063c 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
063d e01d       |    |		Load	0x0,0x1d
063e 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
063f 0f02       |    |		Execute_Immediate	Equal,0x2
0640 680c       |h   |		Jump_Zero	0x64d
0641 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x10.0x10 = 0x641,0xb
0642 e5fc       |    |		Load	0x2,-0x4
0643 e5fd       |    |		Load	0x2,-0x3
0644 e405       |    |		Load	0x2,0x5
0645 e5fe       |    |		Load	0x2,-0x2
0646 e404       |    |		Load	0x2,0x4
0647 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0648 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
0649 8237       | 7  |		Call	0x1,0x37
064a 005a       | Z  |		Store_Top	Discrete,At_Offset_2
064b 4801       |H   |		Short_Literal	0x1							; Debug Table 0x10.0x11 = 0x64b,0xc
064c 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
064d e402       |    |		Load	0x2,0x2								; Debug Table 0x10.0x12 = 0x64d,0xd
064e e404       |    |		Load	0x2,0x4
064f 8021       | !  |		Call	0x0,0x21
0650 c402       |    |		Store	0x2,0x2
0651 e402       |    |		Load	0x2,0x2								; Debug Table 0x10.0x13 = 0x651,0x8
0652 e403       |    |		Load	0x2,0x3
0653 027a       | z  |		Execute	Discrete,Less_Equal
0654 77d1       |w   |		Jump_Nonzero	0x626
0655 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x10.0x14 = 0x655,0xe
0656 682c       |h,  |		Jump_Zero	0x683
0657 e5ff       |    |		Load	0x2,-0x1
0658 0217       |    |		Execute	Heap_Access,All_Reference
0659 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
065a 0f0b       |    |		Execute_Immediate	Equal,0xb
065b 6827       |h'  |		Jump_Zero	0x683
065c 4801       |H   |		Short_Literal	0x1							; Debug Table 0x10.0x15 = 0x65c,0xf
065d e5ff       |    |		Load	0x2,-0x1
065e 0217       |    |		Execute	Heap_Access,All_Reference
065f 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0660 e017       |    |		Load	0x0,0x17
0661 1868       | h  |		Execute	Package,Field_Execute,Field_Number 0x68
0662 e404       |    |		Load	0x2,0x4
0663 017d       | }  |		Execute	Record,Structure_Write
0664 e404       |    |		Load	0x2,0x4								; Debug Table 0x10.0x16 = 0x664,0x10
0665 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0666 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0667 681b       |h   |		Jump_Zero	0x683
0668 e404       |    |		Load	0x2,0x4
0669 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
066a 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
066b e01d       |    |		Load	0x0,0x1d
066c 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
066d 6815       |h   |		Jump_Zero	0x683
066e e020       |    |		Load	0x0,0x20
066f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0670 e404       |    |		Load	0x2,0x4
0671 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0672 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
0673 e01d       |    |		Load	0x0,0x1d
0674 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0675 0f02       |    |		Execute_Immediate	Equal,0x2
0676 680c       |h   |		Jump_Zero	0x683
0677 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x10.0x17 = 0x677,0x11
0678 e5fc       |    |		Load	0x2,-0x4
0679 e5fd       |    |		Load	0x2,-0x3
067a e405       |    |		Load	0x2,0x5
067b e5fe       |    |		Load	0x2,-0x2
067c e404       |    |		Load	0x2,0x4
067d 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
067e 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
067f 8237       | 7  |		Call	0x1,0x37
0680 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0681 4801       |H   |		Short_Literal	0x1							; Debug Table 0x10.0x18 = 0x681,0x12
0682 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0683 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x10.0x19 = 0x683,0x13
0684 7005       |p   |		Jump_Nonzero	0x68a
0685 0092 10c8  |    |		Action	Push_String_Extended,0x10c8					; "no source units found in the display"
													; Debug Table 0x10.0x1a = 0x685,0x14
0687 e006       |    |		Load	0x0,0x6
0688 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0689 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
068a 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x10.0x1b = 0x68a,0x15
068b 7005       |p   |		Jump_Nonzero	0x691
068c 0092 10c9  |    |		Action	Push_String_Extended,0x10c9					; "no matches found"
													; Debug Table 0x10.0x1c = 0x68c,0x16
068e e006       |    |		Load	0x0,0x6
068f 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0690 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0691 e012       |    |		Load	0x0,0x12							; Debug Table 0x10.0x1d = 0x691,0x17
0692 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0693 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0694 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0695			TRAP_05e8:
0695 658a       |e   |		Indirect_Literal	Discrete,0x420,{0x00000000, 0x57979502}
0696 010f       |    |		Execute	Exception,Equal
0697 6801       |h   |		Jump_Zero	0x699
0698 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6					; Debug Table 0x10.0x1e = 0x698,0x18
0699 0100       |    |		Execute	Exception,Raise
069a 0000 0000  |    |		.BLANK	0000[0x6]
06a0 ; --------------------------------------------------------------------------------------
06a0 ; SUBPROGRAM
06a0 ; --------------------------------------------------------------------------------------
06a0 06b4       |    |		.CONST	0x06b4								; Address of begin
06a1 0722       | "  |		.CONST	0x0722								; Address of exception handler
06a2 0007       |    |		.CONST	0x0007								; Number of locals
06a3			INIT_06a0:
06a3 e002       |    |		Load	0x0,0x2								; Debug Table 0x11 = .DEBUG	0x06a3,0x1718,0x0001,0x0000,0x0057,0x9795,0x0000,0x12c4
													; Debug Table 0x11.0x0 = 0x6a3,0xffff
06a4 0007       |    |		Action	Break_Optional
06a5 e010       |    |		Load	0x0,0x10							; Debug Table 0x11.0x1 = 0x6a5,0xfffe
06a6 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
06a7 0322       | "  |		Declare_Variable	Record
06a8 00d8       |    |		Load_Top	At_Offset_0
06a9 1c00       |    |		Execute_Immediate	Run_Utility,0x0
06aa 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x11.0x2 = 0x6aa,0xfffd
06ab e016       |    |		Load	0x0,0x16							; Debug Table 0x11.0x3 = 0x6ab,0xfffc
06ac 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
06ad 0322       | "  |		Declare_Variable	Record
06ae 00d8       |    |		Load_Top	At_Offset_0
06af 1c00       |    |		Execute_Immediate	Run_Utility,0x0
06b0 e016       |    |		Load	0x0,0x16							; Debug Table 0x11.0x4 = 0x6b0,0xfffb
06b1 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
06b2 e016       |    |		Load	0x0,0x16							; Debug Table 0x11.0x5 = 0x6b2,0xfffa
06b3 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
06b4			BODY_06a0:
06b4 e002       |    |		Load	0x0,0x2								; Debug Table 0x11.0x6 = 0x6b4,0x1
06b5 e00b       |    |		Load	0x0,0xb
06b6 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
06b7 c402       |    |		Store	0x2,0x2
06b8 e017       |    |		Load	0x0,0x17							; Debug Table 0x11.0x7 = 0x6b8,0x2
06b9 1858       | X  |		Execute	Package,Field_Execute,Field_Number 0x58
06ba 00db       |    |		Load_Top	At_Offset_3
06bb 017d       | }  |		Execute	Record,Structure_Write
06bc 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x11.0x8 = 0x6bc,0x3
06bd e017       |    |		Load	0x0,0x17
06be 1881       |    |		Execute	Package,Field_Execute,Field_Number 0x81
06bf 4603       |F   |		Jump_Case	0x4
06c0 7810       |x   |		Jump	0x6d1								; case 0x0
06c1 7802       |x   |		Jump	0x6c4								; case 0x1
06c2 781a       |x   |		Jump	0x6dd								; case 0x2
06c3 7800       |x   |		Jump	0x6c4								; case 0x3
06c4 e402       |    |		Load	0x2,0x2								; Debug Table 0x11.0x9 = 0x6c4,0x4
06c5 0217       |    |		Execute	Heap_Access,All_Reference
06c6 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
06c7 e403       |    |		Load	0x2,0x3
06c8 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
06c9 e402       |    |		Load	0x2,0x2								; Debug Table 0x11.0xa = 0x6c9,0x5
06ca 0217       |    |		Execute	Heap_Access,All_Reference
06cb 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
06cc e017       |    |		Load	0x0,0x17
06cd 1869       | i  |		Execute	Package,Field_Execute,Field_Number 0x69
06ce e403       |    |		Load	0x2,0x3
06cf 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
06d0 781c       |x   |		Jump	0x6ed
06d1 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x11.0xb = 0x6d1,0x6
06d2 e017       |    |		Load	0x0,0x17
06d3 185b       | [  |		Execute	Package,Field_Execute,Field_Number 0x5b
06d4 e017       |    |		Load	0x0,0x17
06d5 185d       | ]  |		Execute	Package,Field_Execute,Field_Number 0x5d
06d6 e403       |    |		Load	0x2,0x3
06d7 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
06d8 e403       |    |		Load	0x2,0x3								; Debug Table 0x11.0xc = 0x6d8,0x7
06d9 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
06da e403       |    |		Load	0x2,0x3
06db 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
06dc 7810       |x   |		Jump	0x6ed
06dd e016       |    |		Load	0x0,0x16							; Debug Table 0x11.0xd = 0x6dd,0x8
06de 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
06df e016       |    |		Load	0x0,0x16
06e0 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
06e1 e405       |    |		Load	0x2,0x5
06e2 e402       |    |		Load	0x2,0x2
06e3 e01b       |    |		Load	0x0,0x1b
06e4 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
06e5 005b       | [  |		Store_Top	Discrete,At_Offset_3
06e6 0059       | Y  |		Store_Top	Discrete,At_Offset_1
06e7 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x11.0xe = 0x6e7,0x9
06e8 e403       |    |		Load	0x2,0x3
06e9 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
06ea 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0xf = 0x6ea,0xa
06eb e403       |    |		Load	0x2,0x3
06ec 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
06ed e403       |    |		Load	0x2,0x3								; Debug Table 0x11.0x10 = 0x6ed,0xb
06ee 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
06ef e403       |    |		Load	0x2,0x3
06f0 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
06f1 e403       |    |		Load	0x2,0x3								; Debug Table 0x11.0x11 = 0x6f1,0xc
06f2 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
06f3 e402       |    |		Load	0x2,0x2
06f4 0217       |    |		Execute	Heap_Access,All_Reference
06f5 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
06f6 e017       |    |		Load	0x0,0x17
06f7 1869       | i  |		Execute	Package,Field_Execute,Field_Number 0x69
06f8 027d       | }  |		Execute	Discrete,Greater
06f9 6804       |h   |		Jump_Zero	0x6fe
06fa 4801       |H   |		Short_Literal	0x1							; Debug Table 0x11.0x12 = 0x6fa,0xd
06fb e403       |    |		Load	0x2,0x3
06fc 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
06fd 781b       |x   |		Jump	0x719
06fe 4800       |H   |		Short_Literal	0x0							; Debug Table 0x11.0x13 = 0x6fe,0xe
06ff e403       |    |		Load	0x2,0x3
0700 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0701 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x11.0x14 = 0x701,0xf
0702 e403       |    |		Load	0x2,0x3
0703 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0704 e402       |    |		Load	0x2,0x2								; Debug Table 0x11.0x15 = 0x704,0x10
0705 e403       |    |		Load	0x2,0x3
0706 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0707 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x11.0x16 = 0x707,0x11
0708 e403       |    |		Load	0x2,0x3
0709 e402       |    |		Load	0x2,0x2
070a 0217       |    |		Execute	Heap_Access,All_Reference
070b 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
070c e402       |    |		Load	0x2,0x2
070d 0217       |    |		Execute	Heap_Access,All_Reference
070e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
070f e017       |    |		Load	0x0,0x17
0710 1868       | h  |		Execute	Package,Field_Execute,Field_Number 0x68
0711 823b       | ;  |		Call	0x1,0x3b
0712 00d1       |    |		Pop_Control	Pop_Count_1
0713 c404       |    |		Store	0x2,0x4
0714 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x11.0x17 = 0x714,0x12
0715 7003       |p   |		Jump_Nonzero	0x719
0716 e403       |    |		Load	0x2,0x3								; Debug Table 0x11.0x18 = 0x716,0x13
0717 821d       |    |		Call	0x1,0x1d
0718 00d1       |    |		Pop_Control	Pop_Count_1
0719 e403       |    |		Load	0x2,0x3								; Debug Table 0x11.0x19 = 0x719,0x14
071a e5fe       |    |		Load	0x2,-0x2
071b 017d       | }  |		Execute	Record,Structure_Write
071c 4801       |H   |		Short_Literal	0x1							; Debug Table 0x11.0x1a = 0x71c,0x15
071d a5fd       |    |		Store_Unchecked	0x2,-0x3
071e e402       |    |		Load	0x2,0x2								; Debug Table 0x11.0x1b = 0x71e,0x16
071f e00b       |    |		Load	0x0,0xb
0720 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0721 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0722			TRAP_06a0:
0722 600d       |`   |		Indirect_Literal	Discrete,0x730,{0x00000000, 0x57979503}
0723 010f       |    |		Execute	Exception,Equal
0724 6801       |h   |		Jump_Zero	0x726
0725 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x11.0x1c = 0x725,0x17
0726 64f9       |d   |		Indirect_Literal	Discrete,0x420,{0x00000000, 0x57979502}
0727 010f       |    |		Execute	Exception,Equal
0728 6806       |h   |		Jump_Zero	0x72f
0729 4800       |H   |		Short_Literal	0x0							; Debug Table 0x11.0x1d = 0x729,0x18
072a a5fd       |    |		Store_Unchecked	0x2,-0x3
072b e403       |    |		Load	0x2,0x3								; Debug Table 0x11.0x1e = 0x72b,0x19
072c e5fe       |    |		Load	0x2,-0x2
072d 017d       | }  |		Execute	Record,Structure_Write
072e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
072f 0100       |    |		Execute	Exception,Raise
0730 0000 0000  |    |		.LITERAL	{0x00000000, 0x57979503}
0734 0000 0000  |    |		.BLANK	0000[0x4]
0738 ; --------------------------------------------------------------------------------------
0738 ; SUBPROGRAM
0738 ; --------------------------------------------------------------------------------------
0738 0742       | B  |		.CONST	0x0742								; Address of begin
0739 0004       |    |		.CONST	0x0004								; Address of exception handler
073a 0004       |    |		.CONST	0x0004								; Number of locals
073b			INIT_0738:
073b e016       |    |		Load	0x0,0x16							; Debug Table 0x12 = .DEBUG	0x073b,0x1758,0x0001,0x0000,0x0057,0x9795,0x0000,0x12d4
													; Debug Table 0x12.0x0 = 0x73b,0xffff
073c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
073d e01f       |    |		Load	0x0,0x1f							; Debug Table 0x12.0x1 = 0x73d,0xfffe
073e 0322       | "  |		Declare_Variable	Record
073f 00d8       |    |		Load_Top	At_Offset_0
0740 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0741 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x12.0x2 = 0x741,0xfffd
0742			BODY_0738:
0742 0007       |    |		Action	Break_Optional							; Debug Table 0x12.0x3 = 0x742,0x1
0743 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x12.0x4 = 0x743,0x2
0744 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0745 e016       |    |		Load	0x0,0x16
0746 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0747 025b       | [  |		Execute	Discrete,Check_In_Type
0748 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0749 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x12.0x5 = 0x749,0x3
074a e5ff       |    |		Load	0x2,-0x1
074b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
074c 0217       |    |		Execute	Heap_Access,All_Reference
074d 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
074e e017       |    |		Load	0x0,0x17
074f 1868       | h  |		Execute	Package,Field_Execute,Field_Number 0x68
0750 00da       |    |		Load_Top	At_Offset_2
0751 017d       | }  |		Execute	Record,Structure_Write
0752 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x12.0x6 = 0x752,0x4
0753 00da       |    |		Load_Top	At_Offset_2
0754 8021       | !  |		Call	0x0,0x21
0755 005b       | [  |		Store_Top	Discrete,At_Offset_3
0756 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x12.0x7 = 0x756,0x5
0757 e5ff       |    |		Load	0x2,-0x1
0758 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0759 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x12.0x8 = 0x759,0x6
075a 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
075b e5ff       |    |		Load	0x2,-0x1
075c 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
075d 027d       | }  |		Execute	Discrete,Greater
075e 6804       |h   |		Jump_Zero	0x763
075f 4801       |H   |		Short_Literal	0x1							; Debug Table 0x12.0x9 = 0x75f,0x7
0760 e5ff       |    |		Load	0x2,-0x1
0761 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0762 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x12.0xa = 0x762,0x8
0763 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x12.0xb = 0x763,0x9
0764 e5ff       |    |		Load	0x2,-0x1
0765 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0766 0217       |    |		Execute	Heap_Access,All_Reference
0767 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0768 e017       |    |		Load	0x0,0x17
0769 1868       | h  |		Execute	Package,Field_Execute,Field_Number 0x68
076a 00da       |    |		Load_Top	At_Offset_2
076b 017d       | }  |		Execute	Record,Structure_Write
076c 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x12.0xc = 0x76c,0xa
076d e5ff       |    |		Load	0x2,-0x1
076e 00db       |    |		Load_Top	At_Offset_3
076f 823b       | ;  |		Call	0x1,0x3b
0770 00d1       |    |		Pop_Control	Pop_Count_1
0771 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0772 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0xd = 0x772,0xb
0773 6fcf       |o   |		Jump_Zero	0x743
0774 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x12.0xe = 0x774,0xc
0775 0000 0000  |    |		.XXX[0x3]
0777 0000       |    |
0778 ; --------------------------------------------------------------------------------------
0778 ; SUBPROGRAM
0778 ; --------------------------------------------------------------------------------------
0778 078e       |    |		.CONST	0x078e								; Address of begin
0779 0004       |    |		.CONST	0x0004								; Address of exception handler
077a 0003       |    |		.CONST	0x0003								; Number of locals
077b			INIT_0778:
077b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x13 = .DEBUG	0x077b,0x1778,0x0002,0x0000,0x0057,0x9795,0x0000,0x12dc
													; Debug Table 0x13.0x0 = 0x77b,0xffff
077c 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
077d e016       |    |		Load	0x0,0x16
077e 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
077f 025b       | [  |		Execute	Discrete,Check_In_Type
0780 e016       |    |		Load	0x0,0x16
0781 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0782 03f1       |    |		Declare_Variable	Discrete,With_Value
0783 e01f       |    |		Load	0x0,0x1f							; Debug Table 0x13.0x1 = 0x783,0xfffe
0784 0322       | "  |		Declare_Variable	Record
0785 00d9       |    |		Load_Top	At_Offset_1
0786 e5ff       |    |		Load	0x2,-0x1
0787 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0788 0217       |    |		Execute	Heap_Access,All_Reference
0789 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
078a e017       |    |		Load	0x0,0x17
078b 1868       | h  |		Execute	Package,Field_Execute,Field_Number 0x68
078c 00d9       |    |		Load_Top	At_Offset_1
078d 017d       | }  |		Execute	Record,Structure_Write
078e			BODY_0778:
078e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x13.0x2 = 0x78e,0x1
078f e01b       |    |		Load	0x0,0x1b
0790 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0791 7003       |p   |		Jump_Nonzero	0x795
0792 0007       |    |		Action	Break_Optional							; Debug Table 0x13.0x3 = 0x792,0x2
0793 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x13.0x4 = 0x793,0x401
0794 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1				; Debug Table 0x13.0x5 = 0x794,0x2
0795 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x13.0x6 = 0x795,0x3
0796 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0797 0217       |    |		Execute	Heap_Access,All_Reference
0798 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0799 e022       | "  |		Load	0x0,0x22
079a 0260       | `  |		Execute	Discrete,In_Type
079b 6809       |h   |		Jump_Zero	0x7a5
079c e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x13.0x7 = 0x79c,0x4
079d 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
079e 0217       |    |		Execute	Heap_Access,All_Reference
079f 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
07a0 00d9       |    |		Load_Top	At_Offset_1
07a1 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
07a2 e00d       |    |		Load	0x0,0xd
07a3 183c       | <  |		Execute	Package,Field_Execute,Field_Number 0x3c
07a4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07a5 4802       |H   |		Short_Literal	0x2							; Debug Table 0x13.0x8 = 0x7a5,0x5
07a6 00d9       |    |		Load_Top	At_Offset_1
07a7 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
07a8 e00d       |    |		Load	0x0,0xd
07a9 183c       | <  |		Execute	Package,Field_Execute,Field_Number 0x3c
07aa 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07ab 0000 0000  |    |		.BLANK	0000[0x5]
07b0 ; --------------------------------------------------------------------------------------
07b0 ; SUBPROGRAM
07b0 ; --------------------------------------------------------------------------------------
07b0 07ba       |    |		.CONST	0x07ba								; Address of begin
07b1 0004       |    |		.CONST	0x0004								; Address of exception handler
07b2 0004       |    |		.CONST	0x0004								; Number of locals
07b3			INIT_07b0:
07b3 e01c       |    |		Load	0x0,0x1c							; Debug Table 0x14 = .DEBUG	0x07b3,0x178c,0x0002,0x0000,0x0057,0x9795,0x0000,0x12e7
													; Debug Table 0x14.0x0 = 0x7b3,0xffff
07b4 0007       |    |		Action	Break_Optional
07b5 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x14.0x1 = 0x7b5,0xfffe
07b6 e002       |    |		Load	0x0,0x2								; Debug Table 0x14.0x2 = 0x7b6,0xfffd
07b7 e5ff       |    |		Load	0x2,-0x1
07b8 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
07b9 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
07ba			BODY_07b0:
07ba 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x14.0x3 = 0x7ba,0x1
07bb 0217       |    |		Execute	Heap_Access,All_Reference
07bc 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
07bd e022       | "  |		Load	0x0,0x22
07be 025f       | _  |		Execute	Discrete,Not_In_Type
07bf 6806       |h   |		Jump_Zero	0x7c6
07c0 4801       |H   |		Short_Literal	0x1							; Debug Table 0x14.0x4 = 0x7c0,0x2
07c1 4800       |H   |		Short_Literal	0x0
07c2 e010       |    |		Load	0x0,0x10
07c3 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
07c4 0334       | 4  |		Declare_Variable	Array,With_Constraint
07c5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07c6 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x14.0x5 = 0x7c6,0x3
07c7 0217       |    |		Execute	Heap_Access,All_Reference
07c8 3c1c       |<   |		Execute	Record,Field_Read,Field_Number 0x1c
07c9 0217       |    |		Execute	Heap_Access,All_Reference
07ca 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
07cb 6854       |hT  |		Jump_Zero	0x820
07cc 4802       |H   |		Short_Literal	0x2							; Debug Table 0x14.0x6 = 0x7cc,0x4
07cd 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
07ce 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x14.0x7 = 0x7ce,0x5
07cf 0217       |    |		Execute	Heap_Access,All_Reference
07d0 3c1c       |<   |		Execute	Record,Field_Read,Field_Number 0x1c
07d1 0217       |    |		Execute	Heap_Access,All_Reference
07d2 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
07d3 0217       |    |		Execute	Heap_Access,All_Reference
07d4 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
07d5 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
07d6 7808       |x   |		Jump	0x7df
07d7 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x14.0x8 = 0x7d7,0x7
07d8 0a01       |    |		Execute_Immediate	Plus,0x1
07d9 0248       | H  |		Execute	Discrete,Check_In_Integer
07da 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
07db 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x14.0x9 = 0x7db,0x8
07dc 0217       |    |		Execute	Heap_Access,All_Reference
07dd 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
07de 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
07df 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x14.0xa = 0x7df,0x6
07e0 77f6       |w   |		Jump_Nonzero	0x7d7
07e1 0007       |    |		Action	Break_Optional							; Debug Table 0x14.0xb = 0x7e1,0x9
07e2 4801       |H   |		Short_Literal	0x1							; Debug Table 0x14.0xc = 0x7e2,0xfbff
07e3 00da       |    |		Load_Top	At_Offset_2
07e4 e010       |    |		Load	0x0,0x10
07e5 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
07e6 0334       | 4  |		Declare_Variable	Array,With_Constraint
07e7 00d8       |    |		Load_Top	At_Offset_0
07e8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
07e9 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x14.0xd = 0x7e9,0x401
07ea 0217       |    |		Execute	Heap_Access,All_Reference
07eb 3c1c       |<   |		Execute	Record,Field_Read,Field_Number 0x1c
07ec a402       |    |		Store_Unchecked	0x2,0x2
07ed 4801       |H   |		Short_Literal	0x1							; Debug Table 0x14.0xe = 0x7ed,0x402
07ee 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
07ef 0007       |    |		Action	Break_Optional							; Debug Table 0x14.0xf = 0x7ef,0x403
07f0 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x14.0x10 = 0x7f0,0x404
07f1 0217       |    |		Execute	Heap_Access,All_Reference
07f2 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
07f3 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
07f4 6811       |h   |		Jump_Zero	0x806
07f5 4801       |H   |		Short_Literal	0x1							; Debug Table 0x14.0x11 = 0x7f5,0x405
07f6 e010       |    |		Load	0x0,0x10
07f7 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
07f8 1c08       |    |		Execute_Immediate	Run_Utility,0x8
07f9 e402       |    |		Load	0x2,0x2
07fa 0217       |    |		Execute	Heap_Access,All_Reference
07fb 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
07fc 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
07fd e001       |    |		Load	0x0,0x1
07fe 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
07ff 0119       |    |		Execute	Any,Check_In_Formal_Type
0800 00d9       |    |		Load_Top	At_Offset_1
0801 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
0802 00db       |    |		Load_Top	At_Offset_3
0803 00da       |    |		Load_Top	At_Offset_2
0804 01d6       |    |		Execute	Vector,Field_Write
0805 780d       |x   |		Jump	0x813
0806 4800       |H   |		Short_Literal	0x0							; Debug Table 0x14.0x12 = 0x806,0x406
0807 e010       |    |		Load	0x0,0x10
0808 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
0809 1c08       |    |		Execute_Immediate	Run_Utility,0x8
080a e402       |    |		Load	0x2,0x2
080b 0217       |    |		Execute	Heap_Access,All_Reference
080c 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
080d 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
080e 00d9       |    |		Load_Top	At_Offset_1
080f 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
0810 00db       |    |		Load_Top	At_Offset_3
0811 00da       |    |		Load_Top	At_Offset_2
0812 01d6       |    |		Execute	Vector,Field_Write
0813 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x14.0x13 = 0x813,0x407
0814 0217       |    |		Execute	Heap_Access,All_Reference
0815 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0816 a402       |    |		Store_Unchecked	0x2,0x2
0817 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x14.0x14 = 0x817,0x408
0818 6805       |h   |		Jump_Zero	0x81e
0819 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x14.0x15 = 0x819,0x409
081a 0a01       |    |		Execute_Immediate	Plus,0x1
081b 0248       | H  |		Execute	Discrete,Check_In_Integer
081c 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
081d 7fd2       |    |		Jump	0x7f0
081e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x14.0x16 = 0x81e,0x40a
081f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0820 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x14.0x17 = 0x820,0xa
0821 0217       |    |		Execute	Heap_Access,All_Reference
0822 3c1c       |<   |		Execute	Record,Field_Read,Field_Number 0x1c
0823 0217       |    |		Execute	Heap_Access,All_Reference
0824 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0825 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0826 6818       |h   |		Jump_Zero	0x83f
0827 4801       |H   |		Short_Literal	0x1							; Debug Table 0x14.0x18 = 0x827,0xb
0828 4801       |H   |		Short_Literal	0x1
0829 e010       |    |		Load	0x0,0x10
082a 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
082b 0334       | 4  |		Declare_Variable	Array,With_Constraint
082c 4801       |H   |		Short_Literal	0x1
082d e010       |    |		Load	0x0,0x10
082e 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
082f 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0830 00da       |    |		Load_Top	At_Offset_2
0831 0217       |    |		Execute	Heap_Access,All_Reference
0832 3c1c       |<   |		Execute	Record,Field_Read,Field_Number 0x1c
0833 0217       |    |		Execute	Heap_Access,All_Reference
0834 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0835 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
0836 e001       |    |		Load	0x0,0x1
0837 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0838 0119       |    |		Execute	Any,Check_In_Formal_Type
0839 00d9       |    |		Load_Top	At_Offset_1
083a 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
083b 4801       |H   |		Short_Literal	0x1
083c 00da       |    |		Load_Top	At_Offset_2
083d 01d6       |    |		Execute	Vector,Field_Write
083e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
083f 4801       |H   |		Short_Literal	0x1							; Debug Table 0x14.0x19 = 0x83f,0xc
0840 4801       |H   |		Short_Literal	0x1
0841 e010       |    |		Load	0x0,0x10
0842 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
0843 0334       | 4  |		Declare_Variable	Array,With_Constraint
0844 4800       |H   |		Short_Literal	0x0
0845 e010       |    |		Load	0x0,0x10
0846 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
0847 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0848 00da       |    |		Load_Top	At_Offset_2
0849 0217       |    |		Execute	Heap_Access,All_Reference
084a 3c1c       |<   |		Execute	Record,Field_Read,Field_Number 0x1c
084b 0217       |    |		Execute	Heap_Access,All_Reference
084c 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
084d 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
084e 00d9       |    |		Load_Top	At_Offset_1
084f 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
0850 4801       |H   |		Short_Literal	0x1
0851 00da       |    |		Load_Top	At_Offset_2
0852 01d6       |    |		Execute	Vector,Field_Write
0853 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0854 0000 0000  |    |		.BLANK	0000[0x4]
0858 ; --------------------------------------------------------------------------------------
0858 ; SUBPROGRAM
0858 ; --------------------------------------------------------------------------------------
0858 085b       | [  |		.CONST	0x085b								; Address of begin
0859 0004       |    |		.CONST	0x0004								; Address of exception handler
085a 0001       |    |		.CONST	0x0001								; Number of locals
085b			BODY_0858:
085b			INIT_0858:
085b 4608       |F   |		Jump_Case	0x9							; Debug Table 0x15 = .DEBUG	0x085b,0x17c2,0x0005,0x0000,0x0057,0x98e5,0x0000,0x0038
085c 7808       |x   |		Jump	0x865								; case 0x0
085d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
085e 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
085f 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
0860 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
0861 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
0862 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
0863 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x7
0864 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x8
0865 00da       |    |		Load_Top	At_Offset_2
0866 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0867 0125       | %  |		Execute	Any,Set_Constraint
0868 00da       |    |		Load_Top	At_Offset_2
0869 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
086a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
086b 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
086c 0000 0000  |    |		.BLANK	0000[0x4]
0870 ; --------------------------------------------------------------------------------------
0870 ; SUBPROGRAM
0870 ; --------------------------------------------------------------------------------------
0870 0873       | s  |		.CONST	0x0873								; Address of begin
0871 0004       |    |		.CONST	0x0004								; Address of exception handler
0872 0001       |    |		.CONST	0x0001								; Number of locals
0873			BODY_0870:
0873			INIT_0870:
0873 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x16 = .DEBUG	0x0873,0x17c4,0x0002,0x0000,0x0057,0x98e5,0x0000,0x0059
													; Debug Table 0x16.0x0 = 0x873,0x1
0874 01d9       |    |		Execute	Vector,Reverse_Bounds
0875 0263       | c  |		Execute	Discrete,Above_Bound
0876 7019       |p   |		Jump_Nonzero	0x890
0877 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x16.0x1 = 0x877,0x2
0878 e5ff       |    |		Load	0x2,-0x1
0879 01d7       |    |		Execute	Vector,Field_Read
087a 0b20       |    |		Execute_Immediate	Case_Compare,0x20
087b 7012       |p   |		Jump_Nonzero	0x88e
087c 0b2d       | -  |		Execute_Immediate	Case_Compare,0x2d
087d 7002       |p   |		Jump_Nonzero	0x880
087e 4800       |H   |		Short_Literal	0x0							; Debug Table 0x16.0x2 = 0x87e,0x5
087f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0880 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x16.0x3 = 0x880,0x4
0881 e5ff       |    |		Load	0x2,-0x1
0882 01dc       |    |		Execute	Vector,Last
0883 027c       | |  |		Execute	Discrete,Less
0884 6807       |h   |		Jump_Zero	0x88c
0885 00d9       |    |		Load_Top	At_Offset_1
0886 0a01       |    |		Execute_Immediate	Plus,0x1
0887 0248       | H  |		Execute	Discrete,Check_In_Integer
0888 e5ff       |    |		Load	0x2,-0x1
0889 01d7       |    |		Execute	Vector,Field_Read
088a 0f2d       | -  |		Execute_Immediate	Equal,0x2d
088b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
088c 4800       |H   |		Short_Literal	0x0
088d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
088e 00d1       |    |		Pop_Control	Pop_Count_1
088f 3fe7       |?   |		Loop_Increasing	0x877
0890 4800       |H   |		Short_Literal	0x0							; Debug Table 0x16.0x4 = 0x890,0x6
0891 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0892 0000 0000  |    |		.BLANK	0000[0x6]
0898 ; --------------------------------------------------------------------------------------
0898 ; SUBPROGRAM
0898 ; --------------------------------------------------------------------------------------
0898 089c       |    |		.CONST	0x089c								; Address of begin
0899 0004       |    |		.CONST	0x0004								; Address of exception handler
089a 0002       |    |		.CONST	0x0002								; Number of locals
089b			INIT_0898:
089b 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x17 = .DEBUG	0x089b,0x17d0,0x0001,0x0000,0x0057,0x98e5,0x0000,0x009a
													; Debug Table 0x17.0x0 = 0x89b,0xffff
089c			BODY_0898:
089c e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x17.0x1 = 0x89c,0x1
089d 01db       |    |		Execute	Vector,Length
089e 681e       |h   |		Jump_Zero	0x8bd
089f e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x17.0x2 = 0x89f,0x2
08a0 e018       |    |		Load	0x0,0x18
08a1 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
08a2 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
08a3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0x3 = 0x8a3,0x3
08a4 e016       |    |		Load	0x0,0x16
08a5 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
08a6 025b       | [  |		Execute	Discrete,Check_In_Type
08a7 0a01       |    |		Execute_Immediate	Plus,0x1
08a8 e5ff       |    |		Load	0x2,-0x1
08a9 0217       |    |		Execute	Heap_Access,All_Reference
08aa 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
08ab 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0x4 = 0x8ab,0x4
08ac e016       |    |		Load	0x0,0x16
08ad 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
08ae 025b       | [  |		Execute	Discrete,Check_In_Type
08af 0a02       |    |		Execute_Immediate	Plus,0x2
08b0 e5ff       |    |		Load	0x2,-0x1
08b1 0217       |    |		Execute	Heap_Access,All_Reference
08b2 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
08b3 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x17.0x5 = 0x8b3,0x5
08b4 e023       | #  |		Load	0x0,0x23
08b5 e5ff       |    |		Load	0x2,-0x1
08b6 0217       |    |		Execute	Heap_Access,All_Reference
08b7 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
08b8 0396       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Value
08b9 e5ff       |    |		Load	0x2,-0x1
08ba 0217       |    |		Execute	Heap_Access,All_Reference
08bb 381f       |8   |		Execute	Record,Field_Write,Field_Number 0x1f
08bc 7808       |x   |		Jump	0x8c5								; Debug Table 0x17.0x6 = 0x8bc,0x6
08bd 4800       |H   |		Short_Literal	0x0							; Debug Table 0x17.0x7 = 0x8bd,0x7
08be e5ff       |    |		Load	0x2,-0x1
08bf 0217       |    |		Execute	Heap_Access,All_Reference
08c0 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
08c1 4801       |H   |		Short_Literal	0x1							; Debug Table 0x17.0x8 = 0x8c1,0x8
08c2 e5ff       |    |		Load	0x2,-0x1
08c3 0217       |    |		Execute	Heap_Access,All_Reference
08c4 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
08c5 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x17.0x9 = 0x8c5,0x9
08c6 e023       | #  |		Load	0x0,0x23
08c7 e5ff       |    |		Load	0x2,-0x1
08c8 0217       |    |		Execute	Heap_Access,All_Reference
08c9 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
08ca 0396       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Value
08cb e5ff       |    |		Load	0x2,-0x1
08cc 0217       |    |		Execute	Heap_Access,All_Reference
08cd 3820       |8   |		Execute	Record,Field_Write,Field_Number 0x20
08ce 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x17.0xa = 0x8ce,0xa
08cf 0000       |    |		.XXX[0x1]
08d0 ; --------------------------------------------------------------------------------------
08d0 ; SUBPROGRAM
08d0 ; --------------------------------------------------------------------------------------
08d0 08d3       |    |		.CONST	0x08d3								; Address of begin
08d1 0004       |    |		.CONST	0x0004								; Address of exception handler
08d2 0001       |    |		.CONST	0x0001								; Number of locals
08d3			BODY_08d0:
08d3			INIT_08d0:
08d3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x18 = .DEBUG	0x08d3,0x17e8,0x0002,0x0000,0x0057,0x98e5,0x0000,0x0294
													; Debug Table 0x18.0x0 = 0x8d3,0x1
08d4 e001       |    |		Load	0x0,0x1
08d5 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
08d6 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
08d7 7002       |p   |		Jump_Nonzero	0x8da
08d8 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x18.0x1 = 0x8d8,0x2
08d9 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
08da 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x18.0x2 = 0x8da,0x3
08db e00d       |    |		Load	0x0,0xd
08dc 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
08dd 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
08de 0000 0000  |    |		.XXX[0x2]
08e0 ; --------------------------------------------------------------------------------------
08e0 ; SUBPROGRAM
08e0 ; --------------------------------------------------------------------------------------
08e0 08e9       |    |		.CONST	0x08e9								; Address of begin
08e1 0004       |    |		.CONST	0x0004								; Address of exception handler
08e2 0003       |    |		.CONST	0x0003								; Number of locals
08e3			INIT_08e0:
08e3 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x19 = .DEBUG	0x08e3,0x17f0,0x0001,0x0000,0x0057,0x98e5,0x0000,0x02c3
													; Debug Table 0x19.0x0 = 0x8e3,0xffff
08e4 00db       |    |		Load_Top	At_Offset_3
08e5 e00d       |    |		Load	0x0,0xd
08e6 185a       | Z  |		Execute	Package,Field_Execute,Field_Number 0x5a
08e7 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
08e8 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x19.0x1 = 0x8e8,0xfffe
08e9			BODY_08e0:
08e9 0092 10ca  |    |		Action	Push_String_Extended,0x10ca					; "  "
													; Debug Table 0x19.0x2 = 0x8e9,0x1
08eb e024       | $  |		Load	0x0,0x24
08ec 185f       | _  |		Execute	Package,Field_Execute,Field_Number 0x5f
08ed 0007       |    |		Action	Break_Optional							; Debug Table 0x19.0x3 = 0x8ed,0x2
08ee e402       |    |		Load	0x2,0x2								; Debug Table 0x19.0x4 = 0x8ee,0x401
08ef 0007       |    |		Action	Break_Optional
08f0 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x19.0x5 = 0x8f0,0x402
08f1 0007       |    |		Action	Break_Optional							; Debug Table 0x19.0x6 = 0x8f1,0x403
08f2 0007       |    |		Action	Break_Optional							; Debug Table 0x19.0x7 = 0x8f2,0x404
08f3 0b85       |    |		Execute_Immediate	Case_Compare,0x85				; Debug Table 0x19.0x8 = 0x8f3,0x2
08f4 704f       |pO  |		Jump_Nonzero	0x944
08f5 0b45       | E  |		Execute_Immediate	Case_Compare,0x45
08f6 7059       |pY  |		Jump_Nonzero	0x950
08f7 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x19.0x9 = 0x8f7,0x5
08f8 e01e       |    |		Load	0x0,0x1e
08f9 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
08fa 0092 10cb  |    |		Action	Push_String_Extended,0x10cb					; " "
08fc 01cc       |    |		Execute	Vector,Catenate
08fd e024       | $  |		Load	0x0,0x24
08fe 185f       | _  |		Execute	Package,Field_Execute,Field_Number 0x5f
08ff 4800       |H   |		Short_Literal	0x0							; Debug Table 0x19.0xa = 0x8ff,0x6
0900 00db       |    |		Load_Top	At_Offset_3
0901 e01e       |    |		Load	0x0,0x1e
0902 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0903 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0904 0007       |    |		Action	Break_Optional							; Debug Table 0x19.0xb = 0x904,0x7
0905 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x19.0xc = 0x905,0x801
0906 021d       |    |		Execute	Heap_Access,Is_Null
0907 7020       |p   |		Jump_Nonzero	0x928							; Debug Table 0x19.0xd = 0x907,0x7
0908 e403       |    |		Load	0x2,0x3								; Debug Table 0x19.0xe = 0x908,0xc01
0909 0007       |    |		Action	Break_Optional
090a 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x19.0xf = 0x90a,0xc02
090b 0007       |    |		Action	Break_Optional							; Debug Table 0x19.0x10 = 0x90b,0xc03
090c 0007       |    |		Action	Break_Optional							; Debug Table 0x19.0x11 = 0x90c,0xc04
090d 0fa8       |    |		Execute_Immediate	Equal,-0x58					; Debug Table 0x19.0x12 = 0x90d,0x801
090e 7019       |p   |		Jump_Nonzero	0x928
090f 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x19.0x13 = 0x90f,0x8
0910 00eb       |    |		Load_Encached	Diana_Cache
0911 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
0912 e405       |    |		Load	0x2,0x5								; Debug Table 0x19.0x14 = 0x912,0x1001
0913 0007       |    |		Action	Break_Optional
0914 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x19.0x15 = 0x914,0x1002
0915 0007       |    |		Action	Break_Optional							; Debug Table 0x19.0x16 = 0x915,0x1003
0916 00d0       |    |		Action	Swap_Control							; Debug Table 0x19.0x17 = 0x916,0x1004
0917 00d1       |    |		Pop_Control	Pop_Count_1
0918 0ba8       |    |		Execute_Immediate	Case_Compare,0xa8				; Debug Table 0x19.0x18 = 0x918,0x8
0919 700d       |p   |		Jump_Nonzero	0x927
091a 0b49       | I  |		Execute_Immediate	Case_Compare,0x49
091b 700b       |p   |		Jump_Nonzero	0x927
091c 60c3       |`   |		Indirect_Literal	Discrete,0x9e0,{0x00000000, 0x7fffffff}		; Debug Table 0x19.0x19 = 0x91c,0xa
091d 00db       |    |		Load_Top	At_Offset_3
091e e01e       |    |		Load	0x0,0x1e
091f 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0920 e009       |    |		Load	0x0,0x9
0921 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0922 0092 10cc  |    |		Action	Push_String_Extended,0x10cc					; "."
0924 01cc       |    |		Execute	Vector,Catenate
0925 e024       | $  |		Load	0x0,0x24
0926 185f       | _  |		Execute	Package,Field_Execute,Field_Number 0x5f
0927 00d1       |    |		Pop_Control	Pop_Count_1
0928 0007       |    |		Action	Break_Optional							; Debug Table 0x19.0x1a = 0x928,0xb
0929 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x19.0x1b = 0x929,0x1401
092a 0007       |    |		Action	Break_Optional
092b 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x19.0x1c = 0x92b,0x1402
092c 0007       |    |		Action	Break_Optional							; Debug Table 0x19.0x1d = 0x92c,0x1403
092d 0007       |    |		Action	Break_Optional							; Debug Table 0x19.0x1e = 0x92d,0x1404
092e 0f33       | 3  |		Execute_Immediate	Equal,0x33					; Debug Table 0x19.0x1f = 0x92e,0xb
092f 680c       |h   |		Jump_Zero	0x93c
0930 4822       |H"  |		Short_Literal	0x22							; Debug Table 0x19.0x20 = 0x930,0xc
0931 4822       |H"  |		Short_Literal	0x22
0932 e5ff       |    |		Load	0x2,-0x1
0933 00eb       |    |		Load_Encached	Diana_Cache
0934 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
0935 00eb       |    |		Load_Encached	Diana_Cache
0936 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0937 01ca       |    |		Execute	Vector,Prepend
0938 01cb       |    |		Execute	Vector,Append
0939 e024       | $  |		Load	0x0,0x24
093a 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
093b 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
093c e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x19.0x21 = 0x93c,0xd
093d 00eb       |    |		Load_Encached	Diana_Cache
093e 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
093f 00eb       |    |		Load_Encached	Diana_Cache
0940 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0941 e024       | $  |		Load	0x0,0x24
0942 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0943 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0944 0092 10cd  |    |		Action	Push_String_Extended,0x10cd					; "with of "
													; Debug Table 0x19.0x22 = 0x944,0x3
0946 4fff       |O   |		Short_Literal	-0x1
0947 e5ff       |    |		Load	0x2,-0x1
0948 e01e       |    |		Load	0x0,0x1e
0949 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
094a e009       |    |		Load	0x0,0x9
094b 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
094c 01cc       |    |		Execute	Vector,Catenate
094d e024       | $  |		Load	0x0,0x24
094e 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
094f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0950 0092 10ce  |    |		Action	Push_String_Extended,0x10ce					; "use of "
													; Debug Table 0x19.0x23 = 0x950,0x4
0952 4fff       |O   |		Short_Literal	-0x1
0953 e5ff       |    |		Load	0x2,-0x1
0954 e01e       |    |		Load	0x0,0x1e
0955 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0956 e009       |    |		Load	0x0,0x9
0957 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0958 01cc       |    |		Execute	Vector,Catenate
0959 e024       | $  |		Load	0x0,0x24
095a 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
095b 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
095c 0000 0000  |    |		.BLANK	0000[0x4]
0960 ; --------------------------------------------------------------------------------------
0960 ; SUBPROGRAM
0960 ; --------------------------------------------------------------------------------------
0960 0973       | s  |		.CONST	0x0973								; Address of begin
0961 09d3       |    |		.CONST	0x09d3								; Address of exception handler
0962 0008       |    |		.CONST	0x0008								; Number of locals
0963			INIT_0960:
0963 e010       |    |		Load	0x0,0x10							; Debug Table 0x1a = .DEBUG	0x0963,0x183a,0x0001,0x0000,0x0057,0x98e5,0x0000,0x03cc
													; Debug Table 0x1a.0x0 = 0x963,0xffff
0964 1b22       | "  |		Execute	Package,Field_Read,Field_Number 0x22
0965 0322       | "  |		Declare_Variable	Record
0966 e002       |    |		Load	0x0,0x2								; Debug Table 0x1a.0x1 = 0x966,0xfffe
0967 0007       |    |		Action	Break_Optional
0968 e00d       |    |		Load	0x0,0xd								; Debug Table 0x1a.0x2 = 0x968,0xfffd
0969 1b29       | )  |		Execute	Package,Field_Read,Field_Number 0x29
096a 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1a.0x3 = 0x96a,0xfffc
096b 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x1a.0x4 = 0x96b,0xfffb
096c 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x1a.0x5 = 0x96c,0xfffa
096d 00f0       |    |		Load_Encached	Segment_Cache						; Debug Table 0x1a.0x6 = 0x96d,0xfff9
096e e007       |    |		Load	0x0,0x7
096f 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0970 e008       |    |		Load	0x0,0x8
0971 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0972 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0973			BODY_0960:
0973 e002       |    |		Load	0x0,0x2								; Debug Table 0x1a.0x7 = 0x973,0x1
0974 00d9       |    |		Load_Top	At_Offset_1
0975 039c       |    |		Declare_Variable	Heap_Access,By_Allocation
0976 00d8       |    |		Load_Top	At_Offset_0
0977 0217       |    |		Execute	Heap_Access,All_Reference
0978 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0979 a403       |    |		Store_Unchecked	0x2,0x3
097a 0007       |    |		Action	Break_Optional							; Debug Table 0x1a.0x8 = 0x97a,0x2
097b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1a.0x9 = 0x97b,0x3
097c e403       |    |		Load	0x2,0x3
097d 0217       |    |		Execute	Heap_Access,All_Reference
097e 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
097f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1a.0xa = 0x97f,0x4
0980 0007       |    |		Action	Break_Optional
0981 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x1a.0xb = 0x981,0x401
0982 0007       |    |		Action	Break_Optional							; Debug Table 0x1a.0xc = 0x982,0x4
0983 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x1a.0xd = 0x983,0x801
0984 e00d       |    |		Load	0x0,0xd								; Debug Table 0x1a.0xe = 0x984,0x401
0985 185c       | \  |		Execute	Package,Field_Execute,Field_Number 0x5c
0986 e403       |    |		Load	0x2,0x3
0987 0217       |    |		Execute	Heap_Access,All_Reference
0988 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
0989 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1a.0xf = 0x989,0x5
098a e402       |    |		Load	0x2,0x2
098b 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
098c e403       |    |		Load	0x2,0x3								; Debug Table 0x1a.0x10 = 0x98c,0x6
098d e402       |    |		Load	0x2,0x2
098e 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
098f e402       |    |		Load	0x2,0x2								; Debug Table 0x1a.0x11 = 0x98f,0x7
0990 e5fe       |    |		Load	0x2,-0x2
0991 e5ff       |    |		Load	0x2,-0x1
0992 8011       |    |		Call	0x0,0x11
0993 e403       |    |		Load	0x2,0x3								; Debug Table 0x1a.0x12 = 0x993,0x8
0994 0217       |    |		Execute	Heap_Access,All_Reference
0995 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0996 e00d       |    |		Load	0x0,0xd
0997 1843       | C  |		Execute	Package,Field_Execute,Field_Number 0x43
0998 a404       |    |		Store_Unchecked	0x2,0x4
0999 7834       |x4  |		Jump	0x9ce
099a 0092 10cf  |    |		Action	Push_String_Extended,0x10cf					; "Unused items within "
													; Debug Table 0x1a.0x13 = 0x99a,0xa
099c e404       |    |		Load	0x2,0x4
099d e00d       |    |		Load	0x0,0xd
099e 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
099f 01cc       |    |		Execute	Vector,Catenate
09a0 e024       | $  |		Load	0x0,0x24
09a1 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
09a2 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1a.0x14 = 0x9a2,0xb
09a3 e024       | $  |		Load	0x0,0x24
09a4 1840       | @  |		Execute	Package,Field_Execute,Field_Number 0x40
09a5 4802       |H   |		Short_Literal	0x2							; Debug Table 0x1a.0x15 = 0x9a5,0xc
09a6 e404       |    |		Load	0x2,0x4
09a7 e00d       |    |		Load	0x0,0xd
09a8 183c       | <  |		Execute	Package,Field_Execute,Field_Number 0x3c
09a9 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
09aa 7818       |x   |		Jump	0x9c3
09ab 0007       |    |		Action	Break_Optional							; Debug Table 0x1a.0x16 = 0x9ab,0xe
09ac 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1a.0x17 = 0x9ac,0xc01
09ad 0217       |    |		Execute	Heap_Access,All_Reference
09ae 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
09af a405       |    |		Store_Unchecked	0x2,0x5							; Debug Table 0x1a.0x18 = 0x9af,0xe
09b0 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1a.0x19 = 0x9b0,0xf
09b1 e405       |    |		Load	0x2,0x5
09b2 4975       |Iu  |		Short_Literal	0x175
09b3 00eb       |    |		Load_Encached	Diana_Cache
09b4 0098       |    |		Execute	Package,Field_Read_Dynamic
09b5 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
09b6 7007       |p   |		Jump_Nonzero	0x9be
09b7 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x1a = 0x9b7,0x10
09b8 8226       | &  |		Call	0x1,0x26
09b9 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1a.0x1b = 0x9b9,0x11
09ba e405       |    |		Load	0x2,0x5
09bb 00eb       |    |		Load_Encached	Diana_Cache
09bc 1874       | t  |		Execute	Package,Field_Execute,Field_Number 0x74
09bd 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
09be 0007       |    |		Action	Break_Optional							; Debug Table 0x1a.0x1c = 0x9be,0x12
09bf 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1a.0x1d = 0x9bf,0x1001
09c0 0217       |    |		Execute	Heap_Access,All_Reference
09c1 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
09c2 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3					; Debug Table 0x1a.0x1e = 0x9c2,0x12
09c3 0007       |    |		Action	Break_Optional							; Debug Table 0x1a.0x1f = 0x9c3,0xd
09c4 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1a.0x20 = 0x9c4,0x1401
09c5 021d       |    |		Execute	Heap_Access,Is_Null
09c6 6fe4       |o   |		Jump_Zero	0x9ab							; Debug Table 0x1a.0x21 = 0x9c6,0xd
09c7 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1a.0x22 = 0x9c7,0x13
09c8 e024       | $  |		Load	0x0,0x24
09c9 1840       | @  |		Execute	Package,Field_Execute,Field_Number 0x40
09ca e404       |    |		Load	0x2,0x4								; Debug Table 0x1a.0x23 = 0x9ca,0x14
09cb e00d       |    |		Load	0x0,0xd
09cc 1844       | D  |		Execute	Package,Field_Execute,Field_Number 0x44
09cd a404       |    |		Store_Unchecked	0x2,0x4
09ce e404       |    |		Load	0x2,0x4								; Debug Table 0x1a.0x24 = 0x9ce,0x9
09cf e00d       |    |		Load	0x0,0xd
09d0 1842       | B  |		Execute	Package,Field_Execute,Field_Number 0x42
09d1 6fc8       |o   |		Jump_Zero	0x99a
09d2 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
09d3			TRAP_0960:
09d3 0007       |    |		Action	Break_Optional
09d4 0092 10b7  |    |		Action	Push_String_Extended,0x10b7					; "unexpected exception "
													; Debug Table 0x1a.0x25 = 0x9d4,0x15
09d6 e00f       |    |		Load	0x0,0xf
09d7 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
09d8 01cc       |    |		Execute	Vector,Catenate
09d9 0092 10d0  |    |		Action	Push_String_Extended,0x10d0					; " during show_unused"
09db 01cc       |    |		Execute	Vector,Catenate
09dc e006       |    |		Load	0x0,0x6
09dd 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
09de 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
09df 0000       |    |		.XXX[0x1]
09e0 0000 0000  |    |		.LITERAL	{0x00000000, 0x7fffffff}
09e4 0000 0000  |    |		.BLANK	0000[0x4]
09e8 ; --------------------------------------------------------------------------------------
09e8 ; SUBPROGRAM
09e8 ; --------------------------------------------------------------------------------------
09e8 09f2       |    |		.CONST	0x09f2								; Address of begin
09e9 0a72       | r  |		.CONST	0x0a72								; Address of exception handler
09ea 0004       |    |		.CONST	0x0004								; Number of locals
09eb			INIT_09e8:
09eb e010       |    |		Load	0x0,0x10							; Debug Table 0x1b = .DEBUG	0x09eb,0x1888,0x0001,0x0000,0x0057,0x98e5,0x0000,0x04c6
													; Debug Table 0x1b.0x0 = 0x9eb,0xffff
09ec 1b22       | "  |		Execute	Package,Field_Read,Field_Number 0x22
09ed 0322       | "  |		Declare_Variable	Record
09ee e002       |    |		Load	0x0,0x2								; Debug Table 0x1b.0x1 = 0x9ee,0xfffe
09ef 0007       |    |		Action	Break_Optional
09f0 e00d       |    |		Load	0x0,0xd								; Debug Table 0x1b.0x2 = 0x9f0,0xfffd
09f1 1b29       | )  |		Execute	Package,Field_Read,Field_Number 0x29
09f2			BODY_09e8:
09f2 e002       |    |		Load	0x0,0x2								; Debug Table 0x1b.0x3 = 0x9f2,0x1
09f3 e001       |    |		Load	0x0,0x1
09f4 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
09f5 e5fc       |    |		Load	0x2,-0x4
09f6 480a       |H   |		Short_Literal	0xa
09f7 e00b       |    |		Load	0x0,0xb
09f8 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
09f9 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
09fa e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x1b.0x4 = 0x9fa,0x2
09fb e00c       |    |		Load	0x0,0xc
09fc 01d7       |    |		Execute	Vector,Field_Read
09fd 00da       |    |		Load_Top	At_Offset_2
09fe 0217       |    |		Execute	Heap_Access,All_Reference
09ff 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
0a00 4802       |H   |		Short_Literal	0x2							; Debug Table 0x1b.0x5 = 0xa00,0x3
0a01 00da       |    |		Load_Top	At_Offset_2
0a02 0217       |    |		Execute	Heap_Access,All_Reference
0a03 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0a04 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1b.0x6 = 0xa04,0x4
0a05 0217       |    |		Execute	Heap_Access,All_Reference
0a06 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0a07 0007       |    |		Action	Break_Optional
0a08 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x1b.0x7 = 0xa08,0x401
0a09 0007       |    |		Action	Break_Optional							; Debug Table 0x1b.0x8 = 0xa09,0x4
0a0a 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x1b.0x9 = 0xa0a,0x801
0a0b e00d       |    |		Load	0x0,0xd								; Debug Table 0x1b.0xa = 0xa0b,0x401
0a0c 185c       | \  |		Execute	Package,Field_Execute,Field_Number 0x5c
0a0d 00da       |    |		Load_Top	At_Offset_2
0a0e 0217       |    |		Execute	Heap_Access,All_Reference
0a0f 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
0a10 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1b.0xb = 0xa10,0x5
0a11 00da       |    |		Load_Top	At_Offset_2
0a12 0217       |    |		Execute	Heap_Access,All_Reference
0a13 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
0a14 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1b.0xc = 0xa14,0x6
0a15 00da       |    |		Load_Top	At_Offset_2
0a16 0217       |    |		Execute	Heap_Access,All_Reference
0a17 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
0a18 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x1b.0xd = 0xa18,0x7
0a19 00da       |    |		Load_Top	At_Offset_2
0a1a 0217       |    |		Execute	Heap_Access,All_Reference
0a1b 3822       |8"  |		Execute	Record,Field_Write,Field_Number 0x22
0a1c 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1b.0xe = 0xa1c,0x8
0a1d 00db       |    |		Load_Top	At_Offset_3
0a1e 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0a1f 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1b.0xf = 0xa1f,0x9
0a20 00db       |    |		Load_Top	At_Offset_3
0a21 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0a22 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1b.0x10 = 0xa22,0xa
0a23 e5fe       |    |		Load	0x2,-0x2
0a24 e5ff       |    |		Load	0x2,-0x1
0a25 8011       |    |		Call	0x0,0x11
0a26 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1b.0x11 = 0xa26,0xb
0a27 0217       |    |		Execute	Heap_Access,All_Reference
0a28 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0a29 e00d       |    |		Load	0x0,0xd
0a2a 1843       | C  |		Execute	Package,Field_Execute,Field_Number 0x43
0a2b 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0a2c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1b.0x12 = 0xa2c,0xc
0a2d e00d       |    |		Load	0x0,0xd
0a2e 1842       | B  |		Execute	Package,Field_Execute,Field_Number 0x42
0a2f 703b       |p;  |		Jump_Nonzero	0xa6b
0a30 0007       |    |		Action	Break_Optional							; Debug Table 0x1b.0x13 = 0xa30,0xd
0a31 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x1b.0x14 = 0xa31,0xf3ff
0a32 00d9       |    |		Load_Top	At_Offset_1
0a33 8225       | %  |		Call	0x1,0x25
0a34 0092 10d1  |    |		Action	Push_String_Extended,0x10d1					; "unused within \x22"
													; Debug Table 0x1b.0x15 = 0xa34,0xc01
0a36 00d9       |    |		Load_Top	At_Offset_1
0a37 01cc       |    |		Execute	Vector,Catenate
0a38 0092 10b4  |    |		Action	Push_String_Extended,0x10b4					; "\x22"
0a3a 01cc       |    |		Execute	Vector,Catenate
0a3b e023       | #  |		Load	0x0,0x23
0a3c e403       |    |		Load	0x2,0x3
0a3d 0217       |    |		Execute	Heap_Access,All_Reference
0a3e 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0a3f 0396       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Value
0a40 00db       |    |		Load_Top	At_Offset_3
0a41 0217       |    |		Execute	Heap_Access,All_Reference
0a42 3820       |8   |		Execute	Record,Field_Write,Field_Number 0x20
0a43 0007       |    |		Action	Break_Optional							; Debug Table 0x1b.0x16 = 0xa43,0xc02
0a44 6263       |bc  |		Indirect_Literal	Discrete,0xca8,{0x00000000, 0x00004000}		; Debug Table 0x1b.0x17 = 0xa44,0xc03
0a45 e020       |    |		Load	0x0,0x20
0a46 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0a47 e007       |    |		Load	0x0,0x7
0a48 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0a49 e001       |    |		Load	0x0,0x1
0a4a 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0a4b 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0a4c 00db       |    |		Load_Top	At_Offset_3
0a4d e001       |    |		Load	0x0,0x1
0a4e 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0a4f 1836       | 6  |		Execute	Package,Field_Execute,Field_Number 0x36
0a50 e023       | #  |		Load	0x0,0x23
0a51 e403       |    |		Load	0x2,0x3
0a52 0217       |    |		Execute	Heap_Access,All_Reference
0a53 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0a54 0396       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Value
0a55 00db       |    |		Load_Top	At_Offset_3
0a56 0217       |    |		Execute	Heap_Access,All_Reference
0a57 3821       |8!  |		Execute	Record,Field_Write,Field_Number 0x21
0a58 00d1       |    |		Pop_Control	Pop_Count_1						; Debug Table 0x1b.0x18 = 0xa58,0xc04
0a59 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x1b.0x19 = 0xa59,0xe
0a5a 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0a5b 00da       |    |		Load_Top	At_Offset_2
0a5c e00e       |    |		Load	0x0,0xe
0a5d 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0a5e 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1b.0x1a = 0xa5e,0xf
0a5f e00b       |    |		Load	0x0,0xb
0a60 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0a61 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x1b.0x1b = 0xa61,0x10
0a62 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
0a63 6806       |h   |		Jump_Zero	0xa6a
0a64 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x1b.0x1c = 0xa64,0x11
0a65 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
0a66 0217       |    |		Execute	Heap_Access,All_Reference
0a67 00da       |    |		Load_Top	At_Offset_2
0a68 e00a       |    |		Load	0x0,0xa
0a69 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0a6a 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0a6b 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1b.0x1d = 0xa6b,0x12
0a6c e00b       |    |		Load	0x0,0xb
0a6d 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0a6e 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1b.0x1e = 0xa6e,0x13
0a6f e00b       |    |		Load	0x0,0xb
0a70 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0a71 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0a72			TRAP_09e8:
0a72 0007       |    |		Action	Break_Optional
0a73 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1b.0x1f = 0xa73,0x14
0a74 e00b       |    |		Load	0x0,0xb
0a75 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0a76 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0a77 0000       |    |		.XXX[0x1]
0a78 ; --------------------------------------------------------------------------------------
0a78 ; SUBPROGRAM
0a78 ; --------------------------------------------------------------------------------------
0a78 0a7e       | ~  |		.CONST	0x0a7e								; Address of begin
0a79 0004       |    |		.CONST	0x0004								; Address of exception handler
0a7a 0002       |    |		.CONST	0x0002								; Number of locals
0a7b			INIT_0a78:
0a7b e001       |    |		Load	0x0,0x1								; Debug Table 0x1c = .DEBUG	0x0a7b,0x18ca,0x0001,0x0000,0x0057,0x98e5,0x0000,0x08c3
													; Debug Table 0x1c.0x0 = 0xa7b,0xffff
0a7c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0a7d 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0a7e			BODY_0a78:
0a7e e001       |    |		Load	0x0,0x1								; Debug Table 0x1c.0x1 = 0xa7e,0x1
0a7f 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0a80 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0a81 e5fe       |    |		Load	0x2,-0x2
0a82 6225       |b%  |		Indirect_Literal	Discrete,0xca8,{0x00000000, 0x00004000}
0a83 e020       |    |		Load	0x0,0x20
0a84 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0a85 e007       |    |		Load	0x0,0x7
0a86 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0a87 e008       |    |		Load	0x0,0x8
0a88 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0a89 4801       |H   |		Short_Literal	0x1
0a8a 4800       |H   |		Short_Literal	0x0
0a8b e007       |    |		Load	0x0,0x7
0a8c 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0a8d e001       |    |		Load	0x0,0x1
0a8e 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0a8f 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0a90 e5ff       |    |		Load	0x2,-0x1
0a91 e001       |    |		Load	0x0,0x1
0a92 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0a93 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0a94 c5fe       |    |		Store	0x2,-0x2
0a95 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0a96 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1c.0x2 = 0xa96,0x2
0a97 6815       |h   |		Jump_Zero	0xaad
0a98 0092 10d2  |    |		Action	Push_String_Extended,0x10d2					; "Can't resolve "
													; Debug Table 0x1c.0x3 = 0xa98,0x3
0a9a e5ff       |    |		Load	0x2,-0x1
0a9b 01cc       |    |		Execute	Vector,Catenate
0a9c 0092 10d3  |    |		Action	Push_String_Extended,0x10d3					; " ("
0a9e 01cc       |    |		Execute	Vector,Catenate
0a9f 00d9       |    |		Load_Top	At_Offset_1
0aa0 e001       |    |		Load	0x0,0x1
0aa1 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0aa2 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0aa3 025e       | ^  |		Execute	Discrete,Convert
0aa4 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0aa5 01cc       |    |		Execute	Vector,Catenate
0aa6 0092 10bb  |    |		Action	Push_String_Extended,0x10bb					; ")"
0aa8 01cc       |    |		Execute	Vector,Catenate
0aa9 e006       |    |		Load	0x0,0x6
0aaa 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0aab 61f8       |a   |		Indirect_Literal	Discrete,0xca4,{0x00000000, 0x57979502}		; Debug Table 0x1c.0x4 = 0xaab,0x4
0aac 0257       | W  |		Execute	Discrete,Raise
0aad 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0aae 0000 0000  |    |		.XXX[0x2]
0ab0 ; --------------------------------------------------------------------------------------
0ab0 ; SUBPROGRAM
0ab0 ; --------------------------------------------------------------------------------------
0ab0 0abd       |    |		.CONST	0x0abd								; Address of begin
0ab1 0004       |    |		.CONST	0x0004								; Address of exception handler
0ab2 0005       |    |		.CONST	0x0005								; Number of locals
0ab3			INIT_0ab0:
0ab3 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x1d = .DEBUG	0x0ab3,0x18d6,0x0001,0x0000,0x0057,0x98e5,0x0000,0x090e
													; Debug Table 0x1d.0x0 = 0xab3,0xffff
0ab4 e001       |    |		Load	0x0,0x1								; Debug Table 0x1d.0x1 = 0xab4,0xfffe
0ab5 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0ab6 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0ab7 02c7       |    |		Declare_Variable	Any
0ab8 00d8       |    |		Load_Top	At_Offset_0
0ab9 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0aba 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1d.0x2 = 0xaba,0xfffd
0abb e001       |    |		Load	0x0,0x1								; Debug Table 0x1d.0x3 = 0xabb,0xfffc
0abc 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0abd			BODY_0ab0:
0abd 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1d.0x4 = 0xabd,0x1
0abe 0120       |    |		Execute	Any,Is_Value
0abf 6804       |h   |		Jump_Zero	0xac4
0ac0 e001       |    |		Load	0x0,0x1
0ac1 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0ac2 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0ac3 7801       |x   |		Jump	0xac5
0ac4 00da       |    |		Load_Top	At_Offset_2
0ac5 e5ff       |    |		Load	0x2,-0x1
0ac6 8229       | )  |		Call	0x1,0x29
0ac7 c403       |    |		Store	0x2,0x3
0ac8 7818       |x   |		Jump	0xae1
0ac9 e001       |    |		Load	0x0,0x1								; Debug Table 0x1d.0x5 = 0xac9,0x3
0aca 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0acb 00ec       |    |		Load_Encached	Diana_Tree_Cache
0acc 61db       |a   |		Indirect_Literal	Discrete,0xca8,{0x00000000, 0x00004000}
0acd e020       |    |		Load	0x0,0x20
0ace 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0acf e403       |    |		Load	0x2,0x3
0ad0 e001       |    |		Load	0x0,0x1
0ad1 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0ad2 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0ad3 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0ad4 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0ad5 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1d.0x6 = 0xad5,0x4
0ad6 7005       |p   |		Jump_Nonzero	0xadc
0ad7 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1d.0x7 = 0xad7,0x5
0ad8 00da       |    |		Load_Top	At_Offset_2
0ad9 00eb       |    |		Load_Encached	Diana_Cache
0ada 1874       | t  |		Execute	Package,Field_Execute,Field_Number 0x74
0adb a402       |    |		Store_Unchecked	0x2,0x2
0adc 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1d.0x8 = 0xadc,0x6
0add e001       |    |		Load	0x0,0x1
0ade 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0adf 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0ae0 c403       |    |		Store	0x2,0x3
0ae1 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1d.0x9 = 0xae1,0x2
0ae2 e001       |    |		Load	0x0,0x1
0ae3 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0ae4 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0ae5 6fe3       |o   |		Jump_Zero	0xac9
0ae6 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1d.0xa = 0xae6,0x7
0ae7 a5fe       |    |		Store_Unchecked	0x2,-0x2
0ae8 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0ae9 0000 0000  |    |		.BLANK	0000[0x7]
0af0 ; --------------------------------------------------------------------------------------
0af0 ; SUBPROGRAM
0af0 ; --------------------------------------------------------------------------------------
0af0 0afd       |    |		.CONST	0x0afd								; Address of begin
0af1 0004       |    |		.CONST	0x0004								; Address of exception handler
0af2 0004       |    |		.CONST	0x0004								; Number of locals
0af3			INIT_0af0:
0af3 e025       | %  |		Load	0x0,0x25							; Debug Table 0x1e = .DEBUG	0x0af3,0x18ee,0x0002,0x0000,0x0057,0x98e5,0x0000,0x0a1e
													; Debug Table 0x1e.0x0 = 0xaf3,0xffff
0af4 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0af5 02c7       |    |		Declare_Variable	Any
0af6 00db       |    |		Load_Top	At_Offset_3
0af7 e025       | %  |		Load	0x0,0x25
0af8 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0af9 c402       |    |		Store	0x2,0x2
0afa 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1e.0x1 = 0xafa,0xfffe
0afb e025       | %  |		Load	0x0,0x25							; Debug Table 0x1e.0x2 = 0xafb,0xfffd
0afc 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0afd			BODY_0af0:
0afd 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1e.0x3 = 0xafd,0x1
0afe e025       | %  |		Load	0x0,0x25
0aff 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0b00 7002       |p   |		Jump_Nonzero	0xb03
0b01 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1e.0x4 = 0xb01,0x2
0b02 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0b03 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x1e.0x5 = 0xb03,0x3
0b04 0f01       |    |		Execute_Immediate	Equal,0x1
0b05 6802       |h   |		Jump_Zero	0xb08
0b06 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1e.0x6 = 0xb06,0x4
0b07 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0b08 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1e.0x7 = 0xb08,0x5
0b09 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0b0a 0007       |    |		Action	Break_Optional							; Debug Table 0x1e.0x8 = 0xb0a,0x6
0b0b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1e.0x9 = 0xb0b,0x7
0b0c e025       | %  |		Load	0x0,0x25
0b0d 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0b0e e025       | %  |		Load	0x0,0x25
0b0f 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
0b10 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0b11 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x1e.0xa = 0xb11,0x8
0b12 4603       |F   |		Jump_Case	0x4
0b13 7810       |x   |		Jump	0xb24								; case 0x0
0b14 780f       |x   |		Jump	0xb24								; case 0x1
0b15 7801       |x   |		Jump	0xb17								; case 0x2
0b16 7808       |x   |		Jump	0xb1f								; case 0x3
0b17 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1e.0xb = 0xb17,0x9
0b18 4802       |H   |		Short_Literal	0x2
0b19 4804       |H   |		Short_Literal	0x4
0b1a 0262       | b  |		Execute	Discrete,In_Range
0b1b 6808       |h   |		Jump_Zero	0xb24
0b1c 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1e.0xc = 0xb1c,0xa
0b1d 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0b1e 7805       |x   |		Jump	0xb24
0b1f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1e.0xd = 0xb1f,0xb
0b20 0f01       |    |		Execute_Immediate	Equal,0x1
0b21 6802       |h   |		Jump_Zero	0xb24
0b22 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1e.0xe = 0xb22,0xc
0b23 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0b24 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1e.0xf = 0xb24,0xe
0b25 e025       | %  |		Load	0x0,0x25
0b26 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
0b27 c402       |    |		Store	0x2,0x2
0b28 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1e.0x10 = 0xb28,0xf
0b29 e025       | %  |		Load	0x0,0x25
0b2a 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0b2b 6801       |h   |		Jump_Zero	0xb2d
0b2c 7fde       |    |		Jump	0xb0b
0b2d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1e.0x11 = 0xb2d,0x10
0b2e 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0b2f 0000       |    |		.XXX[0x1]
0b30 ; --------------------------------------------------------------------------------------
0b30 ; SUBPROGRAM
0b30 ; --------------------------------------------------------------------------------------
0b30 0b39       | 9  |		.CONST	0x0b39								; Address of begin
0b31 0004       |    |		.CONST	0x0004								; Address of exception handler
0b32 0005       |    |		.CONST	0x0005								; Number of locals
0b33			INIT_0b30:
0b33 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1f = .DEBUG	0x0b33,0x1914,0x0001,0x0000,0x0057,0x98e5,0x0000,0x0ab8
													; Debug Table 0x1f.0x0 = 0xb33,0xffff
0b34 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x1f.0x1 = 0xb34,0xfffe
0b35 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x1f.0x2 = 0xb35,0xfffd
0b36 00ef       |    |		Load_Encached	Diana_Sequence_Cache					; Debug Table 0x1f.0x3 = 0xb36,0xfffc
0b37 e5ff       |    |		Load	0x2,-0x1
0b38 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0b39			BODY_0b30:
0b39 0007       |    |		Action	Break_Optional							; Debug Table 0x1f.0x4 = 0xb39,0x1
0b3a 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x1f.0x5 = 0xb3a,0x401
0b3b a5fc       |    |		Store_Unchecked	0x2,-0x4						; Debug Table 0x1f.0x6 = 0xb3b,0x1
0b3c 7833       |x3  |		Jump	0xb70
0b3d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1f.0x7 = 0xb3d,0x3
0b3e 0007       |    |		Action	Break_Optional
0b3f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1f.0x8 = 0xb3f,0x801
0b40 0217       |    |		Execute	Heap_Access,All_Reference
0b41 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0b42 00d9       |    |		Load_Top	At_Offset_1
0b43 0007       |    |		Action	Break_Optional
0b44 e408       |    |		Load	0x2,0x8								; Debug Table 0x1f.0x9 = 0xb44,0xc01
0b45 0007       |    |		Action	Break_Optional
0b46 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0x1f.0xa = 0xb46,0xc02
0b47 0007       |    |		Action	Break_Optional							; Debug Table 0x1f.0xb = 0xb47,0xc03
0b48 00d0       |    |		Action	Swap_Control							; Debug Table 0x1f.0xc = 0xb48,0xc04
0b49 00d1       |    |		Pop_Control	Pop_Count_1
0b4a 49af       |I   |		Short_Literal	0x1af							; Debug Table 0x1f.0xd = 0xb4a,0x801
0b4b 00eb       |    |		Load_Encached	Diana_Cache
0b4c 0096       |    |		Execute	Package,Entry
0b4d 00d0       |    |		Action	Swap_Control
0b4e 00d1       |    |		Pop_Control	Pop_Count_1
0b4f a402       |    |		Store_Unchecked	0x2,0x2							; Debug Table 0x1f.0xe = 0xb4f,0x3
0b50 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1f.0xf = 0xb50,0x4
0b51 8026       | &  |		Call	0x0,0x26
0b52 6818       |h   |		Jump_Zero	0xb6b
0b53 e5fe       |    |		Load	0x2,-0x2
0b54 e402       |    |		Load	0x2,0x2
0b55 822b       | +  |		Call	0x1,0x2b
0b56 6814       |h   |		Jump_Zero	0xb6b
0b57 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x1f.0x10 = 0xb57,0x5
0b58 0007       |    |		Action	Break_Optional
0b59 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x1f.0x11 = 0xb59,0x1001
0b5a e402       |    |		Load	0x2,0x2								; Debug Table 0x1f.0x12 = 0xb5a,0x5
0b5b 00eb       |    |		Load_Encached	Diana_Cache
0b5c 1875       | u  |		Execute	Package,Field_Execute,Field_Number 0x75
0b5d 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0b5e 0007       |    |		Action	Break_Optional							; Debug Table 0x1f.0x13 = 0xb5e,0x6
0b5f 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1f.0x14 = 0xb5f,0x1401
0b60 021d       |    |		Execute	Heap_Access,Is_Null
0b61 6803       |h   |		Jump_Zero	0xb65							; Debug Table 0x1f.0x15 = 0xb61,0x6
0b62 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1f.0x16 = 0xb62,0x7
0b63 a5fc       |    |		Store_Unchecked	0x2,-0x4
0b64 7804       |x   |		Jump	0xb69
0b65 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1f.0x17 = 0xb65,0x8
0b66 00db       |    |		Load_Top	At_Offset_3
0b67 00eb       |    |		Load_Encached	Diana_Cache
0b68 1877       | w  |		Execute	Package,Field_Execute,Field_Number 0x77
0b69 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1f.0x18 = 0xb69,0x9
0b6a 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0b6b 0007       |    |		Action	Break_Optional							; Debug Table 0x1f.0x19 = 0xb6b,0xa
0b6c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1f.0x1a = 0xb6c,0x1801
0b6d 0217       |    |		Execute	Heap_Access,All_Reference
0b6e 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0b6f 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1					; Debug Table 0x1f.0x1b = 0xb6f,0xa
0b70 0007       |    |		Action	Break_Optional							; Debug Table 0x1f.0x1c = 0xb70,0x2
0b71 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1f.0x1d = 0xb71,0x1c01
0b72 021d       |    |		Execute	Heap_Access,Is_Null
0b73 6fc9       |o   |		Jump_Zero	0xb3d							; Debug Table 0x1f.0x1e = 0xb73,0x2
0b74 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0b75 0000 0000  |    |		.XXX[0x3]
0b77 0000       |    |
0b78 ; --------------------------------------------------------------------------------------
0b78 ; SUBPROGRAM
0b78 ; --------------------------------------------------------------------------------------
0b78 0b7f       |    |		.CONST	0x0b7f								; Address of begin
0b79 0004       |    |		.CONST	0x0004								; Address of exception handler
0b7a 0004       |    |		.CONST	0x0004								; Number of locals
0b7b			INIT_0b78:
0b7b 00ef       |    |		Load_Encached	Diana_Sequence_Cache					; Debug Table 0x20 = .DEBUG	0x0b7b,0x1954,0x0002,0x0000,0x0057,0x98e5,0x0000,0x0b46
													; Debug Table 0x20.0x0 = 0xb7b,0xffff
0b7c 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x20.0x1 = 0xb7c,0xfffe
0b7d 029f 107b  |   {|		Declare_Subprogram	INIT_1078,For_Call
0b7f			BODY_0b78:
0b7f e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x20.0x2 = 0xb7f,0x1
0b80 e013       |    |		Load	0x0,0x13
0b81 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0b82 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x20.0x3 = 0xb82,0x2
0b83 e01d       |    |		Load	0x0,0x1d
0b84 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0b85 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0b86 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x20.0x4 = 0xb86,0x3
0b87 e025       | %  |		Load	0x0,0x25
0b88 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0b89 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0b8a 0007       |    |		Action	Break_Optional							; Debug Table 0x20.0x5 = 0xb8a,0x4
0b8b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x20.0x6 = 0xb8b,0x401
0b8c 021d       |    |		Execute	Heap_Access,Is_Null
0b8d 6804       |h   |		Jump_Zero	0xb92							; Debug Table 0x20.0x7 = 0xb8d,0x4
0b8e e5fe       |    |		Load	0x2,-0x2
0b8f 0e02       |    |		Execute_Immediate	Not_Equal,0x2
0b90 6801       |h   |		Jump_Zero	0xb92
0b91 8404       |    |		Call	0x2,0x4								; Debug Table 0x20.0x8 = 0xb91,0x5
0b92 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x20.0x9 = 0xb92,0x6
0b93 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0b94 0000 0000  |    |		.BLANK	0000[0x4]
0b98 ; --------------------------------------------------------------------------------------
0b98 ; SUBPROGRAM
0b98 ; --------------------------------------------------------------------------------------
0b98 0b9c       |    |		.CONST	0x0b9c								; Address of begin
0b99 0bba       |    |		.CONST	0x0bba								; Address of exception handler
0b9a 0002       |    |		.CONST	0x0002								; Number of locals
0b9b			INIT_0b98:
0b9b 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x21 = .DEBUG	0x0b9b,0x196a,0x0001,0x0000,0x0057,0x98e5,0x0000,0x0ba2
													; Debug Table 0x21.0x0 = 0xb9b,0xffff
0b9c			BODY_0b98:
0b9c 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x21.0x1 = 0xb9c,0x1
0b9d e007       |    |		Load	0x0,0x7
0b9e 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0b9f e008       |    |		Load	0x0,0x8
0ba0 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0ba1 e5fe       |    |		Load	0x2,-0x2
0ba2 e5fe       |    |		Load	0x2,-0x2
0ba3 e5ff       |    |		Load	0x2,-0x1
0ba4 822d       | -  |		Call	0x1,0x2d
0ba5 822c       | ,  |		Call	0x1,0x2c
0ba6 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0ba7 0007       |    |		Action	Break_Optional							; Debug Table 0x21.0x2 = 0xba7,0x2
0ba8 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x21.0x3 = 0xba8,0x401
0ba9 021d       |    |		Execute	Heap_Access,Is_Null
0baa 7005       |p   |		Jump_Nonzero	0xbb0							; Debug Table 0x21.0x4 = 0xbaa,0x2
0bab 4800       |H   |		Short_Literal	0x0							; Debug Table 0x21.0x5 = 0xbab,0x3
0bac 00d9       |    |		Load_Top	At_Offset_1
0bad e027       | '  |		Load	0x0,0x27
0bae 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0baf 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0bb0 0092 10d4  |    |		Action	Push_String_Extended,0x10d4					; "no messages found in "
													; Debug Table 0x21.0x6 = 0xbb0,0x4
0bb2 e5ff       |    |		Load	0x2,-0x1
0bb3 e001       |    |		Load	0x0,0x1
0bb4 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0bb5 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
0bb6 01cc       |    |		Execute	Vector,Catenate
0bb7 e006       |    |		Load	0x0,0x6
0bb8 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0bb9 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0bba			TRAP_0b98:
0bba 0007       |    |		Action	Break_Optional
0bbb 0092 10d5  |    |		Action	Push_String_Extended,0x10d5					; "exception while checking "
													; Debug Table 0x21.0x7 = 0xbbb,0x5
0bbd e5ff       |    |		Load	0x2,-0x1
0bbe e001       |    |		Load	0x0,0x1
0bbf 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0bc0 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
0bc1 01cc       |    |		Execute	Vector,Catenate
0bc2 e006       |    |		Load	0x0,0x6
0bc3 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0bc4 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0bc5 0000 0000  |    |		.XXX[0x3]
0bc7 0000       |    |
0bc8 ; --------------------------------------------------------------------------------------
0bc8 ; SUBPROGRAM
0bc8 ; --------------------------------------------------------------------------------------
0bc8 0bd8       |    |		.CONST	0x0bd8								; Address of begin
0bc9 0004       |    |		.CONST	0x0004								; Address of exception handler
0bca 0004       |    |		.CONST	0x0004								; Number of locals
0bcb			INIT_0bc8:
0bcb e001       |    |		Load	0x0,0x1								; Debug Table 0x22 = .DEBUG	0x0bcb,0x197c,0x0001,0x0000,0x0057,0x98e5,0x0000,0x0bff
													; Debug Table 0x22.0x0 = 0xbcb,0xffff
0bcc 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0bcd 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0bce 02c7       |    |		Declare_Variable	Any
0bcf 00d8       |    |		Load_Top	At_Offset_0
0bd0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0bd1 e001       |    |		Load	0x0,0x1								; Debug Table 0x22.0x1 = 0xbd1,0xfffe
0bd2 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0bd3 02c7       |    |		Declare_Variable	Any
0bd4 00d8       |    |		Load_Top	At_Offset_0
0bd5 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0bd6 e001       |    |		Load	0x0,0x1								; Debug Table 0x22.0x2 = 0xbd6,0xfffd
0bd7 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0bd8			BODY_0bc8:
0bd8 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x22.0x3 = 0xbd8,0x1
0bd9 0120       |    |		Execute	Any,Is_Value
0bda 6804       |h   |		Jump_Zero	0xbdf
0bdb e001       |    |		Load	0x0,0x1
0bdc 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0bdd 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0bde 7801       |x   |		Jump	0xbe0
0bdf 00da       |    |		Load_Top	At_Offset_2
0be0 e5ff       |    |		Load	0x2,-0x1
0be1 0092 10b2  |    |		Action	Push_String_Extended,0x10b2					; "'c(ada)"
0be3 01cc       |    |		Execute	Vector,Catenate
0be4 8229       | )  |		Call	0x1,0x29
0be5 c402       |    |		Store	0x2,0x2
0be6 781a       |x   |		Jump	0xc01
0be7 e001       |    |		Load	0x0,0x1								; Debug Table 0x22.0x4 = 0xbe7,0x3
0be8 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0be9 00da       |    |		Load_Top	At_Offset_2
0bea 0120       |    |		Execute	Any,Is_Value
0beb 6803       |h   |		Jump_Zero	0xbef
0bec e001       |    |		Load	0x0,0x1
0bed 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0bee 7801       |x   |		Jump	0xbf0
0bef 00da       |    |		Load_Top	At_Offset_2
0bf0 e402       |    |		Load	0x2,0x2
0bf1 e001       |    |		Load	0x0,0x1
0bf2 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0bf3 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0bf4 c403       |    |		Store	0x2,0x3
0bf5 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0bf6 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x22.0x5 = 0xbf6,0x4
0bf7 7004       |p   |		Jump_Nonzero	0xbfc
0bf8 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x22.0x6 = 0xbf8,0x5
0bf9 3c11       |<   |		Execute	Record,Field_Read,Field_Number 0x11
0bfa 00da       |    |		Load_Top	At_Offset_2
0bfb 822e       | .  |		Call	0x1,0x2e
0bfc 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x22.0x7 = 0xbfc,0x6
0bfd e001       |    |		Load	0x0,0x1
0bfe 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0bff 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0c00 c402       |    |		Store	0x2,0x2
0c01 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x22.0x8 = 0xc01,0x2
0c02 e001       |    |		Load	0x0,0x1
0c03 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0c04 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0c05 6fe1       |o   |		Jump_Zero	0xbe7
0c06 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0c07 0000       |    |		.XXX[0x1]
0c08 ; --------------------------------------------------------------------------------------
0c08 ; SUBPROGRAM
0c08 ; --------------------------------------------------------------------------------------
0c08 0c0c       |    |		.CONST	0x0c0c								; Address of begin
0c09 0c31       | 1  |		.CONST	0x0c31								; Address of exception handler
0c0a 0002       |    |		.CONST	0x0002								; Number of locals
0c0b			INIT_0c08:
0c0b 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x23 = .DEBUG	0x0c0b,0x1990,0x0001,0x0000,0x0057,0x98e5,0x0000,0x0c55
													; Debug Table 0x23.0x0 = 0xc0b,0xffff
0c0c			BODY_0c08:
0c0c 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x23.0x1 = 0xc0c,0x1
0c0d e5fe       |    |		Load	0x2,-0x2
0c0e 0217       |    |		Execute	Heap_Access,All_Reference
0c0f 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0c10 e5fd       |    |		Load	0x2,-0x3
0c11 e5fd       |    |		Load	0x2,-0x3
0c12 e5ff       |    |		Load	0x2,-0x1
0c13 822d       | -  |		Call	0x1,0x2d
0c14 822c       | ,  |		Call	0x1,0x2c
0c15 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0c16 0007       |    |		Action	Break_Optional							; Debug Table 0x23.0x2 = 0xc16,0x2
0c17 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x23.0x3 = 0xc17,0x401
0c18 021d       |    |		Execute	Heap_Access,Is_Null
0c19 700d       |p   |		Jump_Nonzero	0xc27							; Debug Table 0x23.0x4 = 0xc19,0x2
0c1a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x23.0x5 = 0xc1a,0x3
0c1b e00d       |    |		Load	0x0,0xd
0c1c 185b       | [  |		Execute	Package,Field_Execute,Field_Number 0x5b
0c1d 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0c1e 4802       |H   |		Short_Literal	0x2							; Debug Table 0x23.0x6 = 0xc1e,0x4
0c1f 00d9       |    |		Load_Top	At_Offset_1
0c20 e5ff       |    |		Load	0x2,-0x1
0c21 e5fe       |    |		Load	0x2,-0x2
0c22 0217       |    |		Execute	Heap_Access,All_Reference
0c23 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0c24 e00d       |    |		Load	0x0,0xd
0c25 185d       | ]  |		Execute	Package,Field_Execute,Field_Number 0x5d
0c26 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0c27 0092 10d4  |    |		Action	Push_String_Extended,0x10d4					; "no messages found in "
													; Debug Table 0x23.0x7 = 0xc27,0x5
0c29 e5ff       |    |		Load	0x2,-0x1
0c2a e001       |    |		Load	0x0,0x1
0c2b 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0c2c 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
0c2d 01cc       |    |		Execute	Vector,Catenate
0c2e e006       |    |		Load	0x0,0x6
0c2f 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0c30 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0c31			TRAP_0c08:
0c31 0007       |    |		Action	Break_Optional
0c32 0092 10d5  |    |		Action	Push_String_Extended,0x10d5					; "exception while checking "
													; Debug Table 0x23.0x8 = 0xc32,0x6
0c34 e5ff       |    |		Load	0x2,-0x1
0c35 e001       |    |		Load	0x0,0x1
0c36 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0c37 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
0c38 01cc       |    |		Execute	Vector,Catenate
0c39 e006       |    |		Load	0x0,0x6
0c3a 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0c3b 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0c3c 0000 0000  |    |		.BLANK	0000[0x4]
0c40 ; --------------------------------------------------------------------------------------
0c40 ; SUBPROGRAM
0c40 ; --------------------------------------------------------------------------------------
0c40 0c4d       | M  |		.CONST	0x0c4d								; Address of begin
0c41 0004       |    |		.CONST	0x0004								; Address of exception handler
0c42 0004       |    |		.CONST	0x0004								; Number of locals
0c43			INIT_0c40:
0c43 e001       |    |		Load	0x0,0x1								; Debug Table 0x24 = .DEBUG	0x0c43,0x19a4,0x0001,0x0000,0x0057,0x98e5,0x0000,0x0cc2
													; Debug Table 0x24.0x0 = 0xc43,0xffff
0c44 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0c45 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0c46 02c7       |    |		Declare_Variable	Any
0c47 00d8       |    |		Load_Top	At_Offset_0
0c48 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0c49 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x24.0x1 = 0xc49,0xfffe
0c4a e001       |    |		Load	0x0,0x1								; Debug Table 0x24.0x2 = 0xc4a,0xfffd
0c4b 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0c4c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0c4d			BODY_0c40:
0c4d e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x24.0x3 = 0xc4d,0x1
0c4e e001       |    |		Load	0x0,0x1
0c4f 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0c50 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
0c51 0b03       |    |		Execute_Immediate	Case_Compare,0x3
0c52 7003       |p   |		Jump_Nonzero	0xc56
0c53 0b05       |    |		Execute_Immediate	Case_Compare,0x5
0c54 7001       |p   |		Jump_Nonzero	0xc56
0c55 7838       |x8  |		Jump	0xc8e								; Debug Table 0x24.0x4 = 0xc55,0x9
0c56 e001       |    |		Load	0x0,0x1								; Debug Table 0x24.0x5 = 0xc56,0x2
0c57 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0c58 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0c59 e001       |    |		Load	0x0,0x1
0c5a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0c5b 604c       |`L  |		Indirect_Literal	Discrete,0xca8,{0x00000000, 0x00004000}
0c5c e020       |    |		Load	0x0,0x20
0c5d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0c5e e007       |    |		Load	0x0,0x7
0c5f 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0c60 e001       |    |		Load	0x0,0x1
0c61 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0c62 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0c63 e5ff       |    |		Load	0x2,-0x1
0c64 e001       |    |		Load	0x0,0x1
0c65 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0c66 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0c67 c403       |    |		Store	0x2,0x3
0c68 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0c69 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x24.0x6 = 0xc69,0x3
0c6a 7023       |p#  |		Jump_Nonzero	0xc8e
0c6b 00da       |    |		Load_Top	At_Offset_2
0c6c e025       | %  |		Load	0x0,0x25
0c6d 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0c6e 681f       |h   |		Jump_Zero	0xc8e
0c6f 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x24.0x7 = 0xc6f,0x4
0c70 e01d       |    |		Load	0x0,0x1d
0c71 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0c72 e013       |    |		Load	0x0,0x13
0c73 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0c74 e001       |    |		Load	0x0,0x1								; Debug Table 0x24.0x8 = 0xc74,0x5
0c75 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0c76 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0c77 e001       |    |		Load	0x0,0x1
0c78 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0c79 602e       |`.  |		Indirect_Literal	Discrete,0xca8,{0x00000000, 0x00004000}
0c7a e020       |    |		Load	0x0,0x20
0c7b 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0c7c e007       |    |		Load	0x0,0x7
0c7d 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0c7e e001       |    |		Load	0x0,0x1
0c7f 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0c80 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0c81 e5ff       |    |		Load	0x2,-0x1
0c82 e001       |    |		Load	0x0,0x1
0c83 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0c84 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0c85 c403       |    |		Store	0x2,0x3
0c86 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0c87 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x24.0x9 = 0xc87,0x6
0c88 a5fd       |    |		Store_Unchecked	0x2,-0x3
0c89 e001       |    |		Load	0x0,0x1								; Debug Table 0x24.0xa = 0xc89,0x7
0c8a 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0c8b 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0c8c c5fe       |    |		Store	0x2,-0x2
0c8d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x24.0xb = 0xc8d,0x8
0c8e 00d1       |    |		Pop_Control	Pop_Count_1
0c8f 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x24.0xc = 0xc8f,0xa
0c90 0120       |    |		Execute	Any,Is_Value
0c91 6804       |h   |		Jump_Zero	0xc96
0c92 e001       |    |		Load	0x0,0x1
0c93 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0c94 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0c95 7801       |x   |		Jump	0xc97
0c96 00da       |    |		Load_Top	At_Offset_2
0c97 e5ff       |    |		Load	0x2,-0x1
0c98 0092 10b2  |    |		Action	Push_String_Extended,0x10b2					; "'c(ada)"
0c9a 01cc       |    |		Execute	Vector,Catenate
0c9b 8229       | )  |		Call	0x1,0x29
0c9c c402       |    |		Store	0x2,0x2
0c9d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x24.0xd = 0xc9d,0xb
0c9e c5fe       |    |		Store	0x2,-0x2
0c9f 0007       |    |		Action	Break_Optional							; Debug Table 0x24.0xe = 0xc9f,0xc
0ca0 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x24.0xf = 0xca0,0x401
0ca1 a5fd       |    |		Store_Unchecked	0x2,-0x3						; Debug Table 0x24.0x10 = 0xca1,0xc
0ca2 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0ca3 0000       |    |		.XXX[0x1]
0ca4 0000 0000  |    |		.LITERAL	{0x00000000, 0x57979502}
0ca8 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0cac 0000 0000  |    |		.BLANK	0000[0x4]
0cb0 ; --------------------------------------------------------------------------------------
0cb0 ; SUBPROGRAM
0cb0 ; --------------------------------------------------------------------------------------
0cb0 0cc5       |    |		.CONST	0x0cc5								; Address of begin
0cb1 0d66       | f  |		.CONST	0x0d66								; Address of exception handler
0cb2 0007       |    |		.CONST	0x0007								; Number of locals
0cb3			INIT_0cb0:
0cb3 e001       |    |		Load	0x0,0x1								; Debug Table 0x25 = .DEBUG	0x0cb3,0x19c8,0x0001,0x0000,0x0057,0x98e5,0x0000,0x0d4f
													; Debug Table 0x25.0x0 = 0xcb3,0xffff
0cb4 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0cb5 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0cb6 02c7       |    |		Declare_Variable	Any
0cb7 00d8       |    |		Load_Top	At_Offset_0
0cb8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0cb9 e001       |    |		Load	0x0,0x1								; Debug Table 0x25.0x1 = 0xcb9,0xfffe
0cba 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0cbb 02c7       |    |		Declare_Variable	Any
0cbc 00d8       |    |		Load_Top	At_Offset_0
0cbd 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0cbe e001       |    |		Load	0x0,0x1								; Debug Table 0x25.0x2 = 0xcbe,0xfffd
0cbf 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0cc0 e002       |    |		Load	0x0,0x2								; Debug Table 0x25.0x3 = 0xcc0,0xfffc
0cc1 0007       |    |		Action	Break_Optional
0cc2 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x25.0x4 = 0xcc2,0xfffb
0cc3 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0cc4 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x25.0x5 = 0xcc4,0xfffa
0cc5			BODY_0cb0:
0cc5 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x25.0x6 = 0xcc5,0x1
0cc6 e402       |    |		Load	0x2,0x2
0cc7 0120       |    |		Execute	Any,Is_Value
0cc8 6804       |h   |		Jump_Zero	0xccd
0cc9 e001       |    |		Load	0x0,0x1
0cca 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0ccb 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0ccc 7801       |x   |		Jump	0xcce
0ccd e402       |    |		Load	0x2,0x2
0cce e5ff       |    |		Load	0x2,-0x1
0ccf 8231       | 1  |		Call	0x1,0x31
0cd0 c402       |    |		Store	0x2,0x2
0cd1 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0cd2 e002       |    |		Load	0x0,0x2								; Debug Table 0x25.0x7 = 0xcd2,0x2
0cd3 e001       |    |		Load	0x0,0x1
0cd4 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0cd5 e5fe       |    |		Load	0x2,-0x2
0cd6 4808       |H   |		Short_Literal	0x8
0cd7 e00b       |    |		Load	0x0,0xb
0cd8 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0cd9 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0cda 4806       |H   |		Short_Literal	0x6							; Debug Table 0x25.0x8 = 0xcda,0x3
0cdb 00db       |    |		Load_Top	At_Offset_3
0cdc 0217       |    |		Execute	Heap_Access,All_Reference
0cdd 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
0cde 0092 10d6  |    |		Action	Push_String_Extended,0x10d6					; "error messages"
													; Debug Table 0x25.0x9 = 0xcde,0x4
0ce0 00ea       |    |		Load_Encached	Null_String_Cache
0ce1 e405       |    |		Load	0x2,0x5
0ce2 8224       | $  |		Call	0x1,0x24
0ce3 4802       |H   |		Short_Literal	0x2							; Debug Table 0x25.0xa = 0xce3,0x5
0ce4 00db       |    |		Load_Top	At_Offset_3
0ce5 0217       |    |		Execute	Heap_Access,All_Reference
0ce6 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0ce7 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x25.0xb = 0xce7,0x6
0ce8 0217       |    |		Execute	Heap_Access,All_Reference
0ce9 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0cea 0007       |    |		Action	Break_Optional
0ceb 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x25.0xc = 0xceb,0x401
0cec 0007       |    |		Action	Break_Optional							; Debug Table 0x25.0xd = 0xcec,0x6
0ced 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x25.0xe = 0xced,0x801
0cee e00d       |    |		Load	0x0,0xd								; Debug Table 0x25.0xf = 0xcee,0x401
0cef 185c       | \  |		Execute	Package,Field_Execute,Field_Number 0x5c
0cf0 00db       |    |		Load_Top	At_Offset_3
0cf1 0217       |    |		Execute	Heap_Access,All_Reference
0cf2 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
0cf3 0007       |    |		Action	Break_Optional							; Debug Table 0x25.0x10 = 0xcf3,0x7
0cf4 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x25.0x11 = 0xcf4,0xc01
0cf5 021d       |    |		Execute	Heap_Access,Is_Null
0cf6 7031       |p1  |		Jump_Nonzero	0xd28							; Debug Table 0x25.0x12 = 0xcf6,0x7
0cf7 4802       |H   |		Short_Literal	0x2							; Debug Table 0x25.0x13 = 0xcf7,0x8
0cf8 00db       |    |		Load_Top	At_Offset_3
0cf9 0217       |    |		Execute	Heap_Access,All_Reference
0cfa 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0cfb 0007       |    |		Action	Break_Optional
0cfc 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x25.0x14 = 0xcfc,0x1001
0cfd 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x25.0x15 = 0xcfd,0x8
0cfe 00eb       |    |		Load_Encached	Diana_Cache
0cff 1875       | u  |		Execute	Package,Field_Execute,Field_Number 0x75
0d00 00da       |    |		Load_Top	At_Offset_2
0d01 e01d       |    |		Load	0x0,0x1d
0d02 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0d03 e405       |    |		Load	0x2,0x5
0d04 0217       |    |		Execute	Heap_Access,All_Reference
0d05 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0d06 e00d       |    |		Load	0x0,0xd
0d07 185d       | ]  |		Execute	Package,Field_Execute,Field_Number 0x5d
0d08 7824       |x$  |		Jump	0xd2d
0d09 e001       |    |		Load	0x0,0x1								; Debug Table 0x25.0x16 = 0xd09,0xa
0d0a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0d0b e403       |    |		Load	0x2,0x3
0d0c 0120       |    |		Execute	Any,Is_Value
0d0d 6803       |h   |		Jump_Zero	0xd11
0d0e e001       |    |		Load	0x0,0x1
0d0f 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0d10 7801       |x   |		Jump	0xd12
0d11 e403       |    |		Load	0x2,0x3
0d12 e402       |    |		Load	0x2,0x2
0d13 e001       |    |		Load	0x0,0x1
0d14 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0d15 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0d16 c403       |    |		Store	0x2,0x3
0d17 c404       |    |		Store	0x2,0x4
0d18 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x25.0x17 = 0xd18,0xb
0d19 7009       |p   |		Jump_Nonzero	0xd23
0d1a e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x25.0x18 = 0xd1a,0xc
0d1b 3c11       |<   |		Execute	Record,Field_Read,Field_Number 0x11
0d1c 00db       |    |		Load_Top	At_Offset_3
0d1d e403       |    |		Load	0x2,0x3
0d1e 8230       | 0  |		Call	0x1,0x30
0d1f 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x25.0x19 = 0xd1f,0xd
0d20 0a01       |    |		Execute_Immediate	Plus,0x1
0d21 0248       | H  |		Execute	Discrete,Check_In_Integer
0d22 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0d23 e402       |    |		Load	0x2,0x2								; Debug Table 0x25.0x1a = 0xd23,0xe
0d24 e001       |    |		Load	0x0,0x1
0d25 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0d26 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0d27 c402       |    |		Store	0x2,0x2
0d28 e402       |    |		Load	0x2,0x2								; Debug Table 0x25.0x1b = 0xd28,0x9
0d29 e001       |    |		Load	0x0,0x1
0d2a 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0d2b 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0d2c 6fdc       |o   |		Jump_Zero	0xd09
0d2d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x25.0x1c = 0xd2d,0xf
0d2e 0217       |    |		Execute	Heap_Access,All_Reference
0d2f 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0d30 e00d       |    |		Load	0x0,0xd
0d31 1843       | C  |		Execute	Package,Field_Execute,Field_Number 0x43
0d32 e00d       |    |		Load	0x0,0xd
0d33 1842       | B  |		Execute	Package,Field_Execute,Field_Number 0x42
0d34 7012       |p   |		Jump_Nonzero	0xd47
0d35 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x25.0x1d = 0xd35,0x10
0d36 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0d37 00db       |    |		Load_Top	At_Offset_3
0d38 e00e       |    |		Load	0x0,0xe
0d39 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0d3a 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x25.0x1e = 0xd3a,0x11
0d3b e00b       |    |		Load	0x0,0xb
0d3c 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0d3d e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x25.0x1f = 0xd3d,0x12
0d3e 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
0d3f 6806       |h   |		Jump_Zero	0xd46
0d40 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x25.0x20 = 0xd40,0x13
0d41 3c12       |<   |		Execute	Record,Field_Read,Field_Number 0x12
0d42 0217       |    |		Execute	Heap_Access,All_Reference
0d43 00db       |    |		Load_Top	At_Offset_3
0d44 e00a       |    |		Load	0x0,0xa
0d45 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0d46 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0d47 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x25.0x21 = 0xd47,0x14
0d48 0c02       |    |		Execute_Immediate	Greater_Equal,0x2
0d49 6815       |h   |		Jump_Zero	0xd5f
0d4a 0092 10d7  |    |		Action	Push_String_Extended,0x10d7					; "no units with errors messages found in "
													; Debug Table 0x25.0x22 = 0xd4a,0x15
0d4c 4820       |H   |		Short_Literal	0x20
0d4d 4800       |H   |		Short_Literal	0x0
0d4e 480a       |H   |		Short_Literal	0xa
0d4f e406       |    |		Load	0x2,0x6
0d50 e009       |    |		Load	0x0,0x9
0d51 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0d52 01cc       |    |		Execute	Vector,Catenate
0d53 0092 10d8  |    |		Action	Push_String_Extended,0x10d8					; " units"
0d55 01cc       |    |		Execute	Vector,Catenate
0d56 e006       |    |		Load	0x0,0x6
0d57 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0d58 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x25.0x23 = 0xd58,0x16
0d59 e00b       |    |		Load	0x0,0xb
0d5a 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0d5b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x25.0x24 = 0xd5b,0x17
0d5c e00b       |    |		Load	0x0,0xb
0d5d 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0d5e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0d5f 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x25.0x25 = 0xd5f,0x18
0d60 e00b       |    |		Load	0x0,0xb
0d61 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0d62 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x25.0x26 = 0xd62,0x19
0d63 e00b       |    |		Load	0x0,0xb
0d64 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0d65 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0d66			TRAP_0cb0:
0d66 673d       |g=  |		Indirect_Literal	Discrete,0xca4,{0x00000000, 0x57979502}
0d67 010f       |    |		Execute	Exception,Equal
0d68 6801       |h   |		Jump_Zero	0xd6a
0d69 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x25.0x27 = 0xd69,0x1a
0d6a 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x25.0x28 = 0xd6a,0x1b
0d6b e00b       |    |		Load	0x0,0xb
0d6c 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0d6d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x25.0x29 = 0xd6d,0x1c
0d6e e00b       |    |		Load	0x0,0xb
0d6f 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0d70 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0d71 0000 0000  |    |		.BLANK	0000[0x7]
0d78 ; --------------------------------------------------------------------------------------
0d78 ; SUBPROGRAM
0d78 ; --------------------------------------------------------------------------------------
0d78 0d8b       |    |		.CONST	0x0d8b								; Address of begin
0d79 0004       |    |		.CONST	0x0004								; Address of exception handler
0d7a 0005       |    |		.CONST	0x0005								; Number of locals
0d7b			INIT_0d78:
0d7b e001       |    |		Load	0x0,0x1								; Debug Table 0x26 = .DEBUG	0x0d7b,0x1a1e,0x0001,0x0000,0x0057,0x98e5,0x0000,0x0ecb
													; Debug Table 0x26.0x0 = 0xd7b,0xffff
0d7c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0d7d 02c7       |    |		Declare_Variable	Any
0d7e 00d8       |    |		Load_Top	At_Offset_0
0d7f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0d80 e001       |    |		Load	0x0,0x1								; Debug Table 0x26.0x1 = 0xd80,0xfffe
0d81 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0d82 e221       | !  |		Load	0x1,0x21							; Debug Table 0x26.0x2 = 0xd82,0xfffd
0d83 e5fe       |    |		Load	0x2,-0x2
0d84 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0d85 e001       |    |		Load	0x0,0x1								; Debug Table 0x26.0x3 = 0xd85,0xfffc
0d86 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0d87 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0d88 02c7       |    |		Declare_Variable	Any
0d89 00d8       |    |		Load_Top	At_Offset_0
0d8a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0d8b			BODY_0d78:
0d8b e001       |    |		Load	0x0,0x1								; Debug Table 0x26.0x4 = 0xd8b,0x1
0d8c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0d8d 00d9       |    |		Load_Top	At_Offset_1
0d8e 0120       |    |		Execute	Any,Is_Value
0d8f 6804       |h   |		Jump_Zero	0xd94
0d90 e001       |    |		Load	0x0,0x1
0d91 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0d92 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0d93 7801       |x   |		Jump	0xd95
0d94 00d9       |    |		Load_Top	At_Offset_1
0d95 e5ff       |    |		Load	0x2,-0x1
0d96 e001       |    |		Load	0x0,0x1
0d97 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0d98 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0d99 c405       |    |		Store	0x2,0x5
0d9a 005b       | [  |		Store_Top	Discrete,At_Offset_3
0d9b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x26.0x5 = 0xd9b,0x2
0d9c e001       |    |		Load	0x0,0x1
0d9d 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0d9e 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0d9f c402       |    |		Store	0x2,0x2
0da0 781d       |x   |		Jump	0xdbe
0da1 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x26.0x6 = 0xda1,0x4
0da2 0217       |    |		Execute	Heap_Access,All_Reference
0da3 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0da4 e402       |    |		Load	0x2,0x2
0da5 012f       | /  |		Execute	Any,Equal
0da6 6813       |h   |		Jump_Zero	0xdba
0da7 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x26.0x7 = 0xda7,0x5
0da8 0217       |    |		Execute	Heap_Access,All_Reference
0da9 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0daa e5ff       |    |		Load	0x2,-0x1
0dab 4975       |Iu  |		Short_Literal	0x175
0dac 00eb       |    |		Load_Encached	Diana_Cache
0dad 0098       |    |		Execute	Package,Field_Read_Dynamic
0dae 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
0daf 7009       |p   |		Jump_Nonzero	0xdb9
0db0 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x26.0x8 = 0xdb0,0x6
0db1 0217       |    |		Execute	Heap_Access,All_Reference
0db2 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0db3 e5ff       |    |		Load	0x2,-0x1
0db4 00eb       |    |		Load_Encached	Diana_Cache
0db5 1874       | t  |		Execute	Package,Field_Execute,Field_Number 0x74
0db6 00da       |    |		Load_Top	At_Offset_2
0db7 0217       |    |		Execute	Heap_Access,All_Reference
0db8 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0db9 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x26.0x9 = 0xdb9,0x7
0dba 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x26.0xa = 0xdba,0x8
0dbb 0217       |    |		Execute	Heap_Access,All_Reference
0dbc 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0dbd 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0dbe 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x26.0xb = 0xdbe,0x3
0dbf 77e1       |w   |		Jump_Nonzero	0xda1
0dc0 e220       |    |		Load	0x1,0x20							; Debug Table 0x26.0xc = 0xdc0,0x9
0dc1 0322       | "  |		Declare_Variable	Record
0dc2 e402       |    |		Load	0x2,0x2
0dc3 e001       |    |		Load	0x0,0x1
0dc4 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0dc5 0119       |    |		Execute	Any,Check_In_Formal_Type
0dc6 00d9       |    |		Load_Top	At_Offset_1
0dc7 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0dc8 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x26.0xd = 0xdc8,0x401
0dc9 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x26.0xe = 0xdc9,0x9
0dca 00eb       |    |		Load_Encached	Diana_Cache
0dcb 1874       | t  |		Execute	Package,Field_Execute,Field_Number 0x74
0dcc 00d9       |    |		Load_Top	At_Offset_1
0dcd 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0dce e5fe       |    |		Load	0x2,-0x2
0dcf 00d9       |    |		Load_Top	At_Offset_1
0dd0 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0dd1 e221       | !  |		Load	0x1,0x21
0dd2 e007       |    |		Load	0x0,0x7
0dd3 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0dd4 e008       |    |		Load	0x0,0x8
0dd5 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0dd6 0396       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Value
0dd7 a5fe       |    |		Store_Unchecked	0x2,-0x2
0dd8 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x26.0xf = 0xdd8,0xa
0dd9 0000 0000  |    |		.BLANK	0000[0x7]
0de0 ; --------------------------------------------------------------------------------------
0de0 ; SUBPROGRAM
0de0 ; --------------------------------------------------------------------------------------
0de0 0de3       |    |		.CONST	0x0de3								; Address of begin
0de1 0004       |    |		.CONST	0x0004								; Address of exception handler
0de2 0001       |    |		.CONST	0x0001								; Number of locals
0de3			BODY_0de0:
0de3			INIT_0de0:
0de3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x27 = .DEBUG	0x0de3,0x1a40,0x0002,0x0000,0x0057,0x98e5,0x0000,0x109b
													; Debug Table 0x27.0x0 = 0xde3,0x1
0de4 01d9       |    |		Execute	Vector,Reverse_Bounds
0de5 0263       | c  |		Execute	Discrete,Above_Bound
0de6 7008       |p   |		Jump_Nonzero	0xdef
0de7 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x27.0x1 = 0xde7,0x2
0de8 e5ff       |    |		Load	0x2,-0x1
0de9 01d7       |    |		Execute	Vector,Field_Read
0dea 0e20       |    |		Execute_Immediate	Not_Equal,0x20
0deb 6802       |h   |		Jump_Zero	0xdee
0dec 4801       |H   |		Short_Literal	0x1							; Debug Table 0x27.0x2 = 0xdec,0x3
0ded 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0dee 3ff8       |?   |		Loop_Increasing	0xde7
0def 4800       |H   |		Short_Literal	0x0							; Debug Table 0x27.0x3 = 0xdef,0x4
0df0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0df1 0000 0000  |    |		.BLANK	0000[0x7]
0df8 ; --------------------------------------------------------------------------------------
0df8 ; SUBPROGRAM
0df8 ; --------------------------------------------------------------------------------------
0df8 0dff       |    |		.CONST	0x0dff								; Address of begin
0df9 0004       |    |		.CONST	0x0004								; Address of exception handler
0dfa 0002       |    |		.CONST	0x0002								; Number of locals
0dfb			INIT_0df8:
0dfb e01f       |    |		Load	0x0,0x1f							; Debug Table 0x28 = .DEBUG	0x0dfb,0x1a4a,0x0001,0x0000,0x0057,0x98e5,0x0000,0x10be
													; Debug Table 0x28.0x0 = 0xdfb,0xffff
0dfc 0322       | "  |		Declare_Variable	Record
0dfd 00d8       |    |		Load_Top	At_Offset_0
0dfe 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0dff			BODY_0df8:
0dff e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x28.0x1 = 0xdff,0x1
0e00 8234       | 4  |		Call	0x1,0x34
0e01 6823       |h#  |		Jump_Zero	0xe25
0e02 0007       |    |		Action	Break_Optional							; Debug Table 0x28.0x2 = 0xe02,0x2
0e03 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x28.0x3 = 0xe03,0x401
0e04 4801       |H   |		Short_Literal	0x1							; Debug Table 0x28.0x4 = 0xe04,0x2
0e05 e00d       |    |		Load	0x0,0xd
0e06 1841       | A  |		Execute	Package,Field_Execute,Field_Number 0x41
0e07 480c       |H   |		Short_Literal	0xc
0e08 4800       |H   |		Short_Literal	0x0
0e09 e01a       |    |		Load	0x0,0x1a
0e0a 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0e0b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x28.0x5 = 0xe0b,0x801
0e0c 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x28.0x6 = 0xe0c,0x401
0e0d 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
0e0e e01b       |    |		Load	0x0,0x1b
0e0f 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0e10 00d9       |    |		Load_Top	At_Offset_1
0e11 017d       | }  |		Execute	Record,Structure_Write
0e12 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x28.0x7 = 0xe12,0x3
0e13 00d9       |    |		Load_Top	At_Offset_1
0e14 e5fe       |    |		Load	0x2,-0x2
0e15 e5ff       |    |		Load	0x2,-0x1
0e16 e018       |    |		Load	0x0,0x18
0e17 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0e18 00d1       |    |		Pop_Control	Pop_Count_1
0e19 c5fd       |    |		Store	0x2,-0x3
0e1a e028       | (  |		Load	0x0,0x28							; Debug Table 0x28.0x8 = 0xe1a,0x4
0e1b 00d9       |    |		Load_Top	At_Offset_1
0e1c 017d       | }  |		Execute	Record,Structure_Write
0e1d e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x28.0x9 = 0xe1d,0x5
0e1e 00d9       |    |		Load_Top	At_Offset_1
0e1f e222       | "  |		Load	0x1,0x22
0e20 e5ff       |    |		Load	0x2,-0x1
0e21 e018       |    |		Load	0x0,0x18
0e22 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0e23 00d1       |    |		Pop_Control	Pop_Count_1
0e24 c5fd       |    |		Store	0x2,-0x3
0e25 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0e26 0000 0000  |    |		.XXX[0x2]
0e28 ; --------------------------------------------------------------------------------------
0e28 ; SUBPROGRAM
0e28 ; --------------------------------------------------------------------------------------
0e28 0e37       | 7  |		.CONST	0x0e37								; Address of begin
0e29 0e7e       | ~  |		.CONST	0x0e7e								; Address of exception handler
0e2a 0005       |    |		.CONST	0x0005								; Number of locals
0e2b			INIT_0e28:
0e2b e029       | )  |		Load	0x0,0x29							; Debug Table 0x29 = .DEBUG	0x0e2b,0x1a60,0x0002,0x0000,0x0057,0x98e5,0x0000,0x11eb
													; Debug Table 0x29.0x0 = 0xe2b,0xffff
0e2c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0e2d 02c7       |    |		Declare_Variable	Any
0e2e 00d8       |    |		Load_Top	At_Offset_0
0e2f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0e30 e024       | $  |		Load	0x0,0x24							; Debug Table 0x29.0x1 = 0xe30,0xfffe
0e31 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0e32 02c7       |    |		Declare_Variable	Any
0e33 00d8       |    |		Load_Top	At_Offset_0
0e34 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0e35 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x29.0x2 = 0xe35,0xfffd
0e36 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x29.0x3 = 0xe36,0xfffc
0e37			BODY_0e28:
0e37 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x29.0x4 = 0xe37,0x1
0e38 e020       |    |		Load	0x0,0x20
0e39 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0e3a e001       |    |		Load	0x0,0x1
0e3b 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0e3c 00ea       |    |		Load_Encached	Null_String_Cache
0e3d e5ff       |    |		Load	0x2,-0x1
0e3e e01d       |    |		Load	0x0,0x1d
0e3f 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0e40 4800       |H   |		Short_Literal	0x0
0e41 e029       | )  |		Load	0x0,0x29
0e42 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0e43 c402       |    |		Store	0x2,0x2
0e44 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x29.0x5 = 0xe44,0x2
0e45 e024       | $  |		Load	0x0,0x24
0e46 187f       |    |		Execute	Package,Field_Execute,Field_Number 0x7f
0e47 c403       |    |		Store	0x2,0x3
0e48 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x29.0x6 = 0xe48,0x3
0e49 00ea       |    |		Load_Encached	Null_String_Cache
0e4a 00ea       |    |		Load_Encached	Null_String_Cache
0e4b 4800       |H   |		Short_Literal	0x0
0e4c e024       | $  |		Load	0x0,0x24
0e4d 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0e4e c403       |    |		Store	0x2,0x3
0e4f 7824       |x$  |		Jump	0xe74
0e50 0007       |    |		Action	Break_Optional							; Debug Table 0x29.0x7 = 0xe50,0x5
0e51 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x29.0x8 = 0xe51,0xfbff
0e52 e024       | $  |		Load	0x0,0x24
0e53 1866       | f  |		Execute	Package,Field_Execute,Field_Number 0x66
0e54 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x29.0x9 = 0xe54,0x401
0e55 7007       |p   |		Jump_Nonzero	0xe5d
0e56 4801       |H   |		Short_Literal	0x1							; Debug Table 0x29.0xa = 0xe56,0x402
0e57 00d9       |    |		Load_Top	At_Offset_1
0e58 e5fe       |    |		Load	0x2,-0x2
0e59 e009       |    |		Load	0x0,0x9
0e5a 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0e5b 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0e5c 780a       |x   |		Jump	0xe67
0e5d 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x29.0xb = 0xe5d,0x403
0e5e 00e3       |    |		Load_Encached	Natural_Cache
0e5f e5fd       |    |		Load	0x2,-0x3
0e60 00db       |    |		Load_Top	At_Offset_3
0e61 e009       |    |		Load	0x0,0x9
0e62 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0e63 e003       |    |		Load	0x0,0x3
0e64 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0e65 c404       |    |		Store	0x2,0x4
0e66 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0e67 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x29.0xc = 0xe67,0x404
0e68 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0e69 6809       |h   |		Jump_Zero	0xe73
0e6a 00d8       |    |		Load_Top	At_Offset_0
0e6b 8223       | #  |		Call	0x1,0x23
0e6c 7006       |p   |		Jump_Nonzero	0xe73
0e6d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x29.0xd = 0xe6d,0x405
0e6e e024       | $  |		Load	0x0,0x24
0e6f 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0e70 c403       |    |		Store	0x2,0x3
0e71 4801       |H   |		Short_Literal	0x1							; Debug Table 0x29.0xe = 0xe71,0x406
0e72 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0e73 00d1       |    |		Pop_Control	Pop_Count_1
0e74 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x29.0xf = 0xe74,0x4
0e75 e024       | $  |		Load	0x0,0x24
0e76 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0e77 6fd8       |o   |		Jump_Zero	0xe50
0e78 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x29.0x10 = 0xe78,0x6
0e79 e024       | $  |		Load	0x0,0x24
0e7a 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0e7b c403       |    |		Store	0x2,0x3
0e7c 4800       |H   |		Short_Literal	0x0							; Debug Table 0x29.0x11 = 0xe7c,0x7
0e7d 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0e7e			TRAP_0e28:
0e7e 0007       |    |		Action	Break_Optional
0e7f 4800       |H   |		Short_Literal	0x0							; Debug Table 0x29.0x12 = 0xe7f,0x8
0e80 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0e81 0000 0000  |    |		.BLANK	0000[0x7]
0e88 ; --------------------------------------------------------------------------------------
0e88 ; SUBPROGRAM
0e88 ; --------------------------------------------------------------------------------------
0e88 0e8b       |    |		.CONST	0x0e8b								; Address of begin
0e89 0004       |    |		.CONST	0x0004								; Address of exception handler
0e8a 0001       |    |		.CONST	0x0001								; Number of locals
0e8b			BODY_0e88:
0e8b			INIT_0e88:
0e8b e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x2a = .DEBUG	0x0e8b,0x1a88,0x0001,0x0000,0x0057,0x98e5,0x0000,0x12a4
													; Debug Table 0x2a.0x0 = 0xe8b,0x1
0e8c e5fd       |    |		Load	0x2,-0x3
0e8d e5fe       |    |		Load	0x2,-0x2
0e8e e5ff       |    |		Load	0x2,-0x1
0e8f 8236       | 6  |		Call	0x1,0x36
0e90 6814       |h   |		Jump_Zero	0xea5
0e91 e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x2a.0x1 = 0xe91,0x2
0e92 4801       |H   |		Short_Literal	0x1
0e93 e5ff       |    |		Load	0x2,-0x1
0e94 e027       | '  |		Load	0x0,0x27
0e95 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0e96 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2a.0x2 = 0xe96,0x3
0e97 e012       |    |		Load	0x0,0x12
0e98 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0e99 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0e9a e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x2a.0x3 = 0xe9a,0x4
0e9b 6144       |aD  |		Indirect_Literal	Discrete,0xfe0,{0x00000000, 0x00002710}
0e9c e5fc       |    |		Load	0x2,-0x4
0e9d e5fe       |    |		Load	0x2,-0x2
0e9e e012       |    |		Load	0x0,0x12
0e9f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0ea0 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0ea1 e019       |    |		Load	0x0,0x19							; Debug Table 0x2a.0x4 = 0xea1,0x5
0ea2 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0ea3 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2a.0x5 = 0xea3,0x6
0ea4 a5fa       |    |		Store_Unchecked	0x2,-0x6
0ea5 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0ea6 0000 0000  |    |		.XXX[0x2]
0ea8 ; --------------------------------------------------------------------------------------
0ea8 ; SUBPROGRAM
0ea8 ; --------------------------------------------------------------------------------------
0ea8 0eaf       |    |		.CONST	0x0eaf								; Address of begin
0ea9 0004       |    |		.CONST	0x0004								; Address of exception handler
0eaa 0003       |    |		.CONST	0x0003								; Number of locals
0eab			INIT_0ea8:
0eab e001       |    |		Load	0x0,0x1								; Debug Table 0x2b = .DEBUG	0x0eab,0x1a96,0x0002,0x0000,0x0057,0x98e5,0x0000,0x1438
													; Debug Table 0x2b.0x0 = 0xeab,0xffff
0eac 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0ead 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0eae 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2b.0x1 = 0xeae,0xfffe
0eaf			BODY_0ea8:
0eaf e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2b.0x2 = 0xeaf,0x1
0eb0 e001       |    |		Load	0x0,0x1
0eb1 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0eb2 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
0eb3 0b03       |    |		Execute_Immediate	Case_Compare,0x3
0eb4 7006       |p   |		Jump_Nonzero	0xebb
0eb5 0b06       |    |		Execute_Immediate	Case_Compare,0x6
0eb6 7036       |p6  |		Jump_Nonzero	0xeed
0eb7 0b05       |    |		Execute_Immediate	Case_Compare,0x5
0eb8 7034       |p4  |		Jump_Nonzero	0xeed
0eb9 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2b.0x3 = 0xeb9,0xb
0eba 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0ebb e001       |    |		Load	0x0,0x1								; Debug Table 0x2b.0x4 = 0xebb,0x2
0ebc 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0ebd 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0ebe e001       |    |		Load	0x0,0x1
0ebf 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0ec0 e007       |    |		Load	0x0,0x7
0ec1 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0ec2 4801       |H   |		Short_Literal	0x1
0ec3 e013       |    |		Load	0x0,0x13
0ec4 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0ec5 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0ec6 005b       | [  |		Store_Top	Discrete,At_Offset_3
0ec7 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2b.0x5 = 0xec7,0x3
0ec8 6806       |h   |		Jump_Zero	0xecf
0ec9 0092 10d9  |    |		Action	Push_String_Extended,0x10d9					; "Can't get declaration from <cursor>"
													; Debug Table 0x2b.0x6 = 0xec9,0x4
0ecb e006       |    |		Load	0x0,0x6
0ecc 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0ecd 65d6       |e   |		Indirect_Literal	Discrete,0xca4,{0x00000000, 0x57979502}		; Debug Table 0x2b.0x7 = 0xecd,0x5
0ece 0257       | W  |		Execute	Discrete,Raise
0ecf 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2b.0x8 = 0xecf,0x6
0ed0 0007       |    |		Action	Break_Optional
0ed1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2b.0x9 = 0xed1,0x401
0ed2 0007       |    |		Action	Break_Optional
0ed3 e406       |    |		Load	0x2,0x6								; Debug Table 0x2b.0xa = 0xed3,0x801
0ed4 0007       |    |		Action	Break_Optional
0ed5 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x2b.0xb = 0xed5,0x802
0ed6 0007       |    |		Action	Break_Optional							; Debug Table 0x2b.0xc = 0xed6,0x803
0ed7 00d0       |    |		Action	Swap_Control							; Debug Table 0x2b.0xd = 0xed7,0x804
0ed8 00d1       |    |		Pop_Control	Pop_Count_1
0ed9 49e1       |I   |		Short_Literal	0x1e1							; Debug Table 0x2b.0xe = 0xed9,0x401
0eda 00eb       |    |		Load_Encached	Diana_Cache
0edb 0098       |    |		Execute	Package,Field_Read_Dynamic
0edc 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0edd 7800       |x   |		Jump	0xede
0ede 00d0       |    |		Action	Swap_Control
0edf 00d1       |    |		Pop_Control	Pop_Count_1
0ee0 6806       |h   |		Jump_Zero	0xee7							; Debug Table 0x2b.0xf = 0xee0,0x6
0ee1 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2b.0x10 = 0xee1,0x7
0ee2 00eb       |    |		Load_Encached	Diana_Cache
0ee3 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
0ee4 00eb       |    |		Load_Encached	Diana_Cache
0ee5 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0ee6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0ee7 0092 10da  |    |		Action	Push_String_Extended,0x10da					; "cursor is not on a name"
													; Debug Table 0x2b.0x11 = 0xee7,0x8
0ee9 e006       |    |		Load	0x0,0x6
0eea 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0eeb 65b8       |e   |		Indirect_Literal	Discrete,0xca4,{0x00000000, 0x57979502}		; Debug Table 0x2b.0x12 = 0xeeb,0x9
0eec 0257       | W  |		Execute	Discrete,Raise
0eed 0007       |    |		Action	Break_Optional							; Debug Table 0x2b.0x13 = 0xeed,0xa
0eee e007       |    |		Load	0x0,0x7								; Debug Table 0x2b.0x14 = 0xeee,0xf3ff
0eef 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0ef0 4803       |H   |		Short_Literal	0x3
0ef1 e013       |    |		Load	0x0,0x13
0ef2 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0ef3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2b.0x15 = 0xef3,0xc01
0ef4 01db       |    |		Execute	Vector,Length
0ef5 7006       |p   |		Jump_Nonzero	0xefc
0ef6 0092 10db  |    |		Action	Push_String_Extended,0x10db					; "there is no selected text"
													; Debug Table 0x2b.0x16 = 0xef6,0xc02
0ef8 e006       |    |		Load	0x0,0x6
0ef9 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0efa 65a9       |e   |		Indirect_Literal	Discrete,0xca4,{0x00000000, 0x57979502}		; Debug Table 0x2b.0x17 = 0xefa,0xc03
0efb 0257       | W  |		Execute	Discrete,Raise
0efc 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2b.0x18 = 0xefc,0xc04
0efd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0efe 0000 0000  |    |		.XXX[0x2]
0f00 ; --------------------------------------------------------------------------------------
0f00 ; SUBPROGRAM
0f00 ; --------------------------------------------------------------------------------------
0f00 0f13       |    |		.CONST	0x0f13								; Address of begin
0f01 0fc9       |    |		.CONST	0x0fc9								; Address of exception handler
0f02 000a       |    |		.CONST	0x000a								; Number of locals
0f03			INIT_0f00:
0f03 e02a       | *  |		Load	0x0,0x2a							; Debug Table 0x2c = .DEBUG	0x0f03,0x1aca,0x0001,0x0000,0x0057,0x98e5,0x0000,0x14d3
													; Debug Table 0x2c.0x0 = 0xf03,0xffff
0f04 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0f05 02c7       |    |		Declare_Variable	Any
0f06 00d8       |    |		Load_Top	At_Offset_0
0f07 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0f08 e001       |    |		Load	0x0,0x1								; Debug Table 0x2c.0x1 = 0xf08,0xfffe
0f09 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0f0a 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x2c.0x2 = 0xf0a,0xfffd
0f0b 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x2c.0x3 = 0xf0b,0xfffc
0f0c 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x2c.0x4 = 0xf0c,0xfffb
0f0d 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x2c.0x5 = 0xf0d,0xfffa
0f0e 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x2c.0x6 = 0xf0e,0xfff9
0f0f 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2c.0x7 = 0xf0f,0xfff8
0f10 e02a       | *  |		Load	0x0,0x2a							; Debug Table 0x2c.0x8 = 0xf10,0xfff7
0f11 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0f12 0322       | "  |		Declare_Variable	Record
0f13			BODY_0f00:
0f13 e001       |    |		Load	0x0,0x1								; Debug Table 0x2c.0x9 = 0xf13,0x1
0f14 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0f15 e402       |    |		Load	0x2,0x2
0f16 0120       |    |		Execute	Any,Is_Value
0f17 6803       |h   |		Jump_Zero	0xf1b
0f18 e02a       | *  |		Load	0x0,0x2a
0f19 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0f1a 7801       |x   |		Jump	0xf1c
0f1b e402       |    |		Load	0x2,0x2
0f1c 658b       |e   |		Indirect_Literal	Discrete,0xca8,{0x00000000, 0x00004000}
0f1d e020       |    |		Load	0x0,0x20
0f1e 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0f1f e5ff       |    |		Load	0x2,-0x1
0f20 e02a       | *  |		Load	0x0,0x2a
0f21 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0f22 c402       |    |		Store	0x2,0x2
0f23 c403       |    |		Store	0x2,0x3
0f24 e403       |    |		Load	0x2,0x3								; Debug Table 0x2c.0xa = 0xf24,0x2
0f25 6816       |h   |		Jump_Zero	0xf3c
0f26 0092 10dc  |    |		Action	Push_String_Extended,0x10dc					; "can't open "
													; Debug Table 0x2c.0xb = 0xf26,0x3
0f28 e5ff       |    |		Load	0x2,-0x1
0f29 e001       |    |		Load	0x0,0x1
0f2a 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0f2b 183f       | ?  |		Execute	Package,Field_Execute,Field_Number 0x3f
0f2c 01cc       |    |		Execute	Vector,Catenate
0f2d 0092 10d3  |    |		Action	Push_String_Extended,0x10d3					; " ("
0f2f 01cc       |    |		Execute	Vector,Catenate
0f30 e403       |    |		Load	0x2,0x3
0f31 e001       |    |		Load	0x0,0x1
0f32 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0f33 025e       | ^  |		Execute	Discrete,Convert
0f34 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0f35 01cc       |    |		Execute	Vector,Catenate
0f36 0092 10bb  |    |		Action	Push_String_Extended,0x10bb					; ")"
0f38 01cc       |    |		Execute	Vector,Catenate
0f39 e006       |    |		Load	0x0,0x6
0f3a 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0f3b 4508       |E   |		Exit_Suprogram	New_Top_Offset 0x8					; Debug Table 0x2c.0xc = 0xf3b,0x4
0f3c e5f8       |    |		Load	0x2,-0x8							; Debug Table 0x2c.0xd = 0xf3c,0x5
0f3d 0a01       |    |		Execute_Immediate	Plus,0x1
0f3e 0248       | H  |		Execute	Discrete,Check_In_Integer
0f3f a5f8       |    |		Store_Unchecked	0x2,-0x8
0f40 e402       |    |		Load	0x2,0x2								; Debug Table 0x2c.0xe = 0xf40,0x6
0f41 e02a       | *  |		Load	0x0,0x2a
0f42 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
0f43 4801       |H   |		Short_Literal	0x1
0f44 0263       | c  |		Execute	Discrete,Above_Bound
0f45 7049       |pI  |		Jump_Nonzero	0xf8f
0f46 0007       |    |		Action	Break_Optional							; Debug Table 0x2c.0xf = 0xf46,0x7
0f47 e402       |    |		Load	0x2,0x2								; Debug Table 0x2c.0x10 = 0xf47,0xfbff
0f48 00d9       |    |		Load_Top	At_Offset_1
0f49 e02a       | *  |		Load	0x0,0x2a
0f4a 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
0f4b 029f 108b  |    |		Declare_Subprogram	INIT_1088,For_Call
0f4d e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x2c.0x11 = 0xf4d,0x401
0f4e 7007       |p   |		Jump_Nonzero	0xf56
0f4f e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x2c.0x12 = 0xf4f,0x402
0f50 00da       |    |		Load_Top	At_Offset_2
0f51 e5fe       |    |		Load	0x2,-0x2
0f52 e009       |    |		Load	0x0,0x9
0f53 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0f54 a404       |    |		Store_Unchecked	0x2,0x4
0f55 7815       |x   |		Jump	0xf6b
0f56 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x2c.0x13 = 0xf56,0x403
0f57 680b       |h   |		Jump_Zero	0xf63
0f58 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x2c.0x14 = 0xf58,0x404
0f59 00e3       |    |		Load_Encached	Natural_Cache
0f5a e5fd       |    |		Load	0x2,-0x3
0f5b e40d       |    |		Load	0x2,0xd
0f5c e009       |    |		Load	0x0,0x9
0f5d 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0f5e e003       |    |		Load	0x0,0x3
0f5f 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0f60 c404       |    |		Store	0x2,0x4
0f61 c405       |    |		Store	0x2,0x5
0f62 7808       |x   |		Jump	0xf6b
0f63 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x2c.0x15 = 0xf63,0x405
0f64 00e3       |    |		Load_Encached	Natural_Cache
0f65 e5fd       |    |		Load	0x2,-0x3
0f66 e40d       |    |		Load	0x2,0xd
0f67 e003       |    |		Load	0x0,0x3
0f68 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0f69 c404       |    |		Store	0x2,0x4
0f6a c405       |    |		Store	0x2,0x5
0f6b e404       |    |		Load	0x2,0x4								; Debug Table 0x2c.0x16 = 0xf6b,0x406
0f6c 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0f6d 681f       |h   |		Jump_Zero	0xf8d
0f6e 00d9       |    |		Load_Top	At_Offset_1
0f6f 8223       | #  |		Call	0x1,0x23
0f70 701c       |p   |		Jump_Nonzero	0xf8d
0f71 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2c.0x17 = 0xf71,0x407
0f72 e40a       |    |		Load	0x2,0xa
0f73 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0f74 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2c.0x18 = 0xf74,0x408
0f75 e40a       |    |		Load	0x2,0xa
0f76 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0f77 7804       |x   |		Jump	0xf7c
0f78 e404       |    |		Load	0x2,0x4								; Debug Table 0x2c.0x19 = 0xf78,0x40a
0f79 0a01       |    |		Execute_Immediate	Plus,0x1
0f7a 0248       | H  |		Execute	Discrete,Check_In_Integer
0f7b a404       |    |		Store_Unchecked	0x2,0x4
0f7c e404       |    |		Load	0x2,0x4								; Debug Table 0x2c.0x1a = 0xf7c,0x409
0f7d 00da       |    |		Load_Top	At_Offset_2
0f7e 01db       |    |		Execute	Vector,Length
0f7f 027a       | z  |		Execute	Discrete,Less_Equal
0f80 6805       |h   |		Jump_Zero	0xf86
0f81 e404       |    |		Load	0x2,0x4
0f82 00da       |    |		Load_Top	At_Offset_2
0f83 01d7       |    |		Execute	Vector,Field_Read
0f84 0f20       |    |		Execute_Immediate	Equal,0x20
0f85 77f2       |w   |		Jump_Nonzero	0xf78
0f86 e404       |    |		Load	0x2,0x4								; Debug Table 0x2c.0x1b = 0xf86,0x40b
0f87 e40a       |    |		Load	0x2,0xa
0f88 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0f89 e404       |    |		Load	0x2,0x4								; Debug Table 0x2c.0x1c = 0xf89,0x40c
0f8a e40a       |    |		Load	0x2,0xa
0f8b 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0f8c 840e       |    |		Call	0x2,0xe								; Debug Table 0x2c.0x1d = 0xf8c,0x40d
0f8d 00d2       |    |		Pop_Control	Pop_Count_2
0f8e 3fb7       |?   |		Loop_Increasing	0xf46
0f8f e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x2c.0x1e = 0xf8f,0x8
0f90 701a       |p   |		Jump_Nonzero	0xfab
0f91 e001       |    |		Load	0x0,0x1								; Debug Table 0x2c.0x1f = 0xf91,0x9
0f92 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0f93 e402       |    |		Load	0x2,0x2
0f94 e02a       | *  |		Load	0x0,0x2a
0f95 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0f96 c402       |    |		Store	0x2,0x2
0f97 c403       |    |		Store	0x2,0x3
0f98 0007       |    |		Action	Break_Optional							; Debug Table 0x2c.0x20 = 0xf98,0xa
0f99 e406       |    |		Load	0x2,0x6								; Debug Table 0x2c.0x21 = 0xf99,0x801
0f9a 021d       |    |		Execute	Heap_Access,Is_Null
0f9b 680a       |h   |		Jump_Zero	0xfa6							; Debug Table 0x2c.0x22 = 0xf9b,0xa
0f9c 0092 10b5  |    |		Action	Push_String_Extended,0x10b5					; "no matches found in "
													; Debug Table 0x2c.0x23 = 0xf9c,0xb
0f9e e5ff       |    |		Load	0x2,-0x1
0f9f e001       |    |		Load	0x0,0x1
0fa0 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0fa1 183f       | ?  |		Execute	Package,Field_Execute,Field_Number 0x3f
0fa2 01cc       |    |		Execute	Vector,Catenate
0fa3 e006       |    |		Load	0x0,0x6
0fa4 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0fa5 4508       |E   |		Exit_Suprogram	New_Top_Offset 0x8
0fa6 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2c.0x24 = 0xfa6,0xc
0fa7 e406       |    |		Load	0x2,0x6
0fa8 e027       | '  |		Load	0x0,0x27
0fa9 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0faa 4508       |E   |		Exit_Suprogram	New_Top_Offset 0x8
0fab 0007       |    |		Action	Break_Optional							; Debug Table 0x2c.0x25 = 0xfab,0xd
0fac e406       |    |		Load	0x2,0x6								; Debug Table 0x2c.0x26 = 0xfac,0xc01
0fad 021d       |    |		Execute	Heap_Access,Is_Null
0fae 7012       |p   |		Jump_Nonzero	0xfc1							; Debug Table 0x2c.0x27 = 0xfae,0xd
0faf 4802       |H   |		Short_Literal	0x2							; Debug Table 0x2c.0x28 = 0xfaf,0xe
0fb0 e406       |    |		Load	0x2,0x6
0fb1 e402       |    |		Load	0x2,0x2
0fb2 e02a       | *  |		Load	0x0,0x2a
0fb3 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0fb4 e5fa       |    |		Load	0x2,-0x6
0fb5 0217       |    |		Execute	Heap_Access,All_Reference
0fb6 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0fb7 e00d       |    |		Load	0x0,0xd
0fb8 185e       | ^  |		Execute	Package,Field_Execute,Field_Number 0x5e
0fb9 e001       |    |		Load	0x0,0x1								; Debug Table 0x2c.0x29 = 0xfb9,0xf
0fba 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0fbb e402       |    |		Load	0x2,0x2
0fbc e02a       | *  |		Load	0x0,0x2a
0fbd 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0fbe c402       |    |		Store	0x2,0x2
0fbf c403       |    |		Store	0x2,0x3
0fc0 4508       |E   |		Exit_Suprogram	New_Top_Offset 0x8
0fc1 e001       |    |		Load	0x0,0x1								; Debug Table 0x2c.0x2a = 0xfc1,0x10
0fc2 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0fc3 e402       |    |		Load	0x2,0x2
0fc4 e02a       | *  |		Load	0x0,0x2a
0fc5 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0fc6 c402       |    |		Store	0x2,0x2
0fc7 c403       |    |		Store	0x2,0x3
0fc8 4508       |E   |		Exit_Suprogram	New_Top_Offset 0x8
0fc9			TRAP_0f00:
0fc9 0007       |    |		Action	Break_Optional
0fca e001       |    |		Load	0x0,0x1								; Debug Table 0x2c.0x2b = 0xfca,0x11
0fcb 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0fcc e402       |    |		Load	0x2,0x2
0fcd e02a       | *  |		Load	0x0,0x2a
0fce 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0fcf c402       |    |		Store	0x2,0x2
0fd0 c403       |    |		Store	0x2,0x3
0fd1 e00f       |    |		Load	0x0,0xf								; Debug Table 0x2c.0x2c = 0xfd1,0x12
0fd2 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0fd3 0092 10dd  |    |		Action	Push_String_Extended,0x10dd					; " while searching "
0fd5 01cc       |    |		Execute	Vector,Catenate
0fd6 e5ff       |    |		Load	0x2,-0x1
0fd7 e001       |    |		Load	0x0,0x1
0fd8 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0fd9 183f       | ?  |		Execute	Package,Field_Execute,Field_Number 0x3f
0fda 01cc       |    |		Execute	Vector,Catenate
0fdb e006       |    |		Load	0x0,0x6
0fdc 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0fdd 4508       |E   |		Exit_Suprogram	New_Top_Offset 0x8
0fde 0000 0000  |    |		.XXX[0x2]
0fe0 0000 0000  |    |		.LITERAL	{0x00000000, 0x00002710}
0fe4 0000 0000  |    |		.BLANK	0000[0x4]
0fe8 ; --------------------------------------------------------------------------------------
0fe8 ; SUBPROGRAM
0fe8 ; --------------------------------------------------------------------------------------
0fe8 0ff4       |    |		.CONST	0x0ff4								; Address of begin
0fe9 0004       |    |		.CONST	0x0004								; Address of exception handler
0fea 0004       |    |		.CONST	0x0004								; Number of locals
0feb			INIT_0fe8:
0feb e001       |    |		Load	0x0,0x1								; Debug Table 0x2d = .DEBUG	0x0feb,0x1b26,0x0001,0x0000,0x0057,0x98e5,0x0000,0x16bf
													; Debug Table 0x2d.0x0 = 0xfeb,0xffff
0fec 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0fed e001       |    |		Load	0x0,0x1								; Debug Table 0x2d.0x1 = 0xfed,0xfffe
0fee 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0fef 02ff       |    |		Declare_Variable	Variant_Record
0ff0 00d8       |    |		Load_Top	At_Offset_0
0ff1 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0ff2 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x2d.0x2 = 0xff2,0xfffd
0ff3 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0ff4			BODY_0fe8:
0ff4 781d       |x   |		Jump	0x1012
0ff5 e001       |    |		Load	0x0,0x1								; Debug Table 0x2d.0x3 = 0xff5,0x2
0ff6 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0ff7 00da       |    |		Load_Top	At_Offset_2
0ff8 60b3       |`   |		Indirect_Literal	Discrete,0x10ac,{0x00000000, 0x00004000}
0ff9 e020       |    |		Load	0x0,0x20
0ffa 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0ffb e5f9       |    |		Load	0x2,-0x7
0ffc e001       |    |		Load	0x0,0x1
0ffd 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0ffe 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0fff 00d1       |    |		Pop_Control	Pop_Count_1
1000 005b       | [  |		Store_Top	Discrete,At_Offset_3
1001 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2d.0x4 = 0x1001,0x3
1002 700a       |p   |		Jump_Nonzero	0x100d
1003 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2d.0x5 = 0x1003,0x4
1004 e5fa       |    |		Load	0x2,-0x6
1005 e5fb       |    |		Load	0x2,-0x5
1006 e5fc       |    |		Load	0x2,-0x4
1007 e5fd       |    |		Load	0x2,-0x3
1008 e5fe       |    |		Load	0x2,-0x2
1009 e5ff       |    |		Load	0x2,-0x1
100a e403       |    |		Load	0x2,0x3
100b 8239       | 9  |		Call	0x1,0x39
100c 0059       | Y  |		Store_Top	Discrete,At_Offset_1
100d e5f9       |    |		Load	0x2,-0x7							; Debug Table 0x2d.0x6 = 0x100d,0x5
100e e001       |    |		Load	0x0,0x1
100f 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
1010 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
1011 c5f9       |    |		Store	0x2,-0x7
1012 e5f9       |    |		Load	0x2,-0x7							; Debug Table 0x2d.0x7 = 0x1012,0x1
1013 e001       |    |		Load	0x0,0x1
1014 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
1015 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
1016 6fde       |o   |		Jump_Zero	0xff5
1017 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2d.0x8 = 0x1017,0x6
1018 a5f8       |    |		Store_Unchecked	0x2,-0x8
1019 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
101a 0000 0000  |    |		.BLANK	0000[0x6]
1020 ; --------------------------------------------------------------------------------------
1020 ; SUBPROGRAM
1020 ; --------------------------------------------------------------------------------------
1020 1023       | #  |		.CONST	0x1023								; Address of begin
1021 0004       |    |		.CONST	0x0004								; Address of exception handler
1022 0001       |    |		.CONST	0x0001								; Number of locals
1023			BODY_1020:
1023			INIT_1020:
1023 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2e = .DEBUG	0x1023,0x1b3a,0x0001,0x0000,0x0057,0x98e5,0x0000,0x1922
													; Debug Table 0x2e.0x0 = 0x1023,0x1
1024 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
1025 4602       |F   |		Jump_Case	0x3
1026 7802       |x   |		Jump	0x1029								; case 0x0
1027 7819       |x   |		Jump	0x1041								; case 0x1
1028 782d       |x-  |		Jump	0x1056								; case 0x2
1029 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2e.0x1 = 0x1029,0x2
102a 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
102b 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
102c 6811       |h   |		Jump_Zero	0x103e
102d 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2e.0x2 = 0x102d,0x3
102e a5fd       |    |		Store_Unchecked	0x2,-0x3
102f 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2e.0x3 = 0x102f,0x4
1030 e010       |    |		Load	0x0,0x10
1031 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
1032 1c08       |    |		Execute_Immediate	Run_Utility,0x8
1033 00db       |    |		Load_Top	At_Offset_3
1034 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
1035 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
1036 e001       |    |		Load	0x0,0x1
1037 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
1038 0119       |    |		Execute	Any,Check_In_Formal_Type
1039 00d9       |    |		Load_Top	At_Offset_1
103a 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
103b e5fe       |    |		Load	0x2,-0x2
103c 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
103d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
103e 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2e.0x4 = 0x103e,0x5
103f a5fd       |    |		Store_Unchecked	0x2,-0x3
1040 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
1041 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2e.0x5 = 0x1041,0x6
1042 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
1043 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
1044 700e       |p   |		Jump_Nonzero	0x1053
1045 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2e.0x6 = 0x1045,0x7
1046 a5fd       |    |		Store_Unchecked	0x2,-0x3
1047 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2e.0x7 = 0x1047,0x8
1048 e010       |    |		Load	0x0,0x10
1049 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
104a 1c08       |    |		Execute_Immediate	Run_Utility,0x8
104b 00db       |    |		Load_Top	At_Offset_3
104c 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
104d 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
104e 00d9       |    |		Load_Top	At_Offset_1
104f 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
1050 e5fe       |    |		Load	0x2,-0x2
1051 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
1052 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
1053 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2e.0x8 = 0x1053,0x9
1054 a5fd       |    |		Store_Unchecked	0x2,-0x3
1055 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
1056 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2e.0x9 = 0x1056,0xa
1057 a5fd       |    |		Store_Unchecked	0x2,-0x3
1058 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2e.0xa = 0x1058,0xb
1059 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
105a 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
105b 680f       |h   |		Jump_Zero	0x106b
105c 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2e.0xb = 0x105c,0xc
105d e010       |    |		Load	0x0,0x10
105e 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
105f 1c08       |    |		Execute_Immediate	Run_Utility,0x8
1060 00db       |    |		Load_Top	At_Offset_3
1061 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
1062 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
1063 e001       |    |		Load	0x0,0x1
1064 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
1065 0119       |    |		Execute	Any,Check_In_Formal_Type
1066 00d9       |    |		Load_Top	At_Offset_1
1067 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
1068 e5fe       |    |		Load	0x2,-0x2
1069 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
106a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
106b 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2e.0xc = 0x106b,0xd
106c e010       |    |		Load	0x0,0x10
106d 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
106e 1c08       |    |		Execute_Immediate	Run_Utility,0x8
106f 00db       |    |		Load_Top	At_Offset_3
1070 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
1071 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
1072 00d9       |    |		Load_Top	At_Offset_1
1073 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
1074 e5fe       |    |		Load	0x2,-0x2
1075 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
1076 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
1077 0000       |    |		.XXX[0x1]
1078 ; --------------------------------------------------------------------------------------
1078 ; SUBPROGRAM
1078 ; --------------------------------------------------------------------------------------
1078 107b       | {  |		.CONST	0x107b								; Address of begin
1079 1080       |    |		.CONST	0x1080								; Address of exception handler
107a 0001       |    |		.CONST	0x0001								; Number of locals
107b			BODY_1078:
107b			INIT_1078:
107b e403       |    |		Load	0x2,0x3								; Debug Table 0x2f = .DEBUG	0x107b,0x1b56,0x0004,0x0000,0x0057,0x98e5,0x0000,0x0b98
													; Debug Table 0x2f.0x0 = 0x107b,0x1
107c e025       | %  |		Load	0x0,0x25
107d 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
107e a402       |    |		Store_Unchecked	0x2,0x2
107f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
1080			TRAP_1078:
1080 0007       |    |		Action	Break_Optional
1081 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x2f.0x1 = 0x1081,0x2
1082 0000 0000  |    |		.BLANK	0000[0x6]
1088 ; --------------------------------------------------------------------------------------
1088 ; SUBPROGRAM
1088 ; --------------------------------------------------------------------------------------
1088 108b       |    |		.CONST	0x108b								; Address of begin
1089 10a9       |    |		.CONST	0x10a9								; Address of exception handler
108a 0001       |    |		.CONST	0x0001								; Number of locals
108b			BODY_1088:
108b			INIT_1088:
108b e402       |    |		Load	0x2,0x2								; Debug Table 0x30 = .DEBUG	0x108b,0x1b5c,0x0004,0x0000,0x0057,0x98e5,0x0000,0x1635
													; Debug Table 0x30.0x0 = 0x108b,0x1
108c e40a       |    |		Load	0x2,0xa
108d e02a       | *  |		Load	0x0,0x2a
108e 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
108f a409       |    |		Store_Unchecked	0x2,0x9
1090 0007       |    |		Action	Break_Optional							; Debug Table 0x30.0x1 = 0x1090,0x2
1091 e409       |    |		Load	0x2,0x9								; Debug Table 0x30.0x2 = 0x1091,0x401
1092 021d       |    |		Execute	Heap_Access,Is_Null
1093 7014       |p   |		Jump_Nonzero	0x10a8							; Debug Table 0x30.0x3 = 0x1093,0x2
1094 e5f9       |    |		Load	0x2,-0x7							; Debug Table 0x30.0x4 = 0x1094,0x3
1095 0007       |    |		Action	Break_Optional
1096 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x30.0x5 = 0x1096,0x801
1097 e409       |    |		Load	0x2,0x9								; Debug Table 0x30.0x6 = 0x1097,0x3
1098 00eb       |    |		Load_Encached	Diana_Cache
1099 1875       | u  |		Execute	Package,Field_Execute,Field_Number 0x75
109a a408       |    |		Store_Unchecked	0x2,0x8
109b 0007       |    |		Action	Break_Optional							; Debug Table 0x30.0x7 = 0x109b,0x4
109c e407       |    |		Load	0x2,0x7								; Debug Table 0x30.0x8 = 0x109c,0xc01
109d 021d       |    |		Execute	Heap_Access,Is_Null
109e 6803       |h   |		Jump_Zero	0x10a2							; Debug Table 0x30.0x9 = 0x109e,0x4
109f e408       |    |		Load	0x2,0x8								; Debug Table 0x30.0xa = 0x109f,0x5
10a0 a406       |    |		Store_Unchecked	0x2,0x6
10a1 7804       |x   |		Jump	0x10a6
10a2 e408       |    |		Load	0x2,0x8								; Debug Table 0x30.0xb = 0x10a2,0x6
10a3 e407       |    |		Load	0x2,0x7
10a4 00eb       |    |		Load_Encached	Diana_Cache
10a5 1877       | w  |		Execute	Package,Field_Execute,Field_Number 0x77
10a6 e408       |    |		Load	0x2,0x8								; Debug Table 0x30.0xc = 0x10a6,0x7
10a7 a407       |    |		Store_Unchecked	0x2,0x7
10a8 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
10a9			TRAP_1088:
10a9 0007       |    |		Action	Break_Optional
10aa 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x30.0xd = 0x10aa,0x8
10ab 0000       |    |		.XXX[0x1]
10ac 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
10b0 ; --------------------------------------------------------------------------------------
10b0 ; STRING TABLE
10b0 ; --------------------------------------------------------------------------------------
10b0 005e       | ^  |		.STRTAB	0x005e->0x10df							; "------------------------------------------------------------------------------"
10b1 00aa       |    |		.STRTAB	0x00aa->0x1106							; "no pattern given"
10b2 00b8       |    |		.STRTAB	0x00b8->0x110e							; "'c(ada)"
10b3 00bd       |    |		.STRTAB	0x00bd->0x1111							; "find of \x22"
10b4 00c4       |    |		.STRTAB	0x00c4->0x1116							; "\x22"
10b5 00c3       |    |		.STRTAB	0x00c3->0x1116							; "no matches found in "
10b6 00d5       |    |		.STRTAB	0x00d5->0x1120							; " files"
10b7 00d9       |    |		.STRTAB	0x00d9->0x1123							; "unexpected exception "
10b8 00ec       |    |		.STRTAB	0x00ec->0x112e							; "menu of \x22"
10b9 00f3       |    |		.STRTAB	0x00f3->0x1132							; "Can't get declaration of"
10ba 0109       |    |		.STRTAB	0x0109->0x113e							; "'th item on mark stack ("
10bb 011f       |    |		.STRTAB	0x011f->0x114a							; ")"
10bc 011e       |    |		.STRTAB	0x011e->0x114b							; "no displayable marks found"
10bd 0136       | 6  |		.STRTAB	0x0136->0x1158							; "marks"
10be 0139       | 9  |		.STRTAB	0x0139->0x115a							; "hold stack"
10bf 0141       | A  |		.STRTAB	0x0141->0x115f							; "<IMAGE>"
10c0 0146       | F  |		.STRTAB	0x0146->0x1163							; "name resolution"
10c1 0153       | S  |		.STRTAB	0x0153->0x116a							; "coding"
10c2 0157       | W  |		.STRTAB	0x0157->0x116d							; "obsolescence"
10c3 0161       | a  |		.STRTAB	0x0161->0x1173							; "Units that are obsolesced by demoting "
10c4 0185       |    |		.STRTAB	0x0185->0x1186							; "ada_menu"
10c5 018b       |    |		.STRTAB	0x018b->0x118a							; "menu passed to display_menu is null"
10c6 01ac       |    |		.STRTAB	0x01ac->0x119c							; "menu passed to erase_menu is null"
10c7 01cb       |    |		.STRTAB	0x01cb->0x11ac							; "menu passed to add_unit is null"
10c8 01e8       |    |		.STRTAB	0x01e8->0x11bc							; "no source units found in the display"
10c9 020a       |    |		.STRTAB	0x020a->0x11ce							; "no matches found"
10ca 0218       |    |		.STRTAB	0x0218->0x11d6							; "  "
10cb 0218       |    |		.STRTAB	0x0218->0x11d7							; " "
10cc 0217       |    |		.STRTAB	0x0217->0x11d7							; "."
10cd 0216       |    |		.STRTAB	0x0216->0x11d8							; "with of "
10ce 021c       |    |		.STRTAB	0x021c->0x11dc							; "use of "
10cf 0221       | !  |		.STRTAB	0x0221->0x11df							; "Unused items within "
10d0 0233       | 3  |		.STRTAB	0x0233->0x11e9							; " during show_unused"
10d1 0244       | D  |		.STRTAB	0x0244->0x11f3							; "unused within \x22"
10d2 0251       | Q  |		.STRTAB	0x0251->0x11fa							; "Can't resolve "
10d3 025d       | ]  |		.STRTAB	0x025d->0x1201							; " ("
10d4 025d       | ]  |		.STRTAB	0x025d->0x1202							; "no messages found in "
10d5 0270       | p  |		.STRTAB	0x0270->0x120d							; "exception while checking "
10d6 0287       |    |		.STRTAB	0x0287->0x1219							; "error messages"
10d7 0293       |    |		.STRTAB	0x0293->0x1220							; "no units with errors messages found in "
10d8 02b8       |    |		.STRTAB	0x02b8->0x1234							; " units"
10d9 02bc       |    |		.STRTAB	0x02bc->0x1237							; "Can't get declaration from <cursor>"
10da 02dd       |    |		.STRTAB	0x02dd->0x1248							; "cursor is not on a name"
10db 02f2       |    |		.STRTAB	0x02f2->0x1254							; "there is no selected text"
10dc 0309       |    |		.STRTAB	0x0309->0x1260							; "can't open "
10dd 0312       |    |		.STRTAB	0x0312->0x1266							; " while searching "
10de 0321       | !  |		.STREND 0x0321->0x126e
10df 2d2d 2d2d  |----|		.STRTAB_STRINGS
126f 0000       |    |		.XXX[0x1]
1270 ; --------------------------------------------------------------------------------------
1270 ; Debug Table
1270 ; --------------------------------------------------------------------------------------
1270 0003 0031  |   1|		.CONST	0x0003,0x0031
1272 000b 13fa  |    |		.DEBUG	0x000b,0x13fa,0x0000,0x0000,0x0057,0x9795,0x0000,0x11ad
127a 0032 1422  | 2 "|		.DEBUG	0x0032,0x1422,0x0000,0x0000,0x0057,0x98e5,0x0000,0x001e
1282 00a3 148c  |    |		.DEBUG	0x00a3,0x148c,0x0001,0x0000,0x0057,0x9795,0x0000,0x11ae
128a 019b 14ea  |    |		.DEBUG	0x019b,0x14ea,0x0001,0x0000,0x0057,0x9795,0x0000,0x11ca
1292 01fb 1516  |    |		.DEBUG	0x01fb,0x1516,0x0001,0x0000,0x0057,0x9795,0x0000,0x11de
129a 022b 152a  | + *|		.DEBUG	0x022b,0x152a,0x0001,0x0000,0x0057,0x9795,0x0000,0x11f2
12a2 024b 153a  | K :|		.DEBUG	0x024b,0x153a,0x0001,0x0000,0x0057,0x9795,0x0000,0x11fe
12aa 0303 1588  |    |		.DEBUG	0x0303,0x1588,0x0001,0x0000,0x0057,0x9795,0x0000,0x120a
12b2 0393 15c2  |    |		.DEBUG	0x0393,0x15c2,0x0001,0x0000,0x0057,0x9795,0x0000,0x1216
12ba 03d3 15de  |    |		.DEBUG	0x03d3,0x15de,0x0001,0x0000,0x0057,0x9795,0x0000,0x1228
12c2 042b 1602  | +  |		.DEBUG	0x042b,0x1602,0x0001,0x0000,0x0057,0x9795,0x0000,0x123a
12ca 047b 1626  | { &|		.DEBUG	0x047b,0x1626,0x0001,0x0000,0x0057,0x9795,0x0000,0x124c
12d2 051b 1678  |   x|		.DEBUG	0x051b,0x1678,0x0001,0x0000,0x0057,0x9795,0x0000,0x1264
12da 0563 169c  | c  |		.DEBUG	0x0563,0x169c,0x0001,0x0000,0x0057,0x9795,0x0000,0x127c
12e2 0583 16aa  |    |		.DEBUG	0x0583,0x16aa,0x0001,0x0000,0x0057,0x9795,0x0000,0x1288
12ea 05ab 16ba  |    |		.DEBUG	0x05ab,0x16ba,0x0001,0x0000,0x0057,0x9795,0x0000,0x1294
12f2 05eb 16d8  |    |		.DEBUG	0x05eb,0x16d8,0x0001,0x0000,0x0057,0x9795,0x0000,0x12ac
12fa 06a3 1718  |    |		.DEBUG	0x06a3,0x1718,0x0001,0x0000,0x0057,0x9795,0x0000,0x12c4
1302 073b 1758  | ; X|		.DEBUG	0x073b,0x1758,0x0001,0x0000,0x0057,0x9795,0x0000,0x12d4
130a 077b 1778  | { x|		.DEBUG	0x077b,0x1778,0x0002,0x0000,0x0057,0x9795,0x0000,0x12dc
1312 07b3 178c  |    |		.DEBUG	0x07b3,0x178c,0x0002,0x0000,0x0057,0x9795,0x0000,0x12e7
131a 085b 17c2  | [  |		.DEBUG	0x085b,0x17c2,0x0005,0x0000,0x0057,0x98e5,0x0000,0x0038
1322 0873 17c4  | s  |		.DEBUG	0x0873,0x17c4,0x0002,0x0000,0x0057,0x98e5,0x0000,0x0059
132a 089b 17d0  |    |		.DEBUG	0x089b,0x17d0,0x0001,0x0000,0x0057,0x98e5,0x0000,0x009a
1332 08d3 17e8  |    |		.DEBUG	0x08d3,0x17e8,0x0002,0x0000,0x0057,0x98e5,0x0000,0x0294
133a 08e3 17f0  |    |		.DEBUG	0x08e3,0x17f0,0x0001,0x0000,0x0057,0x98e5,0x0000,0x02c3
1342 0963 183a  | c :|		.DEBUG	0x0963,0x183a,0x0001,0x0000,0x0057,0x98e5,0x0000,0x03cc
134a 09eb 1888  |    |		.DEBUG	0x09eb,0x1888,0x0001,0x0000,0x0057,0x98e5,0x0000,0x04c6
1352 0a7b 18ca  | {  |		.DEBUG	0x0a7b,0x18ca,0x0001,0x0000,0x0057,0x98e5,0x0000,0x08c3
135a 0ab3 18d6  |    |		.DEBUG	0x0ab3,0x18d6,0x0001,0x0000,0x0057,0x98e5,0x0000,0x090e
1362 0af3 18ee  |    |		.DEBUG	0x0af3,0x18ee,0x0002,0x0000,0x0057,0x98e5,0x0000,0x0a1e
136a 0b33 1914  | 3  |		.DEBUG	0x0b33,0x1914,0x0001,0x0000,0x0057,0x98e5,0x0000,0x0ab8
1372 0b7b 1954  | { T|		.DEBUG	0x0b7b,0x1954,0x0002,0x0000,0x0057,0x98e5,0x0000,0x0b46
137a 0b9b 196a  |   j|		.DEBUG	0x0b9b,0x196a,0x0001,0x0000,0x0057,0x98e5,0x0000,0x0ba2
1382 0bcb 197c  |   ||		.DEBUG	0x0bcb,0x197c,0x0001,0x0000,0x0057,0x98e5,0x0000,0x0bff
138a 0c0b 1990  |    |		.DEBUG	0x0c0b,0x1990,0x0001,0x0000,0x0057,0x98e5,0x0000,0x0c55
1392 0c43 19a4  | C  |		.DEBUG	0x0c43,0x19a4,0x0001,0x0000,0x0057,0x98e5,0x0000,0x0cc2
139a 0cb3 19c8  |    |		.DEBUG	0x0cb3,0x19c8,0x0001,0x0000,0x0057,0x98e5,0x0000,0x0d4f
13a2 0d7b 1a1e  | {  |		.DEBUG	0x0d7b,0x1a1e,0x0001,0x0000,0x0057,0x98e5,0x0000,0x0ecb
13aa 0de3 1a40  |   @|		.DEBUG	0x0de3,0x1a40,0x0002,0x0000,0x0057,0x98e5,0x0000,0x109b
13b2 0dfb 1a4a  |   J|		.DEBUG	0x0dfb,0x1a4a,0x0001,0x0000,0x0057,0x98e5,0x0000,0x10be
13ba 0e2b 1a60  | + `|		.DEBUG	0x0e2b,0x1a60,0x0002,0x0000,0x0057,0x98e5,0x0000,0x11eb
13c2 0e8b 1a88  |    |		.DEBUG	0x0e8b,0x1a88,0x0001,0x0000,0x0057,0x98e5,0x0000,0x12a4
13ca 0eab 1a96  |    |		.DEBUG	0x0eab,0x1a96,0x0002,0x0000,0x0057,0x98e5,0x0000,0x1438
13d2 0f03 1aca  |    |		.DEBUG	0x0f03,0x1aca,0x0001,0x0000,0x0057,0x98e5,0x0000,0x14d3
13da 0feb 1b26  |   &|		.DEBUG	0x0feb,0x1b26,0x0001,0x0000,0x0057,0x98e5,0x0000,0x16bf
13e2 1023 1b3a  | # :|		.DEBUG	0x1023,0x1b3a,0x0001,0x0000,0x0057,0x98e5,0x0000,0x1922
13ea 107b 1b56  | { V|		.DEBUG	0x107b,0x1b56,0x0004,0x0000,0x0057,0x98e5,0x0000,0x0b98
13f2 108b 1b5c  |   \|		.DEBUG	0x108b,0x1b5c,0x0004,0x0000,0x0057,0x98e5,0x0000,0x1635
13fa ; --------------------------------------------------------------------------------------
13fa ; Debug3 Subtable 0x0
13fa ; --------------------------------------------------------------------------------------
13fa 0013 0000  |    |		.DBG3TAB	0x0013,0x0000
13fc 000b ffff  |    |		.CONST	0x000b,0xffff
13fe 000d fffe  |    |		.CONST	0x000d,0xfffe
1400 000f fffd  |    |		.CONST	0x000f,0xfffd
1402 0011 fffc  |    |		.CONST	0x0011,0xfffc
1404 0013 fffb  |    |		.CONST	0x0013,0xfffb
1406 0015 fffa  |    |		.CONST	0x0015,0xfffa
1408 0017 fff9  |    |		.CONST	0x0017,0xfff9
140a 0019 fff8  |    |		.CONST	0x0019,0xfff8
140c 001b fff7  |    |		.CONST	0x001b,0xfff7
140e 001d fff6  |    |		.CONST	0x001d,0xfff6
1410 001f fff5  |    |		.CONST	0x001f,0xfff5
1412 0021 fff4  | !  |		.CONST	0x0021,0xfff4
1414 0023 fff3  | #  |		.CONST	0x0023,0xfff3
1416 0025 fff2  | %  |		.CONST	0x0025,0xfff2
1418 0027 fff1  | '  |		.CONST	0x0027,0xfff1
141a 0029 fff0  | )  |		.CONST	0x0029,0xfff0
141c 002b ffef  | +  |		.CONST	0x002b,0xffef
141e 002d ffee  | -  |		.CONST	0x002d,0xffee
1420 002f ffed  | /  |		.CONST	0x002f,0xffed
1422 ; --------------------------------------------------------------------------------------
1422 ; Debug3 Subtable 0x1
1422 ; --------------------------------------------------------------------------------------
1422 0034 0000  | 4  |		.DBG3TAB	0x0034,0x0000
1424 0032 ffff  | 2  |		.CONST	0x0032,0xffff
1426 0033 fffe  | 3  |		.CONST	0x0033,0xfffe
1428 0034 fffd  | 4  |		.CONST	0x0034,0xfffd
142a 0035 fffc  | 5  |		.CONST	0x0035,0xfffc
142c 0037 fffb  | 7  |		.CONST	0x0037,0xfffb
142e 003a fffa  | :  |		.CONST	0x003a,0xfffa
1430 003b fff9  | ;  |		.CONST	0x003b,0xfff9
1432 0043 fff8  | C  |		.CONST	0x0043,0xfff8
1434 0045 fff7  | E  |		.CONST	0x0045,0xfff7
1436 0047 fff6  | G  |		.CONST	0x0047,0xfff6
1438 0049 fff5  | I  |		.CONST	0x0049,0xfff5
143a 004b fff4  | K  |		.CONST	0x004b,0xfff4
143c 004d fff3  | M  |		.CONST	0x004d,0xfff3
143e 004f fff2  | O  |		.CONST	0x004f,0xfff2
1440 0051 fff1  | Q  |		.CONST	0x0051,0xfff1
1442 0053 fff0  | S  |		.CONST	0x0053,0xfff0
1444 0055 ffef  | U  |		.CONST	0x0055,0xffef
1446 0057 ffee  | W  |		.CONST	0x0057,0xffee
1448 0059 ffed  | Y  |		.CONST	0x0059,0xffed
144a 005b ffec  | [  |		.CONST	0x005b,0xffec
144c 005d ffeb  | ]  |		.CONST	0x005d,0xffeb
144e 005f ffea  | _  |		.CONST	0x005f,0xffea
1450 0061 ffe9  | a  |		.CONST	0x0061,0xffe9
1452 0063 ffe8  | c  |		.CONST	0x0063,0xffe8
1454 0065 ffe7  | e  |		.CONST	0x0065,0xffe7
1456 0067 ffe6  | g  |		.CONST	0x0067,0xffe6
1458 0069 ffe5  | i  |		.CONST	0x0069,0xffe5
145a 006b ffe4  | k  |		.CONST	0x006b,0xffe4
145c 006d ffe3  | m  |		.CONST	0x006d,0xffe3
145e 006f ffe2  | o  |		.CONST	0x006f,0xffe2
1460 0071 ffe1  | q  |		.CONST	0x0071,0xffe1
1462 0073 ffe0  | s  |		.CONST	0x0073,0xffe0
1464 0075 ffdf  | u  |		.CONST	0x0075,0xffdf
1466 0077 ffde  | w  |		.CONST	0x0077,0xffde
1468 0079 ffdd  | y  |		.CONST	0x0079,0xffdd
146a 007b ffdc  | {  |		.CONST	0x007b,0xffdc
146c 007d ffdb  | }  |		.CONST	0x007d,0xffdb
146e 007f ffda  |    |		.CONST	0x007f,0xffda
1470 0081 ffd9  |    |		.CONST	0x0081,0xffd9
1472 0083 ffd8  |    |		.CONST	0x0083,0xffd8
1474 0085 ffd7  |    |		.CONST	0x0085,0xffd7
1476 0087 ffd6  |    |		.CONST	0x0087,0xffd6
1478 0089 ffd5  |    |		.CONST	0x0089,0xffd5
147a 008b ffd4  |    |		.CONST	0x008b,0xffd4
147c 008d ffd3  |    |		.CONST	0x008d,0xffd3
147e 008f ffd2  |    |		.CONST	0x008f,0xffd2
1480 0091 ffd1  |    |		.CONST	0x0091,0xffd1
1482 0093 ffd0  |    |		.CONST	0x0093,0xffd0
1484 0095 ffcf  |    |		.CONST	0x0095,0xffcf
1486 0097 ffce  |    |		.CONST	0x0097,0xffce
1488 0099 ffcd  |    |		.CONST	0x0099,0xffcd
148a 009b ffcc  |    |		.CONST	0x009b,0xffcc
148c ; --------------------------------------------------------------------------------------
148c ; Debug3 Subtable 0x2
148c ; --------------------------------------------------------------------------------------
148c 0007 0027  |   '|		.DBG3TAB	0x0007,0x0027
148e 00a3 ffff  |    |		.CONST	0x00a3,0xffff
1490 00a5 fffe  |    |		.CONST	0x00a5,0xfffe
1492 00ab fffd  |    |		.CONST	0x00ab,0xfffd
1494 00ac fffc  |    |		.CONST	0x00ac,0xfffc
1496 00b1 fffb  |    |		.CONST	0x00b1,0xfffb
1498 00b6 fffa  |    |		.CONST	0x00b6,0xfffa
149a 00ba 0001  |    |		.CONST	0x00ba,0x0001
149c 00bd 0002  |    |		.CONST	0x00bd,0x0002
149e 00c1 0003  |    |		.CONST	0x00c1,0x0003
14a0 00c2 0004  |    |		.CONST	0x00c2,0x0004
14a2 00d0 0005  |    |		.CONST	0x00d0,0x0005
14a4 00d1 fbff  |    |		.CONST	0x00d1,0xfbff
14a6 00d3 0401  |    |		.CONST	0x00d3,0x0401
14a8 00d5 0402  |    |		.CONST	0x00d5,0x0402
14aa 00d7 0403  |    |		.CONST	0x00d7,0x0403
14ac 00e5 0404  |    |		.CONST	0x00e5,0x0404
14ae 00f0 0405  |    |		.CONST	0x00f0,0x0405
14b0 00f5 0406  |    |		.CONST	0x00f5,0x0406
14b2 00fa 0407  |    |		.CONST	0x00fa,0x0407
14b4 00fb 0408  |    |		.CONST	0x00fb,0x0408
14b6 00fe 0409  |    |		.CONST	0x00fe,0x0409
14b8 0104 040a  |    |		.CONST	0x0104,0x040a
14ba 0107 040b  |    |		.CONST	0x0107,0x040b
14bc 0116 040c  |    |		.CONST	0x0116,0x040c
14be 011e 040d  |    |		.CONST	0x011e,0x040d
14c0 0124 040e  | $  |		.CONST	0x0124,0x040e
14c2 012e 040f  | .  |		.CONST	0x012e,0x040f
14c4 0132 0410  | 2  |		.CONST	0x0132,0x0410
14c6 0136 0801  | 6  |		.CONST	0x0136,0x0801
14c8 0137 0410  | 7  |		.CONST	0x0137,0x0410
14ca 0138 0c01  | 8  |		.CONST	0x0138,0x0c01
14cc 0139 0801  | 9  |		.CONST	0x0139,0x0801
14ce 013e 0411  | >  |		.CONST	0x013e,0x0411
14d0 014b 0412  | K  |		.CONST	0x014b,0x0412
14d2 0153 0413  | S  |		.CONST	0x0153,0x0413
14d4 0161 0414  | a  |		.CONST	0x0161,0x0414
14d6 0164 0415  | d  |		.CONST	0x0164,0x0415
14d8 0168 0416  | h  |		.CONST	0x0168,0x0416
14da 016d 0417  | m  |		.CONST	0x016d,0x0417
14dc 0170 0418  | p  |		.CONST	0x0170,0x0418
14de 0173 0419  | s  |		.CONST	0x0173,0x0419
14e0 017d 0006  | }  |		.CONST	0x017d,0x0006
14e2 0180 0007  |    |		.CONST	0x0180,0x0007
14e4 0184 0008  |    |		.CONST	0x0184,0x0008
14e6 018b 0009  |    |		.CONST	0x018b,0x0009
14e8 018e 000a  |    |		.CONST	0x018e,0x000a
14ea ; --------------------------------------------------------------------------------------
14ea ; Debug3 Subtable 0x3
14ea ; --------------------------------------------------------------------------------------
14ea 0003 0012  |    |		.DBG3TAB	0x0003,0x0012
14ec 019b ffff  |    |		.CONST	0x019b,0xffff
14ee 019c fffe  |    |		.CONST	0x019c,0xfffe
14f0 019e fffd  |    |		.CONST	0x019e,0xfffd
14f2 01a2 0001  |    |		.CONST	0x01a2,0x0001
14f4 01a6 0002  |    |		.CONST	0x01a6,0x0002
14f6 01ac 0003  |    |		.CONST	0x01ac,0x0003
14f8 01b4 0004  |    |		.CONST	0x01b4,0x0004
14fa 01b8 0005  |    |		.CONST	0x01b8,0x0005
14fc 01bb 0006  |    |		.CONST	0x01bb,0x0006
14fe 01c6 0007  |    |		.CONST	0x01c6,0x0007
1500 01ca 0008  |    |		.CONST	0x01ca,0x0008
1502 01ce 0009  |    |		.CONST	0x01ce,0x0009
1504 01d3 0401  |    |		.CONST	0x01d3,0x0401
1506 01d4 0009  |    |		.CONST	0x01d4,0x0009
1508 01d9 000a  |    |		.CONST	0x01d9,0x000a
150a 01de 000b  |    |		.CONST	0x01de,0x000b
150c 01e1 000c  |    |		.CONST	0x01e1,0x000c
150e 01e4 000d  |    |		.CONST	0x01e4,0x000d
1510 01ee 000e  |    |		.CONST	0x01ee,0x000e
1512 01ef 000f  |    |		.CONST	0x01ef,0x000f
1514 01f2 0010  |    |		.CONST	0x01f2,0x0010
1516 ; --------------------------------------------------------------------------------------
1516 ; Debug3 Subtable 0x4
1516 ; --------------------------------------------------------------------------------------
1516 0001 0008  |    |		.DBG3TAB	0x0001,0x0008
1518 01fb ffff  |    |		.CONST	0x01fb,0xffff
151a 01ff 0001  |    |		.CONST	0x01ff,0x0001
151c 0202 0002  |    |		.CONST	0x0202,0x0002
151e 0208 0003  |    |		.CONST	0x0208,0x0003
1520 020b 0004  |    |		.CONST	0x020b,0x0004
1522 020f 0005  |    |		.CONST	0x020f,0x0005
1524 0212 0006  |    |		.CONST	0x0212,0x0006
1526 0218 0007  |    |		.CONST	0x0218,0x0007
1528 0221 0008  | !  |		.CONST	0x0221,0x0008
152a ; --------------------------------------------------------------------------------------
152a ; Debug3 Subtable 0x5
152a ; --------------------------------------------------------------------------------------
152a 0001 0006  |    |		.DBG3TAB	0x0001,0x0006
152c 022b ffff  | +  |		.CONST	0x022b,0xffff
152e 022f 0001  | /  |		.CONST	0x022f,0x0001
1530 0232 0002  | 2  |		.CONST	0x0232,0x0002
1532 0238 0003  | 8  |		.CONST	0x0238,0x0003
1534 023b 0004  | ;  |		.CONST	0x023b,0x0004
1536 023f 0005  | ?  |		.CONST	0x023f,0x0005
1538 0246 0006  | F  |		.CONST	0x0246,0x0006
153a ; --------------------------------------------------------------------------------------
153a ; Debug3 Subtable 0x6
153a ; --------------------------------------------------------------------------------------
153a 0006 0020  |    |		.DBG3TAB	0x0006,0x0020
153c 024b ffff  | K  |		.CONST	0x024b,0xffff
153e 024d fffe  | M  |		.CONST	0x024d,0xfffe
1540 024f fffd  | O  |		.CONST	0x024f,0xfffd
1542 0253 fffc  | S  |		.CONST	0x0253,0xfffc
1544 0254 fffb  | T  |		.CONST	0x0254,0xfffb
1546 0257 fffa  | W  |		.CONST	0x0257,0xfffa
1548 0258 0001  | X  |		.CONST	0x0258,0x0001
154a 025e 0002  | ^  |		.CONST	0x025e,0x0002
154c 0262 0003  | b  |		.CONST	0x0262,0x0003
154e 0266 0004  | f  |		.CONST	0x0266,0x0004
1550 0272 0005  | r  |		.CONST	0x0272,0x0005
1552 0274 0006  | t  |		.CONST	0x0274,0x0006
1554 028a 0007  |    |		.CONST	0x028a,0x0007
1556 0295 0008  |    |		.CONST	0x0295,0x0008
1558 0299 0009  |    |		.CONST	0x0299,0x0009
155a 029f 000a  |    |		.CONST	0x029f,0x000a
155c 02a1 000b  |    |		.CONST	0x02a1,0x000b
155e 02a5 000c  |    |		.CONST	0x02a5,0x000c
1560 02a6 000d  |    |		.CONST	0x02a6,0x000d
1562 02ae 000e  |    |		.CONST	0x02ae,0x000e
1564 02b2 000f  |    |		.CONST	0x02b2,0x000f
1566 02b7 0010  |    |		.CONST	0x02b7,0x0010
1568 02bb 0011  |    |		.CONST	0x02bb,0x0011
156a 02bf 0401  |    |		.CONST	0x02bf,0x0401
156c 02c0 0011  |    |		.CONST	0x02c0,0x0011
156e 02c1 0801  |    |		.CONST	0x02c1,0x0801
1570 02c2 0401  |    |		.CONST	0x02c2,0x0401
1572 02c8 0013  |    |		.CONST	0x02c8,0x0013
1574 02d1 0014  |    |		.CONST	0x02d1,0x0014
1576 02d5 0015  |    |		.CONST	0x02d5,0x0015
1578 02df 0016  |    |		.CONST	0x02df,0x0016
157a 02e3 0012  |    |		.CONST	0x02e3,0x0012
157c 02e5 0017  |    |		.CONST	0x02e5,0x0017
157e 02ea 0018  |    |		.CONST	0x02ea,0x0018
1580 02ed 0019  |    |		.CONST	0x02ed,0x0019
1582 02f0 001a  |    |		.CONST	0x02f0,0x001a
1584 02f8 001b  |    |		.CONST	0x02f8,0x001b
1586 02fb 001c  |    |		.CONST	0x02fb,0x001c
1588 ; --------------------------------------------------------------------------------------
1588 ; Debug3 Subtable 0x7
1588 ; --------------------------------------------------------------------------------------
1588 0005 0017  |    |		.DBG3TAB	0x0005,0x0017
158a 0303 ffff  |    |		.CONST	0x0303,0xffff
158c 0305 fffe  |    |		.CONST	0x0305,0xfffe
158e 0309 fffd  |    |		.CONST	0x0309,0xfffd
1590 030b fffc  |    |		.CONST	0x030b,0xfffc
1592 030d fffb  |    |		.CONST	0x030d,0xfffb
1594 030e 0001  |    |		.CONST	0x030e,0x0001
1596 0314 0002  |    |		.CONST	0x0314,0x0002
1598 031c 0003  |    |		.CONST	0x031c,0x0003
159a 0323 0004  | #  |		.CONST	0x0323,0x0004
159c 0327 0005  | '  |		.CONST	0x0327,0x0005
159e 032c 0006  | ,  |		.CONST	0x032c,0x0006
15a0 032e 0007  | .  |		.CONST	0x032e,0x0007
15a2 0332 0008  | 2  |		.CONST	0x0332,0x0008
15a4 0335 0009  | 5  |		.CONST	0x0335,0x0009
15a6 033e 000a  | >  |		.CONST	0x033e,0x000a
15a8 034b 000b  | K  |		.CONST	0x034b,0x000b
15aa 034e 000c  | N  |		.CONST	0x034e,0x000c
15ac 0354 000d  | T  |		.CONST	0x0354,0x000d
15ae 035f 000e  | _  |		.CONST	0x035f,0x000e
15b0 0363 000f  | c  |		.CONST	0x0363,0x000f
15b2 0367 0010  | g  |		.CONST	0x0367,0x0010
15b4 036b 0011  | k  |		.CONST	0x036b,0x0011
15b6 0375 0012  | u  |		.CONST	0x0375,0x0012
15b8 0379 0013  | y  |		.CONST	0x0379,0x0013
15ba 037c 0014  | |  |		.CONST	0x037c,0x0014
15bc 037f 0015  |    |		.CONST	0x037f,0x0015
15be 0387 0016  |    |		.CONST	0x0387,0x0016
15c0 038a 0017  |    |		.CONST	0x038a,0x0017
15c2 ; --------------------------------------------------------------------------------------
15c2 ; Debug3 Subtable 0x8
15c2 ; --------------------------------------------------------------------------------------
15c2 0002 000b  |    |		.DBG3TAB	0x0002,0x000b
15c4 0393 ffff  |    |		.CONST	0x0393,0xffff
15c6 0395 fffe  |    |		.CONST	0x0395,0xfffe
15c8 0399 0001  |    |		.CONST	0x0399,0x0001
15ca 039f 0002  |    |		.CONST	0x039f,0x0002
15cc 03a7 0003  |    |		.CONST	0x03a7,0x0003
15ce 03ab 0004  |    |		.CONST	0x03ab,0x0004
15d0 03af 0005  |    |		.CONST	0x03af,0x0005
15d2 03b4 0006  |    |		.CONST	0x03b4,0x0006
15d4 03bb 0007  |    |		.CONST	0x03bb,0x0007
15d6 03be 0008  |    |		.CONST	0x03be,0x0008
15d8 03c1 0009  |    |		.CONST	0x03c1,0x0009
15da 03c9 000a  |    |		.CONST	0x03c9,0x000a
15dc 03cc 000b  |    |		.CONST	0x03cc,0x000b
15de ; --------------------------------------------------------------------------------------
15de ; Debug3 Subtable 0x9
15de ; --------------------------------------------------------------------------------------
15de 0002 000f  |    |		.DBG3TAB	0x0002,0x000f
15e0 03d3 ffff  |    |		.CONST	0x03d3,0xffff
15e2 03d5 fffe  |    |		.CONST	0x03d5,0xfffe
15e4 03d9 0001  |    |		.CONST	0x03d9,0x0001
15e6 03df 0002  |    |		.CONST	0x03df,0x0002
15e8 03e7 0003  |    |		.CONST	0x03e7,0x0003
15ea 03ec 0004  |    |		.CONST	0x03ec,0x0004
15ec 03f0 0005  |    |		.CONST	0x03f0,0x0005
15ee 03f4 0006  |    |		.CONST	0x03f4,0x0006
15f0 03f8 0007  |    |		.CONST	0x03f8,0x0007
15f2 03fd 0401  |    |		.CONST	0x03fd,0x0401
15f4 03fe 0007  |    |		.CONST	0x03fe,0x0007
15f6 0403 0008  |    |		.CONST	0x0403,0x0008
15f8 0408 0009  |    |		.CONST	0x0408,0x0009
15fa 040b 000a  |    |		.CONST	0x040b,0x000a
15fc 040e 000b  |    |		.CONST	0x040e,0x000b
15fe 0416 000c  |    |		.CONST	0x0416,0x000c
1600 0419 000d  |    |		.CONST	0x0419,0x000d
1602 ; --------------------------------------------------------------------------------------
1602 ; Debug3 Subtable 0xa
1602 ; --------------------------------------------------------------------------------------
1602 0002 000f  |    |		.DBG3TAB	0x0002,0x000f
1604 042b ffff  | +  |		.CONST	0x042b,0xffff
1606 042d fffe  | -  |		.CONST	0x042d,0xfffe
1608 0431 0001  | 1  |		.CONST	0x0431,0x0001
160a 0437 0002  | 7  |		.CONST	0x0437,0x0002
160c 043f 0003  | ?  |		.CONST	0x043f,0x0003
160e 0444 0004  | D  |		.CONST	0x0444,0x0004
1610 0448 0005  | H  |		.CONST	0x0448,0x0005
1612 044c 0006  | L  |		.CONST	0x044c,0x0006
1614 0450 0007  | P  |		.CONST	0x0450,0x0007
1616 0455 0401  | U  |		.CONST	0x0455,0x0401
1618 0456 0007  | V  |		.CONST	0x0456,0x0007
161a 045b 0008  | [  |		.CONST	0x045b,0x0008
161c 0460 0009  | `  |		.CONST	0x0460,0x0009
161e 0463 000a  | c  |		.CONST	0x0463,0x000a
1620 0466 000b  | f  |		.CONST	0x0466,0x000b
1622 046e 000c  | n  |		.CONST	0x046e,0x000c
1624 0471 000d  | q  |		.CONST	0x0471,0x000d
1626 ; --------------------------------------------------------------------------------------
1626 ; Debug3 Subtable 0xb
1626 ; --------------------------------------------------------------------------------------
1626 0005 0023  |   #|		.DBG3TAB	0x0005,0x0023
1628 047b ffff  | {  |		.CONST	0x047b,0xffff
162a 047d fffe  | }  |		.CONST	0x047d,0xfffe
162c 0481 fffd  |    |		.CONST	0x0481,0xfffd
162e 0482 fffc  |    |		.CONST	0x0482,0xfffc
1630 0485 fffb  |    |		.CONST	0x0485,0xfffb
1632 0489 0001  |    |		.CONST	0x0489,0x0001
1634 048d 0002  |    |		.CONST	0x048d,0x0002
1636 0490 0003  |    |		.CONST	0x0490,0x0003
1638 0496 0004  |    |		.CONST	0x0496,0x0004
163a 049d 0005  |    |		.CONST	0x049d,0x0005
163c 04a1 0006  |    |		.CONST	0x04a1,0x0006
163e 04a5 0007  |    |		.CONST	0x04a5,0x0007
1640 04ad 0008  |    |		.CONST	0x04ad,0x0008
1642 04b8 0009  |    |		.CONST	0x04b8,0x0009
1644 04b9 000a  |    |		.CONST	0x04b9,0x000a
1646 04bf 000b  |    |		.CONST	0x04bf,0x000b
1648 04c3 0401  |    |		.CONST	0x04c3,0x0401
164a 04c4 000b  |    |		.CONST	0x04c4,0x000b
164c 04cb 000d  |    |		.CONST	0x04cb,0x000d
164e 04cd 0801  |    |		.CONST	0x04cd,0x0801
1650 04ce 000d  |    |		.CONST	0x04ce,0x000d
1652 04cf 0c01  |    |		.CONST	0x04cf,0x0c01
1654 04d2 0801  |    |		.CONST	0x04d2,0x0801
1656 04d9 000e  |    |		.CONST	0x04d9,0x000e
1658 04da 1001  |    |		.CONST	0x04da,0x1001
165a 04dd 000e  |    |		.CONST	0x04dd,0x000e
165c 04de 000c  |    |		.CONST	0x04de,0x000c
165e 04df 1401  |    |		.CONST	0x04df,0x1401
1660 04e1 000c  |    |		.CONST	0x04e1,0x000c
1662 04e2 000f  |    |		.CONST	0x04e2,0x000f
1664 04e5 0010  |    |		.CONST	0x04e5,0x0010
1666 04f0 0011  |    |		.CONST	0x04f0,0x0011
1668 04f6 0012  |    |		.CONST	0x04f6,0x0012
166a 04fa 0013  |    |		.CONST	0x04fa,0x0013
166c 04fe 0014  |    |		.CONST	0x04fe,0x0014
166e 0503 0015  |    |		.CONST	0x0503,0x0015
1670 0506 0016  |    |		.CONST	0x0506,0x0016
1672 0509 0017  |    |		.CONST	0x0509,0x0017
1674 0511 0018  |    |		.CONST	0x0511,0x0018
1676 0514 0019  |    |		.CONST	0x0514,0x0019
1678 ; --------------------------------------------------------------------------------------
1678 ; Debug3 Subtable 0xc
1678 ; --------------------------------------------------------------------------------------
1678 0002 000f  |    |		.DBG3TAB	0x0002,0x000f
167a 051b ffff  |    |		.CONST	0x051b,0xffff
167c 051f fffe  |    |		.CONST	0x051f,0xfffe
167e 0521 0001  | !  |		.CONST	0x0521,0x0001
1680 0527 0002  | '  |		.CONST	0x0527,0x0002
1682 052f 0003  | /  |		.CONST	0x052f,0x0003
1684 0535 0004  | 5  |		.CONST	0x0535,0x0004
1686 0539 0005  | 9  |		.CONST	0x0539,0x0005
1688 053d 0401  | =  |		.CONST	0x053d,0x0401
168a 053e 0005  | >  |		.CONST	0x053e,0x0005
168c 053f 0801  | ?  |		.CONST	0x053f,0x0801
168e 0540 0401  | @  |		.CONST	0x0540,0x0401
1690 0545 0006  | E  |		.CONST	0x0545,0x0006
1692 0548 0007  | H  |		.CONST	0x0548,0x0007
1694 054d 0008  | M  |		.CONST	0x054d,0x0008
1696 0552 0009  | R  |		.CONST	0x0552,0x0009
1698 0555 000a  | U  |		.CONST	0x0555,0x000a
169a 0559 000b  | Y  |		.CONST	0x0559,0x000b
169c ; --------------------------------------------------------------------------------------
169c ; Debug3 Subtable 0xd
169c ; --------------------------------------------------------------------------------------
169c 0000 0006  |    |		.DBG3TAB	0x0000,0x0006
169e 0563 0001  | c  |		.CONST	0x0563,0x0001
16a0 0566 0002  | f  |		.CONST	0x0566,0x0002
16a2 056a 0003  | j  |		.CONST	0x056a,0x0003
16a4 056d 0004  | m  |		.CONST	0x056d,0x0004
16a6 0573 0005  | s  |		.CONST	0x0573,0x0005
16a8 0576 0006  | v  |		.CONST	0x0576,0x0006
16aa ; --------------------------------------------------------------------------------------
16aa ; Debug3 Subtable 0xe
16aa ; --------------------------------------------------------------------------------------
16aa 0000 0007  |    |		.DBG3TAB	0x0000,0x0007
16ac 0583 0001  |    |		.CONST	0x0583,0x0001
16ae 0586 0002  |    |		.CONST	0x0586,0x0002
16b0 058a 0003  |    |		.CONST	0x058a,0x0003
16b2 058d 0004  |    |		.CONST	0x058d,0x0004
16b4 059b 0005  |    |		.CONST	0x059b,0x0005
16b6 05a1 0006  |    |		.CONST	0x05a1,0x0006
16b8 05a4 0007  |    |		.CONST	0x05a4,0x0007
16ba ; --------------------------------------------------------------------------------------
16ba ; Debug3 Subtable 0xf
16ba ; --------------------------------------------------------------------------------------
16ba 0001 000d  |    |		.DBG3TAB	0x0001,0x000d
16bc 05ab ffff  |    |		.CONST	0x05ab,0xffff
16be 05ac 0001  |    |		.CONST	0x05ac,0x0001
16c0 05af 0002  |    |		.CONST	0x05af,0x0002
16c2 05b3 0003  |    |		.CONST	0x05b3,0x0003
16c4 05b6 0004  |    |		.CONST	0x05b6,0x0004
16c6 05b7 0401  |    |		.CONST	0x05b7,0x0401
16c8 05b9 0004  |    |		.CONST	0x05b9,0x0004
16ca 05ba 0005  |    |		.CONST	0x05ba,0x0005
16cc 05c4 0006  |    |		.CONST	0x05c4,0x0006
16ce 05cc 0007  |    |		.CONST	0x05cc,0x0007
16d0 05d0 0008  |    |		.CONST	0x05d0,0x0008
16d2 05d9 0009  |    |		.CONST	0x05d9,0x0009
16d4 05dc 000a  |    |		.CONST	0x05dc,0x000a
16d6 05e2 000b  |    |		.CONST	0x05e2,0x000b
16d8 ; --------------------------------------------------------------------------------------
16d8 ; Debug3 Subtable 0x10
16d8 ; --------------------------------------------------------------------------------------
16d8 0007 0018  |    |		.DBG3TAB	0x0007,0x0018
16da 05eb ffff  |    |		.CONST	0x05eb,0xffff
16dc 05ed fffe  |    |		.CONST	0x05ed,0xfffe
16de 05ef fffd  |    |		.CONST	0x05ef,0xfffd
16e0 05f3 fffc  |    |		.CONST	0x05f3,0xfffc
16e2 05f8 fffb  |    |		.CONST	0x05f8,0xfffb
16e4 05fd fffa  |    |		.CONST	0x05fd,0xfffa
16e6 05ff fff9  |    |		.CONST	0x05ff,0xfff9
16e8 0601 0001  |    |		.CONST	0x0601,0x0001
16ea 0603 0002  |    |		.CONST	0x0603,0x0002
16ec 0610 0003  |    |		.CONST	0x0610,0x0003
16ee 0615 0004  |    |		.CONST	0x0615,0x0004
16f0 061a 0005  |    |		.CONST	0x061a,0x0005
16f2 061b 0006  |    |		.CONST	0x061b,0x0006
16f4 061f 0007  |    |		.CONST	0x061f,0x0007
16f6 0626 0009  | &  |		.CONST	0x0626,0x0009
16f8 062e 000a  | .  |		.CONST	0x062e,0x000a
16fa 0641 000b  | A  |		.CONST	0x0641,0x000b
16fc 064b 000c  | K  |		.CONST	0x064b,0x000c
16fe 064d 000d  | M  |		.CONST	0x064d,0x000d
1700 0651 0008  | Q  |		.CONST	0x0651,0x0008
1702 0655 000e  | U  |		.CONST	0x0655,0x000e
1704 065c 000f  | \  |		.CONST	0x065c,0x000f
1706 0664 0010  | d  |		.CONST	0x0664,0x0010
1708 0677 0011  | w  |		.CONST	0x0677,0x0011
170a 0681 0012  |    |		.CONST	0x0681,0x0012
170c 0683 0013  |    |		.CONST	0x0683,0x0013
170e 0685 0014  |    |		.CONST	0x0685,0x0014
1710 068a 0015  |    |		.CONST	0x068a,0x0015
1712 068c 0016  |    |		.CONST	0x068c,0x0016
1714 0691 0017  |    |		.CONST	0x0691,0x0017
1716 0698 0018  |    |		.CONST	0x0698,0x0018
1718 ; --------------------------------------------------------------------------------------
1718 ; Debug3 Subtable 0x11
1718 ; --------------------------------------------------------------------------------------
1718 0006 0019  |    |		.DBG3TAB	0x0006,0x0019
171a 06a3 ffff  |    |		.CONST	0x06a3,0xffff
171c 06a5 fffe  |    |		.CONST	0x06a5,0xfffe
171e 06aa fffd  |    |		.CONST	0x06aa,0xfffd
1720 06ab fffc  |    |		.CONST	0x06ab,0xfffc
1722 06b0 fffb  |    |		.CONST	0x06b0,0xfffb
1724 06b2 fffa  |    |		.CONST	0x06b2,0xfffa
1726 06b4 0001  |    |		.CONST	0x06b4,0x0001
1728 06b8 0002  |    |		.CONST	0x06b8,0x0002
172a 06bc 0003  |    |		.CONST	0x06bc,0x0003
172c 06c4 0004  |    |		.CONST	0x06c4,0x0004
172e 06c9 0005  |    |		.CONST	0x06c9,0x0005
1730 06d1 0006  |    |		.CONST	0x06d1,0x0006
1732 06d8 0007  |    |		.CONST	0x06d8,0x0007
1734 06dd 0008  |    |		.CONST	0x06dd,0x0008
1736 06e7 0009  |    |		.CONST	0x06e7,0x0009
1738 06ea 000a  |    |		.CONST	0x06ea,0x000a
173a 06ed 000b  |    |		.CONST	0x06ed,0x000b
173c 06f1 000c  |    |		.CONST	0x06f1,0x000c
173e 06fa 000d  |    |		.CONST	0x06fa,0x000d
1740 06fe 000e  |    |		.CONST	0x06fe,0x000e
1742 0701 000f  |    |		.CONST	0x0701,0x000f
1744 0704 0010  |    |		.CONST	0x0704,0x0010
1746 0707 0011  |    |		.CONST	0x0707,0x0011
1748 0714 0012  |    |		.CONST	0x0714,0x0012
174a 0716 0013  |    |		.CONST	0x0716,0x0013
174c 0719 0014  |    |		.CONST	0x0719,0x0014
174e 071c 0015  |    |		.CONST	0x071c,0x0015
1750 071e 0016  |    |		.CONST	0x071e,0x0016
1752 0725 0017  | %  |		.CONST	0x0725,0x0017
1754 0729 0018  | )  |		.CONST	0x0729,0x0018
1756 072b 0019  | +  |		.CONST	0x072b,0x0019
1758 ; --------------------------------------------------------------------------------------
1758 ; Debug3 Subtable 0x12
1758 ; --------------------------------------------------------------------------------------
1758 0003 000c  |    |		.DBG3TAB	0x0003,0x000c
175a 073b ffff  | ;  |		.CONST	0x073b,0xffff
175c 073d fffe  | =  |		.CONST	0x073d,0xfffe
175e 0741 fffd  | A  |		.CONST	0x0741,0xfffd
1760 0742 0001  | B  |		.CONST	0x0742,0x0001
1762 0743 0002  | C  |		.CONST	0x0743,0x0002
1764 0749 0003  | I  |		.CONST	0x0749,0x0003
1766 0752 0004  | R  |		.CONST	0x0752,0x0004
1768 0756 0005  | V  |		.CONST	0x0756,0x0005
176a 0759 0006  | Y  |		.CONST	0x0759,0x0006
176c 075f 0007  | _  |		.CONST	0x075f,0x0007
176e 0762 0008  | b  |		.CONST	0x0762,0x0008
1770 0763 0009  | c  |		.CONST	0x0763,0x0009
1772 076c 000a  | l  |		.CONST	0x076c,0x000a
1774 0772 000b  | r  |		.CONST	0x0772,0x000b
1776 0774 000c  | t  |		.CONST	0x0774,0x000c
1778 ; --------------------------------------------------------------------------------------
1778 ; Debug3 Subtable 0x13
1778 ; --------------------------------------------------------------------------------------
1778 0002 0007  |    |		.DBG3TAB	0x0002,0x0007
177a 077b ffff  | {  |		.CONST	0x077b,0xffff
177c 0783 fffe  |    |		.CONST	0x0783,0xfffe
177e 078e 0001  |    |		.CONST	0x078e,0x0001
1780 0792 0002  |    |		.CONST	0x0792,0x0002
1782 0793 0401  |    |		.CONST	0x0793,0x0401
1784 0794 0002  |    |		.CONST	0x0794,0x0002
1786 0795 0003  |    |		.CONST	0x0795,0x0003
1788 079c 0004  |    |		.CONST	0x079c,0x0004
178a 07a5 0005  |    |		.CONST	0x07a5,0x0005
178c ; --------------------------------------------------------------------------------------
178c ; Debug3 Subtable 0x14
178c ; --------------------------------------------------------------------------------------
178c 0004 0016  |    |		.DBG3TAB	0x0004,0x0016
178e 07b3 ffff  |    |		.CONST	0x07b3,0xffff
1790 07b5 fffe  |    |		.CONST	0x07b5,0xfffe
1792 07b6 fffd  |    |		.CONST	0x07b6,0xfffd
1794 07ba 0001  |    |		.CONST	0x07ba,0x0001
1796 07c0 0002  |    |		.CONST	0x07c0,0x0002
1798 07c6 0003  |    |		.CONST	0x07c6,0x0003
179a 07cc 0004  |    |		.CONST	0x07cc,0x0004
179c 07ce 0005  |    |		.CONST	0x07ce,0x0005
179e 07d7 0007  |    |		.CONST	0x07d7,0x0007
17a0 07db 0008  |    |		.CONST	0x07db,0x0008
17a2 07df 0006  |    |		.CONST	0x07df,0x0006
17a4 07e1 0009  |    |		.CONST	0x07e1,0x0009
17a6 07e2 fbff  |    |		.CONST	0x07e2,0xfbff
17a8 07e9 0401  |    |		.CONST	0x07e9,0x0401
17aa 07ed 0402  |    |		.CONST	0x07ed,0x0402
17ac 07ef 0403  |    |		.CONST	0x07ef,0x0403
17ae 07f0 0404  |    |		.CONST	0x07f0,0x0404
17b0 07f5 0405  |    |		.CONST	0x07f5,0x0405
17b2 0806 0406  |    |		.CONST	0x0806,0x0406
17b4 0813 0407  |    |		.CONST	0x0813,0x0407
17b6 0817 0408  |    |		.CONST	0x0817,0x0408
17b8 0819 0409  |    |		.CONST	0x0819,0x0409
17ba 081e 040a  |    |		.CONST	0x081e,0x040a
17bc 0820 000a  |    |		.CONST	0x0820,0x000a
17be 0827 000b  | '  |		.CONST	0x0827,0x000b
17c0 083f 000c  | ?  |		.CONST	0x083f,0x000c
17c2 ; --------------------------------------------------------------------------------------
17c2 ; Debug3 Subtable 0x15
17c2 ; --------------------------------------------------------------------------------------
17c2 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
17c4 ; --------------------------------------------------------------------------------------
17c4 ; Debug3 Subtable 0x16
17c4 ; --------------------------------------------------------------------------------------
17c4 0000 0005  |    |		.DBG3TAB	0x0000,0x0005
17c6 0873 0001  | s  |		.CONST	0x0873,0x0001
17c8 0877 0002  | w  |		.CONST	0x0877,0x0002
17ca 087e 0005  | ~  |		.CONST	0x087e,0x0005
17cc 0880 0004  |    |		.CONST	0x0880,0x0004
17ce 0890 0006  |    |		.CONST	0x0890,0x0006
17d0 ; --------------------------------------------------------------------------------------
17d0 ; Debug3 Subtable 0x17
17d0 ; --------------------------------------------------------------------------------------
17d0 0001 000a  |    |		.DBG3TAB	0x0001,0x000a
17d2 089b ffff  |    |		.CONST	0x089b,0xffff
17d4 089c 0001  |    |		.CONST	0x089c,0x0001
17d6 089f 0002  |    |		.CONST	0x089f,0x0002
17d8 08a3 0003  |    |		.CONST	0x08a3,0x0003
17da 08ab 0004  |    |		.CONST	0x08ab,0x0004
17dc 08b3 0005  |    |		.CONST	0x08b3,0x0005
17de 08bc 0006  |    |		.CONST	0x08bc,0x0006
17e0 08bd 0007  |    |		.CONST	0x08bd,0x0007
17e2 08c1 0008  |    |		.CONST	0x08c1,0x0008
17e4 08c5 0009  |    |		.CONST	0x08c5,0x0009
17e6 08ce 000a  |    |		.CONST	0x08ce,0x000a
17e8 ; --------------------------------------------------------------------------------------
17e8 ; Debug3 Subtable 0x18
17e8 ; --------------------------------------------------------------------------------------
17e8 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
17ea 08d3 0001  |    |		.CONST	0x08d3,0x0001
17ec 08d8 0002  |    |		.CONST	0x08d8,0x0002
17ee 08da 0003  |    |		.CONST	0x08da,0x0003
17f0 ; --------------------------------------------------------------------------------------
17f0 ; Debug3 Subtable 0x19
17f0 ; --------------------------------------------------------------------------------------
17f0 0002 0022  |   "|		.DBG3TAB	0x0002,0x0022
17f2 08e3 ffff  |    |		.CONST	0x08e3,0xffff
17f4 08e8 fffe  |    |		.CONST	0x08e8,0xfffe
17f6 08e9 0001  |    |		.CONST	0x08e9,0x0001
17f8 08ed 0002  |    |		.CONST	0x08ed,0x0002
17fa 08ee 0401  |    |		.CONST	0x08ee,0x0401
17fc 08f0 0402  |    |		.CONST	0x08f0,0x0402
17fe 08f1 0403  |    |		.CONST	0x08f1,0x0403
1800 08f2 0404  |    |		.CONST	0x08f2,0x0404
1802 08f3 0002  |    |		.CONST	0x08f3,0x0002
1804 08f7 0005  |    |		.CONST	0x08f7,0x0005
1806 08ff 0006  |    |		.CONST	0x08ff,0x0006
1808 0904 0007  |    |		.CONST	0x0904,0x0007
180a 0905 0801  |    |		.CONST	0x0905,0x0801
180c 0907 0007  |    |		.CONST	0x0907,0x0007
180e 0908 0c01  |    |		.CONST	0x0908,0x0c01
1810 090a 0c02  |    |		.CONST	0x090a,0x0c02
1812 090b 0c03  |    |		.CONST	0x090b,0x0c03
1814 090c 0c04  |    |		.CONST	0x090c,0x0c04
1816 090d 0801  |    |		.CONST	0x090d,0x0801
1818 090f 0008  |    |		.CONST	0x090f,0x0008
181a 0912 1001  |    |		.CONST	0x0912,0x1001
181c 0914 1002  |    |		.CONST	0x0914,0x1002
181e 0915 1003  |    |		.CONST	0x0915,0x1003
1820 0916 1004  |    |		.CONST	0x0916,0x1004
1822 0918 0008  |    |		.CONST	0x0918,0x0008
1824 091c 000a  |    |		.CONST	0x091c,0x000a
1826 0928 000b  | (  |		.CONST	0x0928,0x000b
1828 0929 1401  | )  |		.CONST	0x0929,0x1401
182a 092b 1402  | +  |		.CONST	0x092b,0x1402
182c 092c 1403  | ,  |		.CONST	0x092c,0x1403
182e 092d 1404  | -  |		.CONST	0x092d,0x1404
1830 092e 000b  | .  |		.CONST	0x092e,0x000b
1832 0930 000c  | 0  |		.CONST	0x0930,0x000c
1834 093c 000d  | <  |		.CONST	0x093c,0x000d
1836 0944 0003  | D  |		.CONST	0x0944,0x0003
1838 0950 0004  | P  |		.CONST	0x0950,0x0004
183a ; --------------------------------------------------------------------------------------
183a ; Debug3 Subtable 0x1a
183a ; --------------------------------------------------------------------------------------
183a 0007 001f  |    |		.DBG3TAB	0x0007,0x001f
183c 0963 ffff  | c  |		.CONST	0x0963,0xffff
183e 0966 fffe  | f  |		.CONST	0x0966,0xfffe
1840 0968 fffd  | h  |		.CONST	0x0968,0xfffd
1842 096a fffc  | j  |		.CONST	0x096a,0xfffc
1844 096b fffb  | k  |		.CONST	0x096b,0xfffb
1846 096c fffa  | l  |		.CONST	0x096c,0xfffa
1848 096d fff9  | m  |		.CONST	0x096d,0xfff9
184a 0973 0001  | s  |		.CONST	0x0973,0x0001
184c 097a 0002  | z  |		.CONST	0x097a,0x0002
184e 097b 0003  | {  |		.CONST	0x097b,0x0003
1850 097f 0004  |    |		.CONST	0x097f,0x0004
1852 0981 0401  |    |		.CONST	0x0981,0x0401
1854 0982 0004  |    |		.CONST	0x0982,0x0004
1856 0983 0801  |    |		.CONST	0x0983,0x0801
1858 0984 0401  |    |		.CONST	0x0984,0x0401
185a 0989 0005  |    |		.CONST	0x0989,0x0005
185c 098c 0006  |    |		.CONST	0x098c,0x0006
185e 098f 0007  |    |		.CONST	0x098f,0x0007
1860 0993 0008  |    |		.CONST	0x0993,0x0008
1862 099a 000a  |    |		.CONST	0x099a,0x000a
1864 09a2 000b  |    |		.CONST	0x09a2,0x000b
1866 09a5 000c  |    |		.CONST	0x09a5,0x000c
1868 09ab 000e  |    |		.CONST	0x09ab,0x000e
186a 09ac 0c01  |    |		.CONST	0x09ac,0x0c01
186c 09af 000e  |    |		.CONST	0x09af,0x000e
186e 09b0 000f  |    |		.CONST	0x09b0,0x000f
1870 09b7 0010  |    |		.CONST	0x09b7,0x0010
1872 09b9 0011  |    |		.CONST	0x09b9,0x0011
1874 09be 0012  |    |		.CONST	0x09be,0x0012
1876 09bf 1001  |    |		.CONST	0x09bf,0x1001
1878 09c2 0012  |    |		.CONST	0x09c2,0x0012
187a 09c3 000d  |    |		.CONST	0x09c3,0x000d
187c 09c4 1401  |    |		.CONST	0x09c4,0x1401
187e 09c6 000d  |    |		.CONST	0x09c6,0x000d
1880 09c7 0013  |    |		.CONST	0x09c7,0x0013
1882 09ca 0014  |    |		.CONST	0x09ca,0x0014
1884 09ce 0009  |    |		.CONST	0x09ce,0x0009
1886 09d4 0015  |    |		.CONST	0x09d4,0x0015
1888 ; --------------------------------------------------------------------------------------
1888 ; Debug3 Subtable 0x1b
1888 ; --------------------------------------------------------------------------------------
1888 0004 001c  |    |		.DBG3TAB	0x0004,0x001c
188a 09eb ffff  |    |		.CONST	0x09eb,0xffff
188c 09ee fffe  |    |		.CONST	0x09ee,0xfffe
188e 09f0 fffd  |    |		.CONST	0x09f0,0xfffd
1890 09f2 0001  |    |		.CONST	0x09f2,0x0001
1892 09fa 0002  |    |		.CONST	0x09fa,0x0002
1894 0a00 0003  |    |		.CONST	0x0a00,0x0003
1896 0a04 0004  |    |		.CONST	0x0a04,0x0004
1898 0a08 0401  |    |		.CONST	0x0a08,0x0401
189a 0a09 0004  |    |		.CONST	0x0a09,0x0004
189c 0a0a 0801  |    |		.CONST	0x0a0a,0x0801
189e 0a0b 0401  |    |		.CONST	0x0a0b,0x0401
18a0 0a10 0005  |    |		.CONST	0x0a10,0x0005
18a2 0a14 0006  |    |		.CONST	0x0a14,0x0006
18a4 0a18 0007  |    |		.CONST	0x0a18,0x0007
18a6 0a1c 0008  |    |		.CONST	0x0a1c,0x0008
18a8 0a1f 0009  |    |		.CONST	0x0a1f,0x0009
18aa 0a22 000a  | "  |		.CONST	0x0a22,0x000a
18ac 0a26 000b  | &  |		.CONST	0x0a26,0x000b
18ae 0a2c 000c  | ,  |		.CONST	0x0a2c,0x000c
18b0 0a30 000d  | 0  |		.CONST	0x0a30,0x000d
18b2 0a31 f3ff  | 1  |		.CONST	0x0a31,0xf3ff
18b4 0a34 0c01  | 4  |		.CONST	0x0a34,0x0c01
18b6 0a43 0c02  | C  |		.CONST	0x0a43,0x0c02
18b8 0a44 0c03  | D  |		.CONST	0x0a44,0x0c03
18ba 0a58 0c04  | X  |		.CONST	0x0a58,0x0c04
18bc 0a59 000e  | Y  |		.CONST	0x0a59,0x000e
18be 0a5e 000f  | ^  |		.CONST	0x0a5e,0x000f
18c0 0a61 0010  | a  |		.CONST	0x0a61,0x0010
18c2 0a64 0011  | d  |		.CONST	0x0a64,0x0011
18c4 0a6b 0012  | k  |		.CONST	0x0a6b,0x0012
18c6 0a6e 0013  | n  |		.CONST	0x0a6e,0x0013
18c8 0a73 0014  | s  |		.CONST	0x0a73,0x0014
18ca ; --------------------------------------------------------------------------------------
18ca ; Debug3 Subtable 0x1c
18ca ; --------------------------------------------------------------------------------------
18ca 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
18cc 0a7b ffff  | {  |		.CONST	0x0a7b,0xffff
18ce 0a7e 0001  | ~  |		.CONST	0x0a7e,0x0001
18d0 0a96 0002  |    |		.CONST	0x0a96,0x0002
18d2 0a98 0003  |    |		.CONST	0x0a98,0x0003
18d4 0aab 0004  |    |		.CONST	0x0aab,0x0004
18d6 ; --------------------------------------------------------------------------------------
18d6 ; Debug3 Subtable 0x1d
18d6 ; --------------------------------------------------------------------------------------
18d6 0004 0007  |    |		.DBG3TAB	0x0004,0x0007
18d8 0ab3 ffff  |    |		.CONST	0x0ab3,0xffff
18da 0ab4 fffe  |    |		.CONST	0x0ab4,0xfffe
18dc 0aba fffd  |    |		.CONST	0x0aba,0xfffd
18de 0abb fffc  |    |		.CONST	0x0abb,0xfffc
18e0 0abd 0001  |    |		.CONST	0x0abd,0x0001
18e2 0ac9 0003  |    |		.CONST	0x0ac9,0x0003
18e4 0ad5 0004  |    |		.CONST	0x0ad5,0x0004
18e6 0ad7 0005  |    |		.CONST	0x0ad7,0x0005
18e8 0adc 0006  |    |		.CONST	0x0adc,0x0006
18ea 0ae1 0002  |    |		.CONST	0x0ae1,0x0002
18ec 0ae6 0007  |    |		.CONST	0x0ae6,0x0007
18ee ; --------------------------------------------------------------------------------------
18ee ; Debug3 Subtable 0x1e
18ee ; --------------------------------------------------------------------------------------
18ee 0003 000f  |    |		.DBG3TAB	0x0003,0x000f
18f0 0af3 ffff  |    |		.CONST	0x0af3,0xffff
18f2 0afa fffe  |    |		.CONST	0x0afa,0xfffe
18f4 0afb fffd  |    |		.CONST	0x0afb,0xfffd
18f6 0afd 0001  |    |		.CONST	0x0afd,0x0001
18f8 0b01 0002  |    |		.CONST	0x0b01,0x0002
18fa 0b03 0003  |    |		.CONST	0x0b03,0x0003
18fc 0b06 0004  |    |		.CONST	0x0b06,0x0004
18fe 0b08 0005  |    |		.CONST	0x0b08,0x0005
1900 0b0a 0006  |    |		.CONST	0x0b0a,0x0006
1902 0b0b 0007  |    |		.CONST	0x0b0b,0x0007
1904 0b11 0008  |    |		.CONST	0x0b11,0x0008
1906 0b17 0009  |    |		.CONST	0x0b17,0x0009
1908 0b1c 000a  |    |		.CONST	0x0b1c,0x000a
190a 0b1f 000b  |    |		.CONST	0x0b1f,0x000b
190c 0b22 000c  | "  |		.CONST	0x0b22,0x000c
190e 0b24 000e  | $  |		.CONST	0x0b24,0x000e
1910 0b28 000f  | (  |		.CONST	0x0b28,0x000f
1912 0b2d 0010  | -  |		.CONST	0x0b2d,0x0010
1914 ; --------------------------------------------------------------------------------------
1914 ; Debug3 Subtable 0x1f
1914 ; --------------------------------------------------------------------------------------
1914 0004 001b  |    |		.DBG3TAB	0x0004,0x001b
1916 0b33 ffff  | 3  |		.CONST	0x0b33,0xffff
1918 0b34 fffe  | 4  |		.CONST	0x0b34,0xfffe
191a 0b35 fffd  | 5  |		.CONST	0x0b35,0xfffd
191c 0b36 fffc  | 6  |		.CONST	0x0b36,0xfffc
191e 0b39 0001  | 9  |		.CONST	0x0b39,0x0001
1920 0b3a 0401  | :  |		.CONST	0x0b3a,0x0401
1922 0b3b 0001  | ;  |		.CONST	0x0b3b,0x0001
1924 0b3d 0003  | =  |		.CONST	0x0b3d,0x0003
1926 0b3f 0801  | ?  |		.CONST	0x0b3f,0x0801
1928 0b44 0c01  | D  |		.CONST	0x0b44,0x0c01
192a 0b46 0c02  | F  |		.CONST	0x0b46,0x0c02
192c 0b47 0c03  | G  |		.CONST	0x0b47,0x0c03
192e 0b48 0c04  | H  |		.CONST	0x0b48,0x0c04
1930 0b4a 0801  | J  |		.CONST	0x0b4a,0x0801
1932 0b4f 0003  | O  |		.CONST	0x0b4f,0x0003
1934 0b50 0004  | P  |		.CONST	0x0b50,0x0004
1936 0b57 0005  | W  |		.CONST	0x0b57,0x0005
1938 0b59 1001  | Y  |		.CONST	0x0b59,0x1001
193a 0b5a 0005  | Z  |		.CONST	0x0b5a,0x0005
193c 0b5e 0006  | ^  |		.CONST	0x0b5e,0x0006
193e 0b5f 1401  | _  |		.CONST	0x0b5f,0x1401
1940 0b61 0006  | a  |		.CONST	0x0b61,0x0006
1942 0b62 0007  | b  |		.CONST	0x0b62,0x0007
1944 0b65 0008  | e  |		.CONST	0x0b65,0x0008
1946 0b69 0009  | i  |		.CONST	0x0b69,0x0009
1948 0b6b 000a  | k  |		.CONST	0x0b6b,0x000a
194a 0b6c 1801  | l  |		.CONST	0x0b6c,0x1801
194c 0b6f 000a  | o  |		.CONST	0x0b6f,0x000a
194e 0b70 0002  | p  |		.CONST	0x0b70,0x0002
1950 0b71 1c01  | q  |		.CONST	0x0b71,0x1c01
1952 0b73 0002  | s  |		.CONST	0x0b73,0x0002
1954 ; --------------------------------------------------------------------------------------
1954 ; Debug3 Subtable 0x20
1954 ; --------------------------------------------------------------------------------------
1954 0002 0008  |    |		.DBG3TAB	0x0002,0x0008
1956 0b7b ffff  | {  |		.CONST	0x0b7b,0xffff
1958 0b7c fffe  | |  |		.CONST	0x0b7c,0xfffe
195a 0b7f 0001  |    |		.CONST	0x0b7f,0x0001
195c 0b82 0002  |    |		.CONST	0x0b82,0x0002
195e 0b86 0003  |    |		.CONST	0x0b86,0x0003
1960 0b8a 0004  |    |		.CONST	0x0b8a,0x0004
1962 0b8b 0401  |    |		.CONST	0x0b8b,0x0401
1964 0b8d 0004  |    |		.CONST	0x0b8d,0x0004
1966 0b91 0005  |    |		.CONST	0x0b91,0x0005
1968 0b92 0006  |    |		.CONST	0x0b92,0x0006
196a ; --------------------------------------------------------------------------------------
196a ; Debug3 Subtable 0x21
196a ; --------------------------------------------------------------------------------------
196a 0001 0007  |    |		.DBG3TAB	0x0001,0x0007
196c 0b9b ffff  |    |		.CONST	0x0b9b,0xffff
196e 0b9c 0001  |    |		.CONST	0x0b9c,0x0001
1970 0ba7 0002  |    |		.CONST	0x0ba7,0x0002
1972 0ba8 0401  |    |		.CONST	0x0ba8,0x0401
1974 0baa 0002  |    |		.CONST	0x0baa,0x0002
1976 0bab 0003  |    |		.CONST	0x0bab,0x0003
1978 0bb0 0004  |    |		.CONST	0x0bb0,0x0004
197a 0bbb 0005  |    |		.CONST	0x0bbb,0x0005
197c ; --------------------------------------------------------------------------------------
197c ; Debug3 Subtable 0x22
197c ; --------------------------------------------------------------------------------------
197c 0003 0006  |    |		.DBG3TAB	0x0003,0x0006
197e 0bcb ffff  |    |		.CONST	0x0bcb,0xffff
1980 0bd1 fffe  |    |		.CONST	0x0bd1,0xfffe
1982 0bd6 fffd  |    |		.CONST	0x0bd6,0xfffd
1984 0bd8 0001  |    |		.CONST	0x0bd8,0x0001
1986 0be7 0003  |    |		.CONST	0x0be7,0x0003
1988 0bf6 0004  |    |		.CONST	0x0bf6,0x0004
198a 0bf8 0005  |    |		.CONST	0x0bf8,0x0005
198c 0bfc 0006  |    |		.CONST	0x0bfc,0x0006
198e 0c01 0002  |    |		.CONST	0x0c01,0x0002
1990 ; --------------------------------------------------------------------------------------
1990 ; Debug3 Subtable 0x23
1990 ; --------------------------------------------------------------------------------------
1990 0001 0008  |    |		.DBG3TAB	0x0001,0x0008
1992 0c0b ffff  |    |		.CONST	0x0c0b,0xffff
1994 0c0c 0001  |    |		.CONST	0x0c0c,0x0001
1996 0c16 0002  |    |		.CONST	0x0c16,0x0002
1998 0c17 0401  |    |		.CONST	0x0c17,0x0401
199a 0c19 0002  |    |		.CONST	0x0c19,0x0002
199c 0c1a 0003  |    |		.CONST	0x0c1a,0x0003
199e 0c1e 0004  |    |		.CONST	0x0c1e,0x0004
19a0 0c27 0005  | '  |		.CONST	0x0c27,0x0005
19a2 0c32 0006  | 2  |		.CONST	0x0c32,0x0006
19a4 ; --------------------------------------------------------------------------------------
19a4 ; Debug3 Subtable 0x24
19a4 ; --------------------------------------------------------------------------------------
19a4 0003 000e  |    |		.DBG3TAB	0x0003,0x000e
19a6 0c43 ffff  | C  |		.CONST	0x0c43,0xffff
19a8 0c49 fffe  | I  |		.CONST	0x0c49,0xfffe
19aa 0c4a fffd  | J  |		.CONST	0x0c4a,0xfffd
19ac 0c4d 0001  | M  |		.CONST	0x0c4d,0x0001
19ae 0c55 0009  | U  |		.CONST	0x0c55,0x0009
19b0 0c56 0002  | V  |		.CONST	0x0c56,0x0002
19b2 0c69 0003  | i  |		.CONST	0x0c69,0x0003
19b4 0c6f 0004  | o  |		.CONST	0x0c6f,0x0004
19b6 0c74 0005  | t  |		.CONST	0x0c74,0x0005
19b8 0c87 0006  |    |		.CONST	0x0c87,0x0006
19ba 0c89 0007  |    |		.CONST	0x0c89,0x0007
19bc 0c8d 0008  |    |		.CONST	0x0c8d,0x0008
19be 0c8f 000a  |    |		.CONST	0x0c8f,0x000a
19c0 0c9d 000b  |    |		.CONST	0x0c9d,0x000b
19c2 0c9f 000c  |    |		.CONST	0x0c9f,0x000c
19c4 0ca0 0401  |    |		.CONST	0x0ca0,0x0401
19c6 0ca1 000c  |    |		.CONST	0x0ca1,0x000c
19c8 ; --------------------------------------------------------------------------------------
19c8 ; Debug3 Subtable 0x25
19c8 ; --------------------------------------------------------------------------------------
19c8 0006 0024  |   $|		.DBG3TAB	0x0006,0x0024
19ca 0cb3 ffff  |    |		.CONST	0x0cb3,0xffff
19cc 0cb9 fffe  |    |		.CONST	0x0cb9,0xfffe
19ce 0cbe fffd  |    |		.CONST	0x0cbe,0xfffd
19d0 0cc0 fffc  |    |		.CONST	0x0cc0,0xfffc
19d2 0cc2 fffb  |    |		.CONST	0x0cc2,0xfffb
19d4 0cc4 fffa  |    |		.CONST	0x0cc4,0xfffa
19d6 0cc5 0001  |    |		.CONST	0x0cc5,0x0001
19d8 0cd2 0002  |    |		.CONST	0x0cd2,0x0002
19da 0cda 0003  |    |		.CONST	0x0cda,0x0003
19dc 0cde 0004  |    |		.CONST	0x0cde,0x0004
19de 0ce3 0005  |    |		.CONST	0x0ce3,0x0005
19e0 0ce7 0006  |    |		.CONST	0x0ce7,0x0006
19e2 0ceb 0401  |    |		.CONST	0x0ceb,0x0401
19e4 0cec 0006  |    |		.CONST	0x0cec,0x0006
19e6 0ced 0801  |    |		.CONST	0x0ced,0x0801
19e8 0cee 0401  |    |		.CONST	0x0cee,0x0401
19ea 0cf3 0007  |    |		.CONST	0x0cf3,0x0007
19ec 0cf4 0c01  |    |		.CONST	0x0cf4,0x0c01
19ee 0cf6 0007  |    |		.CONST	0x0cf6,0x0007
19f0 0cf7 0008  |    |		.CONST	0x0cf7,0x0008
19f2 0cfc 1001  |    |		.CONST	0x0cfc,0x1001
19f4 0cfd 0008  |    |		.CONST	0x0cfd,0x0008
19f6 0d09 000a  |    |		.CONST	0x0d09,0x000a
19f8 0d18 000b  |    |		.CONST	0x0d18,0x000b
19fa 0d1a 000c  |    |		.CONST	0x0d1a,0x000c
19fc 0d1f 000d  |    |		.CONST	0x0d1f,0x000d
19fe 0d23 000e  | #  |		.CONST	0x0d23,0x000e
1a00 0d28 0009  | (  |		.CONST	0x0d28,0x0009
1a02 0d2d 000f  | -  |		.CONST	0x0d2d,0x000f
1a04 0d35 0010  | 5  |		.CONST	0x0d35,0x0010
1a06 0d3a 0011  | :  |		.CONST	0x0d3a,0x0011
1a08 0d3d 0012  | =  |		.CONST	0x0d3d,0x0012
1a0a 0d40 0013  | @  |		.CONST	0x0d40,0x0013
1a0c 0d47 0014  | G  |		.CONST	0x0d47,0x0014
1a0e 0d4a 0015  | J  |		.CONST	0x0d4a,0x0015
1a10 0d58 0016  | X  |		.CONST	0x0d58,0x0016
1a12 0d5b 0017  | [  |		.CONST	0x0d5b,0x0017
1a14 0d5f 0018  | _  |		.CONST	0x0d5f,0x0018
1a16 0d62 0019  | b  |		.CONST	0x0d62,0x0019
1a18 0d69 001a  | i  |		.CONST	0x0d69,0x001a
1a1a 0d6a 001b  | j  |		.CONST	0x0d6a,0x001b
1a1c 0d6d 001c  | m  |		.CONST	0x0d6d,0x001c
1a1e ; --------------------------------------------------------------------------------------
1a1e ; Debug3 Subtable 0x26
1a1e ; --------------------------------------------------------------------------------------
1a1e 0004 000c  |    |		.DBG3TAB	0x0004,0x000c
1a20 0d7b ffff  | {  |		.CONST	0x0d7b,0xffff
1a22 0d80 fffe  |    |		.CONST	0x0d80,0xfffe
1a24 0d82 fffd  |    |		.CONST	0x0d82,0xfffd
1a26 0d85 fffc  |    |		.CONST	0x0d85,0xfffc
1a28 0d8b 0001  |    |		.CONST	0x0d8b,0x0001
1a2a 0d9b 0002  |    |		.CONST	0x0d9b,0x0002
1a2c 0da1 0004  |    |		.CONST	0x0da1,0x0004
1a2e 0da7 0005  |    |		.CONST	0x0da7,0x0005
1a30 0db0 0006  |    |		.CONST	0x0db0,0x0006
1a32 0db9 0007  |    |		.CONST	0x0db9,0x0007
1a34 0dba 0008  |    |		.CONST	0x0dba,0x0008
1a36 0dbe 0003  |    |		.CONST	0x0dbe,0x0003
1a38 0dc0 0009  |    |		.CONST	0x0dc0,0x0009
1a3a 0dc8 0401  |    |		.CONST	0x0dc8,0x0401
1a3c 0dc9 0009  |    |		.CONST	0x0dc9,0x0009
1a3e 0dd8 000a  |    |		.CONST	0x0dd8,0x000a
1a40 ; --------------------------------------------------------------------------------------
1a40 ; Debug3 Subtable 0x27
1a40 ; --------------------------------------------------------------------------------------
1a40 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
1a42 0de3 0001  |    |		.CONST	0x0de3,0x0001
1a44 0de7 0002  |    |		.CONST	0x0de7,0x0002
1a46 0dec 0003  |    |		.CONST	0x0dec,0x0003
1a48 0def 0004  |    |		.CONST	0x0def,0x0004
1a4a ; --------------------------------------------------------------------------------------
1a4a ; Debug3 Subtable 0x28
1a4a ; --------------------------------------------------------------------------------------
1a4a 0001 0009  |    |		.DBG3TAB	0x0001,0x0009
1a4c 0dfb ffff  |    |		.CONST	0x0dfb,0xffff
1a4e 0dff 0001  |    |		.CONST	0x0dff,0x0001
1a50 0e02 0002  |    |		.CONST	0x0e02,0x0002
1a52 0e03 0401  |    |		.CONST	0x0e03,0x0401
1a54 0e04 0002  |    |		.CONST	0x0e04,0x0002
1a56 0e0b 0801  |    |		.CONST	0x0e0b,0x0801
1a58 0e0c 0401  |    |		.CONST	0x0e0c,0x0401
1a5a 0e12 0003  |    |		.CONST	0x0e12,0x0003
1a5c 0e1a 0004  |    |		.CONST	0x0e1a,0x0004
1a5e 0e1d 0005  |    |		.CONST	0x0e1d,0x0005
1a60 ; --------------------------------------------------------------------------------------
1a60 ; Debug3 Subtable 0x29
1a60 ; --------------------------------------------------------------------------------------
1a60 0005 000e  |    |		.DBG3TAB	0x0005,0x000e
1a62 0e2b ffff  | +  |		.CONST	0x0e2b,0xffff
1a64 0e30 fffe  | 0  |		.CONST	0x0e30,0xfffe
1a66 0e35 fffd  | 5  |		.CONST	0x0e35,0xfffd
1a68 0e36 fffc  | 6  |		.CONST	0x0e36,0xfffc
1a6a 0e37 0001  | 7  |		.CONST	0x0e37,0x0001
1a6c 0e44 0002  | D  |		.CONST	0x0e44,0x0002
1a6e 0e48 0003  | H  |		.CONST	0x0e48,0x0003
1a70 0e50 0005  | P  |		.CONST	0x0e50,0x0005
1a72 0e51 fbff  | Q  |		.CONST	0x0e51,0xfbff
1a74 0e54 0401  | T  |		.CONST	0x0e54,0x0401
1a76 0e56 0402  | V  |		.CONST	0x0e56,0x0402
1a78 0e5d 0403  | ]  |		.CONST	0x0e5d,0x0403
1a7a 0e67 0404  | g  |		.CONST	0x0e67,0x0404
1a7c 0e6d 0405  | m  |		.CONST	0x0e6d,0x0405
1a7e 0e71 0406  | q  |		.CONST	0x0e71,0x0406
1a80 0e74 0004  | t  |		.CONST	0x0e74,0x0004
1a82 0e78 0006  | x  |		.CONST	0x0e78,0x0006
1a84 0e7c 0007  | |  |		.CONST	0x0e7c,0x0007
1a86 0e7f 0008  |    |		.CONST	0x0e7f,0x0008
1a88 ; --------------------------------------------------------------------------------------
1a88 ; Debug3 Subtable 0x2a
1a88 ; --------------------------------------------------------------------------------------
1a88 0000 0006  |    |		.DBG3TAB	0x0000,0x0006
1a8a 0e8b 0001  |    |		.CONST	0x0e8b,0x0001
1a8c 0e91 0002  |    |		.CONST	0x0e91,0x0002
1a8e 0e96 0003  |    |		.CONST	0x0e96,0x0003
1a90 0e9a 0004  |    |		.CONST	0x0e9a,0x0004
1a92 0ea1 0005  |    |		.CONST	0x0ea1,0x0005
1a94 0ea3 0006  |    |		.CONST	0x0ea3,0x0006
1a96 ; --------------------------------------------------------------------------------------
1a96 ; Debug3 Subtable 0x2b
1a96 ; --------------------------------------------------------------------------------------
1a96 0003 0016  |    |		.DBG3TAB	0x0003,0x0016
1a98 0eab ffff  |    |		.CONST	0x0eab,0xffff
1a9a 0eae fffe  |    |		.CONST	0x0eae,0xfffe
1a9c 0eaf 0001  |    |		.CONST	0x0eaf,0x0001
1a9e 0eb9 000b  |    |		.CONST	0x0eb9,0x000b
1aa0 0ebb 0002  |    |		.CONST	0x0ebb,0x0002
1aa2 0ec7 0003  |    |		.CONST	0x0ec7,0x0003
1aa4 0ec9 0004  |    |		.CONST	0x0ec9,0x0004
1aa6 0ecd 0005  |    |		.CONST	0x0ecd,0x0005
1aa8 0ecf 0006  |    |		.CONST	0x0ecf,0x0006
1aaa 0ed1 0401  |    |		.CONST	0x0ed1,0x0401
1aac 0ed3 0801  |    |		.CONST	0x0ed3,0x0801
1aae 0ed5 0802  |    |		.CONST	0x0ed5,0x0802
1ab0 0ed6 0803  |    |		.CONST	0x0ed6,0x0803
1ab2 0ed7 0804  |    |		.CONST	0x0ed7,0x0804
1ab4 0ed9 0401  |    |		.CONST	0x0ed9,0x0401
1ab6 0ee0 0006  |    |		.CONST	0x0ee0,0x0006
1ab8 0ee1 0007  |    |		.CONST	0x0ee1,0x0007
1aba 0ee7 0008  |    |		.CONST	0x0ee7,0x0008
1abc 0eeb 0009  |    |		.CONST	0x0eeb,0x0009
1abe 0eed 000a  |    |		.CONST	0x0eed,0x000a
1ac0 0eee f3ff  |    |		.CONST	0x0eee,0xf3ff
1ac2 0ef3 0c01  |    |		.CONST	0x0ef3,0x0c01
1ac4 0ef6 0c02  |    |		.CONST	0x0ef6,0x0c02
1ac6 0efa 0c03  |    |		.CONST	0x0efa,0x0c03
1ac8 0efc 0c04  |    |		.CONST	0x0efc,0x0c04
1aca ; --------------------------------------------------------------------------------------
1aca ; Debug3 Subtable 0x2c
1aca ; --------------------------------------------------------------------------------------
1aca 000a 0023  |   #|		.DBG3TAB	0x000a,0x0023
1acc 0f03 ffff  |    |		.CONST	0x0f03,0xffff
1ace 0f08 fffe  |    |		.CONST	0x0f08,0xfffe
1ad0 0f0a fffd  |    |		.CONST	0x0f0a,0xfffd
1ad2 0f0b fffc  |    |		.CONST	0x0f0b,0xfffc
1ad4 0f0c fffb  |    |		.CONST	0x0f0c,0xfffb
1ad6 0f0d fffa  |    |		.CONST	0x0f0d,0xfffa
1ad8 0f0e fff9  |    |		.CONST	0x0f0e,0xfff9
1ada 0f0f fff8  |    |		.CONST	0x0f0f,0xfff8
1adc 0f10 fff7  |    |		.CONST	0x0f10,0xfff7
1ade 0f13 0001  |    |		.CONST	0x0f13,0x0001
1ae0 0f24 0002  | $  |		.CONST	0x0f24,0x0002
1ae2 0f26 0003  | &  |		.CONST	0x0f26,0x0003
1ae4 0f3b 0004  | ;  |		.CONST	0x0f3b,0x0004
1ae6 0f3c 0005  | <  |		.CONST	0x0f3c,0x0005
1ae8 0f40 0006  | @  |		.CONST	0x0f40,0x0006
1aea 0f46 0007  | F  |		.CONST	0x0f46,0x0007
1aec 0f47 fbff  | G  |		.CONST	0x0f47,0xfbff
1aee 0f4d 0401  | M  |		.CONST	0x0f4d,0x0401
1af0 0f4f 0402  | O  |		.CONST	0x0f4f,0x0402
1af2 0f56 0403  | V  |		.CONST	0x0f56,0x0403
1af4 0f58 0404  | X  |		.CONST	0x0f58,0x0404
1af6 0f63 0405  | c  |		.CONST	0x0f63,0x0405
1af8 0f6b 0406  | k  |		.CONST	0x0f6b,0x0406
1afa 0f71 0407  | q  |		.CONST	0x0f71,0x0407
1afc 0f74 0408  | t  |		.CONST	0x0f74,0x0408
1afe 0f78 040a  | x  |		.CONST	0x0f78,0x040a
1b00 0f7c 0409  | |  |		.CONST	0x0f7c,0x0409
1b02 0f86 040b  |    |		.CONST	0x0f86,0x040b
1b04 0f89 040c  |    |		.CONST	0x0f89,0x040c
1b06 0f8c 040d  |    |		.CONST	0x0f8c,0x040d
1b08 0f8f 0008  |    |		.CONST	0x0f8f,0x0008
1b0a 0f91 0009  |    |		.CONST	0x0f91,0x0009
1b0c 0f98 000a  |    |		.CONST	0x0f98,0x000a
1b0e 0f99 0801  |    |		.CONST	0x0f99,0x0801
1b10 0f9b 000a  |    |		.CONST	0x0f9b,0x000a
1b12 0f9c 000b  |    |		.CONST	0x0f9c,0x000b
1b14 0fa6 000c  |    |		.CONST	0x0fa6,0x000c
1b16 0fab 000d  |    |		.CONST	0x0fab,0x000d
1b18 0fac 0c01  |    |		.CONST	0x0fac,0x0c01
1b1a 0fae 000d  |    |		.CONST	0x0fae,0x000d
1b1c 0faf 000e  |    |		.CONST	0x0faf,0x000e
1b1e 0fb9 000f  |    |		.CONST	0x0fb9,0x000f
1b20 0fc1 0010  |    |		.CONST	0x0fc1,0x0010
1b22 0fca 0011  |    |		.CONST	0x0fca,0x0011
1b24 0fd1 0012  |    |		.CONST	0x0fd1,0x0012
1b26 ; --------------------------------------------------------------------------------------
1b26 ; Debug3 Subtable 0x2d
1b26 ; --------------------------------------------------------------------------------------
1b26 0003 0006  |    |		.DBG3TAB	0x0003,0x0006
1b28 0feb ffff  |    |		.CONST	0x0feb,0xffff
1b2a 0fed fffe  |    |		.CONST	0x0fed,0xfffe
1b2c 0ff2 fffd  |    |		.CONST	0x0ff2,0xfffd
1b2e 0ff5 0002  |    |		.CONST	0x0ff5,0x0002
1b30 1001 0003  |    |		.CONST	0x1001,0x0003
1b32 1003 0004  |    |		.CONST	0x1003,0x0004
1b34 100d 0005  |    |		.CONST	0x100d,0x0005
1b36 1012 0001  |    |		.CONST	0x1012,0x0001
1b38 1017 0006  |    |		.CONST	0x1017,0x0006
1b3a ; --------------------------------------------------------------------------------------
1b3a ; Debug3 Subtable 0x2e
1b3a ; --------------------------------------------------------------------------------------
1b3a 0000 000d  |    |		.DBG3TAB	0x0000,0x000d
1b3c 1023 0001  | #  |		.CONST	0x1023,0x0001
1b3e 1029 0002  | )  |		.CONST	0x1029,0x0002
1b40 102d 0003  | -  |		.CONST	0x102d,0x0003
1b42 102f 0004  | /  |		.CONST	0x102f,0x0004
1b44 103e 0005  | >  |		.CONST	0x103e,0x0005
1b46 1041 0006  | A  |		.CONST	0x1041,0x0006
1b48 1045 0007  | E  |		.CONST	0x1045,0x0007
1b4a 1047 0008  | G  |		.CONST	0x1047,0x0008
1b4c 1053 0009  | S  |		.CONST	0x1053,0x0009
1b4e 1056 000a  | V  |		.CONST	0x1056,0x000a
1b50 1058 000b  | X  |		.CONST	0x1058,0x000b
1b52 105c 000c  | \  |		.CONST	0x105c,0x000c
1b54 106b 000d  | k  |		.CONST	0x106b,0x000d
1b56 ; --------------------------------------------------------------------------------------
1b56 ; Debug3 Subtable 0x2f
1b56 ; --------------------------------------------------------------------------------------
1b56 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
1b58 107b 0001  | {  |		.CONST	0x107b,0x0001
1b5a 1081 0002  |    |		.CONST	0x1081,0x0002
1b5c ; --------------------------------------------------------------------------------------
1b5c ; Debug3 Subtable 0x30
1b5c ; --------------------------------------------------------------------------------------
1b5c 0000 000e  |    |		.DBG3TAB	0x0000,0x000e
1b5e 108b 0001  |    |		.CONST	0x108b,0x0001
1b60 1090 0002  |    |		.CONST	0x1090,0x0002
1b62 1091 0401  |    |		.CONST	0x1091,0x0401
1b64 1093 0002  |    |		.CONST	0x1093,0x0002
1b66 1094 0003  |    |		.CONST	0x1094,0x0003
1b68 1096 0801  |    |		.CONST	0x1096,0x0801
1b6a 1097 0003  |    |		.CONST	0x1097,0x0003
1b6c 109b 0004  |    |		.CONST	0x109b,0x0004
1b6e 109c 0c01  |    |		.CONST	0x109c,0x0c01
1b70 109e 0004  |    |		.CONST	0x109e,0x0004
1b72 109f 0005  |    |		.CONST	0x109f,0x0005
1b74 10a2 0006  |    |		.CONST	0x10a2,0x0006
1b76 10a6 0007  |    |		.CONST	0x10a6,0x0007
1b78 10aa 0008  |    |		.CONST	0x10aa,0x0008
1b7a 0000 0000  |    |		.BLANK	0000[0x86]