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

⟦f4443588c⟧

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

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5813       |X   |		.CONST	0x5813								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 06f8       |    |		.CONST	0x06f8								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0000       |    |		.CONST	0x0000								; Offset to segment table (only in elab segments)
0007 0005       |    |		.CONST	0x0005								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00bc       |    |		.CONST	0x00bc								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 002f       | /  |		.CONST	0x002f								; Number of locals
000b			INIT_0008:
000b 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x0 = .DEBUG	0x000b,0x07ca,0x8000,0x0000,0x0059,0x8975,0x0000,0x000b
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 4800       |H   |		Short_Literal	0x0
000d 4800       |H   |		Short_Literal	0x0
000e 4801       |H   |		Short_Literal	0x1
000f 4803       |H   |		Short_Literal	0x3
0010 0319       |    |		Declare_Type	Variant_Record,Incomplete,Visible
0011 029a 00c3  |    |		Declare_Subprogram	INIT_00c0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1 = 0x11,0xfffe
0013 029a 00d3  |    |		Declare_Subprogram	INIT_00d0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0x13,0xfffd
0015 029a 00db  |    |		Declare_Subprogram	INIT_00d8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0x15,0xfffc
0017 029a 00eb  |    |		Declare_Subprogram	INIT_00e8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x17,0xfffb
0019 029a 00f3  |    |		Declare_Subprogram	INIT_00f0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x19,0xfffa
													; Debug Table 0x0.0x6 = 0x19,0xfff9
001b 029a 010b  |    |		Declare_Subprogram	INIT_0108,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x1b,0xfff8
001d 029a 01bb  |    |		Declare_Subprogram	INIT_01b8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x1d,0xfff7
001f 029a 01cb  |    |		Declare_Subprogram	INIT_01c8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x1f,0xfff6
0021 029a 0273  |   s|		Declare_Subprogram	INIT_0270,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x21,0xfff5
0023 029a 02b3  |    |		Declare_Subprogram	INIT_02b0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x23,0xfff4
0025 029a 030b  |    |		Declare_Subprogram	INIT_0308,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xc = 0x25,0xfff3
0027 029a 0363  |   c|		Declare_Subprogram	INIT_0360,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xd = 0x27,0xfff2
0029 029a 03e3  |    |		Declare_Subprogram	INIT_03e0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xe = 0x29,0xfff1
002b 029a 0493  |    |		Declare_Subprogram	INIT_0490,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xf = 0x2b,0xfff0
002d 029a 04ab  |    |		Declare_Subprogram	INIT_04a8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x10 = 0x2d,0xffef
													; Debug Table 0x0.0x11 = 0x2d,0xffee
002f 029a 04eb  |    |		Declare_Subprogram	INIT_04e8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x12 = 0x2f,0xffed
0031 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x13 = 0x31,0xffec
0032 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0033 e001       |    |		Load	0x0,0x1
0034 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0035 029f 052b  |   +|		Declare_Subprogram	INIT_0528,For_Call
0037 4800       |H   |		Short_Literal	0x0
0038 4802       |H   |		Short_Literal	0x2
0039 e20d       |    |		Load	0x1,0xd
003a 0307       |    |		Complete_Type	Variant_Record,By_Defining
003b 00bf       |    |		Action	Accept_Activation
003c e002       |    |		Load	0x0,0x2								; Debug Table 0x1 = .DEBUG	0x003c,0x07f4,0x8000,0x0000,0x0059,0x8e95,0x0000,0x001d
													; Debug Table 0x1.0x0 = 0x3c,0xffff
003d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
003e 03be       |    |		Declare_Variable	Access,Visible
003f 0092 06ab  |    |		Action	Push_String_Extended,0x6ab					; "No Selection Started."
0041 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x1 = 0x41,0x401
0042 e002       |    |		Load	0x0,0x2
0043 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0044 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0045 00d0       |    |		Action	Swap_Control
0046 00d1       |    |		Pop_Control	Pop_Count_1
0047 0039       | 9  |		Store_Top	Access,At_Offset_1					; Debug Table 0x1.0x2 = 0x47,0xffff
0048 e002       |    |		Load	0x0,0x2								; Debug Table 0x1.0x3 = 0x48,0xfffe
0049 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
004a 03be       |    |		Declare_Variable	Access,Visible
004b 0092 06ac  |    |		Action	Push_String_Extended,0x6ac					; "No Current Selection."
004d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x4 = 0x4d,0x801
004e e002       |    |		Load	0x0,0x2
004f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0050 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0051 00d0       |    |		Action	Swap_Control
0052 00d1       |    |		Pop_Control	Pop_Count_1
0053 0039       | 9  |		Store_Top	Access,At_Offset_1					; Debug Table 0x1.0x5 = 0x53,0xfffe
0054 e002       |    |		Load	0x0,0x2								; Debug Table 0x1.0x6 = 0x54,0xfffd
0055 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0056 03be       |    |		Declare_Variable	Access,Visible
0057 0092 06ad  |    |		Action	Push_String_Extended,0x6ad					; "Locked image can not be selected."
0059 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x7 = 0x59,0xc01
005a e002       |    |		Load	0x0,0x2
005b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
005c 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
005d 00d0       |    |		Action	Swap_Control
005e 00d1       |    |		Pop_Control	Pop_Count_1
005f 0039       | 9  |		Store_Top	Access,At_Offset_1					; Debug Table 0x1.0x8 = 0x5f,0xfffd
0060 e002       |    |		Load	0x0,0x2								; Debug Table 0x1.0x9 = 0x60,0xfffc
0061 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0062 03be       |    |		Declare_Variable	Access,Visible
0063 0092 06ae  |    |		Action	Push_String_Extended,0x6ae					; "The cursor is not in a window."
0065 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0xa = 0x65,0x1001
0066 e002       |    |		Load	0x0,0x2
0067 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0068 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0069 00d0       |    |		Action	Swap_Control
006a 00d1       |    |		Pop_Control	Pop_Count_1
006b 0039       | 9  |		Store_Top	Access,At_Offset_1					; Debug Table 0x1.0xb = 0x6b,0xfffc
006c e002       |    |		Load	0x0,0x2								; Debug Table 0x1.0xc = 0x6c,0xfffb
006d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
006e 03be       |    |		Declare_Variable	Access,Visible
006f 0092 06af  |    |		Action	Push_String_Extended,0x6af					; "Cannot delete protected text."
0071 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0xd = 0x71,0x1401
0072 e002       |    |		Load	0x0,0x2
0073 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0074 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0075 00d0       |    |		Action	Swap_Control
0076 00d1       |    |		Pop_Control	Pop_Count_1
0077 0039       | 9  |		Store_Top	Access,At_Offset_1					; Debug Table 0x1.0xe = 0x77,0xfffb
0078 e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x10 = 0x78,0xfff9
													; Debug Table 0x1.0x11 = 0x78,0xfff8
													; Debug Table 0x1.0xf = 0x78,0xfffa
0079 1928       | (  |		Execute	Package,Field_Reference,Field_Number 0x28
007a 0129       | )  |		Execute	Any,Make_Visible
007b e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x12 = 0x7b,0xfff7
007c 192a       | *  |		Execute	Package,Field_Reference,Field_Number 0x2a
007d 0129       | )  |		Execute	Any,Make_Visible
007e e003       |    |		Load	0x0,0x3								; Debug Table 0x1.0x13 = 0x7e,0xfff6
007f 1924       | $  |		Execute	Package,Field_Reference,Field_Number 0x24
0080 0129       | )  |		Execute	Any,Make_Visible
0081 e003       |    |		Load	0x0,0x3								; Debug Table 0x1.0x14 = 0x81,0xfff5
0082 1926       | &  |		Execute	Package,Field_Reference,Field_Number 0x26
0083 0129       | )  |		Execute	Any,Make_Visible
0084 e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x15 = 0x84,0xfff4
0085 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0086 0129       | )  |		Execute	Any,Make_Visible
0087 e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x16 = 0x87,0xfff3
0088 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0089 e001       |    |		Load	0x0,0x1
008a 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
008b 011e       |    |		Execute	Any,Convert
008c 0129       | )  |		Execute	Any,Make_Visible
008d e004       |    |		Load	0x0,0x4								; Debug Table 0x1.0x17 = 0x8d,0xfff2
008e 1924       | $  |		Execute	Package,Field_Reference,Field_Number 0x24
008f 0129       | )  |		Execute	Any,Make_Visible
0090 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x18 = 0x90,0xfff1
0091 00c7       |    |		Action	Elaborate_Subprogram
0092 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x19 = 0x92,0xfff0
0093 00c7       |    |		Action	Elaborate_Subprogram
0094 029c 054b  |   K|		Declare_Subprogram	INIT_0548,For_Outer_Call,Visible		; Debug Table 0x1.0x1a = 0x94,0xffef
0096 029c 056b  |   k|		Declare_Subprogram	INIT_0568,For_Outer_Call,Visible		; Debug Table 0x1.0x1b = 0x96,0xffee
0098 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x1c = 0x98,0xffed
0099 00c7       |    |		Action	Elaborate_Subprogram
009a 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x1d = 0x9a,0xffec
009b 00c7       |    |		Action	Elaborate_Subprogram
009c 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0x1e = 0x9c,0xffeb
009d 00c7       |    |		Action	Elaborate_Subprogram
009e 029c 0583  |    |		Declare_Subprogram	INIT_0580,For_Outer_Call,Visible		; Debug Table 0x1.0x1f = 0x9e,0xffea
00a0 029c 05bb  |    |		Declare_Subprogram	INIT_05b8,For_Outer_Call,Visible		; Debug Table 0x1.0x20 = 0xa0,0xffe9
00a2 029c 05eb  |    |		Declare_Subprogram	INIT_05e8,For_Outer_Call,Visible		; Debug Table 0x1.0x21 = 0xa2,0xffe8
00a4 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x22 = 0xa4,0xffe7
00a5 00c7       |    |		Action	Elaborate_Subprogram
00a6 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x23 = 0xa6,0xffe6
00a7 00c7       |    |		Action	Elaborate_Subprogram
00a8 029c 0613  |    |		Declare_Subprogram	INIT_0610,For_Outer_Call,Visible		; Debug Table 0x1.0x24 = 0xa8,0xffe5
00aa 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0x25 = 0xaa,0xffe4
00ab 00c7       |    |		Action	Elaborate_Subprogram
00ac 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0x26 = 0xac,0xffe3
00ad 00c7       |    |		Action	Elaborate_Subprogram
00ae 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0x27 = 0xae,0xffe2
00af 00c7       |    |		Action	Elaborate_Subprogram
00b0 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x1.0x28 = 0xb0,0xffe1
00b1 00c7       |    |		Action	Elaborate_Subprogram
00b2 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19				; Debug Table 0x1.0x29 = 0xb2,0xffe0
00b3 00c7       |    |		Action	Elaborate_Subprogram
00b4 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d				; Debug Table 0x1.0x2a = 0xb4,0xffdf
00b5 00c7       |    |		Action	Elaborate_Subprogram
00b6 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a				; Debug Table 0x1.0x2b = 0xb6,0xffde
00b7 00c7       |    |		Action	Elaborate_Subprogram
00b8 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b				; Debug Table 0x1.0x2c = 0xb8,0xffdd
00b9 00c7       |    |		Action	Elaborate_Subprogram
00ba 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c				; Debug Table 0x1.0x2d = 0xba,0xffdc
00bb 00c7       |    |		Action	Elaborate_Subprogram
00bc			BODY_0008:
00bc 00bc       |    |		Action	Signal_Activated
00bd 00bb       |    |		Action	Signal_Completion
00be 0000 0000  |    |		.XXX[0x2]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c3       |    |		.CONST	0x00c3								; Address of begin
00c1 0004       |    |		.CONST	0x0004								; Address of exception handler
00c2 0001       |    |		.CONST	0x0001								; Number of locals
00c3			BODY_00c0:
00c3			INIT_00c0:
00c3 e227       | '  |		Load	0x1,0x27							; Debug Table 0x2 = .DEBUG	0x00c3,0x0852,0x0001,0x0000,0x0059,0x8975,0x0000,0x0014
													; Debug Table 0x2.0x0 = 0xc3,0x1
00c4 e5fe       |    |		Load	0x2,-0x2
00c5 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
00c6 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2.0x1 = 0xc6,0x2
00c7 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
00c8 e5fe       |    |		Load	0x2,-0x2
00c9 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
00ca 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00cb 0000 0000  |    |		.BLANK	0000[0x5]
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00d3       |    |		.CONST	0x00d3								; Address of begin
00d1 0004       |    |		.CONST	0x0004								; Address of exception handler
00d2 0001       |    |		.CONST	0x0001								; Number of locals
00d3			BODY_00d0:
00d3			INIT_00d0:
00d3 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x3 = .DEBUG	0x00d3,0x0858,0x0001,0x0000,0x0059,0x8975,0x0000,0x0022
													; Debug Table 0x3.0x0 = 0xd3,0x1
00d4 0000 0000  |    |		.BLANK	0000[0x4]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00db       |    |		.CONST	0x00db								; Address of begin
00d9 0004       |    |		.CONST	0x0004								; Address of exception handler
00da 0001       |    |		.CONST	0x0001								; Number of locals
00db			BODY_00d8:
00db			INIT_00d8:
00db 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4 = .DEBUG	0x00db,0x085c,0x0001,0x0000,0x0059,0x8975,0x0000,0x002a
													; Debug Table 0x4.0x0 = 0xdb,0x1
00dc 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
00dd e001       |    |		Load	0x0,0x1
00de 188b       |    |		Execute	Package,Field_Execute,Field_Number 0x8b
00df e227       | '  |		Load	0x1,0x27							; Debug Table 0x4.0x1 = 0xdf,0x2
00e0 e5fe       |    |		Load	0x2,-0x2
00e1 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
00e2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
00e3 0000 0000  |    |		.BLANK	0000[0x5]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00eb       |    |		.CONST	0x00eb								; Address of begin
00e9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ea 0001       |    |		.CONST	0x0001								; Number of locals
00eb			BODY_00e8:
00eb			INIT_00e8:
00eb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5 = .DEBUG	0x00eb,0x0862,0x0001,0x0000,0x0059,0x8975,0x0000,0x0038
													; Debug Table 0x5.0x0 = 0xeb,0x1
00ec e001       |    |		Load	0x0,0x1
00ed 1856       | V  |		Execute	Package,Field_Execute,Field_Number 0x56
00ee 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00ef 0000       |    |		.XXX[0x1]
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f3       |    |		.CONST	0x00f3								; Address of begin
00f1 00fd       |    |		.CONST	0x00fd								; Address of exception handler
00f2 0001       |    |		.CONST	0x0001								; Number of locals
00f3			BODY_00f0:
00f3			INIT_00f0:
00f3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6 = .DEBUG	0x00f3,0x0866,0x0001,0x0000,0x0059,0x8975,0x0000,0x0050
													; Debug Table 0x6.0x0 = 0xf3,0x1
00f4 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00f5 00db       |    |		Load_Top	At_Offset_3
00f6 822e       | .  |		Call	0x1,0x2e
00f7 00d2       |    |		Pop_Control	Pop_Count_2
00f8 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0x1 = 0xf8,0x2
00f9 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
00fa e001       |    |		Load	0x0,0x1
00fb 188b       |    |		Execute	Package,Field_Execute,Field_Number 0x8b
00fc 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
00fd			TRAP_00f0:
00fd 62de       |b   |		Indirect_Literal	Discrete,0x3dc,{0x00000000, 0x598e9501}
00fe 010f       |    |		Execute	Exception,Equal
00ff 6801       |h   |		Jump_Zero	0x101
0100 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x6.0x2 = 0x100,0x3
0101 0100       |    |		Execute	Exception,Raise
0102 0000 0000  |    |		.BLANK	0000[0x6]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 0120       |    |		.CONST	0x0120								; Address of begin
0109 0195       |    |		.CONST	0x0195								; Address of exception handler
010a 0006       |    |		.CONST	0x0006								; Number of locals
010b			INIT_0108:
010b e001       |    |		Load	0x0,0x1								; Debug Table 0x7 = .DEBUG	0x010b,0x086e,0x0001,0x0000,0x0059,0x8975,0x0000,0x005e
													; Debug Table 0x7.0x0 = 0x10b,0xffff
