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

⟦d9f606f32⟧

    Length: 5120 (0x1400)
    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 05b0       |    |		.CONST	0x05b0								; 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 0004       |    |		.CONST	0x0004								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0050       | P  |		.CONST	0x0050								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 001e       |    |		.CONST	0x001e								; Number of locals
000b			INIT_0008:
000b 029a 006b  |   k|		Declare_Subprogram	INIT_0068,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0 = .DEBUG	0x000b,0x0652,0x8000,0x0000,0x0059,0x8c05,0x0000,0x0008
													; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 009b  |    |		Declare_Subprogram	INIT_0098,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 029a 00b3  |    |		Declare_Subprogram	INIT_00b0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 029a 00cb  |    |		Declare_Subprogram	INIT_00c8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0x11,0xfffc
0013 029a 0103  |    |		Declare_Subprogram	INIT_0100,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x13,0xfffb
0015 029a 013b  |   ;|		Declare_Subprogram	INIT_0138,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x15,0xfffa
0017 029a 0173  |   s|		Declare_Subprogram	INIT_0170,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x17,0xfff9
0019 029a 01ab  |    |		Declare_Subprogram	INIT_01a8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x19,0xfff8
001b 029a 021b  |    |		Declare_Subprogram	INIT_0218,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x1b,0xfff7
001d 029a 028b  |    |		Declare_Subprogram	INIT_0288,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x1d,0xfff6
001f 029a 02d3  |    |		Declare_Subprogram	INIT_02d0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x1f,0xfff5
0021 029a 031b  |    |		Declare_Subprogram	INIT_0318,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x21,0xfff4
0023 029a 038b  |    |		Declare_Subprogram	INIT_0388,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xc = 0x23,0xfff3
0025 029a 03fb  |    |		Declare_Subprogram	INIT_03f8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xd = 0x25,0xfff2
0027 029a 044b  |   K|		Declare_Subprogram	INIT_0448,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xe = 0x27,0xfff1
0029 029a 047b  |   {|		Declare_Subprogram	INIT_0478,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xf = 0x29,0xfff0
002b 00bf       |    |		Action	Accept_Activation
002c e001       |    |		Load	0x0,0x1								; Debug Table 0x1 = .DEBUG	0x002c,0x0674,0x8000,0x0000,0x0059,0x8ed5,0x0000,0x0019
													; Debug Table 0x1.0x0 = 0x2c,0xffff
													; Debug Table 0x1.0x1 = 0x2c,0xfffe
002d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
002e e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x2 = 0x2e,0xfffd
002f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0030 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1.0x3 = 0x30,0xfffc
													; Debug Table 0x1.0x4 = 0x30,0xfffb
0031 00c7       |    |		Action	Elaborate_Subprogram
0032 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x5 = 0x32,0xfffa
0033 00c7       |    |		Action	Elaborate_Subprogram
0034 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x6 = 0x34,0xfff9
0035 00c7       |    |		Action	Elaborate_Subprogram
0036 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x7 = 0x36,0xfff8
0037 00c7       |    |		Action	Elaborate_Subprogram
0038 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x8 = 0x38,0xfff7
0039 00c7       |    |		Action	Elaborate_Subprogram
003a 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x9 = 0x3a,0xfff6
003b 00c7       |    |		Action	Elaborate_Subprogram
003c 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0xa = 0x3c,0xfff5
003d 00c7       |    |		Action	Elaborate_Subprogram
003e 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0xb = 0x3e,0xfff4
003f 00c7       |    |		Action	Elaborate_Subprogram
0040 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0xc = 0x40,0xfff3
0041 00c7       |    |		Action	Elaborate_Subprogram
0042 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0xd = 0x42,0xfff2
0043 00c7       |    |		Action	Elaborate_Subprogram
0044 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0xe = 0x44,0xfff1
0045 00c7       |    |		Action	Elaborate_Subprogram
0046 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x1.0xf = 0x46,0xfff0
0047 00c7       |    |		Action	Elaborate_Subprogram
0048 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19				; Debug Table 0x1.0x10 = 0x48,0xffef
0049 00c7       |    |		Action	Elaborate_Subprogram
004a 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a				; Debug Table 0x1.0x11 = 0x4a,0xffee
004b 00c7       |    |		Action	Elaborate_Subprogram
004c 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b				; Debug Table 0x1.0x12 = 0x4c,0xffed
004d 00c7       |    |		Action	Elaborate_Subprogram
004e 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c				; Debug Table 0x1.0x13 = 0x4e,0xffec
004f 00c7       |    |		Action	Elaborate_Subprogram
0050			BODY_0008:
0050 0092 0598  |    |		Action	Push_String_Extended,0x598					; "Unexpected."
													; Debug Table 0x1.0x14 = 0x50,0x1
0052 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x15 = 0x52,0x401
0053 e001       |    |		Load	0x0,0x1
0054 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0055 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0056 00d0       |    |		Action	Swap_Control
0057 00d1       |    |		Pop_Control	Pop_Count_1
0058 003a       | :  |		Store_Top	Access,At_Offset_2					; Debug Table 0x1.0x16 = 0x58,0x1
0059 0092 0599  |    |		Action	Push_String_Extended,0x599					; "Not found."
													; Debug Table 0x1.0x17 = 0x59,0x2
005b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x18 = 0x5b,0x801
005c e001       |    |		Load	0x0,0x1
005d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
005e 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
005f 00d0       |    |		Action	Swap_Control
0060 00d1       |    |		Pop_Control	Pop_Count_1
0061 0039       | 9  |		Store_Top	Access,At_Offset_1					; Debug Table 0x1.0x19 = 0x61,0x2
0062 00bc       |    |		Action	Signal_Activated
0063 00bb       |    |		Action	Signal_Completion
0064 0000 0000  |    |		.BLANK	0000[0x4]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006b       | k  |		.CONST	0x006b								; Address of begin
0069 008d       |    |		.CONST	0x008d								; Address of exception handler
006a 0001       |    |		.CONST	0x0001								; Number of locals
006b			BODY_0068:
006b			INIT_0068:
006b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2 = .DEBUG	0x006b,0x06aa,0x0001,0x0000,0x0059,0x8c05,0x0000,0x0009
													; Debug Table 0x2.0x0 = 0x6b,0x1
006c 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
006d 680f       |h   |		Jump_Zero	0x7d
006e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x1 = 0x6e,0x2
006f 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0070 00d8       |    |		Load_Top	At_Offset_0
0071 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
0072 00d8       |    |		Load_Top	At_Offset_0
0073 00d8       |    |		Load_Top	At_Offset_0
0074 e5ff       |    |		Load	0x2,-0x1
0075 00e3       |    |		Load_Encached	Natural_Cache
0076 025b       | [  |		Execute	Discrete,Check_In_Type
0077 e002       |    |		Load	0x0,0x2
0078 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
0079 00d2       |    |		Pop_Control	Pop_Count_2
007a 00d0       |    |		Action	Swap_Control
007b 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
007c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
007d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x2 = 0x7d,0x3
007e 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
007f 00d8       |    |		Load_Top	At_Offset_0
0080 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
0081 00d8       |    |		Load_Top	At_Offset_0
0082 00d8       |    |		Load_Top	At_Offset_0
0083 e5ff       |    |		Load	0x2,-0x1
0084 0275       | u  |		Execute	Discrete,Unary_Minus
0085 00e3       |    |		Load_Encached	Natural_Cache
0086 025b       | [  |		Execute	Discrete,Check_In_Type
0087 e002       |    |		Load	0x0,0x2
0088 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
0089 00d2       |    |		Pop_Control	Pop_Count_2
008a 00d0       |    |		Action	Swap_Control
008b 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
008c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
008d			TRAP_0068:
008d 010e       |    |		Execute	Exception,Is_Constraint_Error
008e 6801       |h   |		Jump_Zero	0x90
008f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x2.0x3 = 0x8f,0x4
0090 0100       |    |		Execute	Exception,Raise
0091 0000 0000  |    |		.BLANK	0000[0x7]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 009b       |    |		.CONST	0x009b								; Address of begin
0099 00ab       |    |		.CONST	0x00ab								; Address of exception handler
009a 0001       |    |		.CONST	0x0001								; Number of locals
009b			BODY_0098:
009b			INIT_0098:
009b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3 = .DEBUG	0x009b,0x06b4,0x0001,0x0000,0x0059,0x8c05,0x0000,0x0018
													; Debug Table 0x3.0x0 = 0x9b,0x1
009c 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
009d 00d8       |    |		Load_Top	At_Offset_0
009e 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
009f 00d8       |    |		Load_Top	At_Offset_0
00a0 00d8       |    |		Load_Top	At_Offset_0
00a1 e5ff       |    |		Load	0x2,-0x1
00a2 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
00a3 e003       |    |		Load	0x0,0x3
00a4 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
00a5 e002       |    |		Load	0x0,0x2
00a6 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
00a7 00d2       |    |		Pop_Control	Pop_Count_2
00a8 00d0       |    |		Action	Swap_Control
00a9 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
00aa 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
00ab			TRAP_0098:
00ab 010e       |    |		Execute	Exception,Is_Constraint_Error
00ac 6801       |h   |		Jump_Zero	0xae
00ad 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x3.0x1 = 0xad,0x2
00ae 0100       |    |		Execute	Exception,Raise
00af 0000       |    |		.XXX[0x1]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b3       |    |		.CONST	0x00b3								; Address of begin
00b1 00c3       |    |		.CONST	0x00c3								; Address of exception handler
00b2 0001       |    |		.CONST	0x0001								; Number of locals
00b3			BODY_00b0:
00b3			INIT_00b0:
00b3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4 = .DEBUG	0x00b3,0x06ba,0x0001,0x0000,0x0059,0x8c05,0x0000,0x0022
													; Debug Table 0x4.0x0 = 0xb3,0x1
00b4 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
00b5 00d8       |    |		Load_Top	At_Offset_0
00b6 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
00b7 00d8       |    |		Load_Top	At_Offset_0
00b8 00d8       |    |		Load_Top	At_Offset_0
00b9 e5ff       |    |		Load	0x2,-0x1
00ba 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
00bb e003       |    |		Load	0x0,0x3
00bc 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
00bd e002       |    |		Load	0x0,0x2
00be 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00bf 00d2       |    |		Pop_Control	Pop_Count_2
00c0 00d0       |    |		Action	Swap_Control
00c1 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
00c2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
00c3			TRAP_00b0:
00c3 010e       |    |		Execute	Exception,Is_Constraint_Error
00c4 6801       |h   |		Jump_Zero	0xc6
00c5 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x4.0x1 = 0xc5,0x2
00c6 0100       |    |		Execute	Exception,Raise
00c7 0000       |    |		.XXX[0x1]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00cb       |    |		.CONST	0x00cb								; Address of begin
00c9 00f7       |    |		.CONST	0x00f7								; Address of exception handler
00ca 0001       |    |		.CONST	0x0001								; Number of locals
00cb			BODY_00c8:
00cb			INIT_00c8:
00cb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5 = .DEBUG	0x00cb,0x06c0,0x0001,0x0000,0x0059,0x8c05,0x0000,0x002c
													; Debug Table 0x5.0x0 = 0xcb,0x1
00cc 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
00cd 6814       |h   |		Jump_Zero	0xe2
00ce 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x5.0x1 = 0xce,0x2
00cf 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
00d0 00d8       |    |		Load_Top	At_Offset_0
00d1 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
00d2 00d8       |    |		Load_Top	At_Offset_0
00d3 00d8       |    |		Load_Top	At_Offset_0
00d4 4801       |H   |		Short_Literal	0x1
00d5 e5ff       |    |		Load	0x2,-0x1
00d6 00e3       |    |		Load_Encached	Natural_Cache
00d7 025b       | [  |		Execute	Discrete,Check_In_Type
00d8 e5fe       |    |		Load	0x2,-0x2
00d9 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
00da e003       |    |		Load	0x0,0x3
00db 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
00dc e002       |    |		Load	0x0,0x2
00dd 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
00de 00d2       |    |		Pop_Control	Pop_Count_2
00df 00d0       |    |		Action	Swap_Control
00e0 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
00e1 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00e2 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x5.0x2 = 0xe2,0x3
00e3 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
00e4 00d8       |    |		Load_Top	At_Offset_0
00e5 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
00e6 00d8       |    |		Load_Top	At_Offset_0
00e7 00d8       |    |		Load_Top	At_Offset_0
00e8 4801       |H   |		Short_Literal	0x1
00e9 e5ff       |    |		Load	0x2,-0x1
00ea 0275       | u  |		Execute	Discrete,Unary_Minus
00eb 00e3       |    |		Load_Encached	Natural_Cache
00ec 025b       | [  |		Execute	Discrete,Check_In_Type
00ed e5fe       |    |		Load	0x2,-0x2
00ee 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
00ef e003       |    |		Load	0x0,0x3
00f0 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
00f1 e002       |    |		Load	0x0,0x2
00f2 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
00f3 00d2       |    |		Pop_Control	Pop_Count_2
00f4 00d0       |    |		Action	Swap_Control
00f5 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
00f6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00f7			TRAP_00c8:
00f7 010e       |    |		Execute	Exception,Is_Constraint_Error
00f8 6801       |h   |		Jump_Zero	0xfa
00f9 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x5.0x3 = 0xf9,0x4
00fa 0100       |    |		Execute	Exception,Raise
00fb 0000 0000  |    |		.BLANK	0000[0x5]
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0103       |    |		.CONST	0x0103								; Address of begin
0101 012f       | /  |		.CONST	0x012f								; Address of exception handler
0102 0001       |    |		.CONST	0x0001								; Number of locals
0103			BODY_0100:
0103			INIT_0100:
0103 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6 = .DEBUG	0x0103,0x06ca,0x0001,0x0000,0x0059,0x8c05,0x0000,0x003b
													; Debug Table 0x6.0x0 = 0x103,0x1
0104 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0105 6814       |h   |		Jump_Zero	0x11a
0106 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0x1 = 0x106,0x2
0107 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0108 00d8       |    |		Load_Top	At_Offset_0
0109 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
010a 00d8       |    |		Load_Top	At_Offset_0
010b 00d8       |    |		Load_Top	At_Offset_0
010c 4801       |H   |		Short_Literal	0x1
010d e5ff       |    |		Load	0x2,-0x1
010e 00e3       |    |		Load_Encached	Natural_Cache
010f 025b       | [  |		Execute	Discrete,Check_In_Type
0110 e5fe       |    |		Load	0x2,-0x2
0111 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0112 e003       |    |		Load	0x0,0x3
0113 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
0114 e002       |    |		Load	0x0,0x2
0115 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0116 00d2       |    |		Pop_Control	Pop_Count_2
0117 00d0       |    |		Action	Swap_Control
0118 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
0119 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
011a 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0x2 = 0x11a,0x3
011b 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
011c 00d8       |    |		Load_Top	At_Offset_0
011d 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
011e 00d8       |    |		Load_Top	At_Offset_0
011f 00d8       |    |		Load_Top	At_Offset_0
0120 4801       |H   |		Short_Literal	0x1
0121 e5ff       |    |		Load	0x2,-0x1
0122 0275       | u  |		Execute	Discrete,Unary_Minus
0123 00e3       |    |		Load_Encached	Natural_Cache
0124 025b       | [  |		Execute	Discrete,Check_In_Type
0125 e5fe       |    |		Load	0x2,-0x2
0126 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0127 e003       |    |		Load	0x0,0x3
0128 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
0129 e002       |    |		Load	0x0,0x2
012a 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
012b 00d2       |    |		Pop_Control	Pop_Count_2
012c 00d0       |    |		Action	Swap_Control
012d 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
012e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
012f			TRAP_0100:
012f 010e       |    |		Execute	Exception,Is_Constraint_Error
0130 6801       |h   |		Jump_Zero	0x132
0131 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x6.0x3 = 0x131,0x4
0132 0100       |    |		Execute	Exception,Raise
0133 0000 0000  |    |		.BLANK	0000[0x5]
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 0146       | F  |		.CONST	0x0146								; Address of begin
0139 0158       | X  |		.CONST	0x0158								; Address of exception handler
013a 0003       |    |		.CONST	0x0003								; Number of locals
013b			INIT_0138:
013b e004       |    |		Load	0x0,0x4								; Debug Table 0x7 = .DEBUG	0x013b,0x06d4,0x0001,0x0000,0x0059,0x8c05,0x0000,0x004a
													; Debug Table 0x7.0x0 = 0x13b,0xffff
013c 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
013d 0322       | "  |		Declare_Variable	Record
013e e003       |    |		Load	0x0,0x3								; Debug Table 0x7.0x1 = 0x13e,0xfffe
013f 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0140 0322       | "  |		Declare_Variable	Record
0141 e5ff       |    |		Load	0x2,-0x1
0142 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
0143 2602       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
0144 00d9       |    |		Load_Top	At_Offset_1
0145 017d       | }  |		Execute	Record,Structure_Write
0146			BODY_0138:
0146 e21d       |    |		Load	0x1,0x1d							; Debug Table 0x7.0x2 = 0x146,0x1
0147 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x7.0x3 = 0x147,0x401
0148 00d9       |    |		Load_Top	At_Offset_1
0149 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x4 = 0x149,0x801
014a 0227       | '  |		Execute	Access,All_Reference
014b 0335       | 5  |		Declare_Variable	Array,Duplicate
014c 00d0       |    |		Action	Swap_Control
014d 00d1       |    |		Pop_Control	Pop_Count_1
014e 00d0       |    |		Action	Swap_Control
014f 00d1       |    |		Pop_Control	Pop_Count_1
0150 e005       |    |		Load	0x0,0x5								; Debug Table 0x7.0x5 = 0x150,0x401
0151 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0152 00d1       |    |		Pop_Control	Pop_Count_1
0153 4800       |H   |		Short_Literal	0x0							; Debug Table 0x7.0x6 = 0x153,0x402
0154 e5ff       |    |		Load	0x2,-0x1
0155 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
0156 00d1       |    |		Pop_Control	Pop_Count_1
0157 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x7.0x7 = 0x157,0x2
0158			TRAP_0138:
0158 010e       |    |		Execute	Exception,Is_Constraint_Error
0159 6811       |h   |		Jump_Zero	0x16b
015a e21e       |    |		Load	0x1,0x1e							; Debug Table 0x7.0x8 = 0x15a,0x5
015b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x7.0x9 = 0x15b,0xc01
015c 00d9       |    |		Load_Top	At_Offset_1
015d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0xa = 0x15d,0x1001
015e 0227       | '  |		Execute	Access,All_Reference
015f 0335       | 5  |		Declare_Variable	Array,Duplicate
0160 00d0       |    |		Action	Swap_Control
0161 00d1       |    |		Pop_Control	Pop_Count_1
0162 00d0       |    |		Action	Swap_Control
0163 00d1       |    |		Pop_Control	Pop_Count_1
0164 e005       |    |		Load	0x0,0x5								; Debug Table 0x7.0xb = 0x164,0xc01
0165 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0166 00d1       |    |		Pop_Control	Pop_Count_1
0167 4800       |H   |		Short_Literal	0x0							; Debug Table 0x7.0xc = 0x167,0xc02
0168 e5ff       |    |		Load	0x2,-0x1
0169 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
016a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
016b 0100       |    |		Execute	Exception,Raise
016c 0000 0000  |    |		.BLANK	0000[0x4]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 017e       | ~  |		.CONST	0x017e								; Address of begin
0171 0190       |    |		.CONST	0x0190								; Address of exception handler
0172 0003       |    |		.CONST	0x0003								; Number of locals
0173			INIT_0170:
0173 e004       |    |		Load	0x0,0x4								; Debug Table 0x8 = .DEBUG	0x0173,0x06f0,0x0001,0x0000,0x0059,0x8c05,0x0000,0x0054
													; Debug Table 0x8.0x0 = 0x173,0xffff
0174 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0175 0322       | "  |		Declare_Variable	Record
0176 e003       |    |		Load	0x0,0x3								; Debug Table 0x8.0x1 = 0x176,0xfffe
0177 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0178 0322       | "  |		Declare_Variable	Record
0179 e5ff       |    |		Load	0x2,-0x1
017a 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
017b 2602       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
017c 00d9       |    |		Load_Top	At_Offset_1
017d 017d       | }  |		Execute	Record,Structure_Write
017e			BODY_0170:
017e e21d       |    |		Load	0x1,0x1d							; Debug Table 0x8.0x2 = 0x17e,0x1
017f e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x8.0x3 = 0x17f,0x401
0180 00d9       |    |		Load_Top	At_Offset_1
0181 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x8.0x4 = 0x181,0x801
0182 0227       | '  |		Execute	Access,All_Reference
0183 0335       | 5  |		Declare_Variable	Array,Duplicate
0184 00d0       |    |		Action	Swap_Control
0185 00d1       |    |		Pop_Control	Pop_Count_1
0186 00d0       |    |		Action	Swap_Control
0187 00d1       |    |		Pop_Control	Pop_Count_1
0188 e005       |    |		Load	0x0,0x5								; Debug Table 0x8.0x5 = 0x188,0x401
0189 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
018a 00d1       |    |		Pop_Control	Pop_Count_1
018b 4800       |H   |		Short_Literal	0x0							; Debug Table 0x8.0x6 = 0x18b,0x402
018c e5ff       |    |		Load	0x2,-0x1
018d 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
018e 00d1       |    |		Pop_Control	Pop_Count_1
018f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x8.0x7 = 0x18f,0x2
0190			TRAP_0170:
0190 010e       |    |		Execute	Exception,Is_Constraint_Error
0191 6811       |h   |		Jump_Zero	0x1a3
0192 e21e       |    |		Load	0x1,0x1e							; Debug Table 0x8.0x8 = 0x192,0x5
0193 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x8.0x9 = 0x193,0xc01
0194 00d9       |    |		Load_Top	At_Offset_1
0195 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x8.0xa = 0x195,0x1001
0196 0227       | '  |		Execute	Access,All_Reference
0197 0335       | 5  |		Declare_Variable	Array,Duplicate
0198 00d0       |    |		Action	Swap_Control
0199 00d1       |    |		Pop_Control	Pop_Count_1
019a 00d0       |    |		Action	Swap_Control
019b 00d1       |    |		Pop_Control	Pop_Count_1
019c e005       |    |		Load	0x0,0x5								; Debug Table 0x8.0xb = 0x19c,0xc01
019d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
019e 00d1       |    |		Pop_Control	Pop_Count_1
019f 4800       |H   |		Short_Literal	0x0							; Debug Table 0x8.0xc = 0x19f,0xc02
01a0 e5ff       |    |		Load	0x2,-0x1
01a1 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
01a2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01a3 0100       |    |		Execute	Exception,Raise
01a4 0000 0000  |    |		.BLANK	0000[0x4]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01bd       |    |		.CONST	0x01bd								; Address of begin
01a9 0202       |    |		.CONST	0x0202								; Address of exception handler
01aa 0007       |    |		.CONST	0x0007								; Number of locals
01ab			INIT_01a8:
01ab 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x9 = .DEBUG	0x01ab,0x070c,0x0001,0x0000,0x0059,0x8c05,0x0000,0x005e
													; Debug Table 0x9.0x0 = 0x1ab,0xffff
01ac 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
01ad 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x9.0x1 = 0x1ad,0xfffe
01ae e003       |    |		Load	0x0,0x3								; Debug Table 0x9.0x2 = 0x1ae,0xfffd
01af 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
01b0 0322       | "  |		Declare_Variable	Record
01b1 e5fc       |    |		Load	0x2,-0x4
01b2 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
01b3 2602       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
01b4 00d9       |    |		Load_Top	At_Offset_1
01b5 017d       | }  |		Execute	Record,Structure_Write
01b6 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x3 = 0x1b6,0xfffc
01b7 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
01b8 e004       |    |		Load	0x0,0x4								; Debug Table 0x9.0x4 = 0x1b8,0xfffb
01b9 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
01ba 0322       | "  |		Declare_Variable	Record
01bb 029f 04ab  |    |		Declare_Subprogram	INIT_04a8,For_Call
01bd			BODY_01a8:
01bd e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x9.0x5 = 0x1bd,0x1
01be 0d00       |    |		Execute_Immediate	Less,0x0
01bf 6808       |h   |		Jump_Zero	0x1c8
01c0 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x9.0x6 = 0x1c0,0x2
01c1 e5fd       |    |		Load	0x2,-0x3
01c2 e5fe       |    |		Load	0x2,-0x2
01c3 e5ff       |    |		Load	0x2,-0x1
01c4 0275       | u  |		Execute	Discrete,Unary_Minus
01c5 8215       |    |		Call	0x1,0x15
01c6 00d1       |    |		Pop_Control	Pop_Count_1
01c7 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
01c8 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x9.0x7 = 0x1c8,0x3
01c9 6830       |h0  |		Jump_Zero	0x1fa
01ca e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x9.0x8 = 0x1ca,0x4
01cb 682c       |h,  |		Jump_Zero	0x1f8
01cc 00cf       |    |		Action	Mark_Auxiliary
01cd 7824       |x$  |		Jump	0x1f2
01ce 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x9.0x9 = 0x1ce,0x6
01cf 00db       |    |		Load_Top	At_Offset_3
01d0 e404       |    |		Load	0x2,0x4
01d1 4801       |H   |		Short_Literal	0x1
01d2 e002       |    |		Load	0x0,0x2
01d3 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
01d4 00d2       |    |		Pop_Control	Pop_Count_2
01d5 c403       |    |		Store	0x2,0x3
01d6 e403       |    |		Load	0x2,0x3								; Debug Table 0x9.0xa = 0x1d6,0x7
01d7 7012       |p   |		Jump_Nonzero	0x1ea
01d8 e21e       |    |		Load	0x1,0x1e							; Debug Table 0x9.0xb = 0x1d8,0x8
01d9 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x9.0xc = 0x1d9,0x401
01da 00d9       |    |		Load_Top	At_Offset_1
01db 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0xd = 0x1db,0x801
01dc 0227       | '  |		Execute	Access,All_Reference
01dd 0335       | 5  |		Declare_Variable	Array,Duplicate
01de 00d0       |    |		Action	Swap_Control
01df 00d1       |    |		Pop_Control	Pop_Count_1
01e0 00d0       |    |		Action	Swap_Control
01e1 00d1       |    |		Pop_Control	Pop_Count_1
01e2 e005       |    |		Load	0x0,0x5								; Debug Table 0x9.0xe = 0x1e2,0x401
01e3 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01e4 00d1       |    |		Pop_Control	Pop_Count_1
01e5 4800       |H   |		Short_Literal	0x0							; Debug Table 0x9.0xf = 0x1e5,0x402
01e6 e5fc       |    |		Load	0x2,-0x4
01e7 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
01e8 00d1       |    |		Pop_Control	Pop_Count_1
01e9 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x9.0x10 = 0x1e9,0x9
01ea e402       |    |		Load	0x2,0x2								; Debug Table 0x9.0x11 = 0x1ea,0xa
01eb 0a01       |    |		Execute_Immediate	Plus,0x1
01ec c402       |    |		Store	0x2,0x2
01ed e404       |    |		Load	0x2,0x4								; Debug Table 0x9.0x12 = 0x1ed,0xb
01ee e5fc       |    |		Load	0x2,-0x4
01ef 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
01f0 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
01f1 00c9       |    |		Action	Pop_Auxiliary_Loop
01f2 e402       |    |		Load	0x2,0x2								; Debug Table 0x9.0x13 = 0x1f2,0x5
01f3 e5ff       |    |		Load	0x2,-0x1
01f4 027c       | |  |		Execute	Discrete,Less
01f5 77d8       |w   |		Jump_Nonzero	0x1ce
01f6 00ce       |    |		Action	Pop_Auxiliary
01f7 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
01f8 8407       |    |		Call	0x2,0x7								; Debug Table 0x9.0x14 = 0x1f8,0xc
01f9 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
01fa e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x9.0x15 = 0x1fa,0xd
01fb 6805       |h   |		Jump_Zero	0x201
01fc e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x9.0x16 = 0x1fc,0xe
01fd e5ff       |    |		Load	0x2,-0x1
01fe 4801       |H   |		Short_Literal	0x1
01ff 8218       |    |		Call	0x1,0x18
0200 00d1       |    |		Pop_Control	Pop_Count_1
0201 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0202			TRAP_01a8:
0202 010e       |    |		Execute	Exception,Is_Constraint_Error
0203 6811       |h   |		Jump_Zero	0x215
0204 e21e       |    |		Load	0x1,0x1e							; Debug Table 0x9.0x17 = 0x204,0xf
0205 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x9.0x18 = 0x205,0xc01
0206 00d9       |    |		Load_Top	At_Offset_1
0207 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x19 = 0x207,0x1001
0208 0227       | '  |		Execute	Access,All_Reference
0209 0335       | 5  |		Declare_Variable	Array,Duplicate
020a 00d0       |    |		Action	Swap_Control
020b 00d1       |    |		Pop_Control	Pop_Count_1
020c 00d0       |    |		Action	Swap_Control
020d 00d1       |    |		Pop_Control	Pop_Count_1
020e e005       |    |		Load	0x0,0x5								; Debug Table 0x9.0x1a = 0x20e,0xc01
020f 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0210 00d1       |    |		Pop_Control	Pop_Count_1
0211 4800       |H   |		Short_Literal	0x0							; Debug Table 0x9.0x1b = 0x211,0xc02
0212 e5fc       |    |		Load	0x2,-0x4
0213 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
0214 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0215 0100       |    |		Execute	Exception,Raise
0216 0000 0000  |    |		.XXX[0x2]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 022d       | -  |		.CONST	0x022d								; Address of begin
0219 0272       | r  |		.CONST	0x0272								; Address of exception handler
021a 0007       |    |		.CONST	0x0007								; Number of locals
021b			INIT_0218:
021b 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0xa = .DEBUG	0x021b,0x0746,0x0001,0x0000,0x0059,0x8c05,0x0000,0x0077
													; Debug Table 0xa.0x0 = 0x21b,0xffff
021c 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
021d 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xa.0x1 = 0x21d,0xfffe
021e e003       |    |		Load	0x0,0x3								; Debug Table 0xa.0x2 = 0x21e,0xfffd
021f 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0220 0322       | "  |		Declare_Variable	Record
0221 e5fc       |    |		Load	0x2,-0x4
0222 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
0223 2602       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
0224 00d9       |    |		Load_Top	At_Offset_1
0225 017d       | }  |		Execute	Record,Structure_Write
0226 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0x3 = 0x226,0xfffc
0227 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0228 e004       |    |		Load	0x0,0x4								; Debug Table 0xa.0x4 = 0x228,0xfffb
0229 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
022a 0322       | "  |		Declare_Variable	Record
022b 029f 0523  |   #|		Declare_Subprogram	INIT_0520,For_Call
022d			BODY_0218:
022d e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xa.0x5 = 0x22d,0x1
022e 0d00       |    |		Execute_Immediate	Less,0x0
022f 6808       |h   |		Jump_Zero	0x238
0230 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0xa.0x6 = 0x230,0x2
0231 e5fd       |    |		Load	0x2,-0x3
0232 e5fe       |    |		Load	0x2,-0x2
0233 e5ff       |    |		Load	0x2,-0x1
0234 0275       | u  |		Execute	Discrete,Unary_Minus
0235 8214       |    |		Call	0x1,0x14
0236 00d1       |    |		Pop_Control	Pop_Count_1
0237 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0238 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xa.0x7 = 0x238,0x3
0239 6830       |h0  |		Jump_Zero	0x26a
023a e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xa.0x8 = 0x23a,0x4
023b 682c       |h,  |		Jump_Zero	0x268
023c 00cf       |    |		Action	Mark_Auxiliary
023d 7824       |x$  |		Jump	0x262
023e 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xa.0x9 = 0x23e,0x6
023f 00db       |    |		Load_Top	At_Offset_3
0240 e404       |    |		Load	0x2,0x4
0241 4801       |H   |		Short_Literal	0x1
0242 e002       |    |		Load	0x0,0x2
0243 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0244 00d2       |    |		Pop_Control	Pop_Count_2
0245 c403       |    |		Store	0x2,0x3
0246 e403       |    |		Load	0x2,0x3								; Debug Table 0xa.0xa = 0x246,0x7
0247 7012       |p   |		Jump_Nonzero	0x25a
0248 e21e       |    |		Load	0x1,0x1e							; Debug Table 0xa.0xb = 0x248,0x8
0249 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0xa.0xc = 0x249,0x401
024a 00d9       |    |		Load_Top	At_Offset_1
024b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0xd = 0x24b,0x801
024c 0227       | '  |		Execute	Access,All_Reference
024d 0335       | 5  |		Declare_Variable	Array,Duplicate
024e 00d0       |    |		Action	Swap_Control
024f 00d1       |    |		Pop_Control	Pop_Count_1
0250 00d0       |    |		Action	Swap_Control
0251 00d1       |    |		Pop_Control	Pop_Count_1
0252 e005       |    |		Load	0x0,0x5								; Debug Table 0xa.0xe = 0x252,0x401
0253 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0254 00d1       |    |		Pop_Control	Pop_Count_1
0255 4800       |H   |		Short_Literal	0x0							; Debug Table 0xa.0xf = 0x255,0x402
0256 e5fc       |    |		Load	0x2,-0x4
0257 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
0258 00d1       |    |		Pop_Control	Pop_Count_1
0259 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0xa.0x10 = 0x259,0x9
025a e402       |    |		Load	0x2,0x2								; Debug Table 0xa.0x11 = 0x25a,0xa
025b 0a01       |    |		Execute_Immediate	Plus,0x1
025c c402       |    |		Store	0x2,0x2
025d e404       |    |		Load	0x2,0x4								; Debug Table 0xa.0x12 = 0x25d,0xb
025e e5fc       |    |		Load	0x2,-0x4
025f 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
0260 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
0261 00c9       |    |		Action	Pop_Auxiliary_Loop
0262 e402       |    |		Load	0x2,0x2								; Debug Table 0xa.0x13 = 0x262,0x5
0263 e5ff       |    |		Load	0x2,-0x1
0264 027c       | |  |		Execute	Discrete,Less
0265 77d8       |w   |		Jump_Nonzero	0x23e
0266 00ce       |    |		Action	Pop_Auxiliary
0267 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0268 8407       |    |		Call	0x2,0x7								; Debug Table 0xa.0x14 = 0x268,0xc
0269 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
026a e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xa.0x15 = 0x26a,0xd
026b 6805       |h   |		Jump_Zero	0x271
026c e5fc       |    |		Load	0x2,-0x4							; Debug Table 0xa.0x16 = 0x26c,0xe
026d e5ff       |    |		Load	0x2,-0x1
026e 4801       |H   |		Short_Literal	0x1
026f 8219       |    |		Call	0x1,0x19
0270 00d1       |    |		Pop_Control	Pop_Count_1
0271 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0xa.0x17 = 0x271,0xf
0272			TRAP_0218:
0272 010e       |    |		Execute	Exception,Is_Constraint_Error
0273 6811       |h   |		Jump_Zero	0x285
0274 e21e       |    |		Load	0x1,0x1e							; Debug Table 0xa.0x18 = 0x274,0x10
0275 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0xa.0x19 = 0x275,0xc01
0276 00d9       |    |		Load_Top	At_Offset_1
0277 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0x1a = 0x277,0x1001
0278 0227       | '  |		Execute	Access,All_Reference
0279 0335       | 5  |		Declare_Variable	Array,Duplicate
027a 00d0       |    |		Action	Swap_Control
027b 00d1       |    |		Pop_Control	Pop_Count_1
027c 00d0       |    |		Action	Swap_Control
027d 00d1       |    |		Pop_Control	Pop_Count_1
027e e005       |    |		Load	0x0,0x5								; Debug Table 0xa.0x1b = 0x27e,0xc01
027f 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0280 00d1       |    |		Pop_Control	Pop_Count_1
0281 4800       |H   |		Short_Literal	0x0							; Debug Table 0xa.0x1c = 0x281,0xc02
0282 e5fc       |    |		Load	0x2,-0x4
0283 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
0284 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0285 0100       |    |		Execute	Exception,Raise
0286 0000 0000  |    |		.XXX[0x2]
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 0296       |    |		.CONST	0x0296								; Address of begin
0289 02b5       |    |		.CONST	0x02b5								; Address of exception handler
028a 0003       |    |		.CONST	0x0003								; Number of locals
028b			INIT_0288:
028b e003       |    |		Load	0x0,0x3								; Debug Table 0xb = .DEBUG	0x028b,0x0782,0x0001,0x0000,0x0059,0x8c05,0x0000,0x0090
													; Debug Table 0xb.0x0 = 0x28b,0xffff
028c 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
028d 0322       | "  |		Declare_Variable	Record
028e e5fe       |    |		Load	0x2,-0x2
028f 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
0290 2602       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
0291 00d9       |    |		Load_Top	At_Offset_1
0292 017d       | }  |		Execute	Record,Structure_Write
0293 e004       |    |		Load	0x0,0x4								; Debug Table 0xb.0x1 = 0x293,0xfffe
0294 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0295 0322       | "  |		Declare_Variable	Record
0296			BODY_0288:
0296 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xb.0x2 = 0x296,0x1
0297 0f01       |    |		Execute_Immediate	Equal,0x1
0298 7012       |p   |		Jump_Nonzero	0x2ab
0299 e21d       |    |		Load	0x1,0x1d							; Debug Table 0xb.0x3 = 0x299,0x2
029a e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xb.0x4 = 0x29a,0x401
029b 00d9       |    |		Load_Top	At_Offset_1
029c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x5 = 0x29c,0x801
029d 0227       | '  |		Execute	Access,All_Reference
029e 0335       | 5  |		Declare_Variable	Array,Duplicate
029f 00d0       |    |		Action	Swap_Control
02a0 00d1       |    |		Pop_Control	Pop_Count_1
02a1 00d0       |    |		Action	Swap_Control
02a2 00d1       |    |		Pop_Control	Pop_Count_1
02a3 e005       |    |		Load	0x0,0x5								; Debug Table 0xb.0x6 = 0x2a3,0x401
02a4 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02a5 00d1       |    |		Pop_Control	Pop_Count_1
02a6 4800       |H   |		Short_Literal	0x0							; Debug Table 0xb.0x7 = 0x2a6,0x402
02a7 e5fe       |    |		Load	0x2,-0x2
02a8 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
02a9 00d1       |    |		Pop_Control	Pop_Count_1
02aa 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0xb.0x8 = 0x2aa,0x3
02ab 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x9 = 0x2ab,0x4
02ac 00da       |    |		Load_Top	At_Offset_2
02ad e002       |    |		Load	0x0,0x2
02ae 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
02af 00d2       |    |		Pop_Control	Pop_Count_2
02b0 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xb.0xa = 0x2b0,0x5
02b1 e5fe       |    |		Load	0x2,-0x2
02b2 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
02b3 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
02b4 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02b5			TRAP_0288:
02b5 010e       |    |		Execute	Exception,Is_Constraint_Error
02b6 6811       |h   |		Jump_Zero	0x2c8
02b7 e21e       |    |		Load	0x1,0x1e							; Debug Table 0xb.0xb = 0x2b7,0x6
02b8 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xb.0xc = 0x2b8,0xc01
02b9 00d9       |    |		Load_Top	At_Offset_1
02ba 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0xd = 0x2ba,0x1001
02bb 0227       | '  |		Execute	Access,All_Reference
02bc 0335       | 5  |		Declare_Variable	Array,Duplicate
02bd 00d0       |    |		Action	Swap_Control
02be 00d1       |    |		Pop_Control	Pop_Count_1
02bf 00d0       |    |		Action	Swap_Control
02c0 00d1       |    |		Pop_Control	Pop_Count_1
02c1 e005       |    |		Load	0x0,0x5								; Debug Table 0xb.0xe = 0x2c1,0xc01
02c2 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02c3 00d1       |    |		Pop_Control	Pop_Count_1
02c4 4800       |H   |		Short_Literal	0x0							; Debug Table 0xb.0xf = 0x2c4,0xc02
02c5 e5fe       |    |		Load	0x2,-0x2
02c6 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
02c7 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02c8 0100       |    |		Execute	Exception,Raise
02c9 0000 0000  |    |		.BLANK	0000[0x7]
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 02de       |    |		.CONST	0x02de								; Address of begin
02d1 02fd       |    |		.CONST	0x02fd								; Address of exception handler
02d2 0003       |    |		.CONST	0x0003								; Number of locals
02d3			INIT_02d0:
02d3 e003       |    |		Load	0x0,0x3								; Debug Table 0xc = .DEBUG	0x02d3,0x07a4,0x0001,0x0000,0x0059,0x8c05,0x0000,0x00a0
													; Debug Table 0xc.0x0 = 0x2d3,0xffff
02d4 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
02d5 0322       | "  |		Declare_Variable	Record
02d6 e5fe       |    |		Load	0x2,-0x2
02d7 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
02d8 2602       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
02d9 00d9       |    |		Load_Top	At_Offset_1
02da 017d       | }  |		Execute	Record,Structure_Write
02db e004       |    |		Load	0x0,0x4								; Debug Table 0xc.0x1 = 0x2db,0xfffe
02dc 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
02dd 0322       | "  |		Declare_Variable	Record
02de			BODY_02d0:
02de e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xc.0x2 = 0x2de,0x1
02df 0f01       |    |		Execute_Immediate	Equal,0x1
02e0 7012       |p   |		Jump_Nonzero	0x2f3
02e1 e21d       |    |		Load	0x1,0x1d							; Debug Table 0xc.0x3 = 0x2e1,0x2
02e2 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xc.0x4 = 0x2e2,0x401
02e3 00d9       |    |		Load_Top	At_Offset_1
02e4 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x5 = 0x2e4,0x801
02e5 0227       | '  |		Execute	Access,All_Reference
02e6 0335       | 5  |		Declare_Variable	Array,Duplicate
02e7 00d0       |    |		Action	Swap_Control
02e8 00d1       |    |		Pop_Control	Pop_Count_1
02e9 00d0       |    |		Action	Swap_Control
02ea 00d1       |    |		Pop_Control	Pop_Count_1
02eb e005       |    |		Load	0x0,0x5								; Debug Table 0xc.0x6 = 0x2eb,0x401
02ec 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02ed 00d1       |    |		Pop_Control	Pop_Count_1
02ee 4800       |H   |		Short_Literal	0x0							; Debug Table 0xc.0x7 = 0x2ee,0x402
02ef e5fe       |    |		Load	0x2,-0x2
02f0 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
02f1 00d1       |    |		Pop_Control	Pop_Count_1
02f2 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0xc.0x8 = 0x2f2,0x3
02f3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x9 = 0x2f3,0x4
02f4 00da       |    |		Load_Top	At_Offset_2
02f5 e002       |    |		Load	0x0,0x2
02f6 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
02f7 00d2       |    |		Pop_Control	Pop_Count_2
02f8 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xc.0xa = 0x2f8,0x5
02f9 e5fe       |    |		Load	0x2,-0x2
02fa 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
02fb 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
02fc 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02fd			TRAP_02d0:
02fd 010e       |    |		Execute	Exception,Is_Constraint_Error
02fe 6811       |h   |		Jump_Zero	0x310
02ff e21e       |    |		Load	0x1,0x1e							; Debug Table 0xc.0xb = 0x2ff,0x6
0300 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xc.0xc = 0x300,0xc01
0301 00d9       |    |		Load_Top	At_Offset_1
0302 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0xd = 0x302,0x1001
0303 0227       | '  |		Execute	Access,All_Reference
0304 0335       | 5  |		Declare_Variable	Array,Duplicate
0305 00d0       |    |		Action	Swap_Control
0306 00d1       |    |		Pop_Control	Pop_Count_1
0307 00d0       |    |		Action	Swap_Control
0308 00d1       |    |		Pop_Control	Pop_Count_1
0309 e005       |    |		Load	0x0,0x5								; Debug Table 0xc.0xe = 0x309,0xc01
030a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
030b 00d1       |    |		Pop_Control	Pop_Count_1
030c 4800       |H   |		Short_Literal	0x0							; Debug Table 0xc.0xf = 0x30c,0xc02
030d e5fe       |    |		Load	0x2,-0x2
030e 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
030f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0310 0100       |    |		Execute	Exception,Raise
0311 0000 0000  |    |		.BLANK	0000[0x7]
0318 ; --------------------------------------------------------------------------------------
0318 ; SUBPROGRAM
0318 ; --------------------------------------------------------------------------------------
0318 0327       | '  |		.CONST	0x0327								; Address of begin
0319 036f       | o  |		.CONST	0x036f								; Address of exception handler
031a 0004       |    |		.CONST	0x0004								; Number of locals
031b			INIT_0318:
031b 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xd = .DEBUG	0x031b,0x07c6,0x0001,0x0000,0x0059,0x8c05,0x0000,0x00b0
													; Debug Table 0xd.0x0 = 0x31b,0xffff
031c e004       |    |		Load	0x0,0x4								; Debug Table 0xd.0x1 = 0x31c,0xfffe
031d 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
031e 0322       | "  |		Declare_Variable	Record
031f e003       |    |		Load	0x0,0x3								; Debug Table 0xd.0x2 = 0x31f,0xfffd
0320 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0321 0322       | "  |		Declare_Variable	Record
0322 e5fd       |    |		Load	0x2,-0x3
0323 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
0324 2602       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
0325 00d9       |    |		Load_Top	At_Offset_1
0326 017d       | }  |		Execute	Record,Structure_Write
0327			BODY_0318:
0327 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xd.0x3 = 0x327,0x1
0328 0f01       |    |		Execute_Immediate	Equal,0x1
0329 7012       |p   |		Jump_Nonzero	0x33c
032a e21d       |    |		Load	0x1,0x1d							; Debug Table 0xd.0x4 = 0x32a,0x2
032b e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xd.0x5 = 0x32b,0x401
032c 00d9       |    |		Load_Top	At_Offset_1
032d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x6 = 0x32d,0x801
032e 0227       | '  |		Execute	Access,All_Reference
032f 0335       | 5  |		Declare_Variable	Array,Duplicate
0330 00d0       |    |		Action	Swap_Control
0331 00d1       |    |		Pop_Control	Pop_Count_1
0332 00d0       |    |		Action	Swap_Control
0333 00d1       |    |		Pop_Control	Pop_Count_1
0334 e005       |    |		Load	0x0,0x5								; Debug Table 0xd.0x7 = 0x334,0x401
0335 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0336 00d1       |    |		Pop_Control	Pop_Count_1
0337 4800       |H   |		Short_Literal	0x0							; Debug Table 0xd.0x8 = 0x337,0x402
0338 e5fd       |    |		Load	0x2,-0x3
0339 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
033a 00d1       |    |		Pop_Control	Pop_Count_1
033b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0xd.0x9 = 0x33b,0x3
033c e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xd.0xa = 0x33c,0x4
033d 0d00       |    |		Execute_Immediate	Less,0x0
033e 6807       |h   |		Jump_Zero	0x346
033f e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xd.0xb = 0x33f,0x5
0340 e5fe       |    |		Load	0x2,-0x2
0341 0275       | u  |		Execute	Discrete,Unary_Minus
0342 e5ff       |    |		Load	0x2,-0x1
0343 8219       |    |		Call	0x1,0x19
0344 00d1       |    |		Pop_Control	Pop_Count_1
0345 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0346 00cf       |    |		Action	Mark_Auxiliary
0347 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xd.0xc = 0x347,0x6
0348 4801       |H   |		Short_Literal	0x1
0349 0263       | c  |		Execute	Discrete,Above_Bound
034a 7022       |p"  |		Jump_Nonzero	0x36d
034b 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xd.0xd = 0x34b,0x7
034c e403       |    |		Load	0x2,0x3
034d e404       |    |		Load	0x2,0x4
034e 4800       |H   |		Short_Literal	0x0
034f e002       |    |		Load	0x0,0x2
0350 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
0351 00d2       |    |		Pop_Control	Pop_Count_2
0352 c402       |    |		Store	0x2,0x2
0353 e402       |    |		Load	0x2,0x2								; Debug Table 0xd.0xe = 0x353,0x8
0354 7012       |p   |		Jump_Nonzero	0x367
0355 e21e       |    |		Load	0x1,0x1e							; Debug Table 0xd.0xf = 0x355,0x9
0356 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xd.0x10 = 0x356,0xc01
0357 00d9       |    |		Load_Top	At_Offset_1
0358 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x11 = 0x358,0x1001
0359 0227       | '  |		Execute	Access,All_Reference
035a 0335       | 5  |		Declare_Variable	Array,Duplicate
035b 00d0       |    |		Action	Swap_Control
035c 00d1       |    |		Pop_Control	Pop_Count_1
035d 00d0       |    |		Action	Swap_Control
035e 00d1       |    |		Pop_Control	Pop_Count_1
035f e005       |    |		Load	0x0,0x5								; Debug Table 0xd.0x12 = 0x35f,0xc01
0360 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0361 00d1       |    |		Pop_Control	Pop_Count_1
0362 4800       |H   |		Short_Literal	0x0							; Debug Table 0xd.0x13 = 0x362,0xc02
0363 e5fd       |    |		Load	0x2,-0x3
0364 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
0365 00d1       |    |		Pop_Control	Pop_Count_1
0366 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0xd.0x14 = 0x366,0xa
0367 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xd.0x15 = 0x367,0xb
0368 e5fd       |    |		Load	0x2,-0x3
0369 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
036a 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
036b 00c8       |    |		Action	Pop_Auxiliary_Range
036c 3fde       |?   |		Loop_Increasing	0x34b
036d 00ce       |    |		Action	Pop_Auxiliary
036e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
036f			TRAP_0318:
036f 010e       |    |		Execute	Exception,Is_Constraint_Error
0370 6811       |h   |		Jump_Zero	0x382
0371 e21e       |    |		Load	0x1,0x1e							; Debug Table 0xd.0x16 = 0x371,0xc
0372 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xd.0x17 = 0x372,0x1401
0373 00d9       |    |		Load_Top	At_Offset_1
0374 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x18 = 0x374,0x1801
0375 0227       | '  |		Execute	Access,All_Reference
0376 0335       | 5  |		Declare_Variable	Array,Duplicate
0377 00d0       |    |		Action	Swap_Control
0378 00d1       |    |		Pop_Control	Pop_Count_1
0379 00d0       |    |		Action	Swap_Control
037a 00d1       |    |		Pop_Control	Pop_Count_1
037b e005       |    |		Load	0x0,0x5								; Debug Table 0xd.0x19 = 0x37b,0x1401
037c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
037d 00d1       |    |		Pop_Control	Pop_Count_1
037e 4800       |H   |		Short_Literal	0x0							; Debug Table 0xd.0x1a = 0x37e,0x1402
037f e5fd       |    |		Load	0x2,-0x3
0380 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
0381 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0382 0100       |    |		Execute	Exception,Raise
0383 0000 0000  |    |		.BLANK	0000[0x5]
0388 ; --------------------------------------------------------------------------------------
0388 ; SUBPROGRAM
0388 ; --------------------------------------------------------------------------------------
0388 0397       |    |		.CONST	0x0397								; Address of begin
0389 03df       |    |		.CONST	0x03df								; Address of exception handler
038a 0004       |    |		.CONST	0x0004								; Number of locals
038b			INIT_0388:
038b 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xe = .DEBUG	0x038b,0x07fe,0x0001,0x0000,0x0059,0x8c05,0x0000,0x00c5
													; Debug Table 0xe.0x0 = 0x38b,0xffff
038c e004       |    |		Load	0x0,0x4								; Debug Table 0xe.0x1 = 0x38c,0xfffe
038d 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
038e 0322       | "  |		Declare_Variable	Record
038f e003       |    |		Load	0x0,0x3								; Debug Table 0xe.0x2 = 0x38f,0xfffd
0390 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0391 0322       | "  |		Declare_Variable	Record
0392 e5fd       |    |		Load	0x2,-0x3
0393 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
0394 2602       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
0395 00d9       |    |		Load_Top	At_Offset_1
0396 017d       | }  |		Execute	Record,Structure_Write
0397			BODY_0388:
0397 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xe.0x3 = 0x397,0x1
0398 0f01       |    |		Execute_Immediate	Equal,0x1
0399 7012       |p   |		Jump_Nonzero	0x3ac
039a e21d       |    |		Load	0x1,0x1d							; Debug Table 0xe.0x4 = 0x39a,0x2
039b e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xe.0x5 = 0x39b,0x401
039c 00d9       |    |		Load_Top	At_Offset_1
039d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x6 = 0x39d,0x801
039e 0227       | '  |		Execute	Access,All_Reference
039f 0335       | 5  |		Declare_Variable	Array,Duplicate
03a0 00d0       |    |		Action	Swap_Control
03a1 00d1       |    |		Pop_Control	Pop_Count_1
03a2 00d0       |    |		Action	Swap_Control
03a3 00d1       |    |		Pop_Control	Pop_Count_1
03a4 e005       |    |		Load	0x0,0x5								; Debug Table 0xe.0x7 = 0x3a4,0x401
03a5 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03a6 00d1       |    |		Pop_Control	Pop_Count_1
03a7 4800       |H   |		Short_Literal	0x0							; Debug Table 0xe.0x8 = 0x3a7,0x402
03a8 e5fd       |    |		Load	0x2,-0x3
03a9 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
03aa 00d1       |    |		Pop_Control	Pop_Count_1
03ab 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0xe.0x9 = 0x3ab,0x3
03ac e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xe.0xa = 0x3ac,0x4
03ad 0d00       |    |		Execute_Immediate	Less,0x0
03ae 6807       |h   |		Jump_Zero	0x3b6
03af e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xe.0xb = 0x3af,0x5
03b0 e5fe       |    |		Load	0x2,-0x2
03b1 0275       | u  |		Execute	Discrete,Unary_Minus
03b2 e5ff       |    |		Load	0x2,-0x1
03b3 8218       |    |		Call	0x1,0x18
03b4 00d1       |    |		Pop_Control	Pop_Count_1
03b5 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03b6 00cf       |    |		Action	Mark_Auxiliary
03b7 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xe.0xc = 0x3b7,0x6
03b8 4801       |H   |		Short_Literal	0x1
03b9 0263       | c  |		Execute	Discrete,Above_Bound
03ba 7022       |p"  |		Jump_Nonzero	0x3dd
03bb 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xe.0xd = 0x3bb,0x7
03bc e403       |    |		Load	0x2,0x3
03bd e404       |    |		Load	0x2,0x4
03be 4800       |H   |		Short_Literal	0x0
03bf e002       |    |		Load	0x0,0x2
03c0 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
03c1 00d2       |    |		Pop_Control	Pop_Count_2
03c2 c402       |    |		Store	0x2,0x2
03c3 e402       |    |		Load	0x2,0x2								; Debug Table 0xe.0xe = 0x3c3,0x8
03c4 7012       |p   |		Jump_Nonzero	0x3d7
03c5 e21e       |    |		Load	0x1,0x1e							; Debug Table 0xe.0xf = 0x3c5,0x9
03c6 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xe.0x10 = 0x3c6,0xc01
03c7 00d9       |    |		Load_Top	At_Offset_1
03c8 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x11 = 0x3c8,0x1001
03c9 0227       | '  |		Execute	Access,All_Reference
03ca 0335       | 5  |		Declare_Variable	Array,Duplicate
03cb 00d0       |    |		Action	Swap_Control
03cc 00d1       |    |		Pop_Control	Pop_Count_1
03cd 00d0       |    |		Action	Swap_Control
03ce 00d1       |    |		Pop_Control	Pop_Count_1
03cf e005       |    |		Load	0x0,0x5								; Debug Table 0xe.0x12 = 0x3cf,0xc01
03d0 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03d1 00d1       |    |		Pop_Control	Pop_Count_1
03d2 4800       |H   |		Short_Literal	0x0							; Debug Table 0xe.0x13 = 0x3d2,0xc02
03d3 e5fd       |    |		Load	0x2,-0x3
03d4 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
03d5 00d1       |    |		Pop_Control	Pop_Count_1
03d6 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0xe.0x14 = 0x3d6,0xa
03d7 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xe.0x15 = 0x3d7,0xb
03d8 e5fd       |    |		Load	0x2,-0x3
03d9 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
03da 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
03db 00c8       |    |		Action	Pop_Auxiliary_Range
03dc 3fde       |?   |		Loop_Increasing	0x3bb
03dd 00ce       |    |		Action	Pop_Auxiliary
03de 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03df			TRAP_0388:
03df 010e       |    |		Execute	Exception,Is_Constraint_Error
03e0 6811       |h   |		Jump_Zero	0x3f2
03e1 e21e       |    |		Load	0x1,0x1e							; Debug Table 0xe.0x16 = 0x3e1,0xc
03e2 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xe.0x17 = 0x3e2,0x1401
03e3 00d9       |    |		Load_Top	At_Offset_1
03e4 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x18 = 0x3e4,0x1801
03e5 0227       | '  |		Execute	Access,All_Reference
03e6 0335       | 5  |		Declare_Variable	Array,Duplicate
03e7 00d0       |    |		Action	Swap_Control
03e8 00d1       |    |		Pop_Control	Pop_Count_1
03e9 00d0       |    |		Action	Swap_Control
03ea 00d1       |    |		Pop_Control	Pop_Count_1
03eb e005       |    |		Load	0x0,0x5								; Debug Table 0xe.0x19 = 0x3eb,0x1401
03ec 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03ed 00d1       |    |		Pop_Control	Pop_Count_1
03ee 4800       |H   |		Short_Literal	0x0							; Debug Table 0xe.0x1a = 0x3ee,0x1402
03ef e5fd       |    |		Load	0x2,-0x3
03f0 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
03f1 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03f2 0100       |    |		Execute	Exception,Raise
03f3 0000 0000  |    |		.BLANK	0000[0x5]
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 03fd       |    |		.CONST	0x03fd								; Address of begin
03f9 0004       |    |		.CONST	0x0004								; Address of exception handler
03fa 0003       |    |		.CONST	0x0003								; Number of locals
03fb			INIT_03f8:
03fb 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0xf = .DEBUG	0x03fb,0x0836,0x0001,0x0000,0x0059,0x8c05,0x0000,0x00da
													; Debug Table 0xf.0x0 = 0x3fb,0xffff