010c 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
010d 02c7       |    |		Declare_Variable	Any
010e 00d8       |    |		Load_Top	At_Offset_0
010f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0110 e003       |    |		Load	0x0,0x3								; Debug Table 0x7.0x1 = 0x110,0xfffe
0111 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0112 0322       | "  |		Declare_Variable	Record
0113 e003       |    |		Load	0x0,0x3
0114 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0115 0322       | "  |		Declare_Variable	Record
0116 e001       |    |		Load	0x0,0x1								; Debug Table 0x7.0x2 = 0x116,0xfffd
0117 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0118 0322       | "  |		Declare_Variable	Record
0119 00d8       |    |		Load_Top	At_Offset_0
011a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
011b e001       |    |		Load	0x0,0x1
011c 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
011d 0322       | "  |		Declare_Variable	Record
011e 00d8       |    |		Load_Top	At_Offset_0
011f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0120			BODY_0108:
0120 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x3 = 0x120,0x1
0121 e5ff       |    |		Load	0x2,-0x1
0122 822e       | .  |		Call	0x1,0x2e
0123 00d2       |    |		Pop_Control	Pop_Count_2
0124 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0x4 = 0x124,0x2
0125 e403       |    |		Load	0x2,0x3
0126 e402       |    |		Load	0x2,0x2
0127 0120       |    |		Execute	Any,Is_Value
0128 6803       |h   |		Jump_Zero	0x12c
0129 e001       |    |		Load	0x0,0x1
012a 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
012b 7801       |x   |		Jump	0x12d
012c e402       |    |		Load	0x2,0x2
012d e5fe       |    |		Load	0x2,-0x2
012e 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
012f e001       |    |		Load	0x0,0x1
0130 188a       |    |		Execute	Package,Field_Execute,Field_Number 0x8a
0131 c402       |    |		Store	0x2,0x2
0132 00d2       |    |		Pop_Control	Pop_Count_2
0133 e402       |    |		Load	0x2,0x2								; Debug Table 0x7.0x5 = 0x133,0x3
0134 e228       | (  |		Load	0x1,0x28
0135 012f       | /  |		Execute	Any,Equal
0136 7027       |p'  |		Jump_Nonzero	0x15e
0137 e402       |    |		Load	0x2,0x2								; Debug Table 0x7.0x6 = 0x137,0x4
0138 00d9       |    |		Load_Top	At_Offset_1
0139 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
013a 012f       | /  |		Execute	Any,Equal
013b 6810       |h   |		Jump_Zero	0x14c
013c e402       |    |		Load	0x2,0x2								; Debug Table 0x7.0x7 = 0x13c,0x5
013d 00da       |    |		Load_Top	At_Offset_2
013e 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
013f 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x8 = 0x13f,0x6
0140 00d9       |    |		Load_Top	At_Offset_1
0141 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0142 8225       | %  |		Call	0x1,0x25
0143 6804       |h   |		Jump_Zero	0x148
0144 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0x9 = 0x144,0x7
0145 00da       |    |		Load_Top	At_Offset_2
0146 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0147 7834       |x4  |		Jump	0x17c
0148 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0xa = 0x148,0x8
0149 00da       |    |		Load_Top	At_Offset_2
014a 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
014b 7830       |x0  |		Jump	0x17c
014c e21e       |    |		Load	0x1,0x1e							; Debug Table 0x7.0xb = 0x14c,0x9
014d e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x7.0xc = 0x14d,0x401
014e 00d9       |    |		Load_Top	At_Offset_1
014f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0xd = 0x14f,0x801
0150 0227       | '  |		Execute	Access,All_Reference
0151 0335       | 5  |		Declare_Variable	Array,Duplicate
0152 00d0       |    |		Action	Swap_Control
0153 00d1       |    |		Pop_Control	Pop_Count_1
0154 00d0       |    |		Action	Swap_Control
0155 00d1       |    |		Pop_Control	Pop_Count_1
0156 e005       |    |		Load	0x0,0x5								; Debug Table 0x7.0xe = 0x156,0x401
0157 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0158 00d1       |    |		Pop_Control	Pop_Count_1
0159 4800       |H   |		Short_Literal	0x0							; Debug Table 0x7.0xf = 0x159,0x402
015a e5ff       |    |		Load	0x2,-0x1
015b 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
015c 00d1       |    |		Pop_Control	Pop_Count_1
015d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x7.0x10 = 0x15d,0xa
015e e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x7.0x11 = 0x15e,0xb
015f 2402       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x2
0160 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0161 00d9       |    |		Load_Top	At_Offset_1
0162 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0163 012f       | /  |		Execute	Any,Equal
0164 6805       |h   |		Jump_Zero	0x16a
0165 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x7.0x12 = 0x165,0xc
0166 2402       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x2
0167 00da       |    |		Load_Top	At_Offset_2
0168 017d       | }  |		Execute	Record,Structure_Write
0169 7812       |x   |		Jump	0x17c
016a e21e       |    |		Load	0x1,0x1e							; Debug Table 0x7.0x13 = 0x16a,0xd
016b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x7.0x14 = 0x16b,0xc01
016c 00d9       |    |		Load_Top	At_Offset_1
016d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x15 = 0x16d,0x1001
016e 0227       | '  |		Execute	Access,All_Reference
016f 0335       | 5  |		Declare_Variable	Array,Duplicate
0170 00d0       |    |		Action	Swap_Control
0171 00d1       |    |		Pop_Control	Pop_Count_1
0172 00d0       |    |		Action	Swap_Control
0173 00d1       |    |		Pop_Control	Pop_Count_1
0174 e005       |    |		Load	0x0,0x5								; Debug Table 0x7.0x16 = 0x174,0xc01
0175 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0176 00d1       |    |		Pop_Control	Pop_Count_1
0177 4800       |H   |		Short_Literal	0x0							; Debug Table 0x7.0x17 = 0x177,0xc02
0178 e5ff       |    |		Load	0x2,-0x1
0179 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
017a 00d1       |    |		Pop_Control	Pop_Count_1
017b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x7.0x18 = 0x17b,0xe
017c 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x7.0x19 = 0x17c,0xf
017d 822a       | *  |		Call	0x1,0x2a
017e 00d1       |    |		Pop_Control	Pop_Count_1
017f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x1a = 0x17f,0x10
0180 822a       | *  |		Call	0x1,0x2a
0181 00d1       |    |		Pop_Control	Pop_Count_1
0182 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x1b = 0x182,0x11
0183 00da       |    |		Load_Top	At_Offset_2
0184 8223       | #  |		Call	0x1,0x23
0185 6806       |h   |		Jump_Zero	0x18c
0186 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x1c = 0x186,0x12
0187 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0188 00da       |    |		Load_Top	At_Offset_2
0189 e001       |    |		Load	0x0,0x1
018a 1855       | U  |		Execute	Package,Field_Execute,Field_Number 0x55
018b 7805       |x   |		Jump	0x191
018c 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x7.0x1d = 0x18c,0x13
018d 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
018e 00d9       |    |		Load_Top	At_Offset_1
018f e001       |    |		Load	0x0,0x1
0190 1855       | U  |		Execute	Package,Field_Execute,Field_Number 0x55
0191 e227       | '  |		Load	0x1,0x27							; Debug Table 0x7.0x1e = 0x191,0x14
0192 e5fe       |    |		Load	0x2,-0x2
0193 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0194 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0195			TRAP_0108:
0195 6246       |bF  |		Indirect_Literal	Discrete,0x3dc,{0x00000000, 0x598e9501}
0196 010f       |    |		Execute	Exception,Equal
0197 6801       |h   |		Jump_Zero	0x199
0198 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x7.0x1f = 0x198,0x15
0199 e001       |    |		Load	0x0,0x1
019a 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
019b 010f       |    |		Execute	Exception,Equal
019c 6814       |h   |		Jump_Zero	0x1b1
019d e227       | '  |		Load	0x1,0x27							; Debug Table 0x7.0x20 = 0x19d,0x16
019e e5fe       |    |		Load	0x2,-0x2
019f 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
01a0 e220       |    |		Load	0x1,0x20							; Debug Table 0x7.0x21 = 0x1a0,0x17
01a1 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x7.0x22 = 0x1a1,0x1401
01a2 00d9       |    |		Load_Top	At_Offset_1
01a3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x23 = 0x1a3,0x1801
01a4 0227       | '  |		Execute	Access,All_Reference
01a5 0335       | 5  |		Declare_Variable	Array,Duplicate
01a6 00d0       |    |		Action	Swap_Control
01a7 00d1       |    |		Pop_Control	Pop_Count_1
01a8 00d0       |    |		Action	Swap_Control
01a9 00d1       |    |		Pop_Control	Pop_Count_1
01aa e005       |    |		Load	0x0,0x5								; Debug Table 0x7.0x24 = 0x1aa,0x1401
01ab 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01ac 00d1       |    |		Pop_Control	Pop_Count_1
01ad 4800       |H   |		Short_Literal	0x0							; Debug Table 0x7.0x25 = 0x1ad,0x1402
01ae e5ff       |    |		Load	0x2,-0x1
01af 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
01b0 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01b1 0100       |    |		Execute	Exception,Raise
01b2 0000 0000  |    |		.BLANK	0000[0x6]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01bb       |    |		.CONST	0x01bb								; Address of begin
01b9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ba 0001       |    |		.CONST	0x0001								; Number of locals
01bb			BODY_01b8:
01bb			INIT_01b8:
01bb e227       | '  |		Load	0x1,0x27							; Debug Table 0x8 = .DEBUG	0x01bb,0x08bc,0x0001,0x0000,0x0059,0x8975,0x0000,0x006c
													; Debug Table 0x8.0x0 = 0x1bb,0x1
01bc e5fd       |    |		Load	0x2,-0x3
01bd 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
01be 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x8.0x1 = 0x1be,0x2
01bf 00db       |    |		Load_Top	At_Offset_3
01c0 e001       |    |		Load	0x0,0x1
01c1 1855       | U  |		Execute	Package,Field_Execute,Field_Number 0x55
01c2 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01c3 0000 0000  |    |		.BLANK	0000[0x5]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01db       |    |		.CONST	0x01db								; Address of begin
01c9 024d       | M  |		.CONST	0x024d								; Address of exception handler
01ca 0005       |    |		.CONST	0x0005								; Number of locals
01cb			INIT_01c8:
01cb e001       |    |		Load	0x0,0x1								; Debug Table 0x9 = .DEBUG	0x01cb,0x08c2,0x0001,0x0000,0x0059,0x8975,0x0000,0x0080
													; Debug Table 0x9.0x0 = 0x1cb,0xffff