03fc 03e9       |    |		Declare_Variable	Discrete,Duplicate
03fd			BODY_03f8:
03fd e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xf.0x1 = 0x3fd,0x1
03fe 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
03ff 2602       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
0400 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0401 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0402 e5ff       |    |		Load	0x2,-0x1
0403 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
0404 2602       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
0405 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0406 e002       |    |		Load	0x0,0x2
0407 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0408 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0409 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xf.0x2 = 0x409,0x2
040a 6189       |a   |		Indirect_Literal	Discrete,0x594,{0x00000000, 0x7fffffff}
040b 027e       | ~  |		Execute	Discrete,Not_Equal
040c 680e       |h   |		Jump_Zero	0x41b
040d e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xf.0x3 = 0x40d,0x3
040e 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
040f 00d8       |    |		Load_Top	At_Offset_0
0410 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
0411 00d8       |    |		Load_Top	At_Offset_0
0412 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0413 e402       |    |		Load	0x2,0x2
0414 0a03       |    |		Execute_Immediate	Plus,0x3
0415 00d9       |    |		Load_Top	At_Offset_1
0416 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0417 00d1       |    |		Pop_Control	Pop_Count_1
0418 00d0       |    |		Action	Swap_Control
0419 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
041a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
041b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xf.0x4 = 0x41b,0x4
041c 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
041d 2602       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
041e e003       |    |		Load	0x0,0x3
041f 184e       | N  |		Execute	Package,Field_Execute,Field_Number 0x4e
0420 e5ff       |    |		Load	0x2,-0x1
0421 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
0422 2602       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
0423 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0424 e003       |    |		Load	0x0,0x3
0425 183c       | <  |		Execute	Package,Field_Execute,Field_Number 0x3c
0426 e006       |    |		Load	0x0,0x6
0427 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0428 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0429 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xf.0x5 = 0x429,0x5
042a 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
042b 00d8       |    |		Load_Top	At_Offset_0
042c 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
042d 00d8       |    |		Load_Top	At_Offset_0
042e 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
042f e402       |    |		Load	0x2,0x2
0430 00d9       |    |		Load_Top	At_Offset_1
0431 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0432 00d1       |    |		Pop_Control	Pop_Count_1
0433 00d0       |    |		Action	Swap_Control
0434 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
0435 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xf.0x6 = 0x435,0x6
0436 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0437 00d8       |    |		Load_Top	At_Offset_0
0438 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
0439 00d8       |    |		Load_Top	At_Offset_0
043a 00d8       |    |		Load_Top	At_Offset_0
043b 0092 059a  |    |		Action	Push_String_Extended,0x59a					; " -- "
043d e007       |    |		Load	0x0,0x7
043e 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
043f 00d2       |    |		Pop_Control	Pop_Count_2
0440 00d0       |    |		Action	Swap_Control
0441 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
0442 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0443 0000 0000  |    |		.BLANK	0000[0x5]
0448 ; --------------------------------------------------------------------------------------
0448 ; SUBPROGRAM
0448 ; --------------------------------------------------------------------------------------
0448 0458       | X  |		.CONST	0x0458								; Address of begin
0449 0004       |    |		.CONST	0x0004								; Address of exception handler
044a 0005       |    |		.CONST	0x0005								; Number of locals
044b			INIT_0448:
044b 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x10 = .DEBUG	0x044b,0x0846,0x0001,0x0000,0x0059,0x8c05,0x0000,0x00e4
													; Debug Table 0x10.0x0 = 0x44b,0xffff
044c e003       |    |		Load	0x0,0x3								; Debug Table 0x10.0x1 = 0x44c,0xfffe
044d 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
044e 0322       | "  |		Declare_Variable	Record
044f 00d8       |    |		Load_Top	At_Offset_0
0450 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0451 e003       |    |		Load	0x0,0x3
0452 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0453 0322       | "  |		Declare_Variable	Record
0454 00d8       |    |		Load_Top	At_Offset_0
0455 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0456 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x10.0x2 = 0x456,0xfffd
0457 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
0458			BODY_0448:
0458 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x10.0x3 = 0x458,0x1
0459 00db       |    |		Load_Top	At_Offset_3
045a 00e1       |    |		Load_Encached	Boolean_Cache
045b e5ff       |    |		Load	0x2,-0x1
045c e008       |    |		Load	0x0,0x8
045d 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
045e c402       |    |		Store	0x2,0x2
045f 00d2       |    |		Pop_Control	Pop_Count_2
0460 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x10.0x4 = 0x460,0x2
0461 6810       |h   |		Jump_Zero	0x472
0462 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x10.0x5 = 0x462,0x3
0463 2602       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
0464 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0465 00db       |    |		Load_Top	At_Offset_3
0466 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0467 012e       | .  |		Execute	Any,Not_Equal
0468 6806       |h   |		Jump_Zero	0x46f
0469 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x10.0x6 = 0x469,0x4
046a 4801       |H   |		Short_Literal	0x1
046b e403       |    |		Load	0x2,0x3
046c e009       |    |		Load	0x0,0x9
046d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
046e 00d1       |    |		Pop_Control	Pop_Count_1
046f 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0x7 = 0x46f,0x5
0470 00d9       |    |		Load_Top	At_Offset_1
0471 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
0472 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0473 0000 0000  |    |		.BLANK	0000[0x5]
0478 ; --------------------------------------------------------------------------------------
0478 ; SUBPROGRAM
0478 ; --------------------------------------------------------------------------------------
0478 0488       |    |		.CONST	0x0488								; Address of begin
0479 0004       |    |		.CONST	0x0004								; Address of exception handler
047a 0005       |    |		.CONST	0x0005								; Number of locals
047b			INIT_0478:
047b 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x11 = .DEBUG	0x047b,0x0858,0x0001,0x0000,0x0059,0x8c05,0x0000,0x00f4
													; Debug Table 0x11.0x0 = 0x47b,0xffff