01cc 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
01cd 0322       | "  |		Declare_Variable	Record
01ce 00d8       |    |		Load_Top	At_Offset_0
01cf 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01d0 e001       |    |		Load	0x0,0x1								; Debug Table 0x9.0x1 = 0x1d0,0xfffe
01d1 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
01d2 0322       | "  |		Declare_Variable	Record
01d3 00d8       |    |		Load_Top	At_Offset_0
01d4 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01d5 e001       |    |		Load	0x0,0x1								; Debug Table 0x9.0x2 = 0x1d5,0xfffd
01d6 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
01d7 0322       | "  |		Declare_Variable	Record
01d8 00d8       |    |		Load_Top	At_Offset_0
01d9 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01da 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x9.0x3 = 0x1da,0xfffc
01db			BODY_01c8:
01db 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9.0x4 = 0x1db,0x1
01dc e402       |    |		Load	0x2,0x2
01dd e5ff       |    |		Load	0x2,-0x1
01de 822c       | ,  |		Call	0x1,0x2c
01df 00d3       |    |		Pop_Control	Pop_Count_3
01e0 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0x5 = 0x1e0,0x2
01e1 e5ff       |    |		Load	0x2,-0x1
01e2 822e       | .  |		Call	0x1,0x2e
01e3 00d2       |    |		Pop_Control	Pop_Count_2
01e4 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9.0x6 = 0x1e4,0x3
01e5 e402       |    |		Load	0x2,0x2
01e6 00db       |    |		Load_Top	At_Offset_3
01e7 e001       |    |		Load	0x0,0x1
01e8 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
01e9 6801       |h   |		Jump_Zero	0x1eb
01ea 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x9.0x7 = 0x1ea,0x4
01eb 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0x8 = 0x1eb,0x5
01ec 00db       |    |		Load_Top	At_Offset_3
01ed 8223       | #  |		Call	0x1,0x23
01ee 682b       |h+  |		Jump_Zero	0x21a
01ef 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0x9 = 0x1ef,0x6
01f0 00db       |    |		Load_Top	At_Offset_3
01f1 e001       |    |		Load	0x0,0x1
01f2 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
01f3 e402       |    |		Load	0x2,0x2
01f4 e001       |    |		Load	0x0,0x1
01f5 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
01f6 0272       | r  |		Execute	Discrete,Minus
01f7 0248       | H  |		Execute	Discrete,Check_In_Integer
01f8 e001       |    |		Load	0x0,0x1
01f9 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
01fa 00d1       |    |		Pop_Control	Pop_Count_1
01fb 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0xa = 0x1fb,0x7
01fc e001       |    |		Load	0x0,0x1
01fd 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
01fe e402       |    |		Load	0x2,0x2
01ff e001       |    |		Load	0x0,0x1
0200 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0201 027f       |    |		Execute	Discrete,Equal
0202 6817       |h   |		Jump_Zero	0x21a
0203 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0xb = 0x203,0x8
0204 e001       |    |		Load	0x0,0x1
0205 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0206 00db       |    |		Load_Top	At_Offset_3
0207 e001       |    |		Load	0x0,0x1
0208 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0209 0272       | r  |		Execute	Discrete,Minus
020a 0248       | H  |		Execute	Discrete,Check_In_Integer
020b 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
020c 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0xc = 0x20c,0x9
020d e402       |    |		Load	0x2,0x2
020e e001       |    |		Load	0x0,0x1
020f 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0210 00e4       |    |		Load_Encached	Positive_Cache
0211 025b       | [  |		Execute	Discrete,Check_In_Type
0212 e001       |    |		Load	0x0,0x1
0213 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0214 00d1       |    |		Pop_Control	Pop_Count_1
0215 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0xd = 0x215,0xa
0216 00d9       |    |		Load_Top	At_Offset_1
0217 e001       |    |		Load	0x0,0x1
0218 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0219 00d1       |    |		Pop_Control	Pop_Count_1
021a 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0xe = 0x21a,0xb
021b 822b       | +  |		Call	0x1,0x2b
021c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x9.0xf = 0x21c,0xc
021d 822b       | +  |		Call	0x1,0x2b
021e e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x9.0x10 = 0x21e,0xd
021f 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
0220 00db       |    |		Load_Top	At_Offset_3
0221 e402       |    |		Load	0x2,0x2
0222 e006       |    |		Load	0x0,0x6
0223 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0224 00d1       |    |		Pop_Control	Pop_Count_1
0225 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x9.0x11 = 0x225,0xe
0226 00db       |    |		Load_Top	At_Offset_3
0227 e007       |    |		Load	0x0,0x7
0228 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0229 00d1       |    |		Pop_Control	Pop_Count_1
022a 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0x12 = 0x22a,0xf
022b e5ff       |    |		Load	0x2,-0x1
022c 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
022d 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
022e e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x9.0x13 = 0x22e,0x10
022f 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0230 00d8       |    |		Load_Top	At_Offset_0
0231 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
0232 00d8       |    |		Load_Top	At_Offset_0
0233 e404       |    |		Load	0x2,0x4
0234 00d9       |    |		Load_Top	At_Offset_1
0235 e5ff       |    |		Load	0x2,-0x1
0236 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
0237 e006       |    |		Load	0x0,0x6
0238 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0239 00d4       |    |		Pop_Control	Pop_Count_4
023a 00d0       |    |		Action	Swap_Control
023b 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
023c e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x9.0x14 = 0x23c,0x11
023d e5ff       |    |		Load	0x2,-0x1
023e 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
023f 2602       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
0240 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0241 00db       |    |		Load_Top	At_Offset_3
0242 8214       |    |		Call	0x1,0x14
0243 00d1       |    |		Pop_Control	Pop_Count_1
0244 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0x15 = 0x244,0x12
0245 e402       |    |		Load	0x2,0x2
0246 e001       |    |		Load	0x0,0x1
0247 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0248 7003       |p   |		Jump_Nonzero	0x24c
0249 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9.0x16 = 0x249,0x13
024a e402       |    |		Load	0x2,0x2
024b 822f       | /  |		Call	0x1,0x2f
024c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
024d			TRAP_01c8:
024d 618e       |a   |		Indirect_Literal	Discrete,0x3dc,{0x00000000, 0x598e9501}
024e 010f       |    |		Execute	Exception,Equal
024f 6801       |h   |		Jump_Zero	0x251
0250 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x9.0x17 = 0x250,0x14
0251 6186       |a   |		Indirect_Literal	Discrete,0x3d8,{0x00000000, 0x59898502}
0252 010f       |    |		Execute	Exception,Equal
0253 6817       |h   |		Jump_Zero	0x26b
0254 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x9.0x18 = 0x254,0x15
0255 e403       |    |		Load	0x2,0x3
0256 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0257 e402       |    |		Load	0x2,0x2
0258 8214       |    |		Call	0x1,0x14
0259 00d1       |    |		Pop_Control	Pop_Count_1
025a e222       | "  |		Load	0x1,0x22							; Debug Table 0x9.0x19 = 0x25a,0x16
025b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x9.0x1a = 0x25b,0x401
025c 00d9       |    |		Load_Top	At_Offset_1
025d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x1b = 0x25d,0x801
025e 0227       | '  |		Execute	Access,All_Reference
025f 0335       | 5  |		Declare_Variable	Array,Duplicate
0260 00d0       |    |		Action	Swap_Control
0261 00d1       |    |		Pop_Control	Pop_Count_1
0262 00d0       |    |		Action	Swap_Control
0263 00d1       |    |		Pop_Control	Pop_Count_1
0264 e005       |    |		Load	0x0,0x5								; Debug Table 0x9.0x1c = 0x264,0x401
0265 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0266 00d1       |    |		Pop_Control	Pop_Count_1
0267 4800       |H   |		Short_Literal	0x0							; Debug Table 0x9.0x1d = 0x267,0x402
0268 e5ff       |    |		Load	0x2,-0x1
0269 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
026a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
026b 0100       |    |		Execute	Exception,Raise
026c 0000 0000  |    |		.BLANK	0000[0x4]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0282       |    |		.CONST	0x0282								; Address of begin
0271 02a4       |    |		.CONST	0x02a4								; Address of exception handler
0272 0004       |    |		.CONST	0x0004								; Number of locals
0273			INIT_0270:
0273 e001       |    |		Load	0x0,0x1								; Debug Table 0xa = .DEBUG	0x0273,0x0900,0x0001,0x0000,0x0059,0x8975,0x0000,0x008e
													; Debug Table 0xa.0x0 = 0x273,0xffff
0274 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0275 0322       | "  |		Declare_Variable	Record
0276 00d8       |    |		Load_Top	At_Offset_0
0277 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0278 e001       |    |		Load	0x0,0x1								; Debug Table 0xa.0x1 = 0x278,0xfffe
0279 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
027a 0322       | "  |		Declare_Variable	Record
027b 00d8       |    |		Load_Top	At_Offset_0
027c 1c00       |    |		Execute_Immediate	Run_Utility,0x0
027d e001       |    |		Load	0x0,0x1								; Debug Table 0xa.0x2 = 0x27d,0xfffd
027e 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
027f 0322       | "  |		Declare_Variable	Record
0280 00d8       |    |		Load_Top	At_Offset_0
0281 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0282			BODY_0270:
0282 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xa.0x3 = 0x282,0x1
0283 00db       |    |		Load_Top	At_Offset_3
0284 e5ff       |    |		Load	0x2,-0x1
0285 822c       | ,  |		Call	0x1,0x2c
0286 00d3       |    |		Pop_Control	Pop_Count_3
0287 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0x4 = 0x287,0x2
0288 e5ff       |    |		Load	0x2,-0x1
0289 822e       | .  |		Call	0x1,0x2e
028a 00d2       |    |		Pop_Control	Pop_Count_2
028b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xa.0x5 = 0x28b,0x3
028c 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
028d 00da       |    |		Load_Top	At_Offset_2
028e e402       |    |		Load	0x2,0x2
028f e006       |    |		Load	0x0,0x6
0290 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0291 00d1       |    |		Pop_Control	Pop_Count_1
0292 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x6 = 0x292,0x4
0293 00d9       |    |		Load_Top	At_Offset_1
0294 e5ff       |    |		Load	0x2,-0x1
0295 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
0296 e006       |    |		Load	0x0,0x6
0297 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0298 00d3       |    |		Pop_Control	Pop_Count_3
0299 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xa.0x7 = 0x299,0x5
029a 00d9       |    |		Load_Top	At_Offset_1
029b 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
029c e402       |    |		Load	0x2,0x2
029d 8214       |    |		Call	0x1,0x14
029e 00d1       |    |		Pop_Control	Pop_Count_1
029f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0x8 = 0x29f,0x6
02a0 e5ff       |    |		Load	0x2,-0x1
02a1 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
02a2 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
02a3 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02a4			TRAP_0270:
02a4 6137       |a7  |		Indirect_Literal	Discrete,0x3dc,{0x00000000, 0x598e9501}
02a5 010f       |    |		Execute	Exception,Equal
02a6 6801       |h   |		Jump_Zero	0x2a8
02a7 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0xa.0x9 = 0x2a7,0x7
02a8 0100       |    |		Execute	Exception,Raise
02a9 0000 0000  |    |		.BLANK	0000[0x7]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02bf       |    |		.CONST	0x02bf								; Address of begin
02b1 02e4       |    |		.CONST	0x02e4								; Address of exception handler
02b2 0004       |    |		.CONST	0x0004								; Number of locals
02b3			INIT_02b0:
02b3 e001       |    |		Load	0x0,0x1								; Debug Table 0xb = .DEBUG	0x02b3,0x0916,0x0001,0x0000,0x0059,0x8975,0x0000,0x009c
													; Debug Table 0xb.0x0 = 0x2b3,0xffff
02b4 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
02b5 0322       | "  |		Declare_Variable	Record
02b6 00d8       |    |		Load_Top	At_Offset_0
02b7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02b8 e001       |    |		Load	0x0,0x1								; Debug Table 0xb.0x1 = 0x2b8,0xfffe
02b9 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
02ba 0322       | "  |		Declare_Variable	Record
02bb 00d8       |    |		Load_Top	At_Offset_0
02bc 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02bd e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xb.0x2 = 0x2bd,0xfffd
02be 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
02bf			BODY_02b0:
02bf 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xb.0x3 = 0x2bf,0x1
02c0 00db       |    |		Load_Top	At_Offset_3
02c1 e5ff       |    |		Load	0x2,-0x1
02c2 822c       | ,  |		Call	0x1,0x2c
02c3 00d3       |    |		Pop_Control	Pop_Count_3
02c4 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xb.0x4 = 0x2c4,0x2
02c5 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
02c6 00da       |    |		Load_Top	At_Offset_2
02c7 e402       |    |		Load	0x2,0x2
02c8 e006       |    |		Load	0x0,0x6
02c9 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
02ca 00d1       |    |		Pop_Control	Pop_Count_1
02cb e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xb.0x5 = 0x2cb,0x3
02cc e5ff       |    |		Load	0x2,-0x1
02cd 8210       |    |		Call	0x1,0x10
02ce 00d2       |    |		Pop_Control	Pop_Count_2
02cf 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb.0x6 = 0x2cf,0x4
02d0 00da       |    |		Load_Top	At_Offset_2
02d1 e007       |    |		Load	0x0,0x7
02d2 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
02d3 00d1       |    |		Pop_Control	Pop_Count_1
02d4 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x7 = 0x2d4,0x5
02d5 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
02d6 6809       |h   |		Jump_Zero	0x2e0
02d7 00da       |    |		Load_Top	At_Offset_2
02d8 00d9       |    |		Load_Top	At_Offset_1
02d9 2602       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
02da e001       |    |		Load	0x0,0x1
02db 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
02dc 6803       |h   |		Jump_Zero	0x2e0
02dd 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb.0x8 = 0x2dd,0x6
02de 00d9       |    |		Load_Top	At_Offset_1
02df 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
02e0 e227       | '  |		Load	0x1,0x27							; Debug Table 0xb.0x9 = 0x2e0,0x7
02e1 e5fe       |    |		Load	0x2,-0x2
02e2 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
02e3 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02e4			TRAP_02b0:
02e4 60f7       |`   |		Indirect_Literal	Discrete,0x3dc,{0x00000000, 0x598e9501}
02e5 010f       |    |		Execute	Exception,Equal
02e6 6801       |h   |		Jump_Zero	0x2e8
02e7 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0xb.0xa = 0x2e7,0x8
02e8 60ef       |`   |		Indirect_Literal	Discrete,0x3d8,{0x00000000, 0x59898502}
02e9 010f       |    |		Execute	Exception,Equal
02ea 6817       |h   |		Jump_Zero	0x302
02eb e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xb.0xb = 0x2eb,0x9
02ec 00db       |    |		Load_Top	At_Offset_3
02ed 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
02ee e402       |    |		Load	0x2,0x2
02ef 8214       |    |		Call	0x1,0x14
02f0 00d1       |    |		Pop_Control	Pop_Count_1
02f1 e222       | "  |		Load	0x1,0x22							; Debug Table 0xb.0xc = 0x2f1,0xa
02f2 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xb.0xd = 0x2f2,0x401
02f3 00d9       |    |		Load_Top	At_Offset_1
02f4 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0xe = 0x2f4,0x801
02f5 0227       | '  |		Execute	Access,All_Reference
02f6 0335       | 5  |		Declare_Variable	Array,Duplicate
02f7 00d0       |    |		Action	Swap_Control
02f8 00d1       |    |		Pop_Control	Pop_Count_1
02f9 00d0       |    |		Action	Swap_Control
02fa 00d1       |    |		Pop_Control	Pop_Count_1
02fb e005       |    |		Load	0x0,0x5								; Debug Table 0xb.0xf = 0x2fb,0x401
02fc 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02fd 00d1       |    |		Pop_Control	Pop_Count_1
02fe 4800       |H   |		Short_Literal	0x0							; Debug Table 0xb.0x10 = 0x2fe,0x402
02ff e5ff       |    |		Load	0x2,-0x1
0300 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
0301 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0302 0100       |    |		Execute	Exception,Raise
0303 0000 0000  |    |		.BLANK	0000[0x5]
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 0315       |    |		.CONST	0x0315								; Address of begin
0309 035a       | Z  |		.CONST	0x035a								; Address of exception handler
030a 0005       |    |		.CONST	0x0005								; Number of locals
030b			INIT_0308:
030b 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0xc = .DEBUG	0x030b,0x093a,0x0001,0x0000,0x0059,0x8975,0x0000,0x00aa
													; Debug Table 0xc.0x0 = 0x30b,0xffff
030c 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0xc.0x1 = 0x30c,0xfffe
030d e001       |    |		Load	0x0,0x1								; Debug Table 0xc.0x2 = 0x30d,0xfffd
030e 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
030f 02c7       |    |		Declare_Variable	Any
0310 00d8       |    |		Load_Top	At_Offset_0
0311 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0312 60c1       |`   |		Indirect_Literal	Discrete,0x3d4,{0x00000000, 0x7fffffff}		; Debug Table 0xc.0x3 = 0x312,0xfffc
0313 00e3       |    |		Load_Encached	Natural_Cache
0314 03f1       |    |		Declare_Variable	Discrete,With_Value
0315			BODY_0308:
0315 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0xc.0x4 = 0x315,0x1
0316 00e3       |    |		Load_Encached	Natural_Cache
0317 00db       |    |		Load_Top	At_Offset_3
0318 0120       |    |		Execute	Any,Is_Value
0319 6803       |h   |		Jump_Zero	0x31d
031a e001       |    |		Load	0x0,0x1
031b 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
031c 7801       |x   |		Jump	0x31e
031d 00db       |    |		Load_Top	At_Offset_3
031e e5ff       |    |		Load	0x2,-0x1
031f 822d       | -  |		Call	0x1,0x2d
0320 00d1       |    |		Pop_Control	Pop_Count_1
0321 c404       |    |		Store	0x2,0x4
0322 c402       |    |		Store	0x2,0x2
0323 005b       | [  |		Store_Top	Discrete,At_Offset_3
0324 00cf       |    |		Action	Mark_Auxiliary
0325 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xc.0x5 = 0x325,0x2
0326 e402       |    |		Load	0x2,0x2
0327 0263       | c  |		Execute	Discrete,Above_Bound
0328 7009       |p   |		Jump_Nonzero	0x332
0329 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x6 = 0x329,0x3
032a e404       |    |		Load	0x2,0x4
032b 8229       | )  |		Call	0x1,0x29
032c e405       |    |		Load	0x2,0x5
032d e008       |    |		Load	0x0,0x8
032e 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
032f c405       |    |		Store	0x2,0x5
0330 00c8       |    |		Action	Pop_Auxiliary_Range
0331 3ff7       |?   |		Loop_Increasing	0x329
0332 00ce       |    |		Action	Pop_Auxiliary
0333 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x7 = 0x333,0x4
0334 609f       |`   |		Indirect_Literal	Discrete,0x3d4,{0x00000000, 0x7fffffff}
0335 027f       |    |		Execute	Discrete,Equal
0336 6802       |h   |		Jump_Zero	0x339
0337 4801       |H   |		Short_Literal	0x1							; Debug Table 0xc.0x8 = 0x337,0x5
0338 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0339 00cf       |    |		Action	Mark_Auxiliary
033a 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xc.0x9 = 0x33a,0x6
033b e402       |    |		Load	0x2,0x2
033c 0263       | c  |		Execute	Discrete,Above_Bound
033d 701b       |p   |		Jump_Nonzero	0x359
033e 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0xc.0xa = 0x33e,0x7
033f e001       |    |		Load	0x0,0x1								; Debug Table 0xc.0xb = 0x33f,0xfbff
0340 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0341 0322       | "  |		Declare_Variable	Record
0342 e404       |    |		Load	0x2,0x4
0343 e001       |    |		Load	0x0,0x1
0344 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0345 0119       |    |		Execute	Any,Check_In_Formal_Type
0346 00d9       |    |		Load_Top	At_Offset_1
0347 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0348 00d8       |    |		Load_Top	At_Offset_0
0349 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
034a 00db       |    |		Load_Top	At_Offset_3
034b 00d9       |    |		Load_Top	At_Offset_1
034c 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
034d e405       |    |		Load	0x2,0x5
034e 00d0       |    |		Action	Swap_Control
034f 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0350 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0xc = 0x350,0x401
0351 0092 06b0  |    |		Action	Push_String_Extended,0x6b0					; "-- "
0353 e007       |    |		Load	0x0,0x7
0354 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0355 00d2       |    |		Pop_Control	Pop_Count_2
0356 00ce       |    |		Action	Pop_Auxiliary
0357 00c8       |    |		Action	Pop_Auxiliary_Range
0358 3fe5       |?   |		Loop_Increasing	0x33e
0359 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
035a			TRAP_0308:
035a 6081       |`   |		Indirect_Literal	Discrete,0x3dc,{0x00000000, 0x598e9501}
035b 010f       |    |		Execute	Exception,Equal
035c 6801       |h   |		Jump_Zero	0x35e
035d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0xc.0xd = 0x35d,0x8
035e 0100       |    |		Execute	Exception,Raise
035f 0000       |    |		.XXX[0x1]
0360 ; --------------------------------------------------------------------------------------
0360 ; SUBPROGRAM
0360 ; --------------------------------------------------------------------------------------
0360 0373       | s  |		.CONST	0x0373								; Address of begin
0361 03ce       |    |		.CONST	0x03ce								; Address of exception handler
0362 0009       |    |		.CONST	0x0009								; Number of locals
0363			INIT_0360:
0363 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0xd = .DEBUG	0x0363,0x0958,0x0001,0x0000,0x0059,0x8975,0x0000,0x00b8
													; Debug Table 0xd.0x0 = 0x363,0xffff
0364 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0xd.0x1 = 0x364,0xfffe
0365 e001       |    |		Load	0x0,0x1								; Debug Table 0xd.0x2 = 0x365,0xfffd
0366 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0367 02c7       |    |		Declare_Variable	Any
0368 00d8       |    |		Load_Top	At_Offset_0
0369 1c00       |    |		Execute_Immediate	Run_Utility,0x0
036a e001       |    |		Load	0x0,0x1								; Debug Table 0xd.0x3 = 0x36a,0xfffc
036b 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
036c 0322       | "  |		Declare_Variable	Record
036d 00d8       |    |		Load_Top	At_Offset_0
036e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
036f 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0xd.0x4 = 0x36f,0xfffb
0370 00e4       |    |		Load_Encached	Positive_Cache						; Debug Table 0xd.0x5 = 0x370,0xfffa
0371 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0xd.0x6 = 0x371,0xfff9
0372 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0xd.0x7 = 0x372,0xfff8
0373			BODY_0360:
0373 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0xd.0x8 = 0x373,0x1
0374 00e3       |    |		Load_Encached	Natural_Cache
0375 e404       |    |		Load	0x2,0x4
0376 0120       |    |		Execute	Any,Is_Value
0377 6803       |h   |		Jump_Zero	0x37b
0378 e001       |    |		Load	0x0,0x1
0379 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
037a 7801       |x   |		Jump	0x37c
037b e404       |    |		Load	0x2,0x4
037c e5ff       |    |		Load	0x2,-0x1
037d 822d       | -  |		Call	0x1,0x2d
037e 00d1       |    |		Pop_Control	Pop_Count_1
037f c404       |    |		Store	0x2,0x4
0380 c402       |    |		Store	0x2,0x2
0381 c403       |    |		Store	0x2,0x3
0382 e404       |    |		Load	0x2,0x4								; Debug Table 0xd.0x9 = 0x382,0x2
0383 e405       |    |		Load	0x2,0x5
0384 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0385 00cf       |    |		Action	Mark_Auxiliary
0386 e403       |    |		Load	0x2,0x3								; Debug Table 0xd.0xa = 0x386,0x3
0387 e402       |    |		Load	0x2,0x2
0388 0263       | c  |		Execute	Discrete,Above_Bound
0389 7043       |pC  |		Jump_Nonzero	0x3cd
038a 4801       |H   |		Short_Literal	0x1							; Debug Table 0xd.0xb = 0x38a,0x4
038b e405       |    |		Load	0x2,0x5
038c 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
038d 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
038e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0xc = 0x38e,0x5
038f e405       |    |		Load	0x2,0x5
0390 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0391 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0392 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0xd.0xd = 0x392,0x6
0393 e405       |    |		Load	0x2,0x5								; Debug Table 0xd.0xe = 0x393,0xfbff
0394 e001       |    |		Load	0x0,0x1
0395 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
0396 e405       |    |		Load	0x2,0x5
0397 e001       |    |		Load	0x0,0x1
0398 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0399 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0xd.0xf = 0x399,0x401
039a 00e4       |    |		Load_Encached	Positive_Cache
039b 00e3       |    |		Load_Encached	Natural_Cache
039c 00db       |    |		Load_Top	At_Offset_3
039d e009       |    |		Load	0x0,0x9
039e 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
039f c406       |    |		Store	0x2,0x6
03a0 c407       |    |		Store	0x2,0x7
03a1 c408       |    |		Store	0x2,0x8
03a2 e408       |    |		Load	0x2,0x8								; Debug Table 0xd.0x10 = 0x3a2,0x402
03a3 6825       |h%  |		Jump_Zero	0x3c9
03a4 e408       |    |		Load	0x2,0x8								; Debug Table 0xd.0x11 = 0x3a4,0x403
03a5 e405       |    |		Load	0x2,0x5
03a6 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
03a7 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
03a8 e405       |    |		Load	0x2,0x5								; Debug Table 0xd.0x12 = 0x3a8,0x404
03a9 4802       |H   |		Short_Literal	0x2
03aa e007       |    |		Load	0x0,0x7
03ab 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
03ac 00d1       |    |		Pop_Control	Pop_Count_1
03ad 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xd.0x13 = 0x3ad,0x405
03ae e404       |    |		Load	0x2,0x4
03af 8229       | )  |		Call	0x1,0x29
03b0 6023       |`#  |		Indirect_Literal	Discrete,0x3d4,{0x00000000, 0x7fffffff}
03b1 027f       |    |		Execute	Discrete,Equal
03b2 680c       |h   |		Jump_Zero	0x3bf
03b3 4801       |H   |		Short_Literal	0x1							; Debug Table 0xd.0x14 = 0x3b3,0x406
03b4 e405       |    |		Load	0x2,0x5
03b5 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
03b6 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
03b7 e405       |    |		Load	0x2,0x5								; Debug Table 0xd.0x15 = 0x3b7,0x407
03b8 e405       |    |		Load	0x2,0x5
03b9 e001       |    |		Load	0x0,0x1
03ba 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
03bb e007       |    |		Load	0x0,0x7
03bc 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
03bd 00d1       |    |		Pop_Control	Pop_Count_1
03be 780a       |x   |		Jump	0x3c9
03bf e405       |    |		Load	0x2,0x5								; Debug Table 0xd.0x16 = 0x3bf,0x408
03c0 e001       |    |		Load	0x0,0x1
03c1 1852       | R  |		Execute	Package,Field_Execute,Field_Number 0x52
03c2 0f20       |    |		Execute_Immediate	Equal,0x20
03c3 6805       |h   |		Jump_Zero	0x3c9
03c4 e405       |    |		Load	0x2,0x5								; Debug Table 0xd.0x17 = 0x3c4,0x409
03c5 4801       |H   |		Short_Literal	0x1
03c6 e007       |    |		Load	0x0,0x7
03c7 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
03c8 00d1       |    |		Pop_Control	Pop_Count_1
03c9 00d1       |    |		Pop_Control	Pop_Count_1
03ca 00ce       |    |		Action	Pop_Auxiliary
03cb 00c8       |    |		Action	Pop_Auxiliary_Range
03cc 3fbd       |?   |		Loop_Increasing	0x38a
03cd 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03ce			TRAP_0360:
03ce 600d       |`   |		Indirect_Literal	Discrete,0x3dc,{0x00000000, 0x598e9501}
03cf 010f       |    |		Execute	Exception,Equal
03d0 6801       |h   |		Jump_Zero	0x3d2
03d1 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0xd.0x18 = 0x3d1,0x7
03d2 0100       |    |		Execute	Exception,Raise
03d3 0000       |    |		.XXX[0x1]
03d4 0000 0000  |    |		.LITERAL	{0x00000000, 0x7fffffff}
03d8 0000 0000  |    |		.LITERAL	{0x00000000, 0x59898502}
03dc 0000 0000  |    |		.LITERAL	{0x00000000, 0x598e9501}
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 0404       |    |		.CONST	0x0404								; Address of begin
03e1 0489       |    |		.CONST	0x0489								; Address of exception handler
03e2 0009       |    |		.CONST	0x0009								; Number of locals
03e3			INIT_03e0:
03e3 e00a       |    |		Load	0x0,0xa								; Debug Table 0xe = .DEBUG	0x03e3,0x098c,0x0001,0x0000,0x0059,0x8975,0x0000,0x00c6
													; Debug Table 0xe.0x0 = 0x3e3,0xffff
03e4 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
03e5 0322       | "  |		Declare_Variable	Record
03e6 00d8       |    |		Load_Top	At_Offset_0
03e7 1c01       |    |		Execute_Immediate	Run_Utility,0x1
03e8 00db       |    |		Load_Top	At_Offset_3
03e9 00d9       |    |		Load_Top	At_Offset_1
03ea 017d       | }  |		Execute	Record,Structure_Write
03eb e001       |    |		Load	0x0,0x1								; Debug Table 0xe.0x1 = 0x3eb,0xfffe
03ec 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
03ed 02c7       |    |		Declare_Variable	Any
03ee 00d8       |    |		Load_Top	At_Offset_0
03ef 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03f0 e003       |    |		Load	0x0,0x3								; Debug Table 0xe.0x2 = 0x3f0,0xfffd
03f1 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
03f2 0322       | "  |		Declare_Variable	Record
03f3 e003       |    |		Load	0x0,0x3
03f4 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
03f5 0322       | "  |		Declare_Variable	Record
03f6 e001       |    |		Load	0x0,0x1								; Debug Table 0xe.0x3 = 0x3f6,0xfffc
03f7 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
03f8 0322       | "  |		Declare_Variable	Record
03f9 00d8       |    |		Load_Top	At_Offset_0
03fa 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03fb 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x4 = 0x3fb,0xfffb
03fc 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
03fd e001       |    |		Load	0x0,0x1								; Debug Table 0xe.0x5 = 0x3fd,0xfffa
03fe 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
03ff 0322       | "  |		Declare_Variable	Record
0400 00d8       |    |		Load_Top	At_Offset_0
0401 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0402 029f 069b  |    |		Declare_Subprogram	INIT_0698,For_Call				; Debug Table 0xe.0x6 = 0x402,0xfff9
0404			BODY_03e0:
0404 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xe.0x7 = 0x404,0x1
0405 e402       |    |		Load	0x2,0x2
0406 822e       | .  |		Call	0x1,0x2e
0407 00d2       |    |		Pop_Control	Pop_Count_2
0408 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xe.0x8 = 0x408,0x2
0409 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
040a 00da       |    |		Load_Top	At_Offset_2
040b 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
040c e405       |    |		Load	0x2,0x5								; Debug Table 0xe.0x9 = 0x40c,0x3
040d e404       |    |		Load	0x2,0x4
040e e403       |    |		Load	0x2,0x3
040f 0120       |    |		Execute	Any,Is_Value
0410 6803       |h   |		Jump_Zero	0x414
0411 e001       |    |		Load	0x0,0x1
0412 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0413 7801       |x   |		Jump	0x415
0414 e403       |    |		Load	0x2,0x3
0415 e5ff       |    |		Load	0x2,-0x1
0416 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0417 e001       |    |		Load	0x0,0x1
0418 188a       |    |		Execute	Package,Field_Execute,Field_Number 0x8a
0419 c403       |    |		Store	0x2,0x3
041a 00d2       |    |		Pop_Control	Pop_Count_2
041b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xe.0xa = 0x41b,0x4
041c e403       |    |		Load	0x2,0x3
041d 012f       | /  |		Execute	Any,Equal
041e 684b       |hK  |		Jump_Zero	0x46a
041f 00db       |    |		Load_Top	At_Offset_3
0420 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0421 e404       |    |		Load	0x2,0x4
0422 8226       | &  |		Call	0x1,0x26
0423 6846       |hF  |		Jump_Zero	0x46a
0424 e405       |    |		Load	0x2,0x5
0425 e406       |    |		Load	0x2,0x6
0426 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0427 8226       | &  |		Call	0x1,0x26
0428 6841       |hA  |		Jump_Zero	0x46a
0429 e404       |    |		Load	0x2,0x4								; Debug Table 0xe.0xb = 0x429,0x5
042a 00da       |    |		Load_Top	At_Offset_2
042b 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
042c e404       |    |		Load	0x2,0x4								; Debug Table 0xe.0xc = 0x42c,0x6
042d 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
042e e405       |    |		Load	0x2,0x5
042f 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0430 027f       |    |		Execute	Discrete,Equal
0431 6809       |h   |		Jump_Zero	0x43b
0432 e405       |    |		Load	0x2,0x5								; Debug Table 0xe.0xd = 0x432,0x7
0433 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0434 e404       |    |		Load	0x2,0x4
0435 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0436 0272       | r  |		Execute	Discrete,Minus
0437 00e3       |    |		Load_Encached	Natural_Cache
0438 025b       | [  |		Execute	Discrete,Check_In_Type
0439 8409       |    |		Call	0x2,0x9
043a 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
043b 00cf       |    |		Action	Mark_Auxiliary
043c e405       |    |		Load	0x2,0x5								; Debug Table 0xe.0xe = 0x43c,0x8
043d 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
043e 0aff       |    |		Execute_Immediate	Plus,-0x1
043f 0248       | H  |		Execute	Discrete,Check_In_Integer
0440 e404       |    |		Load	0x2,0x4
0441 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0442 0263       | c  |		Execute	Discrete,Above_Bound
0443 701a       |p   |		Jump_Nonzero	0x45e
0444 e408       |    |		Load	0x2,0x8								; Debug Table 0xe.0xf = 0x444,0x9
0445 e001       |    |		Load	0x0,0x1
0446 184e       | N  |		Execute	Package,Field_Execute,Field_Number 0x4e
0447 e408       |    |		Load	0x2,0x8
0448 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0449 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
044a 0272       | r  |		Execute	Discrete,Minus
044b 00e3       |    |		Load_Encached	Natural_Cache
044c 025b       | [  |		Execute	Discrete,Check_In_Type
044d 8409       |    |		Call	0x2,0x9
044e e00b       |    |		Load	0x0,0xb								; Debug Table 0xe.0x10 = 0x44e,0xa
044f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0450 0322       | "  |		Declare_Variable	Record
0451 e408       |    |		Load	0x2,0x8
0452 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0453 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0454 0a01       |    |		Execute_Immediate	Plus,0x1
0455 00d9       |    |		Load_Top	At_Offset_1
0456 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0457 4801       |H   |		Short_Literal	0x1
0458 00d9       |    |		Load_Top	At_Offset_1
0459 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
045a e408       |    |		Load	0x2,0x8
045b 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
045c 00c8       |    |		Action	Pop_Auxiliary_Range
045d 3fe6       |?   |		Loop_Increasing	0x444
045e 00ce       |    |		Action	Pop_Auxiliary
045f e405       |    |		Load	0x2,0x5								; Debug Table 0xe.0x11 = 0x45f,0xb
0460 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0461 0c02       |    |		Execute_Immediate	Greater_Equal,0x2
0462 6806       |h   |		Jump_Zero	0x469
0463 e405       |    |		Load	0x2,0x5								; Debug Table 0xe.0x12 = 0x463,0xc
0464 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0465 0aff       |    |		Execute_Immediate	Plus,-0x1
0466 00e3       |    |		Load_Encached	Natural_Cache
0467 025b       | [  |		Execute	Discrete,Check_In_Type
0468 8409       |    |		Call	0x2,0x9
0469 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
046a e00b       |    |		Load	0x0,0xb								; Debug Table 0xe.0x13 = 0x46a,0xd
046b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
046c 0322       | "  |		Declare_Variable	Record
046d 4801       |H   |		Short_Literal	0x1
046e 00d9       |    |		Load_Top	At_Offset_1
046f 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0470 4801       |H   |		Short_Literal	0x1
0471 00d9       |    |		Load_Top	At_Offset_1
0472 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0473 00da       |    |		Load_Top	At_Offset_2
0474 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0475 00cf       |    |		Action	Mark_Auxiliary
0476 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xe.0x14 = 0x476,0xe
0477 e001       |    |		Load	0x0,0x1
0478 184c       | L  |		Execute	Package,Field_Execute,Field_Number 0x4c
0479 4801       |H   |		Short_Literal	0x1
047a 0263       | c  |		Execute	Discrete,Above_Bound
047b 700b       |p   |		Jump_Nonzero	0x487
047c e408       |    |		Load	0x2,0x8								; Debug Table 0xe.0x15 = 0x47c,0xf
047d e001       |    |		Load	0x0,0x1
047e 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
047f 8409       |    |		Call	0x2,0x9
0480 e408       |    |		Load	0x2,0x8								; Debug Table 0xe.0x16 = 0x480,0x10
0481 4801       |H   |		Short_Literal	0x1
0482 e001       |    |		Load	0x0,0x1
0483 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0484 00d1       |    |		Pop_Control	Pop_Count_1
0485 00c8       |    |		Action	Pop_Auxiliary_Range
0486 3ff5       |?   |		Loop_Increasing	0x47c
0487 00ce       |    |		Action	Pop_Auxiliary
0488 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0489			TRAP_03e0:
0489 6752       |gR  |		Indirect_Literal	Discrete,0x3dc,{0x00000000, 0x598e9501}
048a 010f       |    |		Execute	Exception,Equal
048b 6801       |h   |		Jump_Zero	0x48d
048c 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0xe.0x17 = 0x48c,0x11
048d 0100       |    |		Execute	Exception,Raise
048e 0000 0000  |    |		.XXX[0x2]
0490 ; --------------------------------------------------------------------------------------
0490 ; SUBPROGRAM
0490 ; --------------------------------------------------------------------------------------
0490 0493       |    |		.CONST	0x0493								; Address of begin
0491 0004       |    |		.CONST	0x0004								; Address of exception handler
0492 0001       |    |		.CONST	0x0001								; Number of locals
0493			BODY_0490:
0493			INIT_0490:
0493 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0xf = .DEBUG	0x0493,0x09be,0x0001,0x0000,0x0059,0x8975,0x0000,0x00da
													; Debug Table 0xf.0x0 = 0x493,0x1
0494 e5fd       |    |		Load	0x2,-0x3
0495 e5fe       |    |		Load	0x2,-0x2
0496 0120       |    |		Execute	Any,Is_Value
0497 6803       |h   |		Jump_Zero	0x49b
0498 e001       |    |		Load	0x0,0x1
0499 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
049a 7801       |x   |		Jump	0x49c
049b e5fe       |    |		Load	0x2,-0x2
049c e5ff       |    |		Load	0x2,-0x1
049d 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
049e e001       |    |		Load	0x0,0x1
049f 188a       |    |		Execute	Package,Field_Execute,Field_Number 0x8a
04a0 c5fe       |    |		Store	0x2,-0x2
04a1 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
04a2 0000 0000  |    |		.BLANK	0000[0x6]
04a8 ; --------------------------------------------------------------------------------------
04a8 ; SUBPROGRAM
04a8 ; --------------------------------------------------------------------------------------
04a8 04b6       |    |		.CONST	0x04b6								; Address of begin
04a9 0004       |    |		.CONST	0x0004								; Address of exception handler
04aa 0004       |    |		.CONST	0x0004								; Number of locals
04ab			INIT_04a8:
04ab e001       |    |		Load	0x0,0x1								; Debug Table 0x10 = .DEBUG	0x04ab,0x09c2,0x0001,0x0000,0x0059,0x8975,0x0000,0x00f3
													; Debug Table 0x10.0x0 = 0x4ab,0xffff
04ac 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
04ad 02c7       |    |		Declare_Variable	Any
04ae 00d8       |    |		Load_Top	At_Offset_0
04af 1c00       |    |		Execute_Immediate	Run_Utility,0x0
04b0 e003       |    |		Load	0x0,0x3								; Debug Table 0x10.0x1 = 0x4b0,0xfffe
04b1 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
04b2 0322       | "  |		Declare_Variable	Record
04b3 e003       |    |		Load	0x0,0x3
04b4 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
04b5 0322       | "  |		Declare_Variable	Record
04b6			BODY_04a8:
04b6 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x10.0x2 = 0x4b6,0x1
04b7 00da       |    |		Load_Top	At_Offset_2
04b8 e402       |    |		Load	0x2,0x2
04b9 0120       |    |		Execute	Any,Is_Value
04ba 6803       |h   |		Jump_Zero	0x4be
04bb e001       |    |		Load	0x0,0x1
04bc 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
04bd 7801       |x   |		Jump	0x4bf
04be e402       |    |		Load	0x2,0x2
04bf e5ff       |    |		Load	0x2,-0x1
04c0 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
04c1 e001       |    |		Load	0x0,0x1
04c2 188a       |    |		Execute	Package,Field_Execute,Field_Number 0x8a
04c3 c402       |    |		Store	0x2,0x2
04c4 00d2       |    |		Pop_Control	Pop_Count_2
04c5 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0x3 = 0x4c5,0x2
04c6 e228       | (  |		Load	0x1,0x28
04c7 012f       | /  |		Execute	Any,Equal
04c8 6809       |h   |		Jump_Zero	0x4d2
04c9 4800       |H   |		Short_Literal	0x0							; Debug Table 0x10.0x4 = 0x4c9,0x3
04ca a5fe       |    |		Store_Unchecked	0x2,-0x2
04cb e227       | '  |		Load	0x1,0x27							; Debug Table 0x10.0x5 = 0x4cb,0x4
04cc e5fd       |    |		Load	0x2,-0x3
04cd 017d       | }  |		Execute	Record,Structure_Write
04ce e227       | '  |		Load	0x1,0x27							; Debug Table 0x10.0x6 = 0x4ce,0x5
04cf e5fc       |    |		Load	0x2,-0x4
04d0 017d       | }  |		Execute	Record,Structure_Write
04d1 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
04d2 4801       |H   |		Short_Literal	0x1							; Debug Table 0x10.0x7 = 0x4d2,0x6
04d3 a5fe       |    |		Store_Unchecked	0x2,-0x2
04d4 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x10.0x8 = 0x4d4,0x7
04d5 e5fd       |    |		Load	0x2,-0x3
04d6 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
04d7 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0x9 = 0x4d7,0x8
04d8 e5fd       |    |		Load	0x2,-0x3
04d9 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
04da 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x10.0xa = 0x4da,0x9
04db e5fc       |    |		Load	0x2,-0x4
04dc 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
04dd 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0xb = 0x4dd,0xa
04de e5fc       |    |		Load	0x2,-0x4
04df 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
04e0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
04e1 0000 0000  |    |		.BLANK	0000[0x7]
04e8 ; --------------------------------------------------------------------------------------
04e8 ; SUBPROGRAM
04e8 ; --------------------------------------------------------------------------------------
04e8 04f0       |    |		.CONST	0x04f0								; Address of begin
04e9 0004       |    |		.CONST	0x0004								; Address of exception handler
04ea 0002       |    |		.CONST	0x0002								; Number of locals
04eb			INIT_04e8:
04eb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x11 = .DEBUG	0x04eb,0x09dc,0x0002,0x0000,0x0059,0x8975,0x0000,0x0106
													; Debug Table 0x11.0x0 = 0x4eb,0xffff
04ec 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
04ed 02fd       |    |		Declare_Variable	Variant_Record,Duplicate
04ee 00d0       |    |		Action	Swap_Control
04ef 00d1       |    |		Pop_Control	Pop_Count_1
04f0			BODY_04e8:
04f0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x1 = 0x4f0,0x1
04f1 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
04f2 7002       |p   |		Jump_Nonzero	0x4f5
04f3 4800       |H   |		Short_Literal	0x0							; Debug Table 0x11.0x2 = 0x4f3,0x2
04f4 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
04f5 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0x11.0x3 = 0x4f5,0x3
04f6 e001       |    |		Load	0x0,0x1								; Debug Table 0x11.0x4 = 0x4f6,0xfbff
04f7 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
04f8 0322       | "  |		Declare_Variable	Record
04f9 00da       |    |		Load_Top	At_Offset_2
04fa 2602       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
04fb 00d9       |    |		Load_Top	At_Offset_1
04fc 017d       | }  |		Execute	Record,Structure_Write
04fd e001       |    |		Load	0x0,0x1								; Debug Table 0x11.0x5 = 0x4fd,0xfbfe
04fe 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
04ff 02c7       |    |		Declare_Variable	Any
0500 00d8       |    |		Load_Top	At_Offset_0
0501 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0502 e003       |    |		Load	0x0,0x3								; Debug Table 0x11.0x6 = 0x502,0xfbfd
0503 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0504 0322       | "  |		Declare_Variable	Record
0505 e003       |    |		Load	0x0,0x3
0506 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0507 0322       | "  |		Declare_Variable	Record
0508 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x7 = 0x508,0x401
0509 00da       |    |		Load_Top	At_Offset_2
050a e405       |    |		Load	0x2,0x5
050b 0120       |    |		Execute	Any,Is_Value
050c 6803       |h   |		Jump_Zero	0x510
050d e001       |    |		Load	0x0,0x1
050e 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
050f 7801       |x   |		Jump	0x511
0510 e405       |    |		Load	0x2,0x5
0511 e5fe       |    |		Load	0x2,-0x2
0512 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
0513 e001       |    |		Load	0x0,0x1
0514 188a       |    |		Execute	Package,Field_Execute,Field_Number 0x8a
0515 c405       |    |		Store	0x2,0x5
0516 00d2       |    |		Pop_Control	Pop_Count_2
0517 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x11.0x8 = 0x517,0x402
0518 e404       |    |		Load	0x2,0x4
0519 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
051a 012f       | /  |		Execute	Any,Equal
051b 680a       |h   |		Jump_Zero	0x526
051c 00db       |    |		Load_Top	At_Offset_3
051d 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
051e 00da       |    |		Load_Top	At_Offset_2
051f 8226       | &  |		Call	0x1,0x26
0520 6805       |h   |		Jump_Zero	0x526
0521 00d8       |    |		Load_Top	At_Offset_0
0522 e404       |    |		Load	0x2,0x4
0523 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0524 8226       | &  |		Call	0x1,0x26
0525 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0526 4800       |H   |		Short_Literal	0x0
0527 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0528 ; --------------------------------------------------------------------------------------
0528 ; SUBPROGRAM
0528 ; --------------------------------------------------------------------------------------
0528 052b       | +  |		.CONST	0x052b								; Address of begin
0529 0004       |    |		.CONST	0x0004								; Address of exception handler
052a 0001       |    |		.CONST	0x0001								; Number of locals
052b			BODY_0528:
052b			INIT_0528:
052b 4608       |F   |		Jump_Case	0x9							; Debug Table 0x12 = .DEBUG	0x052b,0x09f0,0x0005,0x0000,0x0059,0x8975,0x0000,0x0116
052c 7808       |x   |		Jump	0x535								; case 0x0
052d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
052e 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
052f 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
0530 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
0531 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
0532 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
0533 780a       |x   |		Jump	0x53e								; case 0x7
0534 780d       |x   |		Jump	0x542								; case 0x8
0535 00da       |    |		Load_Top	At_Offset_2
0536 2402       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x2
0537 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0538 00da       |    |		Load_Top	At_Offset_2
0539 2203       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x3
053a 00da       |    |		Load_Top	At_Offset_2
053b 2403       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x3
053c 1c00       |    |		Execute_Immediate	Run_Utility,0x0
053d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
053e 00db       |    |		Load_Top	At_Offset_3
053f e5ff       |    |		Load	0x2,-0x1
0540 031b       |    |		Declare_Type	Variant_Record,Constrained
0541 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0542 00db       |    |		Load_Top	At_Offset_3
0543 00db       |    |		Load_Top	At_Offset_3
0544 02fc       |    |		Declare_Variable	Variant_Record,With_Constraint
0545 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0546 0000 0000  |    |		.XXX[0x2]
0548 ; --------------------------------------------------------------------------------------
0548 ; SUBPROGRAM
0548 ; --------------------------------------------------------------------------------------
0548 054b       | K  |		.CONST	0x054b								; Address of begin
0549 0004       |    |		.CONST	0x0004								; Address of exception handler
054a 0001       |    |		.CONST	0x0001								; Number of locals
054b			BODY_0548:
054b			INIT_0548:
054b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x13 = .DEBUG	0x054b,0x09f2,0x0001,0x0000,0x0059,0x8e95,0x0000,0x0104
													; Debug Table 0x13.0x0 = 0x54b,0x1
054c e004       |    |		Load	0x0,0x4
054d 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
054e 6808       |h   |		Jump_Zero	0x557
054f 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x13.0x1 = 0x54f,0x2
0550 e001       |    |		Load	0x0,0x1
0551 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0552 e001       |    |		Load	0x0,0x1
0553 1848       | H  |		Execute	Package,Field_Execute,Field_Number 0x48
0554 00db       |    |		Load_Top	At_Offset_3
0555 017d       | }  |		Execute	Record,Structure_Write
0556 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0557 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x13.0x2 = 0x557,0x3
0558 e004       |    |		Load	0x0,0x4
0559 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
055a 6807       |h   |		Jump_Zero	0x562
055b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x13.0x3 = 0x55b,0x4
055c 00db       |    |		Load_Top	At_Offset_3
055d e001       |    |		Load	0x0,0x1
055e 184e       | N  |		Execute	Package,Field_Execute,Field_Number 0x4e
055f e001       |    |		Load	0x0,0x1
0560 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0561 00d1       |    |		Pop_Control	Pop_Count_1
0562 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0563 0000 0000  |    |		.BLANK	0000[0x5]
0568 ; --------------------------------------------------------------------------------------
0568 ; SUBPROGRAM
0568 ; --------------------------------------------------------------------------------------
0568 056b       | k  |		.CONST	0x056b								; Address of begin
0569 0004       |    |		.CONST	0x0004								; Address of exception handler
056a 0001       |    |		.CONST	0x0001								; Number of locals
056b			BODY_0568:
056b			INIT_0568:
056b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x14 = .DEBUG	0x056b,0x09fc,0x0001,0x0000,0x0059,0x8e95,0x0000,0x013c
													; Debug Table 0x14.0x0 = 0x56b,0x1
056c e001       |    |		Load	0x0,0x1
056d 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
056e e001       |    |		Load	0x0,0x1
056f 1b36       | 6  |		Execute	Package,Field_Read,Field_Number 0x36
0570 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0571 6802       |h   |		Jump_Zero	0x574
0572 611d       |a   |		Indirect_Literal	Discrete,0x690,{0x00000000, 0x59898503}		; Debug Table 0x14.0x1 = 0x572,0x2
0573 0257       | W  |		Execute	Discrete,Raise
0574 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x14.0x2 = 0x574,0x3
0575 e007       |    |		Load	0x0,0x7
0576 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0577 6802       |h   |		Jump_Zero	0x57a
0578 6117       |a   |		Indirect_Literal	Discrete,0x690,{0x00000000, 0x59898503}		; Debug Table 0x14.0x3 = 0x578,0x4
0579 0257       | W  |		Execute	Discrete,Raise
057a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
057b 0000 0000  |    |		.BLANK	0000[0x5]
0580 ; --------------------------------------------------------------------------------------
0580 ; SUBPROGRAM
0580 ; --------------------------------------------------------------------------------------
0580 0588       |    |		.CONST	0x0588								; Address of begin
0581 0004       |    |		.CONST	0x0004								; Address of exception handler
0582 0002       |    |		.CONST	0x0002								; Number of locals
0583			INIT_0580:
0583 e001       |    |		Load	0x0,0x1								; Debug Table 0x15 = .DEBUG	0x0583,0x0a06,0x0001,0x0000,0x0059,0x8e95,0x0000,0x01ce
													; Debug Table 0x15.0x0 = 0x583,0xffff
0584 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0585 02c7       |    |		Declare_Variable	Any
0586 00d8       |    |		Load_Top	At_Offset_0
0587 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0588			BODY_0580:
0588 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x15.0x1 = 0x588,0x1
0589 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
058a e5fe       |    |		Load	0x2,-0x2
058b 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
058c 00da       |    |		Load_Top	At_Offset_2
058d 0120       |    |		Execute	Any,Is_Value
058e 6803       |h   |		Jump_Zero	0x592
058f e001       |    |		Load	0x0,0x1
0590 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0591 7801       |x   |		Jump	0x593
0592 00da       |    |		Load_Top	At_Offset_2
0593 e5ff       |    |		Load	0x2,-0x1
0594 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0595 e001       |    |		Load	0x0,0x1
0596 188a       |    |		Execute	Package,Field_Execute,Field_Number 0x8a
0597 c402       |    |		Store	0x2,0x2
0598 00d2       |    |		Pop_Control	Pop_Count_2
0599 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x15.0x2 = 0x599,0x2
059a e228       | (  |		Load	0x1,0x28
059b 012f       | /  |		Execute	Any,Equal
059c 6813       |h   |		Jump_Zero	0x5b0
059d e21f       |    |		Load	0x1,0x1f							; Debug Table 0x15.0x3 = 0x59d,0x3
059e e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x15.0x4 = 0x59e,0x401
059f 00d9       |    |		Load_Top	At_Offset_1
05a0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x15.0x5 = 0x5a0,0x801
05a1 0227       | '  |		Execute	Access,All_Reference
05a2 0335       | 5  |		Declare_Variable	Array,Duplicate
05a3 00d0       |    |		Action	Swap_Control
05a4 00d1       |    |		Pop_Control	Pop_Count_1
05a5 00d0       |    |		Action	Swap_Control
05a6 00d1       |    |		Pop_Control	Pop_Count_1
05a7 e005       |    |		Load	0x0,0x5								; Debug Table 0x15.0x6 = 0x5a7,0x401
05a8 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
05a9 00d1       |    |		Pop_Control	Pop_Count_1
05aa 4800       |H   |		Short_Literal	0x0							; Debug Table 0x15.0x7 = 0x5aa,0x402
05ab e5ff       |    |		Load	0x2,-0x1
05ac 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
05ad 00d1       |    |		Pop_Control	Pop_Count_1
05ae 662d       |f-  |		Indirect_Literal	Discrete,0x3dc,{0x00000000, 0x598e9501}		; Debug Table 0x15.0x8 = 0x5ae,0x4
05af 0257       | W  |		Execute	Discrete,Raise
05b0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x15.0x9 = 0x5b0,0x5
05b1 e5fe       |    |		Load	0x2,-0x2
05b2 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
05b3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x15.0xa = 0x5b3,0x6
05b4 e5fd       |    |		Load	0x2,-0x3
05b5 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
05b6 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
05b7 0000       |    |		.XXX[0x1]
05b8 ; --------------------------------------------------------------------------------------
05b8 ; SUBPROGRAM
05b8 ; --------------------------------------------------------------------------------------
05b8 05c5       |    |		.CONST	0x05c5								; Address of begin
05b9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ba 0003       |    |		.CONST	0x0003								; Number of locals
05bb			INIT_05b8:
05bb e001       |    |		Load	0x0,0x1								; Debug Table 0x16 = .DEBUG	0x05bb,0x0a1e,0x0001,0x0000,0x0059,0x8e95,0x0000,0x0218
													; Debug Table 0x16.0x0 = 0x5bb,0xffff
05bc 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
05bd 0322       | "  |		Declare_Variable	Record
05be 00d8       |    |		Load_Top	At_Offset_0
05bf 1c00       |    |		Execute_Immediate	Run_Utility,0x0
05c0 e001       |    |		Load	0x0,0x1
05c1 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
05c2 0322       | "  |		Declare_Variable	Record
05c3 00d8       |    |		Load_Top	At_Offset_0
05c4 1c00       |    |		Execute_Immediate	Run_Utility,0x0
05c5			BODY_05b8:
05c5 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x16.0x1 = 0x5c5,0x1
05c6 00da       |    |		Load_Top	At_Offset_2
05c7 e5ff       |    |		Load	0x2,-0x1
05c8 822c       | ,  |		Call	0x1,0x2c
05c9 00d3       |    |		Pop_Control	Pop_Count_3
05ca 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x16.0x2 = 0x5ca,0x2
05cb 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
05cc c5fe       |    |		Store	0x2,-0x2
05cd 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x16.0x3 = 0x5cd,0x3
05ce 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
05cf 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
05d0 a5fd       |    |		Store_Unchecked	0x2,-0x3
05d1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x16.0x4 = 0x5d1,0x4
05d2 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
05d3 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
05d4 0d02       |    |		Execute_Immediate	Less,0x2
05d5 6806       |h   |		Jump_Zero	0x5dc
05d6 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x16.0x5 = 0x5d6,0x5
05d7 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
05d8 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
05d9 0aff       |    |		Execute_Immediate	Plus,-0x1
05da c5fc       |    |		Store	0x2,-0x4
05db 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
05dc 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x16.0x6 = 0x5dc,0x6
05dd 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
05de 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
05df a5fc       |    |		Store_Unchecked	0x2,-0x4
05e0 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
05e1 0000 0000  |    |		.BLANK	0000[0x7]
05e8 ; --------------------------------------------------------------------------------------
05e8 ; SUBPROGRAM
05e8 ; --------------------------------------------------------------------------------------
05e8 05f0       |    |		.CONST	0x05f0								; Address of begin
05e9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ea 0002       |    |		.CONST	0x0002								; Number of locals
05eb			INIT_05e8:
05eb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x17 = .DEBUG	0x05eb,0x0a2e,0x0001,0x0000,0x0059,0x8e95,0x0000,0x0271
													; Debug Table 0x17.0x0 = 0x5eb,0xffff
05ec 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
05ed 02fd       |    |		Declare_Variable	Variant_Record,Duplicate
05ee 00d0       |    |		Action	Swap_Control
05ef 00d1       |    |		Pop_Control	Pop_Count_1
05f0			BODY_05e8:
05f0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0x1 = 0x5f0,0x1
05f1 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
05f2 6805       |h   |		Jump_Zero	0x5f8
05f3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0x2 = 0x5f3,0x2
05f4 2602       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
05f5 e5fe       |    |		Load	0x2,-0x2
05f6 017d       | }  |		Execute	Record,Structure_Write
05f7 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x17.0x3 = 0x5f7,0x3
05f8 e221       | !  |		Load	0x1,0x21							; Debug Table 0x17.0x4 = 0x5f8,0x4
05f9 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x17.0x5 = 0x5f9,0x401
05fa 00d9       |    |		Load_Top	At_Offset_1
05fb 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0x6 = 0x5fb,0x801
05fc 0227       | '  |		Execute	Access,All_Reference
05fd 0335       | 5  |		Declare_Variable	Array,Duplicate
05fe 00d0       |    |		Action	Swap_Control
05ff 00d1       |    |		Pop_Control	Pop_Count_1
0600 00d0       |    |		Action	Swap_Control
0601 00d1       |    |		Pop_Control	Pop_Count_1
0602 e005       |    |		Load	0x0,0x5								; Debug Table 0x17.0x7 = 0x602,0x401
0603 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0604 00d1       |    |		Pop_Control	Pop_Count_1
0605 4800       |H   |		Short_Literal	0x0							; Debug Table 0x17.0x8 = 0x605,0x402
0606 e5ff       |    |		Load	0x2,-0x1
0607 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
0608 00d1       |    |		Pop_Control	Pop_Count_1
0609 65d2       |e   |		Indirect_Literal	Discrete,0x3dc,{0x00000000, 0x598e9501}		; Debug Table 0x17.0x9 = 0x609,0x5
060a 0257       | W  |		Execute	Discrete,Raise
060b 0000 0000  |    |		.BLANK	0000[0x5]
0610 ; --------------------------------------------------------------------------------------
0610 ; SUBPROGRAM
0610 ; --------------------------------------------------------------------------------------
0610 0624       | $  |		.CONST	0x0624								; Address of begin
0611 0004       |    |		.CONST	0x0004								; Address of exception handler
0612 0005       |    |		.CONST	0x0005								; Number of locals
0613			INIT_0610:
0613 e001       |    |		Load	0x0,0x1								; Debug Table 0x18 = .DEBUG	0x0613,0x0a44,0x0001,0x0000,0x0059,0x8e95,0x0000,0x039a
													; Debug Table 0x18.0x0 = 0x613,0xffff
0614 1b69       | i  |		Execute	Package,Field_Read,Field_Number 0x69
0615 02c7       |    |		Declare_Variable	Any
0616 00d8       |    |		Load_Top	At_Offset_0
0617 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0618 e001       |    |		Load	0x0,0x1								; Debug Table 0x18.0x1 = 0x618,0xfffe
0619 1b67       | g  |		Execute	Package,Field_Read,Field_Number 0x67
061a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
061b 02c7       |    |		Declare_Variable	Any
061c 00d8       |    |		Load_Top	At_Offset_0
061d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
061e e001       |    |		Load	0x0,0x1								; Debug Table 0x18.0x2 = 0x61e,0xfffd
061f 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0620 0322       | "  |		Declare_Variable	Record
0621 00d8       |    |		Load_Top	At_Offset_0
0622 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0623 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x18.0x3 = 0x623,0xfffc
0624			BODY_0610:
0624 00be       |    |		Action	Activate_Tasks
0625 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x18.0x4 = 0x625,0x1
0626 e5ff       |    |		Load	0x2,-0x1
0627 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0628 e001       |    |		Load	0x0,0x1
0629 186a       | j  |		Execute	Package,Field_Execute,Field_Number 0x6a
062a c402       |    |		Store	0x2,0x2
062b 00cf       |    |		Action	Mark_Auxiliary
062c 785d       |x]  |		Jump	0x68a
062d e402       |    |		Load	0x2,0x2								; Debug Table 0x18.0x5 = 0x62d,0x3
062e e001       |    |		Load	0x0,0x1
062f 186d       | m  |		Execute	Package,Field_Execute,Field_Number 0x6d
0630 c403       |    |		Store	0x2,0x3
0631 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x18.0x6 = 0x631,0x4
0632 e001       |    |		Load	0x0,0x1
0633 1b67       | g  |		Execute	Package,Field_Read,Field_Number 0x67
0634 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0635 00db       |    |		Load_Top	At_Offset_3
0636 017d       | }  |		Execute	Record,Structure_Write
0637 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x18.0x7 = 0x637,0x5
0638 00db       |    |		Load_Top	At_Offset_3
0639 8224       | $  |		Call	0x1,0x24
063a 684a       |hJ  |		Jump_Zero	0x685
063b e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x18.0x8 = 0x63b,0x6
063c e5ff       |    |		Load	0x2,-0x1
063d e404       |    |		Load	0x2,0x4
063e e001       |    |		Load	0x0,0x1
063f 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0640 6807       |h   |		Jump_Zero	0x648
0641 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x18.0x9 = 0x641,0x7
0642 e5ff       |    |		Load	0x2,-0x1
0643 e001       |    |		Load	0x0,0x1
0644 1b67       | g  |		Execute	Package,Field_Read,Field_Number 0x67
0645 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0646 c403       |    |		Store	0x2,0x3
0647 7831       |x1  |		Jump	0x679
0648 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x18.0xa = 0x648,0x8
0649 e5fe       |    |		Load	0x2,-0x2
064a e001       |    |		Load	0x0,0x1
064b 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
064c e5ff       |    |		Load	0x2,-0x1
064d e001       |    |		Load	0x0,0x1
064e 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
064f 0272       | r  |		Execute	Discrete,Minus
0650 0248       | H  |		Execute	Discrete,Check_In_Integer
0651 e001       |    |		Load	0x0,0x1
0652 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0653 00d1       |    |		Pop_Control	Pop_Count_1
0654 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x18.0xb = 0x654,0x9
0655 e001       |    |		Load	0x0,0x1
0656 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0657 e5ff       |    |		Load	0x2,-0x1
0658 e001       |    |		Load	0x0,0x1
0659 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
065a 027f       |    |		Execute	Discrete,Equal
065b 6817       |h   |		Jump_Zero	0x673
065c 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x18.0xc = 0x65c,0xa
065d e001       |    |		Load	0x0,0x1
065e 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
065f e5fe       |    |		Load	0x2,-0x2
0660 e001       |    |		Load	0x0,0x1
0661 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0662 0272       | r  |		Execute	Discrete,Minus
0663 0248       | H  |		Execute	Discrete,Check_In_Integer
0664 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0665 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x18.0xd = 0x665,0xb
0666 e5ff       |    |		Load	0x2,-0x1
0667 e001       |    |		Load	0x0,0x1
0668 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0669 00e4       |    |		Load_Encached	Positive_Cache
066a 025b       | [  |		Execute	Discrete,Check_In_Type
066b e001       |    |		Load	0x0,0x1
066c 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
066d 00d1       |    |		Pop_Control	Pop_Count_1
066e 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x18.0xe = 0x66e,0xc
066f 00da       |    |		Load_Top	At_Offset_2
0670 e001       |    |		Load	0x0,0x1
0671 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0672 00d1       |    |		Pop_Control	Pop_Count_1
0673 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x18.0xf = 0x673,0xd
0674 00db       |    |		Load_Top	At_Offset_3
0675 e001       |    |		Load	0x0,0x1
0676 1b67       | g  |		Execute	Package,Field_Read,Field_Number 0x67
0677 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0678 c403       |    |		Store	0x2,0x3
0679 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x18.0x10 = 0x679,0xe
067a 4821       |H!  |		Short_Literal	0x21
067b 4821       |H!  |		Short_Literal	0x21
067c 4821       |H!  |		Short_Literal	0x21
067d 4821       |H!  |		Short_Literal	0x21
067e 4800       |H   |		Short_Literal	0x0
067f 4800       |H   |		Short_Literal	0x0
0680 e5ff       |    |		Load	0x2,-0x1
0681 e001       |    |		Load	0x0,0x1
0682 1b68       | h  |		Execute	Package,Field_Read,Field_Number 0x68
0683 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0684 c403       |    |		Store	0x2,0x3
0685 e402       |    |		Load	0x2,0x2								; Debug Table 0x18.0x11 = 0x685,0xf
0686 e001       |    |		Load	0x0,0x1
0687 186b       | k  |		Execute	Package,Field_Execute,Field_Number 0x6b
0688 c402       |    |		Store	0x2,0x2
0689 00c9       |    |		Action	Pop_Auxiliary_Loop
068a e402       |    |		Load	0x2,0x2								; Debug Table 0x18.0x12 = 0x68a,0x2
068b e001       |    |		Load	0x0,0x1
068c 186c       | l  |		Execute	Package,Field_Execute,Field_Number 0x6c
068d 6f9f       |o   |		Jump_Zero	0x62d
068e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
068f 0000       |    |		.XXX[0x1]
0690 0000 0000  |    |		.LITERAL	{0x00000000, 0x59898503}
0694 0000 0000  |    |		.BLANK	0000[0x4]
0698 ; --------------------------------------------------------------------------------------
0698 ; SUBPROGRAM
0698 ; --------------------------------------------------------------------------------------
0698 069b       |    |		.CONST	0x069b								; Address of begin
0699 0004       |    |		.CONST	0x0004								; Address of exception handler
069a 0001       |    |		.CONST	0x0001								; Number of locals
069b			BODY_0698:
069b			INIT_0698:
069b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x19 = .DEBUG	0x069b,0x0a6c,0x0001,0x0000,0x0059,0x8e95,0x0000,0x0883
													; Debug Table 0x19.0x0 = 0x69b,0x1
069c 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
069d 6808       |h   |		Jump_Zero	0x6a6
069e 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x19.0x1 = 0x69e,0x2
069f e408       |    |		Load	0x2,0x8
06a0 e001       |    |		Load	0x0,0x1
06a1 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
06a2 e5fd       |    |		Load	0x2,-0x3
06a3 e00c       |    |		Load	0x0,0xc
06a4 1863       | c  |		Execute	Package,Field_Execute,Field_Number 0x63
06a5 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
06a6 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x19.0x2 = 0x6a6,0x3
06a7 e5fd       |    |		Load	0x2,-0x3
06a8 e00c       |    |		Load	0x0,0xc
06a9 1863       | c  |		Execute	Package,Field_Execute,Field_Number 0x63
06aa 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
06ab ; --------------------------------------------------------------------------------------
06ab ; STRING TABLE
06ab ; --------------------------------------------------------------------------------------
06ab 000e       |    |		.STRTAB	0x000e->0x06b2							; "No Selection Started."
06ac 0021       | !  |		.STRTAB	0x0021->0x06bc							; "No Current Selection."
06ad 0034       | 4  |		.STRTAB	0x0034->0x06c7							; "Locked image can not be selected."
06ae 0053       | S  |		.STRTAB	0x0053->0x06d7							; "The cursor is not in a window."
06af 006f       | o  |		.STRTAB	0x006f->0x06e6							; "Cannot delete protected text."
06b0 008a       |    |		.STRTAB	0x008a->0x06f5							; "-- "
06b1 008b       |    |		.STREND 0x008b->0x06f6
06b2 4e6f 2053  |No S|		.STRTAB_STRINGS
06f7 0000       |    |		.XXX[0x1]
06f8 ; --------------------------------------------------------------------------------------
06f8 ; Debug Table
06f8 ; --------------------------------------------------------------------------------------
06f8 0003 001a  |    |		.CONST	0x0003,0x001a
06fa 000b 07ca  |    |		.DEBUG	0x000b,0x07ca,0x8000,0x0000,0x0059,0x8975,0x0000,0x000b
0702 003c 07f4  | <  |		.DEBUG	0x003c,0x07f4,0x8000,0x0000,0x0059,0x8e95,0x0000,0x001d
070a 00c3 0852  |   R|		.DEBUG	0x00c3,0x0852,0x0001,0x0000,0x0059,0x8975,0x0000,0x0014
0712 00d3 0858  |   X|		.DEBUG	0x00d3,0x0858,0x0001,0x0000,0x0059,0x8975,0x0000,0x0022
071a 00db 085c  |   \|		.DEBUG	0x00db,0x085c,0x0001,0x0000,0x0059,0x8975,0x0000,0x002a
0722 00eb 0862  |   b|		.DEBUG	0x00eb,0x0862,0x0001,0x0000,0x0059,0x8975,0x0000,0x0038
072a 00f3 0866  |   f|		.DEBUG	0x00f3,0x0866,0x0001,0x0000,0x0059,0x8975,0x0000,0x0050
0732 010b 086e  |   n|		.DEBUG	0x010b,0x086e,0x0001,0x0000,0x0059,0x8975,0x0000,0x005e
073a 01bb 08bc  |    |		.DEBUG	0x01bb,0x08bc,0x0001,0x0000,0x0059,0x8975,0x0000,0x006c
0742 01cb 08c2  |    |		.DEBUG	0x01cb,0x08c2,0x0001,0x0000,0x0059,0x8975,0x0000,0x0080
074a 0273 0900  | s  |		.DEBUG	0x0273,0x0900,0x0001,0x0000,0x0059,0x8975,0x0000,0x008e
0752 02b3 0916  |    |		.DEBUG	0x02b3,0x0916,0x0001,0x0000,0x0059,0x8975,0x0000,0x009c
075a 030b 093a  |   :|		.DEBUG	0x030b,0x093a,0x0001,0x0000,0x0059,0x8975,0x0000,0x00aa
0762 0363 0958  | c X|		.DEBUG	0x0363,0x0958,0x0001,0x0000,0x0059,0x8975,0x0000,0x00b8
076a 03e3 098c  |    |		.DEBUG	0x03e3,0x098c,0x0001,0x0000,0x0059,0x8975,0x0000,0x00c6
0772 0493 09be  |    |		.DEBUG	0x0493,0x09be,0x0001,0x0000,0x0059,0x8975,0x0000,0x00da
077a 04ab 09c2  |    |		.DEBUG	0x04ab,0x09c2,0x0001,0x0000,0x0059,0x8975,0x0000,0x00f3
0782 04eb 09dc  |    |		.DEBUG	0x04eb,0x09dc,0x0002,0x0000,0x0059,0x8975,0x0000,0x0106
078a 052b 09f0  | +  |		.DEBUG	0x052b,0x09f0,0x0005,0x0000,0x0059,0x8975,0x0000,0x0116
0792 054b 09f2  | K  |		.DEBUG	0x054b,0x09f2,0x0001,0x0000,0x0059,0x8e95,0x0000,0x0104
079a 056b 09fc  | k  |		.DEBUG	0x056b,0x09fc,0x0001,0x0000,0x0059,0x8e95,0x0000,0x013c
07a2 0583 0a06  |    |		.DEBUG	0x0583,0x0a06,0x0001,0x0000,0x0059,0x8e95,0x0000,0x01ce
07aa 05bb 0a1e  |    |		.DEBUG	0x05bb,0x0a1e,0x0001,0x0000,0x0059,0x8e95,0x0000,0x0218
07b2 05eb 0a2e  |   .|		.DEBUG	0x05eb,0x0a2e,0x0001,0x0000,0x0059,0x8e95,0x0000,0x0271
07ba 0613 0a44  |   D|		.DEBUG	0x0613,0x0a44,0x0001,0x0000,0x0059,0x8e95,0x0000,0x039a
07c2 069b 0a6c  |   l|		.DEBUG	0x069b,0x0a6c,0x0001,0x0000,0x0059,0x8e95,0x0000,0x0883
07ca ; --------------------------------------------------------------------------------------
07ca ; Debug3 Subtable 0x0
07ca ; --------------------------------------------------------------------------------------
07ca 0014 0000  |    |		.DBG3TAB	0x0014,0x0000
07cc 000b ffff  |    |		.CONST	0x000b,0xffff
07ce 0011 fffe  |    |		.CONST	0x0011,0xfffe
07d0 0013 fffd  |    |		.CONST	0x0013,0xfffd
07d2 0015 fffc  |    |		.CONST	0x0015,0xfffc
07d4 0017 fffb  |    |		.CONST	0x0017,0xfffb
07d6 0019 fffa  |    |		.CONST	0x0019,0xfffa
07d8 0019 fff9  |    |		.CONST	0x0019,0xfff9
07da 001b fff8  |    |		.CONST	0x001b,0xfff8
07dc 001d fff7  |    |		.CONST	0x001d,0xfff7
07de 001f fff6  |    |		.CONST	0x001f,0xfff6
07e0 0021 fff5  | !  |		.CONST	0x0021,0xfff5
07e2 0023 fff4  | #  |		.CONST	0x0023,0xfff4
07e4 0025 fff3  | %  |		.CONST	0x0025,0xfff3
07e6 0027 fff2  | '  |		.CONST	0x0027,0xfff2
07e8 0029 fff1  | )  |		.CONST	0x0029,0xfff1
07ea 002b fff0  | +  |		.CONST	0x002b,0xfff0
07ec 002d ffef  | -  |		.CONST	0x002d,0xffef
07ee 002d ffee  | -  |		.CONST	0x002d,0xffee
07f0 002f ffed  | /  |		.CONST	0x002f,0xffed
07f2 0031 ffec  | 1  |		.CONST	0x0031,0xffec
07f4 ; --------------------------------------------------------------------------------------
07f4 ; Debug3 Subtable 0x1
07f4 ; --------------------------------------------------------------------------------------
07f4 0029 0005  | )  |		.DBG3TAB	0x0029,0x0005
07f6 003c ffff  | <  |		.CONST	0x003c,0xffff
07f8 0041 0401  | A  |		.CONST	0x0041,0x0401
07fa 0047 ffff  | G  |		.CONST	0x0047,0xffff
07fc 0048 fffe  | H  |		.CONST	0x0048,0xfffe
07fe 004d 0801  | M  |		.CONST	0x004d,0x0801
0800 0053 fffe  | S  |		.CONST	0x0053,0xfffe
0802 0054 fffd  | T  |		.CONST	0x0054,0xfffd
0804 0059 0c01  | Y  |		.CONST	0x0059,0x0c01
0806 005f fffd  | _  |		.CONST	0x005f,0xfffd
0808 0060 fffc  | `  |		.CONST	0x0060,0xfffc
080a 0065 1001  | e  |		.CONST	0x0065,0x1001
080c 006b fffc  | k  |		.CONST	0x006b,0xfffc
080e 006c fffb  | l  |		.CONST	0x006c,0xfffb
0810 0071 1401  | q  |		.CONST	0x0071,0x1401
0812 0077 fffb  | w  |		.CONST	0x0077,0xfffb
0814 0078 fffa  | x  |		.CONST	0x0078,0xfffa
0816 0078 fff9  | x  |		.CONST	0x0078,0xfff9
0818 0078 fff8  | x  |		.CONST	0x0078,0xfff8
081a 007b fff7  | {  |		.CONST	0x007b,0xfff7
081c 007e fff6  | ~  |		.CONST	0x007e,0xfff6
081e 0081 fff5  |    |		.CONST	0x0081,0xfff5
0820 0084 fff4  |    |		.CONST	0x0084,0xfff4
0822 0087 fff3  |    |		.CONST	0x0087,0xfff3
0824 008d fff2  |    |		.CONST	0x008d,0xfff2
0826 0090 fff1  |    |		.CONST	0x0090,0xfff1
0828 0092 fff0  |    |		.CONST	0x0092,0xfff0
082a 0094 ffef  |    |		.CONST	0x0094,0xffef
082c 0096 ffee  |    |		.CONST	0x0096,0xffee
082e 0098 ffed  |    |		.CONST	0x0098,0xffed
0830 009a ffec  |    |		.CONST	0x009a,0xffec
0832 009c ffeb  |    |		.CONST	0x009c,0xffeb
0834 009e ffea  |    |		.CONST	0x009e,0xffea
0836 00a0 ffe9  |    |		.CONST	0x00a0,0xffe9
0838 00a2 ffe8  |    |		.CONST	0x00a2,0xffe8
083a 00a4 ffe7  |    |		.CONST	0x00a4,0xffe7
083c 00a6 ffe6  |    |		.CONST	0x00a6,0xffe6
083e 00a8 ffe5  |    |		.CONST	0x00a8,0xffe5
0840 00aa ffe4  |    |		.CONST	0x00aa,0xffe4
0842 00ac ffe3  |    |		.CONST	0x00ac,0xffe3
0844 00ae ffe2  |    |		.CONST	0x00ae,0xffe2
0846 00b0 ffe1  |    |		.CONST	0x00b0,0xffe1
0848 00b2 ffe0  |    |		.CONST	0x00b2,0xffe0
084a 00b4 ffdf  |    |		.CONST	0x00b4,0xffdf
084c 00b6 ffde  |    |		.CONST	0x00b6,0xffde
084e 00b8 ffdd  |    |		.CONST	0x00b8,0xffdd
0850 00ba ffdc  |    |		.CONST	0x00ba,0xffdc
0852 ; --------------------------------------------------------------------------------------
0852 ; Debug3 Subtable 0x2
0852 ; --------------------------------------------------------------------------------------
0852 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0854 00c3 0001  |    |		.CONST	0x00c3,0x0001
0856 00c6 0002  |    |		.CONST	0x00c6,0x0002
0858 ; --------------------------------------------------------------------------------------
0858 ; Debug3 Subtable 0x3
0858 ; --------------------------------------------------------------------------------------
0858 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
085a 00d3 0001  |    |		.CONST	0x00d3,0x0001
085c ; --------------------------------------------------------------------------------------
085c ; Debug3 Subtable 0x4
085c ; --------------------------------------------------------------------------------------
085c 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
085e 00db 0001  |    |		.CONST	0x00db,0x0001
0860 00df 0002  |    |		.CONST	0x00df,0x0002
0862 ; --------------------------------------------------------------------------------------
0862 ; Debug3 Subtable 0x5
0862 ; --------------------------------------------------------------------------------------
0862 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0864 00eb 0001  |    |		.CONST	0x00eb,0x0001
0866 ; --------------------------------------------------------------------------------------
0866 ; Debug3 Subtable 0x6
0866 ; --------------------------------------------------------------------------------------
0866 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0868 00f3 0001  |    |		.CONST	0x00f3,0x0001
086a 00f8 0002  |    |		.CONST	0x00f8,0x0002
086c 0100 0003  |    |		.CONST	0x0100,0x0003
086e ; --------------------------------------------------------------------------------------
086e ; Debug3 Subtable 0x7
086e ; --------------------------------------------------------------------------------------
086e 0003 0023  |   #|		.DBG3TAB	0x0003,0x0023
0870 010b ffff  |    |		.CONST	0x010b,0xffff
0872 0110 fffe  |    |		.CONST	0x0110,0xfffe
0874 0116 fffd  |    |		.CONST	0x0116,0xfffd
0876 0120 0001  |    |		.CONST	0x0120,0x0001
0878 0124 0002  | $  |		.CONST	0x0124,0x0002
087a 0133 0003  | 3  |		.CONST	0x0133,0x0003
087c 0137 0004  | 7  |		.CONST	0x0137,0x0004
087e 013c 0005  | <  |		.CONST	0x013c,0x0005
0880 013f 0006  | ?  |		.CONST	0x013f,0x0006
0882 0144 0007  | D  |		.CONST	0x0144,0x0007
0884 0148 0008  | H  |		.CONST	0x0148,0x0008
0886 014c 0009  | L  |		.CONST	0x014c,0x0009
0888 014d 0401  | M  |		.CONST	0x014d,0x0401
088a 014f 0801  | O  |		.CONST	0x014f,0x0801
088c 0156 0401  | V  |		.CONST	0x0156,0x0401
088e 0159 0402  | Y  |		.CONST	0x0159,0x0402
0890 015d 000a  | ]  |		.CONST	0x015d,0x000a
0892 015e 000b  | ^  |		.CONST	0x015e,0x000b
0894 0165 000c  | e  |		.CONST	0x0165,0x000c
0896 016a 000d  | j  |		.CONST	0x016a,0x000d
0898 016b 0c01  | k  |		.CONST	0x016b,0x0c01
089a 016d 1001  | m  |		.CONST	0x016d,0x1001
089c 0174 0c01  | t  |		.CONST	0x0174,0x0c01
089e 0177 0c02  | w  |		.CONST	0x0177,0x0c02
08a0 017b 000e  | {  |		.CONST	0x017b,0x000e
08a2 017c 000f  | |  |		.CONST	0x017c,0x000f
08a4 017f 0010  |    |		.CONST	0x017f,0x0010
08a6 0182 0011  |    |		.CONST	0x0182,0x0011
08a8 0186 0012  |    |		.CONST	0x0186,0x0012
08aa 018c 0013  |    |		.CONST	0x018c,0x0013
08ac 0191 0014  |    |		.CONST	0x0191,0x0014
08ae 0198 0015  |    |		.CONST	0x0198,0x0015
08b0 019d 0016  |    |		.CONST	0x019d,0x0016
08b2 01a0 0017  |    |		.CONST	0x01a0,0x0017
08b4 01a1 1401  |    |		.CONST	0x01a1,0x1401
08b6 01a3 1801  |    |		.CONST	0x01a3,0x1801
08b8 01aa 1401  |    |		.CONST	0x01aa,0x1401
08ba 01ad 1402  |    |		.CONST	0x01ad,0x1402
08bc ; --------------------------------------------------------------------------------------
08bc ; Debug3 Subtable 0x8
08bc ; --------------------------------------------------------------------------------------
08bc 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
08be 01bb 0001  |    |		.CONST	0x01bb,0x0001
08c0 01be 0002  |    |		.CONST	0x01be,0x0002
08c2 ; --------------------------------------------------------------------------------------
08c2 ; Debug3 Subtable 0x9
08c2 ; --------------------------------------------------------------------------------------
08c2 0004 001a  |    |		.DBG3TAB	0x0004,0x001a
08c4 01cb ffff  |    |		.CONST	0x01cb,0xffff
08c6 01d0 fffe  |    |		.CONST	0x01d0,0xfffe
08c8 01d5 fffd  |    |		.CONST	0x01d5,0xfffd
08ca 01da fffc  |    |		.CONST	0x01da,0xfffc
08cc 01db 0001  |    |		.CONST	0x01db,0x0001
08ce 01e0 0002  |    |		.CONST	0x01e0,0x0002
08d0 01e4 0003  |    |		.CONST	0x01e4,0x0003
08d2 01ea 0004  |    |		.CONST	0x01ea,0x0004
08d4 01eb 0005  |    |		.CONST	0x01eb,0x0005
08d6 01ef 0006  |    |		.CONST	0x01ef,0x0006
08d8 01fb 0007  |    |		.CONST	0x01fb,0x0007
08da 0203 0008  |    |		.CONST	0x0203,0x0008
08dc 020c 0009  |    |		.CONST	0x020c,0x0009
08de 0215 000a  |    |		.CONST	0x0215,0x000a
08e0 021a 000b  |    |		.CONST	0x021a,0x000b
08e2 021c 000c  |    |		.CONST	0x021c,0x000c
08e4 021e 000d  |    |		.CONST	0x021e,0x000d
08e6 0225 000e  | %  |		.CONST	0x0225,0x000e
08e8 022a 000f  | *  |		.CONST	0x022a,0x000f
08ea 022e 0010  | .  |		.CONST	0x022e,0x0010
08ec 023c 0011  | <  |		.CONST	0x023c,0x0011
08ee 0244 0012  | D  |		.CONST	0x0244,0x0012
08f0 0249 0013  | I  |		.CONST	0x0249,0x0013
08f2 0250 0014  | P  |		.CONST	0x0250,0x0014
08f4 0254 0015  | T  |		.CONST	0x0254,0x0015
08f6 025a 0016  | Z  |		.CONST	0x025a,0x0016
08f8 025b 0401  | [  |		.CONST	0x025b,0x0401
08fa 025d 0801  | ]  |		.CONST	0x025d,0x0801
08fc 0264 0401  | d  |		.CONST	0x0264,0x0401
08fe 0267 0402  | g  |		.CONST	0x0267,0x0402
0900 ; --------------------------------------------------------------------------------------
0900 ; Debug3 Subtable 0xa
0900 ; --------------------------------------------------------------------------------------
0900 0003 0007  |    |		.DBG3TAB	0x0003,0x0007
0902 0273 ffff  | s  |		.CONST	0x0273,0xffff
0904 0278 fffe  | x  |		.CONST	0x0278,0xfffe
0906 027d fffd  | }  |		.CONST	0x027d,0xfffd
0908 0282 0001  |    |		.CONST	0x0282,0x0001
090a 0287 0002  |    |		.CONST	0x0287,0x0002
090c 028b 0003  |    |		.CONST	0x028b,0x0003
090e 0292 0004  |    |		.CONST	0x0292,0x0004
0910 0299 0005  |    |		.CONST	0x0299,0x0005
0912 029f 0006  |    |		.CONST	0x029f,0x0006
0914 02a7 0007  |    |		.CONST	0x02a7,0x0007
0916 ; --------------------------------------------------------------------------------------
0916 ; Debug3 Subtable 0xb
0916 ; --------------------------------------------------------------------------------------
0916 0003 000e  |    |		.DBG3TAB	0x0003,0x000e
0918 02b3 ffff  |    |		.CONST	0x02b3,0xffff
091a 02b8 fffe  |    |		.CONST	0x02b8,0xfffe
091c 02bd fffd  |    |		.CONST	0x02bd,0xfffd
091e 02bf 0001  |    |		.CONST	0x02bf,0x0001
0920 02c4 0002  |    |		.CONST	0x02c4,0x0002
0922 02cb 0003  |    |		.CONST	0x02cb,0x0003
0924 02cf 0004  |    |		.CONST	0x02cf,0x0004
0926 02d4 0005  |    |		.CONST	0x02d4,0x0005
0928 02dd 0006  |    |		.CONST	0x02dd,0x0006
092a 02e0 0007  |    |		.CONST	0x02e0,0x0007
092c 02e7 0008  |    |		.CONST	0x02e7,0x0008
092e 02eb 0009  |    |		.CONST	0x02eb,0x0009
0930 02f1 000a  |    |		.CONST	0x02f1,0x000a
0932 02f2 0401  |    |		.CONST	0x02f2,0x0401
0934 02f4 0801  |    |		.CONST	0x02f4,0x0801
0936 02fb 0401  |    |		.CONST	0x02fb,0x0401
0938 02fe 0402  |    |		.CONST	0x02fe,0x0402
093a ; --------------------------------------------------------------------------------------
093a ; Debug3 Subtable 0xc
093a ; --------------------------------------------------------------------------------------
093a 0005 0009  |    |		.DBG3TAB	0x0005,0x0009
093c 030b ffff  |    |		.CONST	0x030b,0xffff
093e 030c fffe  |    |		.CONST	0x030c,0xfffe
0940 030d fffd  |    |		.CONST	0x030d,0xfffd
0942 0312 fffc  |    |		.CONST	0x0312,0xfffc
0944 0315 0001  |    |		.CONST	0x0315,0x0001
0946 0325 0002  | %  |		.CONST	0x0325,0x0002
0948 0329 0003  | )  |		.CONST	0x0329,0x0003
094a 0333 0004  | 3  |		.CONST	0x0333,0x0004
094c 0337 0005  | 7  |		.CONST	0x0337,0x0005
094e 033a 0006  | :  |		.CONST	0x033a,0x0006
0950 033e 0007  | >  |		.CONST	0x033e,0x0007
0952 033f fbff  | ?  |		.CONST	0x033f,0xfbff
0954 0350 0401  | P  |		.CONST	0x0350,0x0401
0956 035d 0008  | ]  |		.CONST	0x035d,0x0008
0958 ; --------------------------------------------------------------------------------------
0958 ; Debug3 Subtable 0xd
0958 ; --------------------------------------------------------------------------------------
0958 0009 0010  |    |		.DBG3TAB	0x0009,0x0010
095a 0363 ffff  | c  |		.CONST	0x0363,0xffff
095c 0364 fffe  | d  |		.CONST	0x0364,0xfffe
095e 0365 fffd  | e  |		.CONST	0x0365,0xfffd
0960 036a fffc  | j  |		.CONST	0x036a,0xfffc
0962 036f fffb  | o  |		.CONST	0x036f,0xfffb
0964 0370 fffa  | p  |		.CONST	0x0370,0xfffa
0966 0371 fff9  | q  |		.CONST	0x0371,0xfff9
0968 0372 fff8  | r  |		.CONST	0x0372,0xfff8
096a 0373 0001  | s  |		.CONST	0x0373,0x0001
096c 0382 0002  |    |		.CONST	0x0382,0x0002
096e 0386 0003  |    |		.CONST	0x0386,0x0003
0970 038a 0004  |    |		.CONST	0x038a,0x0004
0972 038e 0005  |    |		.CONST	0x038e,0x0005
0974 0392 0006  |    |		.CONST	0x0392,0x0006
0976 0393 fbff  |    |		.CONST	0x0393,0xfbff
0978 0399 0401  |    |		.CONST	0x0399,0x0401
097a 03a2 0402  |    |		.CONST	0x03a2,0x0402
097c 03a4 0403  |    |		.CONST	0x03a4,0x0403
097e 03a8 0404  |    |		.CONST	0x03a8,0x0404
0980 03ad 0405  |    |		.CONST	0x03ad,0x0405
0982 03b3 0406  |    |		.CONST	0x03b3,0x0406
0984 03b7 0407  |    |		.CONST	0x03b7,0x0407
0986 03bf 0408  |    |		.CONST	0x03bf,0x0408
0988 03c4 0409  |    |		.CONST	0x03c4,0x0409
098a 03d1 0007  |    |		.CONST	0x03d1,0x0007
098c ; --------------------------------------------------------------------------------------
098c ; Debug3 Subtable 0xe
098c ; --------------------------------------------------------------------------------------
098c 0007 0011  |    |		.DBG3TAB	0x0007,0x0011
098e 03e3 ffff  |    |		.CONST	0x03e3,0xffff
0990 03eb fffe  |    |		.CONST	0x03eb,0xfffe
0992 03f0 fffd  |    |		.CONST	0x03f0,0xfffd
0994 03f6 fffc  |    |		.CONST	0x03f6,0xfffc
0996 03fb fffb  |    |		.CONST	0x03fb,0xfffb
0998 03fd fffa  |    |		.CONST	0x03fd,0xfffa
099a 0402 fff9  |    |		.CONST	0x0402,0xfff9
099c 0404 0001  |    |		.CONST	0x0404,0x0001
099e 0408 0002  |    |		.CONST	0x0408,0x0002
09a0 040c 0003  |    |		.CONST	0x040c,0x0003
09a2 041b 0004  |    |		.CONST	0x041b,0x0004
09a4 0429 0005  | )  |		.CONST	0x0429,0x0005
09a6 042c 0006  | ,  |		.CONST	0x042c,0x0006
09a8 0432 0007  | 2  |		.CONST	0x0432,0x0007
09aa 043c 0008  | <  |		.CONST	0x043c,0x0008
09ac 0444 0009  | D  |		.CONST	0x0444,0x0009
09ae 044e 000a  | N  |		.CONST	0x044e,0x000a
09b0 045f 000b  | _  |		.CONST	0x045f,0x000b
09b2 0463 000c  | c  |		.CONST	0x0463,0x000c
09b4 046a 000d  | j  |		.CONST	0x046a,0x000d
09b6 0476 000e  | v  |		.CONST	0x0476,0x000e
09b8 047c 000f  | |  |		.CONST	0x047c,0x000f
09ba 0480 0010  |    |		.CONST	0x0480,0x0010
09bc 048c 0011  |    |		.CONST	0x048c,0x0011
09be ; --------------------------------------------------------------------------------------
09be ; Debug3 Subtable 0xf
09be ; --------------------------------------------------------------------------------------
09be 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
09c0 0493 0001  |    |		.CONST	0x0493,0x0001
09c2 ; --------------------------------------------------------------------------------------
09c2 ; Debug3 Subtable 0x10
09c2 ; --------------------------------------------------------------------------------------
09c2 0002 000a  |    |		.DBG3TAB	0x0002,0x000a
09c4 04ab ffff  |    |		.CONST	0x04ab,0xffff
09c6 04b0 fffe  |    |		.CONST	0x04b0,0xfffe
09c8 04b6 0001  |    |		.CONST	0x04b6,0x0001
09ca 04c5 0002  |    |		.CONST	0x04c5,0x0002
09cc 04c9 0003  |    |		.CONST	0x04c9,0x0003
09ce 04cb 0004  |    |		.CONST	0x04cb,0x0004
09d0 04ce 0005  |    |		.CONST	0x04ce,0x0005
09d2 04d2 0006  |    |		.CONST	0x04d2,0x0006
09d4 04d4 0007  |    |		.CONST	0x04d4,0x0007
09d6 04d7 0008  |    |		.CONST	0x04d7,0x0008
09d8 04da 0009  |    |		.CONST	0x04da,0x0009
09da 04dd 000a  |    |		.CONST	0x04dd,0x000a
09dc ; --------------------------------------------------------------------------------------
09dc ; Debug3 Subtable 0x11
09dc ; --------------------------------------------------------------------------------------
09dc 0004 0005  |    |		.DBG3TAB	0x0004,0x0005
09de 04eb ffff  |    |		.CONST	0x04eb,0xffff
09e0 04f0 0001  |    |		.CONST	0x04f0,0x0001
09e2 04f3 0002  |    |		.CONST	0x04f3,0x0002
09e4 04f5 0003  |    |		.CONST	0x04f5,0x0003
09e6 04f6 fbff  |    |		.CONST	0x04f6,0xfbff
09e8 04fd fbfe  |    |		.CONST	0x04fd,0xfbfe
09ea 0502 fbfd  |    |		.CONST	0x0502,0xfbfd
09ec 0508 0401  |    |		.CONST	0x0508,0x0401
09ee 0517 0402  |    |		.CONST	0x0517,0x0402
09f0 ; --------------------------------------------------------------------------------------
09f0 ; Debug3 Subtable 0x12
09f0 ; --------------------------------------------------------------------------------------
09f0 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
09f2 ; --------------------------------------------------------------------------------------
09f2 ; Debug3 Subtable 0x13
09f2 ; --------------------------------------------------------------------------------------
09f2 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
09f4 054b 0001  | K  |		.CONST	0x054b,0x0001
09f6 054f 0002  | O  |		.CONST	0x054f,0x0002
09f8 0557 0003  | W  |		.CONST	0x0557,0x0003
09fa 055b 0004  | [  |		.CONST	0x055b,0x0004
09fc ; --------------------------------------------------------------------------------------
09fc ; Debug3 Subtable 0x14
09fc ; --------------------------------------------------------------------------------------
09fc 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
09fe 056b 0001  | k  |		.CONST	0x056b,0x0001
0a00 0572 0002  | r  |		.CONST	0x0572,0x0002
0a02 0574 0003  | t  |		.CONST	0x0574,0x0003
0a04 0578 0004  | x  |		.CONST	0x0578,0x0004
0a06 ; --------------------------------------------------------------------------------------
0a06 ; Debug3 Subtable 0x15
0a06 ; --------------------------------------------------------------------------------------
0a06 0001 000a  |    |		.DBG3TAB	0x0001,0x000a
0a08 0583 ffff  |    |		.CONST	0x0583,0xffff
0a0a 0588 0001  |    |		.CONST	0x0588,0x0001
0a0c 0599 0002  |    |		.CONST	0x0599,0x0002
0a0e 059d 0003  |    |		.CONST	0x059d,0x0003
0a10 059e 0401  |    |		.CONST	0x059e,0x0401
0a12 05a0 0801  |    |		.CONST	0x05a0,0x0801
0a14 05a7 0401  |    |		.CONST	0x05a7,0x0401
0a16 05aa 0402  |    |		.CONST	0x05aa,0x0402
0a18 05ae 0004  |    |		.CONST	0x05ae,0x0004
0a1a 05b0 0005  |    |		.CONST	0x05b0,0x0005
0a1c 05b3 0006  |    |		.CONST	0x05b3,0x0006
0a1e ; --------------------------------------------------------------------------------------
0a1e ; Debug3 Subtable 0x16
0a1e ; --------------------------------------------------------------------------------------
0a1e 0001 0006  |    |		.DBG3TAB	0x0001,0x0006
0a20 05bb ffff  |    |		.CONST	0x05bb,0xffff
0a22 05c5 0001  |    |		.CONST	0x05c5,0x0001
0a24 05ca 0002  |    |		.CONST	0x05ca,0x0002
0a26 05cd 0003  |    |		.CONST	0x05cd,0x0003
0a28 05d1 0004  |    |		.CONST	0x05d1,0x0004
0a2a 05d6 0005  |    |		.CONST	0x05d6,0x0005
0a2c 05dc 0006  |    |		.CONST	0x05dc,0x0006
0a2e ; --------------------------------------------------------------------------------------
0a2e ; Debug3 Subtable 0x17
0a2e ; --------------------------------------------------------------------------------------
0a2e 0001 0009  |    |		.DBG3TAB	0x0001,0x0009
0a30 05eb ffff  |    |		.CONST	0x05eb,0xffff
0a32 05f0 0001  |    |		.CONST	0x05f0,0x0001
0a34 05f3 0002  |    |		.CONST	0x05f3,0x0002
0a36 05f7 0003  |    |		.CONST	0x05f7,0x0003
0a38 05f8 0004  |    |		.CONST	0x05f8,0x0004
0a3a 05f9 0401  |    |		.CONST	0x05f9,0x0401
0a3c 05fb 0801  |    |		.CONST	0x05fb,0x0801
0a3e 0602 0401  |    |		.CONST	0x0602,0x0401
0a40 0605 0402  |    |		.CONST	0x0605,0x0402
0a42 0609 0005  |    |		.CONST	0x0609,0x0005
0a44 ; --------------------------------------------------------------------------------------
0a44 ; Debug3 Subtable 0x18
0a44 ; --------------------------------------------------------------------------------------
0a44 0004 000f  |    |		.DBG3TAB	0x0004,0x000f
0a46 0613 ffff  |    |		.CONST	0x0613,0xffff
0a48 0618 fffe  |    |		.CONST	0x0618,0xfffe
0a4a 061e fffd  |    |		.CONST	0x061e,0xfffd
0a4c 0623 fffc  | #  |		.CONST	0x0623,0xfffc
0a4e 0625 0001  | %  |		.CONST	0x0625,0x0001
0a50 062d 0003  | -  |		.CONST	0x062d,0x0003
0a52 0631 0004  | 1  |		.CONST	0x0631,0x0004
0a54 0637 0005  | 7  |		.CONST	0x0637,0x0005
0a56 063b 0006  | ;  |		.CONST	0x063b,0x0006
0a58 0641 0007  | A  |		.CONST	0x0641,0x0007
0a5a 0648 0008  | H  |		.CONST	0x0648,0x0008
0a5c 0654 0009  | T  |		.CONST	0x0654,0x0009
0a5e 065c 000a  | \  |		.CONST	0x065c,0x000a
0a60 0665 000b  | e  |		.CONST	0x0665,0x000b
0a62 066e 000c  | n  |		.CONST	0x066e,0x000c
0a64 0673 000d  | s  |		.CONST	0x0673,0x000d
0a66 0679 000e  | y  |		.CONST	0x0679,0x000e
0a68 0685 000f  |    |		.CONST	0x0685,0x000f
0a6a 068a 0002  |    |		.CONST	0x068a,0x0002
0a6c ; --------------------------------------------------------------------------------------
0a6c ; Debug3 Subtable 0x19
0a6c ; --------------------------------------------------------------------------------------
0a6c 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0a6e 069b 0001  |    |		.CONST	0x069b,0x0001
0a70 069e 0002  |    |		.CONST	0x069e,0x0002
0a72 06a6 0003  |    |		.CONST	0x06a6,0x0003
0a74 0000 0000  |    |		.BLANK	0000[0x18c]