047c e003       |    |		Load	0x0,0x3								; Debug Table 0x11.0x1 = 0x47c,0xfffe
047d 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
047e 0322       | "  |		Declare_Variable	Record
047f 00d8       |    |		Load_Top	At_Offset_0
0480 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0481 e003       |    |		Load	0x0,0x3
0482 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0483 0322       | "  |		Declare_Variable	Record
0484 00d8       |    |		Load_Top	At_Offset_0
0485 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0486 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x11.0x2 = 0x486,0xfffd
0487 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
0488			BODY_0478:
0488 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x11.0x3 = 0x488,0x1
0489 00db       |    |		Load_Top	At_Offset_3
048a 00e1       |    |		Load_Encached	Boolean_Cache
048b e5ff       |    |		Load	0x2,-0x1
048c e008       |    |		Load	0x0,0x8
048d 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
048e c402       |    |		Store	0x2,0x2
048f 00d2       |    |		Pop_Control	Pop_Count_2
0490 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x11.0x4 = 0x490,0x2
0491 6810       |h   |		Jump_Zero	0x4a2
0492 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x5 = 0x492,0x3
0493 2602       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
0494 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0495 00da       |    |		Load_Top	At_Offset_2
0496 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0497 012e       | .  |		Execute	Any,Not_Equal
0498 6806       |h   |		Jump_Zero	0x49f
0499 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x11.0x6 = 0x499,0x4
049a 4801       |H   |		Short_Literal	0x1
049b 00db       |    |		Load_Top	At_Offset_3
049c e009       |    |		Load	0x0,0x9
049d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
049e 00d1       |    |		Pop_Control	Pop_Count_1
049f 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x11.0x7 = 0x49f,0x5
04a0 00d9       |    |		Load_Top	At_Offset_1
04a1 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
04a2 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
04a3 0000 0000  |    |		.BLANK	0000[0x5]
04a8 ; --------------------------------------------------------------------------------------
04a8 ; SUBPROGRAM
04a8 ; --------------------------------------------------------------------------------------
04a8 04b7       |    |		.CONST	0x04b7								; Address of begin
04a9 0516       |    |		.CONST	0x0516								; Address of exception handler
04aa 0006       |    |		.CONST	0x0006								; Number of locals
04ab			INIT_04a8:
04ab e00a       |    |		Load	0x0,0xa								; Debug Table 0x12 = .DEBUG	0x04ab,0x086a,0x0004,0x0000,0x0059,0x8ed5,0x0000,0x02f5
													; Debug Table 0x12.0x0 = 0x4ab,0xffff
04ac 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
04ad 02c7       |    |		Declare_Variable	Any
04ae 00d8       |    |		Load_Top	At_Offset_0
04af 1c00       |    |		Execute_Immediate	Run_Utility,0x0
04b0 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x12.0x1 = 0x4b0,0xfffe
04b1 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x12.0x2 = 0x4b1,0xfffd
04b2 e003       |    |		Load	0x0,0x3								; Debug Table 0x12.0x3 = 0x4b2,0xfffc
04b3 1b36       | 6  |		Execute	Package,Field_Read,Field_Number 0x36
04b4 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
04b5 e00b       |    |		Load	0x0,0xb								; Debug Table 0x12.0x4 = 0x4b5,0xfffb
04b6 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
04b7			BODY_04a8:
04b7 e00b       |    |		Load	0x0,0xb								; Debug Table 0x12.0x5 = 0x4b7,0x1
04b8 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
04b9 e003       |    |		Load	0x0,0x3
04ba 1b36       | 6  |		Execute	Package,Field_Read,Field_Number 0x36
04bb 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
04bc e602       |    |		Load	0x3,0x2
04bd 0120       |    |		Execute	Any,Is_Value
04be 6803       |h   |		Jump_Zero	0x4c2
04bf e00a       |    |		Load	0x0,0xa
04c0 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
04c1 7801       |x   |		Jump	0x4c3
04c2 e602       |    |		Load	0x3,0x2
04c3 4800       |H   |		Short_Literal	0x0
04c4 e405       |    |		Load	0x2,0x5
04c5 e003       |    |		Load	0x0,0x3
04c6 1863       | c  |		Execute	Package,Field_Execute,Field_Number 0x63
04c7 c602       |    |		Store	0x3,0x2
04c8 005b       | [  |		Store_Top	Discrete,At_Offset_3
04c9 0059       | Y  |		Store_Top	Discrete,At_Offset_1
04ca 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0x6 = 0x4ca,0x2
04cb 7045       |pE  |		Jump_Nonzero	0x511
04cc 00cf       |    |		Action	Mark_Auxiliary
04cd e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x12.0x7 = 0x4cd,0x3
04ce 4801       |H   |		Short_Literal	0x1
04cf 0263       | c  |		Execute	Discrete,Above_Bound
04d0 703b       |p;  |		Jump_Nonzero	0x50c
04d1 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x12.0x8 = 0x4d1,0x4
04d2 00e3       |    |		Load_Encached	Natural_Cache
04d3 e404       |    |		Load	0x2,0x4
04d4 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
04d5 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
04d6 e404       |    |		Load	0x2,0x4
04d7 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
04d8 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
04d9 e602       |    |		Load	0x3,0x2
04da e00a       |    |		Load	0x0,0xa
04db 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
04dc c603       |    |		Store	0x3,0x3
04dd c604       |    |		Store	0x3,0x4
04de e603       |    |		Load	0x3,0x3								; Debug Table 0x12.0x9 = 0x4de,0x5
04df 0f00       |    |		Execute_Immediate	Equal,0x0
04e0 e604       |    |		Load	0x3,0x4
04e1 0f00       |    |		Execute_Immediate	Equal,0x0
04e2 0279       | y  |		Execute	Discrete,And
04e3 6813       |h   |		Jump_Zero	0x4f7
04e4 e21e       |    |		Load	0x1,0x1e							; Debug Table 0x12.0xa = 0x4e4,0x6
04e5 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x12.0xb = 0x4e5,0x401
04e6 00d9       |    |		Load_Top	At_Offset_1
04e7 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0xc = 0x4e7,0x801
04e8 0227       | '  |		Execute	Access,All_Reference
04e9 0335       | 5  |		Declare_Variable	Array,Duplicate
04ea 00d0       |    |		Action	Swap_Control
04eb 00d1       |    |		Pop_Control	Pop_Count_1
04ec 00d0       |    |		Action	Swap_Control
04ed 00d1       |    |		Pop_Control	Pop_Count_1
04ee e005       |    |		Load	0x0,0x5								; Debug Table 0x12.0xd = 0x4ee,0x401
04ef 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04f0 00d1       |    |		Pop_Control	Pop_Count_1
04f1 4800       |H   |		Short_Literal	0x0							; Debug Table 0x12.0xe = 0x4f1,0x402
04f2 e5fc       |    |		Load	0x2,-0x4
04f3 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
04f4 00d1       |    |		Pop_Control	Pop_Count_1
04f5 00d2       |    |		Pop_Control	Pop_Count_2						; Debug Table 0x12.0xf = 0x4f5,0x7
04f6 7815       |x   |		Jump	0x50c
04f7 e003       |    |		Load	0x0,0x3								; Debug Table 0x12.0x10 = 0x4f7,0x8
04f8 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
04f9 0322       | "  |		Declare_Variable	Record
04fa e405       |    |		Load	0x2,0x5
04fb e003       |    |		Load	0x0,0x3
04fc 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
04fd 0119       |    |		Execute	Any,Check_In_Formal_Type
04fe 00d9       |    |		Load_Top	At_Offset_1
04ff 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0500 00d8       |    |		Load_Top	At_Offset_0
0501 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0502 e603       |    |		Load	0x3,0x3
0503 00d9       |    |		Load_Top	At_Offset_1
0504 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0505 e604       |    |		Load	0x3,0x4
0506 00d0       |    |		Action	Swap_Control
0507 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0508 e404       |    |		Load	0x2,0x4
0509 017d       | }  |		Execute	Record,Structure_Write
050a 00c8       |    |		Action	Pop_Auxiliary_Range
050b 3fc5       |?   |		Loop_Increasing	0x4d1
050c 00ce       |    |		Action	Pop_Auxiliary
050d e404       |    |		Load	0x2,0x4								; Debug Table 0x12.0x11 = 0x50d,0x9
050e e5fc       |    |		Load	0x2,-0x4
050f 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
0510 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
0511 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x12.0x12 = 0x511,0xa
0512 e405       |    |		Load	0x2,0x5
0513 e003       |    |		Load	0x0,0x3
0514 1865       | e  |		Execute	Package,Field_Execute,Field_Number 0x65
0515 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0516			TRAP_04a8:
0516 0007       |    |		Action	Break_Optional
0517 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x12.0x13 = 0x517,0xb
0518 e405       |    |		Load	0x2,0x5
0519 e003       |    |		Load	0x0,0x3
051a 1865       | e  |		Execute	Package,Field_Execute,Field_Number 0x65
051b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
051c 0000 0000  |    |		.BLANK	0000[0x4]
0520 ; --------------------------------------------------------------------------------------
0520 ; SUBPROGRAM
0520 ; --------------------------------------------------------------------------------------
0520 052f       | /  |		.CONST	0x052f								; Address of begin
0521 058e       |    |		.CONST	0x058e								; Address of exception handler
0522 0006       |    |		.CONST	0x0006								; Number of locals
0523			INIT_0520:
0523 e00a       |    |		Load	0x0,0xa								; Debug Table 0x13 = .DEBUG	0x0523,0x0894,0x0004,0x0000,0x0059,0x8ed5,0x0000,0x042c
													; Debug Table 0x13.0x0 = 0x523,0xffff
0524 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0525 02c7       |    |		Declare_Variable	Any
0526 00d8       |    |		Load_Top	At_Offset_0
0527 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0528 e003       |    |		Load	0x0,0x3								; Debug Table 0x13.0x1 = 0x528,0xfffe
0529 1b36       | 6  |		Execute	Package,Field_Read,Field_Number 0x36
052a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
052b e00b       |    |		Load	0x0,0xb								; Debug Table 0x13.0x2 = 0x52b,0xfffd
052c 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
052d 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x13.0x3 = 0x52d,0xfffc
052e 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x13.0x4 = 0x52e,0xfffb
052f			BODY_0520:
052f e00b       |    |		Load	0x0,0xb								; Debug Table 0x13.0x5 = 0x52f,0x1
0530 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0531 e003       |    |		Load	0x0,0x3
0532 1b36       | 6  |		Execute	Package,Field_Read,Field_Number 0x36
0533 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0534 e602       |    |		Load	0x3,0x2
0535 0120       |    |		Execute	Any,Is_Value
0536 6803       |h   |		Jump_Zero	0x53a
0537 e00a       |    |		Load	0x0,0xa
0538 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0539 7801       |x   |		Jump	0x53b
053a e602       |    |		Load	0x3,0x2
053b 4800       |H   |		Short_Literal	0x0
053c e405       |    |		Load	0x2,0x5
053d e003       |    |		Load	0x0,0x3
053e 1863       | c  |		Execute	Package,Field_Execute,Field_Number 0x63
053f c602       |    |		Store	0x3,0x2
0540 c603       |    |		Store	0x3,0x3
0541 005b       | [  |		Store_Top	Discrete,At_Offset_3
0542 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x13.0x6 = 0x542,0x2
0543 7045       |pE  |		Jump_Nonzero	0x589
0544 00cf       |    |		Action	Mark_Auxiliary
0545 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x13.0x7 = 0x545,0x3
0546 4801       |H   |		Short_Literal	0x1
0547 0263       | c  |		Execute	Discrete,Above_Bound
0548 703b       |p;  |		Jump_Nonzero	0x584
0549 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x13.0x8 = 0x549,0x4
054a 00e3       |    |		Load_Encached	Natural_Cache
054b e404       |    |		Load	0x2,0x4
054c 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
054d 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
054e e404       |    |		Load	0x2,0x4
054f 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0550 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0551 e602       |    |		Load	0x3,0x2
0552 e00a       |    |		Load	0x0,0xa
0553 184a       | J  |		Execute	Package,Field_Execute,Field_Number 0x4a
0554 c605       |    |		Store	0x3,0x5
0555 c606       |    |		Store	0x3,0x6
0556 e605       |    |		Load	0x3,0x5								; Debug Table 0x13.0x9 = 0x556,0x5
0557 0f00       |    |		Execute_Immediate	Equal,0x0
0558 e606       |    |		Load	0x3,0x6
0559 0f00       |    |		Execute_Immediate	Equal,0x0
055a 0279       | y  |		Execute	Discrete,And
055b 6813       |h   |		Jump_Zero	0x56f
055c e21e       |    |		Load	0x1,0x1e							; Debug Table 0x13.0xa = 0x55c,0x6
055d e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x13.0xb = 0x55d,0x401
055e 00d9       |    |		Load_Top	At_Offset_1
055f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x13.0xc = 0x55f,0x801
0560 0227       | '  |		Execute	Access,All_Reference
0561 0335       | 5  |		Declare_Variable	Array,Duplicate
0562 00d0       |    |		Action	Swap_Control
0563 00d1       |    |		Pop_Control	Pop_Count_1
0564 00d0       |    |		Action	Swap_Control
0565 00d1       |    |		Pop_Control	Pop_Count_1
0566 e005       |    |		Load	0x0,0x5								; Debug Table 0x13.0xd = 0x566,0x401
0567 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0568 00d1       |    |		Pop_Control	Pop_Count_1
0569 4800       |H   |		Short_Literal	0x0							; Debug Table 0x13.0xe = 0x569,0x402
056a e5fc       |    |		Load	0x2,-0x4
056b 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
056c 00d1       |    |		Pop_Control	Pop_Count_1
056d 00d2       |    |		Pop_Control	Pop_Count_2						; Debug Table 0x13.0xf = 0x56d,0x7
056e 7815       |x   |		Jump	0x584
056f e003       |    |		Load	0x0,0x3								; Debug Table 0x13.0x10 = 0x56f,0x8
0570 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0571 0322       | "  |		Declare_Variable	Record
0572 e405       |    |		Load	0x2,0x5
0573 e003       |    |		Load	0x0,0x3
0574 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0575 0119       |    |		Execute	Any,Check_In_Formal_Type
0576 00d9       |    |		Load_Top	At_Offset_1
0577 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0578 00d8       |    |		Load_Top	At_Offset_0
0579 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
057a e605       |    |		Load	0x3,0x5
057b 00d9       |    |		Load_Top	At_Offset_1
057c 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
057d e606       |    |		Load	0x3,0x6
057e 00d0       |    |		Action	Swap_Control
057f 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0580 e404       |    |		Load	0x2,0x4
0581 017d       | }  |		Execute	Record,Structure_Write
0582 00c8       |    |		Action	Pop_Auxiliary_Range
0583 3fc5       |?   |		Loop_Increasing	0x549
0584 00ce       |    |		Action	Pop_Auxiliary
0585 e404       |    |		Load	0x2,0x4								; Debug Table 0x13.0x11 = 0x585,0x9
0586 e5fc       |    |		Load	0x2,-0x4
0587 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
0588 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
0589 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x13.0x12 = 0x589,0xa
058a e405       |    |		Load	0x2,0x5
058b e003       |    |		Load	0x0,0x3
058c 1865       | e  |		Execute	Package,Field_Execute,Field_Number 0x65
058d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
058e			TRAP_0520:
058e 0007       |    |		Action	Break_Optional
058f e603       |    |		Load	0x3,0x3								; Debug Table 0x13.0x13 = 0x58f,0xb
0590 e405       |    |		Load	0x2,0x5
0591 e003       |    |		Load	0x0,0x3
0592 1865       | e  |		Execute	Package,Field_Execute,Field_Number 0x65
0593 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0594 0000 0000  |    |		.LITERAL	{0x00000000, 0x7fffffff}
0598 ; --------------------------------------------------------------------------------------
0598 ; STRING TABLE
0598 ; --------------------------------------------------------------------------------------
0598 0008       |    |		.STRTAB	0x0008->0x059c							; "Unexpected."
0599 0011       |    |		.STRTAB	0x0011->0x05a1							; "Not found."
059a 0019       |    |		.STRTAB	0x0019->0x05a6							; " -- "
059b 001b       |    |		.STREND 0x001b->0x05a8
059c 556e 6578  |Unex|		.STRTAB_STRINGS
05a9 0000 0000  |    |		.BLANK	0000[0x7]
05b0 ; --------------------------------------------------------------------------------------
05b0 ; Debug Table
05b0 ; --------------------------------------------------------------------------------------
05b0 0003 0014  |    |		.CONST	0x0003,0x0014
05b2 000b 0652  |   R|		.DEBUG	0x000b,0x0652,0x8000,0x0000,0x0059,0x8c05,0x0000,0x0008
05ba 002c 0674  | , t|		.DEBUG	0x002c,0x0674,0x8000,0x0000,0x0059,0x8ed5,0x0000,0x0019
05c2 006b 06aa  | k  |		.DEBUG	0x006b,0x06aa,0x0001,0x0000,0x0059,0x8c05,0x0000,0x0009
05ca 009b 06b4  |    |		.DEBUG	0x009b,0x06b4,0x0001,0x0000,0x0059,0x8c05,0x0000,0x0018
05d2 00b3 06ba  |    |		.DEBUG	0x00b3,0x06ba,0x0001,0x0000,0x0059,0x8c05,0x0000,0x0022
05da 00cb 06c0  |    |		.DEBUG	0x00cb,0x06c0,0x0001,0x0000,0x0059,0x8c05,0x0000,0x002c
05e2 0103 06ca  |    |		.DEBUG	0x0103,0x06ca,0x0001,0x0000,0x0059,0x8c05,0x0000,0x003b
05ea 013b 06d4  | ;  |		.DEBUG	0x013b,0x06d4,0x0001,0x0000,0x0059,0x8c05,0x0000,0x004a
05f2 0173 06f0  | s  |		.DEBUG	0x0173,0x06f0,0x0001,0x0000,0x0059,0x8c05,0x0000,0x0054
05fa 01ab 070c  |    |		.DEBUG	0x01ab,0x070c,0x0001,0x0000,0x0059,0x8c05,0x0000,0x005e
0602 021b 0746  |   F|		.DEBUG	0x021b,0x0746,0x0001,0x0000,0x0059,0x8c05,0x0000,0x0077
060a 028b 0782  |    |		.DEBUG	0x028b,0x0782,0x0001,0x0000,0x0059,0x8c05,0x0000,0x0090
0612 02d3 07a4  |    |		.DEBUG	0x02d3,0x07a4,0x0001,0x0000,0x0059,0x8c05,0x0000,0x00a0
061a 031b 07c6  |    |		.DEBUG	0x031b,0x07c6,0x0001,0x0000,0x0059,0x8c05,0x0000,0x00b0
0622 038b 07fe  |    |		.DEBUG	0x038b,0x07fe,0x0001,0x0000,0x0059,0x8c05,0x0000,0x00c5
062a 03fb 0836  |   6|		.DEBUG	0x03fb,0x0836,0x0001,0x0000,0x0059,0x8c05,0x0000,0x00da
0632 044b 0846  | K F|		.DEBUG	0x044b,0x0846,0x0001,0x0000,0x0059,0x8c05,0x0000,0x00e4
063a 047b 0858  | { X|		.DEBUG	0x047b,0x0858,0x0001,0x0000,0x0059,0x8c05,0x0000,0x00f4
0642 04ab 086a  |   j|		.DEBUG	0x04ab,0x086a,0x0004,0x0000,0x0059,0x8ed5,0x0000,0x02f5
064a 0523 0894  | #  |		.DEBUG	0x0523,0x0894,0x0004,0x0000,0x0059,0x8ed5,0x0000,0x042c
0652 ; --------------------------------------------------------------------------------------
0652 ; Debug3 Subtable 0x0
0652 ; --------------------------------------------------------------------------------------
0652 0010 0000  |    |		.DBG3TAB	0x0010,0x0000
0654 000b ffff  |    |		.CONST	0x000b,0xffff
0656 000d fffe  |    |		.CONST	0x000d,0xfffe
0658 000f fffd  |    |		.CONST	0x000f,0xfffd
065a 0011 fffc  |    |		.CONST	0x0011,0xfffc
065c 0013 fffb  |    |		.CONST	0x0013,0xfffb
065e 0015 fffa  |    |		.CONST	0x0015,0xfffa
0660 0017 fff9  |    |		.CONST	0x0017,0xfff9
0662 0019 fff8  |    |		.CONST	0x0019,0xfff8
0664 001b fff7  |    |		.CONST	0x001b,0xfff7
0666 001d fff6  |    |		.CONST	0x001d,0xfff6
0668 001f fff5  |    |		.CONST	0x001f,0xfff5
066a 0021 fff4  | !  |		.CONST	0x0021,0xfff4
066c 0023 fff3  | #  |		.CONST	0x0023,0xfff3
066e 0025 fff2  | %  |		.CONST	0x0025,0xfff2
0670 0027 fff1  | '  |		.CONST	0x0027,0xfff1
0672 0029 fff0  | )  |		.CONST	0x0029,0xfff0
0674 ; --------------------------------------------------------------------------------------
0674 ; Debug3 Subtable 0x1
0674 ; --------------------------------------------------------------------------------------
0674 0014 0006  |    |		.DBG3TAB	0x0014,0x0006
0676 002c ffff  | ,  |		.CONST	0x002c,0xffff
0678 002c fffe  | ,  |		.CONST	0x002c,0xfffe
067a 002e fffd  | .  |		.CONST	0x002e,0xfffd
067c 0030 fffc  | 0  |		.CONST	0x0030,0xfffc
067e 0030 fffb  | 0  |		.CONST	0x0030,0xfffb
0680 0032 fffa  | 2  |		.CONST	0x0032,0xfffa
0682 0034 fff9  | 4  |		.CONST	0x0034,0xfff9
0684 0036 fff8  | 6  |		.CONST	0x0036,0xfff8
0686 0038 fff7  | 8  |		.CONST	0x0038,0xfff7
0688 003a fff6  | :  |		.CONST	0x003a,0xfff6
068a 003c fff5  | <  |		.CONST	0x003c,0xfff5
068c 003e fff4  | >  |		.CONST	0x003e,0xfff4
068e 0040 fff3  | @  |		.CONST	0x0040,0xfff3
0690 0042 fff2  | B  |		.CONST	0x0042,0xfff2
0692 0044 fff1  | D  |		.CONST	0x0044,0xfff1
0694 0046 fff0  | F  |		.CONST	0x0046,0xfff0
0696 0048 ffef  | H  |		.CONST	0x0048,0xffef
0698 004a ffee  | J  |		.CONST	0x004a,0xffee
069a 004c ffed  | L  |		.CONST	0x004c,0xffed
069c 004e ffec  | N  |		.CONST	0x004e,0xffec
069e 0050 0001  | P  |		.CONST	0x0050,0x0001
06a0 0052 0401  | R  |		.CONST	0x0052,0x0401
06a2 0058 0001  | X  |		.CONST	0x0058,0x0001
06a4 0059 0002  | Y  |		.CONST	0x0059,0x0002
06a6 005b 0801  | [  |		.CONST	0x005b,0x0801
06a8 0061 0002  | a  |		.CONST	0x0061,0x0002
06aa ; --------------------------------------------------------------------------------------
06aa ; Debug3 Subtable 0x2
06aa ; --------------------------------------------------------------------------------------
06aa 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
06ac 006b 0001  | k  |		.CONST	0x006b,0x0001
06ae 006e 0002  | n  |		.CONST	0x006e,0x0002
06b0 007d 0003  | }  |		.CONST	0x007d,0x0003
06b2 008f 0004  |    |		.CONST	0x008f,0x0004
06b4 ; --------------------------------------------------------------------------------------
06b4 ; Debug3 Subtable 0x3
06b4 ; --------------------------------------------------------------------------------------
06b4 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
06b6 009b 0001  |    |		.CONST	0x009b,0x0001
06b8 00ad 0002  |    |		.CONST	0x00ad,0x0002
06ba ; --------------------------------------------------------------------------------------
06ba ; Debug3 Subtable 0x4
06ba ; --------------------------------------------------------------------------------------
06ba 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
06bc 00b3 0001  |    |		.CONST	0x00b3,0x0001
06be 00c5 0002  |    |		.CONST	0x00c5,0x0002
06c0 ; --------------------------------------------------------------------------------------
06c0 ; Debug3 Subtable 0x5
06c0 ; --------------------------------------------------------------------------------------
06c0 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
06c2 00cb 0001  |    |		.CONST	0x00cb,0x0001
06c4 00ce 0002  |    |		.CONST	0x00ce,0x0002
06c6 00e2 0003  |    |		.CONST	0x00e2,0x0003
06c8 00f9 0004  |    |		.CONST	0x00f9,0x0004
06ca ; --------------------------------------------------------------------------------------
06ca ; Debug3 Subtable 0x6
06ca ; --------------------------------------------------------------------------------------
06ca 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
06cc 0103 0001  |    |		.CONST	0x0103,0x0001
06ce 0106 0002  |    |		.CONST	0x0106,0x0002
06d0 011a 0003  |    |		.CONST	0x011a,0x0003
06d2 0131 0004  | 1  |		.CONST	0x0131,0x0004
06d4 ; --------------------------------------------------------------------------------------
06d4 ; Debug3 Subtable 0x7
06d4 ; --------------------------------------------------------------------------------------
06d4 0002 000b  |    |		.DBG3TAB	0x0002,0x000b
06d6 013b ffff  | ;  |		.CONST	0x013b,0xffff
06d8 013e fffe  | >  |		.CONST	0x013e,0xfffe
06da 0146 0001  | F  |		.CONST	0x0146,0x0001
06dc 0147 0401  | G  |		.CONST	0x0147,0x0401
06de 0149 0801  | I  |		.CONST	0x0149,0x0801
06e0 0150 0401  | P  |		.CONST	0x0150,0x0401
06e2 0153 0402  | S  |		.CONST	0x0153,0x0402
06e4 0157 0002  | W  |		.CONST	0x0157,0x0002
06e6 015a 0005  | Z  |		.CONST	0x015a,0x0005
06e8 015b 0c01  | [  |		.CONST	0x015b,0x0c01
06ea 015d 1001  | ]  |		.CONST	0x015d,0x1001
06ec 0164 0c01  | d  |		.CONST	0x0164,0x0c01
06ee 0167 0c02  | g  |		.CONST	0x0167,0x0c02
06f0 ; --------------------------------------------------------------------------------------
06f0 ; Debug3 Subtable 0x8
06f0 ; --------------------------------------------------------------------------------------
06f0 0002 000b  |    |		.DBG3TAB	0x0002,0x000b
06f2 0173 ffff  | s  |		.CONST	0x0173,0xffff
06f4 0176 fffe  | v  |		.CONST	0x0176,0xfffe
06f6 017e 0001  | ~  |		.CONST	0x017e,0x0001
06f8 017f 0401  |    |		.CONST	0x017f,0x0401
06fa 0181 0801  |    |		.CONST	0x0181,0x0801
06fc 0188 0401  |    |		.CONST	0x0188,0x0401
06fe 018b 0402  |    |		.CONST	0x018b,0x0402
0700 018f 0002  |    |		.CONST	0x018f,0x0002
0702 0192 0005  |    |		.CONST	0x0192,0x0005
0704 0193 0c01  |    |		.CONST	0x0193,0x0c01
0706 0195 1001  |    |		.CONST	0x0195,0x1001
0708 019c 0c01  |    |		.CONST	0x019c,0x0c01
070a 019f 0c02  |    |		.CONST	0x019f,0x0c02
070c ; --------------------------------------------------------------------------------------
070c ; Debug3 Subtable 0x9
070c ; --------------------------------------------------------------------------------------
070c 0005 0017  |    |		.DBG3TAB	0x0005,0x0017
070e 01ab ffff  |    |		.CONST	0x01ab,0xffff
0710 01ad fffe  |    |		.CONST	0x01ad,0xfffe
0712 01ae fffd  |    |		.CONST	0x01ae,0xfffd
0714 01b6 fffc  |    |		.CONST	0x01b6,0xfffc
0716 01b8 fffb  |    |		.CONST	0x01b8,0xfffb
0718 01bd 0001  |    |		.CONST	0x01bd,0x0001
071a 01c0 0002  |    |		.CONST	0x01c0,0x0002
071c 01c8 0003  |    |		.CONST	0x01c8,0x0003
071e 01ca 0004  |    |		.CONST	0x01ca,0x0004
0720 01ce 0006  |    |		.CONST	0x01ce,0x0006
0722 01d6 0007  |    |		.CONST	0x01d6,0x0007
0724 01d8 0008  |    |		.CONST	0x01d8,0x0008
0726 01d9 0401  |    |		.CONST	0x01d9,0x0401
0728 01db 0801  |    |		.CONST	0x01db,0x0801
072a 01e2 0401  |    |		.CONST	0x01e2,0x0401
072c 01e5 0402  |    |		.CONST	0x01e5,0x0402
072e 01e9 0009  |    |		.CONST	0x01e9,0x0009
0730 01ea 000a  |    |		.CONST	0x01ea,0x000a
0732 01ed 000b  |    |		.CONST	0x01ed,0x000b
0734 01f2 0005  |    |		.CONST	0x01f2,0x0005
0736 01f8 000c  |    |		.CONST	0x01f8,0x000c
0738 01fa 000d  |    |		.CONST	0x01fa,0x000d
073a 01fc 000e  |    |		.CONST	0x01fc,0x000e
073c 0204 000f  |    |		.CONST	0x0204,0x000f
073e 0205 0c01  |    |		.CONST	0x0205,0x0c01
0740 0207 1001  |    |		.CONST	0x0207,0x1001
0742 020e 0c01  |    |		.CONST	0x020e,0x0c01
0744 0211 0c02  |    |		.CONST	0x0211,0x0c02
0746 ; --------------------------------------------------------------------------------------
0746 ; Debug3 Subtable 0xa
0746 ; --------------------------------------------------------------------------------------
0746 0005 0018  |    |		.DBG3TAB	0x0005,0x0018
0748 021b ffff  |    |		.CONST	0x021b,0xffff
074a 021d fffe  |    |		.CONST	0x021d,0xfffe
074c 021e fffd  |    |		.CONST	0x021e,0xfffd
074e 0226 fffc  | &  |		.CONST	0x0226,0xfffc
0750 0228 fffb  | (  |		.CONST	0x0228,0xfffb
0752 022d 0001  | -  |		.CONST	0x022d,0x0001
0754 0230 0002  | 0  |		.CONST	0x0230,0x0002
0756 0238 0003  | 8  |		.CONST	0x0238,0x0003
0758 023a 0004  | :  |		.CONST	0x023a,0x0004
075a 023e 0006  | >  |		.CONST	0x023e,0x0006
075c 0246 0007  | F  |		.CONST	0x0246,0x0007
075e 0248 0008  | H  |		.CONST	0x0248,0x0008
0760 0249 0401  | I  |		.CONST	0x0249,0x0401
0762 024b 0801  | K  |		.CONST	0x024b,0x0801
0764 0252 0401  | R  |		.CONST	0x0252,0x0401
0766 0255 0402  | U  |		.CONST	0x0255,0x0402
0768 0259 0009  | Y  |		.CONST	0x0259,0x0009
076a 025a 000a  | Z  |		.CONST	0x025a,0x000a
076c 025d 000b  | ]  |		.CONST	0x025d,0x000b
076e 0262 0005  | b  |		.CONST	0x0262,0x0005
0770 0268 000c  | h  |		.CONST	0x0268,0x000c
0772 026a 000d  | j  |		.CONST	0x026a,0x000d
0774 026c 000e  | l  |		.CONST	0x026c,0x000e
0776 0271 000f  | q  |		.CONST	0x0271,0x000f
0778 0274 0010  | t  |		.CONST	0x0274,0x0010
077a 0275 0c01  | u  |		.CONST	0x0275,0x0c01
077c 0277 1001  | w  |		.CONST	0x0277,0x1001
077e 027e 0c01  | ~  |		.CONST	0x027e,0x0c01
0780 0281 0c02  |    |		.CONST	0x0281,0x0c02
0782 ; --------------------------------------------------------------------------------------
0782 ; Debug3 Subtable 0xb
0782 ; --------------------------------------------------------------------------------------
0782 0002 000e  |    |		.DBG3TAB	0x0002,0x000e
0784 028b ffff  |    |		.CONST	0x028b,0xffff
0786 0293 fffe  |    |		.CONST	0x0293,0xfffe
0788 0296 0001  |    |		.CONST	0x0296,0x0001
078a 0299 0002  |    |		.CONST	0x0299,0x0002
078c 029a 0401  |    |		.CONST	0x029a,0x0401
078e 029c 0801  |    |		.CONST	0x029c,0x0801
0790 02a3 0401  |    |		.CONST	0x02a3,0x0401
0792 02a6 0402  |    |		.CONST	0x02a6,0x0402
0794 02aa 0003  |    |		.CONST	0x02aa,0x0003
0796 02ab 0004  |    |		.CONST	0x02ab,0x0004
0798 02b0 0005  |    |		.CONST	0x02b0,0x0005
079a 02b7 0006  |    |		.CONST	0x02b7,0x0006
079c 02b8 0c01  |    |		.CONST	0x02b8,0x0c01
079e 02ba 1001  |    |		.CONST	0x02ba,0x1001
07a0 02c1 0c01  |    |		.CONST	0x02c1,0x0c01
07a2 02c4 0c02  |    |		.CONST	0x02c4,0x0c02
07a4 ; --------------------------------------------------------------------------------------
07a4 ; Debug3 Subtable 0xc
07a4 ; --------------------------------------------------------------------------------------
07a4 0002 000e  |    |		.DBG3TAB	0x0002,0x000e
07a6 02d3 ffff  |    |		.CONST	0x02d3,0xffff
07a8 02db fffe  |    |		.CONST	0x02db,0xfffe
07aa 02de 0001  |    |		.CONST	0x02de,0x0001
07ac 02e1 0002  |    |		.CONST	0x02e1,0x0002
07ae 02e2 0401  |    |		.CONST	0x02e2,0x0401
07b0 02e4 0801  |    |		.CONST	0x02e4,0x0801
07b2 02eb 0401  |    |		.CONST	0x02eb,0x0401
07b4 02ee 0402  |    |		.CONST	0x02ee,0x0402
07b6 02f2 0003  |    |		.CONST	0x02f2,0x0003
07b8 02f3 0004  |    |		.CONST	0x02f3,0x0004
07ba 02f8 0005  |    |		.CONST	0x02f8,0x0005
07bc 02ff 0006  |    |		.CONST	0x02ff,0x0006
07be 0300 0c01  |    |		.CONST	0x0300,0x0c01
07c0 0302 1001  |    |		.CONST	0x0302,0x1001
07c2 0309 0c01  |    |		.CONST	0x0309,0x0c01
07c4 030c 0c02  |    |		.CONST	0x030c,0x0c02
07c6 ; --------------------------------------------------------------------------------------
07c6 ; Debug3 Subtable 0xd
07c6 ; --------------------------------------------------------------------------------------
07c6 0003 0018  |    |		.DBG3TAB	0x0003,0x0018
07c8 031b ffff  |    |		.CONST	0x031b,0xffff
07ca 031c fffe  |    |		.CONST	0x031c,0xfffe
07cc 031f fffd  |    |		.CONST	0x031f,0xfffd
07ce 0327 0001  | '  |		.CONST	0x0327,0x0001
07d0 032a 0002  | *  |		.CONST	0x032a,0x0002
07d2 032b 0401  | +  |		.CONST	0x032b,0x0401
07d4 032d 0801  | -  |		.CONST	0x032d,0x0801
07d6 0334 0401  | 4  |		.CONST	0x0334,0x0401
07d8 0337 0402  | 7  |		.CONST	0x0337,0x0402
07da 033b 0003  | ;  |		.CONST	0x033b,0x0003
07dc 033c 0004  | <  |		.CONST	0x033c,0x0004
07de 033f 0005  | ?  |		.CONST	0x033f,0x0005
07e0 0347 0006  | G  |		.CONST	0x0347,0x0006
07e2 034b 0007  | K  |		.CONST	0x034b,0x0007
07e4 0353 0008  | S  |		.CONST	0x0353,0x0008
07e6 0355 0009  | U  |		.CONST	0x0355,0x0009
07e8 0356 0c01  | V  |		.CONST	0x0356,0x0c01
07ea 0358 1001  | X  |		.CONST	0x0358,0x1001
07ec 035f 0c01  | _  |		.CONST	0x035f,0x0c01
07ee 0362 0c02  | b  |		.CONST	0x0362,0x0c02
07f0 0366 000a  | f  |		.CONST	0x0366,0x000a
07f2 0367 000b  | g  |		.CONST	0x0367,0x000b
07f4 0371 000c  | q  |		.CONST	0x0371,0x000c
07f6 0372 1401  | r  |		.CONST	0x0372,0x1401
07f8 0374 1801  | t  |		.CONST	0x0374,0x1801
07fa 037b 1401  | {  |		.CONST	0x037b,0x1401
07fc 037e 1402  | ~  |		.CONST	0x037e,0x1402
07fe ; --------------------------------------------------------------------------------------
07fe ; Debug3 Subtable 0xe
07fe ; --------------------------------------------------------------------------------------
07fe 0003 0018  |    |		.DBG3TAB	0x0003,0x0018
0800 038b ffff  |    |		.CONST	0x038b,0xffff
0802 038c fffe  |    |		.CONST	0x038c,0xfffe
0804 038f fffd  |    |		.CONST	0x038f,0xfffd
0806 0397 0001  |    |		.CONST	0x0397,0x0001
0808 039a 0002  |    |		.CONST	0x039a,0x0002
080a 039b 0401  |    |		.CONST	0x039b,0x0401
080c 039d 0801  |    |		.CONST	0x039d,0x0801
080e 03a4 0401  |    |		.CONST	0x03a4,0x0401
0810 03a7 0402  |    |		.CONST	0x03a7,0x0402
0812 03ab 0003  |    |		.CONST	0x03ab,0x0003
0814 03ac 0004  |    |		.CONST	0x03ac,0x0004
0816 03af 0005  |    |		.CONST	0x03af,0x0005
0818 03b7 0006  |    |		.CONST	0x03b7,0x0006
081a 03bb 0007  |    |		.CONST	0x03bb,0x0007
081c 03c3 0008  |    |		.CONST	0x03c3,0x0008
081e 03c5 0009  |    |		.CONST	0x03c5,0x0009
0820 03c6 0c01  |    |		.CONST	0x03c6,0x0c01
0822 03c8 1001  |    |		.CONST	0x03c8,0x1001
0824 03cf 0c01  |    |		.CONST	0x03cf,0x0c01
0826 03d2 0c02  |    |		.CONST	0x03d2,0x0c02
0828 03d6 000a  |    |		.CONST	0x03d6,0x000a
082a 03d7 000b  |    |		.CONST	0x03d7,0x000b
082c 03e1 000c  |    |		.CONST	0x03e1,0x000c
082e 03e2 1401  |    |		.CONST	0x03e2,0x1401
0830 03e4 1801  |    |		.CONST	0x03e4,0x1801
0832 03eb 1401  |    |		.CONST	0x03eb,0x1401
0834 03ee 1402  |    |		.CONST	0x03ee,0x1402
0836 ; --------------------------------------------------------------------------------------
0836 ; Debug3 Subtable 0xf
0836 ; --------------------------------------------------------------------------------------
0836 0001 0006  |    |		.DBG3TAB	0x0001,0x0006
0838 03fb ffff  |    |		.CONST	0x03fb,0xffff
083a 03fd 0001  |    |		.CONST	0x03fd,0x0001
083c 0409 0002  |    |		.CONST	0x0409,0x0002
083e 040d 0003  |    |		.CONST	0x040d,0x0003
0840 041b 0004  |    |		.CONST	0x041b,0x0004
0842 0429 0005  | )  |		.CONST	0x0429,0x0005
0844 0435 0006  | 5  |		.CONST	0x0435,0x0006
0846 ; --------------------------------------------------------------------------------------
0846 ; Debug3 Subtable 0x10
0846 ; --------------------------------------------------------------------------------------
0846 0003 0005  |    |		.DBG3TAB	0x0003,0x0005
0848 044b ffff  | K  |		.CONST	0x044b,0xffff
084a 044c fffe  | L  |		.CONST	0x044c,0xfffe
084c 0456 fffd  | V  |		.CONST	0x0456,0xfffd
084e 0458 0001  | X  |		.CONST	0x0458,0x0001
0850 0460 0002  | `  |		.CONST	0x0460,0x0002
0852 0462 0003  | b  |		.CONST	0x0462,0x0003
0854 0469 0004  | i  |		.CONST	0x0469,0x0004
0856 046f 0005  | o  |		.CONST	0x046f,0x0005
0858 ; --------------------------------------------------------------------------------------
0858 ; Debug3 Subtable 0x11
0858 ; --------------------------------------------------------------------------------------
0858 0003 0005  |    |		.DBG3TAB	0x0003,0x0005
085a 047b ffff  | {  |		.CONST	0x047b,0xffff
085c 047c fffe  | |  |		.CONST	0x047c,0xfffe
085e 0486 fffd  |    |		.CONST	0x0486,0xfffd
0860 0488 0001  |    |		.CONST	0x0488,0x0001
0862 0490 0002  |    |		.CONST	0x0490,0x0002
0864 0492 0003  |    |		.CONST	0x0492,0x0003
0866 0499 0004  |    |		.CONST	0x0499,0x0004
0868 049f 0005  |    |		.CONST	0x049f,0x0005
086a ; --------------------------------------------------------------------------------------
086a ; Debug3 Subtable 0x12
086a ; --------------------------------------------------------------------------------------
086a 0005 000f  |    |		.DBG3TAB	0x0005,0x000f
086c 04ab ffff  |    |		.CONST	0x04ab,0xffff
086e 04b0 fffe  |    |		.CONST	0x04b0,0xfffe
0870 04b1 fffd  |    |		.CONST	0x04b1,0xfffd
0872 04b2 fffc  |    |		.CONST	0x04b2,0xfffc
0874 04b5 fffb  |    |		.CONST	0x04b5,0xfffb
0876 04b7 0001  |    |		.CONST	0x04b7,0x0001
0878 04ca 0002  |    |		.CONST	0x04ca,0x0002
087a 04cd 0003  |    |		.CONST	0x04cd,0x0003
087c 04d1 0004  |    |		.CONST	0x04d1,0x0004
087e 04de 0005  |    |		.CONST	0x04de,0x0005
0880 04e4 0006  |    |		.CONST	0x04e4,0x0006
0882 04e5 0401  |    |		.CONST	0x04e5,0x0401
0884 04e7 0801  |    |		.CONST	0x04e7,0x0801
0886 04ee 0401  |    |		.CONST	0x04ee,0x0401
0888 04f1 0402  |    |		.CONST	0x04f1,0x0402
088a 04f5 0007  |    |		.CONST	0x04f5,0x0007
088c 04f7 0008  |    |		.CONST	0x04f7,0x0008
088e 050d 0009  |    |		.CONST	0x050d,0x0009
0890 0511 000a  |    |		.CONST	0x0511,0x000a
0892 0517 000b  |    |		.CONST	0x0517,0x000b
0894 ; --------------------------------------------------------------------------------------
0894 ; Debug3 Subtable 0x13
0894 ; --------------------------------------------------------------------------------------
0894 0005 000f  |    |		.DBG3TAB	0x0005,0x000f
0896 0523 ffff  | #  |		.CONST	0x0523,0xffff
0898 0528 fffe  | (  |		.CONST	0x0528,0xfffe
089a 052b fffd  | +  |		.CONST	0x052b,0xfffd
089c 052d fffc  | -  |		.CONST	0x052d,0xfffc
089e 052e fffb  | .  |		.CONST	0x052e,0xfffb
08a0 052f 0001  | /  |		.CONST	0x052f,0x0001
08a2 0542 0002  | B  |		.CONST	0x0542,0x0002
08a4 0545 0003  | E  |		.CONST	0x0545,0x0003
08a6 0549 0004  | I  |		.CONST	0x0549,0x0004
08a8 0556 0005  | V  |		.CONST	0x0556,0x0005
08aa 055c 0006  | \  |		.CONST	0x055c,0x0006
08ac 055d 0401  | ]  |		.CONST	0x055d,0x0401
08ae 055f 0801  | _  |		.CONST	0x055f,0x0801
08b0 0566 0401  | f  |		.CONST	0x0566,0x0401
08b2 0569 0402  | i  |		.CONST	0x0569,0x0402
08b4 056d 0007  | m  |		.CONST	0x056d,0x0007
08b6 056f 0008  | o  |		.CONST	0x056f,0x0008
08b8 0585 0009  |    |		.CONST	0x0585,0x0009
08ba 0589 000a  |    |		.CONST	0x0589,0x000a
08bc 058f 000b  |    |		.CONST	0x058f,0x000b
08be 0000 0000  |    |		.BLANK	0000[0x142]