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

⟦520f57e43⟧

    Length: 8192 (0x2000)
    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 09c8       |    |		.CONST	0x09c8								; 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 0007       |    |		.CONST	0x0007								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0057       | W  |		.CONST	0x0057								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0026       | &  |		.CONST	0x0026								; Number of locals
000b			INIT_0008:
000b 029a 00ab  |    |		Declare_Subprogram	INIT_00a8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0 = .DEBUG	0x000b,0x0a9a,0x8000,0x0000,0x0059,0x8bd5,0x0000,0x0007
													; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 00bb  |    |		Declare_Subprogram	INIT_00b8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 029a 0133  |   3|		Declare_Subprogram	INIT_0130,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 029a 0183  |    |		Declare_Subprogram	INIT_0180,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0x11,0xfffc
0013 029a 023b  |   ;|		Declare_Subprogram	INIT_0238,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x13,0xfffb
0015 00bf       |    |		Action	Accept_Activation
0016 e001       |    |		Load	0x0,0x1								; Debug Table 0x1 = .DEBUG	0x0016,0x0aa6,0x8000,0x0000,0x0059,0x8e75,0x0000,0x0015
													; Debug Table 0x1.0x0 = 0x16,0xffff
0017 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0018 e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x1 = 0x18,0xfffe
0019 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
001a e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x2 = 0x1a,0xfffd
001b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
001c e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x3 = 0x1c,0xfffc
001d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
001e e002       |    |		Load	0x0,0x2								; Debug Table 0x1.0x4 = 0x1e,0xfffb
001f 1b2c       | ,  |		Execute	Package,Field_Read,Field_Number 0x2c
0020 02c7       |    |		Declare_Variable	Any
0021 00d8       |    |		Load_Top	At_Offset_0
0022 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0023 e002       |    |		Load	0x0,0x2								; Debug Table 0x1.0x5 = 0x23,0xfffa
0024 1b2c       | ,  |		Execute	Package,Field_Read,Field_Number 0x2c
0025 02c7       |    |		Declare_Variable	Any
0026 00d8       |    |		Load_Top	At_Offset_0
0027 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0028 e002       |    |		Load	0x0,0x2								; Debug Table 0x1.0x6 = 0x28,0xfff9
0029 1b2c       | ,  |		Execute	Package,Field_Read,Field_Number 0x2c
002a 02c7       |    |		Declare_Variable	Any
002b 00d8       |    |		Load_Top	At_Offset_0
002c 1c00       |    |		Execute_Immediate	Run_Utility,0x0
002d 00e8       |    |		Load_Encached	Character_Cache						; Debug Table 0x1.0x7 = 0x2d,0xfff8
002e 0266       | f  |		Execute	Discrete,Bounds
002f 00e1       |    |		Load_Encached	Boolean_Cache
0030 02a0       |    |		Declare_Subprogram	Null_Subprogram
0031 4801       |H   |		Short_Literal	0x1
0032 035d       | ]  |		Declare_Type	Array,Defined
0033 0092 0936  |   6|		Action	Push_String_Extended,0x936					; "!.?"
													; Debug Table 0x1.0x8 = 0x33,0xfff7
0035 e003       |    |		Load	0x0,0x3								; Debug Table 0x1.0x9 = 0x35,0xfff6
0036 1927       | '  |		Execute	Package,Field_Reference,Field_Number 0x27
0037 029d 02ab  |    |		Declare_Subprogram	INIT_02a8,For_Outer_Call			; Debug Table 0x1.0xa = 0x37,0xfff5
													; Debug Table 0x1.0xb = 0x37,0xfff4
0039 029d 02bb  |    |		Declare_Subprogram	INIT_02b8,For_Outer_Call			; Debug Table 0x1.0xc = 0x39,0xfff3
003b 029d 02db  |    |		Declare_Subprogram	INIT_02d8,For_Outer_Call			; Debug Table 0x1.0xd = 0x3b,0xfff2
003d 029d 02fb  |    |		Declare_Subprogram	INIT_02f8,For_Outer_Call			; Debug Table 0x1.0xe = 0x3d,0xfff1
003f 029d 0313  |    |		Declare_Subprogram	INIT_0310,For_Outer_Call			; Debug Table 0x1.0xf = 0x3f,0xfff0
0041 029d 034b  |   K|		Declare_Subprogram	INIT_0348,For_Outer_Call			; Debug Table 0x1.0x10 = 0x41,0xffef
0043 029d 04cb  |    |		Declare_Subprogram	INIT_04c8,For_Outer_Call			; Debug Table 0x1.0x11 = 0x43,0xffee
0045 029d 04e3  |    |		Declare_Subprogram	INIT_04e0,For_Outer_Call			; Debug Table 0x1.0x12 = 0x45,0xffed
0047 029d 0513  |    |		Declare_Subprogram	INIT_0510,For_Outer_Call			; Debug Table 0x1.0x13 = 0x47,0xffec
0049 029d 052b  |   +|		Declare_Subprogram	INIT_0528,For_Outer_Call			; Debug Table 0x1.0x14 = 0x49,0xffeb
004b 029d 054b  |   K|		Declare_Subprogram	INIT_0548,For_Outer_Call			; Debug Table 0x1.0x15 = 0x4b,0xffea
004d 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x16 = 0x4d,0xffe9
004e 00c7       |    |		Action	Elaborate_Subprogram
004f 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x17 = 0x4f,0xffe8
0050 00c7       |    |		Action	Elaborate_Subprogram
0051 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1.0x18 = 0x51,0xffe7
0052 00c7       |    |		Action	Elaborate_Subprogram
0053 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x19 = 0x53,0xffe6
0054 00c7       |    |		Action	Elaborate_Subprogram
0055 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x1a = 0x55,0xffe5
0056 00c7       |    |		Action	Elaborate_Subprogram
0057			BODY_0008:
0057 0092 0937  |   7|		Action	Push_String_Extended,0x937					; "The cursor must be in the selection."
													; Debug Table 0x1.0x1b = 0x57,0x1
0059 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x1c = 0x59,0x401
005a e001       |    |		Load	0x0,0x1
005b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
005c 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
005d 00d0       |    |		Action	Swap_Control
005e 00d1       |    |		Pop_Control	Pop_Count_1
005f a212       |    |		Store_Unchecked	0x1,0x12						; Debug Table 0x1.0x1d = 0x5f,0x1
0060 0092 0938  |   8|		Action	Push_String_Extended,0x938					; "Not enough room between margins for the leading text."
													; Debug Table 0x1.0x1e = 0x60,0x2
0062 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x1f = 0x62,0x801
0063 e001       |    |		Load	0x0,0x1
0064 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0065 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0066 00d0       |    |		Action	Swap_Control
0067 00d1       |    |		Pop_Control	Pop_Count_1
0068 a213       |    |		Store_Unchecked	0x1,0x13						; Debug Table 0x1.0x20 = 0x68,0x2
0069 0092 0939  |   9|		Action	Push_String_Extended,0x939					; "A selection is needed in the current image."
													; Debug Table 0x1.0x21 = 0x69,0x3
006b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x22 = 0x6b,0xc01
006c e001       |    |		Load	0x0,0x1
006d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
006e 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
006f 00d0       |    |		Action	Swap_Control
0070 00d1       |    |		Pop_Control	Pop_Count_1
0071 a214       |    |		Store_Unchecked	0x1,0x14						; Debug Table 0x1.0x23 = 0x71,0x3
0072 0092 093a  |   :|		Action	Push_String_Extended,0x93a					; "The selection is not in this image."
													; Debug Table 0x1.0x24 = 0x72,0x4
0074 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x25 = 0x74,0x1001
0075 e001       |    |		Load	0x0,0x1
0076 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0077 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0078 00d0       |    |		Action	Swap_Control
0079 00d1       |    |		Pop_Control	Pop_Count_1
007a a215       |    |		Store_Unchecked	0x1,0x15						; Debug Table 0x1.0x26 = 0x7a,0x4
007b e218       |    |		Load	0x1,0x18							; Debug Table 0x1.0x27 = 0x7b,0x5
007c 0120       |    |		Execute	Any,Is_Value
007d 6803       |h   |		Jump_Zero	0x81
007e e002       |    |		Load	0x0,0x2
007f 1b2c       | ,  |		Execute	Package,Field_Read,Field_Number 0x2c
0080 7801       |x   |		Jump	0x82
0081 e218       |    |		Load	0x1,0x18
0082 e21a       |    |		Load	0x1,0x1a
0083 0092 093b  |   ;|		Action	Push_String_Extended,0x93b					; "IMAGE_FILL_EXTRA_SPACE"
0085 e002       |    |		Load	0x0,0x2
0086 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
0087 c218       |    |		Store	0x1,0x18
0088 e217       |    |		Load	0x1,0x17							; Debug Table 0x1.0x28 = 0x88,0x6
0089 0120       |    |		Execute	Any,Is_Value
008a 6803       |h   |		Jump_Zero	0x8e
008b e002       |    |		Load	0x0,0x2
008c 1b2c       | ,  |		Execute	Package,Field_Read,Field_Number 0x2c
008d 7801       |x   |		Jump	0x8f
008e e217       |    |		Load	0x1,0x17
008f 4fff       |O   |		Short_Literal	-0x1
0090 0092 093c  |   <|		Action	Push_String_Extended,0x93c					; "IMAGE_FILL_INDENT"
0092 e002       |    |		Load	0x0,0x2
0093 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
0094 c217       |    |		Store	0x1,0x17
0095 e216       |    |		Load	0x1,0x16							; Debug Table 0x1.0x29 = 0x95,0x7
0096 0120       |    |		Execute	Any,Is_Value
0097 6803       |h   |		Jump_Zero	0x9b
0098 e002       |    |		Load	0x0,0x2
0099 1b2c       | ,  |		Execute	Package,Field_Read,Field_Number 0x2c
009a 7801       |x   |		Jump	0x9c
009b e216       |    |		Load	0x1,0x16
009c 00ea       |    |		Load_Encached	Null_String_Cache
009d 0092 093d  |   =|		Action	Push_String_Extended,0x93d					; "IMAGE_FILL_PREFIX"
009f e002       |    |		Load	0x0,0x2
00a0 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
00a1 c216       |    |		Store	0x1,0x16
00a2 00bc       |    |		Action	Signal_Activated
00a3 00bb       |    |		Action	Signal_Completion
00a4 0000 0000  |    |		.BLANK	0000[0x4]
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00ab       |    |		.CONST	0x00ab								; Address of begin
00a9 0004       |    |		.CONST	0x0004								; Address of exception handler
00aa 0001       |    |		.CONST	0x0001								; Number of locals
00ab			BODY_00a8:
00ab			INIT_00a8:
00ab 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2 = .DEBUG	0x00ab,0x0afc,0x0002,0x0000,0x0059,0x8bd5,0x0000,0x0008
													; Debug Table 0x2.0x0 = 0xab,0x1
00ac 2404       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x4
00ad 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
00ae 2602       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
00af e003       |    |		Load	0x0,0x3
00b0 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
00b1 e003       |    |		Load	0x0,0x3
00b2 1b36       | 6  |		Execute	Package,Field_Read,Field_Number 0x36
00b3 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
00b4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00b5 0000 0000  |    |		.XXX[0x3]
00b7 0000       |    |
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00d2       |    |		.CONST	0x00d2								; Address of begin
00b9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ba 0006       |    |		.CONST	0x0006								; Number of locals
00bb			INIT_00b8:
00bb e003       |    |		Load	0x0,0x3								; Debug Table 0x3 = .DEBUG	0x00bb,0x0b00,0x0001,0x0000,0x0059,0x8bd5,0x0000,0x0013
													; Debug Table 0x3.0x0 = 0xbb,0xffff
00bc 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
00bd 0322       | "  |		Declare_Variable	Record
00be e5fe       |    |		Load	0x2,-0x2
00bf 2404       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x4
00c0 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
00c1 2602       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
00c2 00d9       |    |		Load_Top	At_Offset_1
00c3 017d       | }  |		Execute	Record,Structure_Write
00c4 4820       |H   |		Short_Literal	0x20							; Debug Table 0x3.0x1 = 0xc4,0xfffe
00c5 00d9       |    |		Load_Top	At_Offset_1
00c6 821f       |    |		Call	0x1,0x1f
00c7 e004       |    |		Load	0x0,0x4
00c8 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
00c9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x2 = 0xc9,0xfffd
00ca 01dc       |    |		Execute	Vector,Last
00cb 00e3       |    |		Load_Encached	Natural_Cache
00cc 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
00cd 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x3 = 0xcd,0xfffc
00ce 01dc       |    |		Execute	Vector,Last
00cf 00e3       |    |		Load_Encached	Natural_Cache
00d0 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
00d1 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x3.0x4 = 0xd1,0xfffb
00d2			BODY_00b8:
00d2 00cf       |    |		Action	Mark_Auxiliary
00d3 e403       |    |		Load	0x2,0x3								; Debug Table 0x3.0x5 = 0xd3,0x1
00d4 01d9       |    |		Execute	Vector,Reverse_Bounds
00d5 0263       | c  |		Execute	Discrete,Above_Bound
00d6 700b       |p   |		Jump_Nonzero	0xe2
00d7 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x6 = 0xd7,0x2
00d8 e403       |    |		Load	0x2,0x3
00d9 01d7       |    |		Execute	Vector,Field_Read
00da 0e20       |    |		Execute_Immediate	Not_Equal,0x20
00db 6804       |h   |		Jump_Zero	0xe0
00dc 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x7 = 0xdc,0x3
00dd a404       |    |		Store_Unchecked	0x2,0x4
00de 00d2       |    |		Pop_Control	Pop_Count_2						; Debug Table 0x3.0x8 = 0xde,0x4
00df 7802       |x   |		Jump	0xe2
00e0 00c8       |    |		Action	Pop_Auxiliary_Range
00e1 3ff5       |?   |		Loop_Increasing	0xd7
00e2 00ce       |    |		Action	Pop_Auxiliary
00e3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x9 = 0xe3,0x5
00e4 00da       |    |		Load_Top	At_Offset_2
00e5 027a       | z  |		Execute	Discrete,Less_Equal
00e6 6842       |hB  |		Jump_Zero	0x129
00e7 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3.0xa = 0xe7,0x6
00e8 00da       |    |		Load_Top	At_Offset_2
00e9 e404       |    |		Load	0x2,0x4
00ea 0272       | r  |		Execute	Discrete,Minus
00eb 0248       | H  |		Execute	Discrete,Check_In_Integer
00ec 0a01       |    |		Execute_Immediate	Plus,0x1
00ed 0272       | r  |		Execute	Discrete,Minus
00ee 0248       | H  |		Execute	Discrete,Check_In_Integer
00ef 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
00f0 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
00f1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0xb = 0xf1,0x7
00f2 0d00       |    |		Execute_Immediate	Less,0x0
00f3 6807       |h   |		Jump_Zero	0xfb
00f4 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0xc = 0xf4,0x8
00f5 e403       |    |		Load	0x2,0x3
00f6 01dd       |    |		Execute	Vector,First
00f7 0272       | r  |		Execute	Discrete,Minus
00f8 0248       | H  |		Execute	Discrete,Check_In_Integer
00f9 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
00fa 7808       |x   |		Jump	0x103
00fb 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0xd = 0xfb,0x9
00fc 00db       |    |		Load_Top	At_Offset_3
00fd e403       |    |		Load	0x2,0x3
00fe 01dd       |    |		Execute	Vector,First
00ff 0272       | r  |		Execute	Discrete,Minus
0100 0272       | r  |		Execute	Discrete,Minus
0101 0248       | H  |		Execute	Discrete,Check_In_Integer
0102 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0103 e402       |    |		Load	0x2,0x2								; Debug Table 0x3.0xe = 0x103,0xa
0104 4801       |H   |		Short_Literal	0x1
0105 e003       |    |		Load	0x0,0x3
0106 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0107 00d1       |    |		Pop_Control	Pop_Count_1
0108 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0xf = 0x108,0xb
0109 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
010a 6813       |h   |		Jump_Zero	0x11e
010b e402       |    |		Load	0x2,0x2								; Debug Table 0x3.0x10 = 0x10b,0xc
010c 4801       |H   |		Short_Literal	0x1
010d 00da       |    |		Load_Top	At_Offset_2
010e 00e9       |    |		Load_Encached	String_Cache
010f 0334       | 4  |		Declare_Variable	Array,With_Constraint
0110 00d8       |    |		Load_Top	At_Offset_0
0111 01dc       |    |		Execute	Vector,Last
0112 4801       |H   |		Short_Literal	0x1
0113 0263       | c  |		Execute	Discrete,Above_Bound
0114 7005       |p   |		Jump_Nonzero	0x11a
0115 4820       |H   |		Short_Literal	0x20
0116 00d9       |    |		Load_Top	At_Offset_1
0117 e408       |    |		Load	0x2,0x8
0118 01d6       |    |		Execute	Vector,Field_Write
0119 3ffb       |?   |		Loop_Increasing	0x115
011a e005       |    |		Load	0x0,0x5
011b 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
011c 00d1       |    |		Pop_Control	Pop_Count_1
011d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
011e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x11 = 0x11e,0xd
011f 0d00       |    |		Execute_Immediate	Less,0x0
0120 6808       |h   |		Jump_Zero	0x129
0121 e402       |    |		Load	0x2,0x2								; Debug Table 0x3.0x12 = 0x121,0xe
0122 00d9       |    |		Load_Top	At_Offset_1
0123 0275       | u  |		Execute	Discrete,Unary_Minus
0124 00e3       |    |		Load_Encached	Natural_Cache
0125 025b       | [  |		Execute	Discrete,Check_In_Type
0126 e005       |    |		Load	0x0,0x5
0127 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0128 00d1       |    |		Pop_Control	Pop_Count_1
0129 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
012a 0000 0000  |    |		.BLANK	0000[0x6]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0141       | A  |		.CONST	0x0141								; Address of begin
0131 0004       |    |		.CONST	0x0004								; Address of exception handler
0132 0004       |    |		.CONST	0x0004								; Number of locals
0133			INIT_0130:
0133 e003       |    |		Load	0x0,0x3								; Debug Table 0x4 = .DEBUG	0x0133,0x0b28,0x0002,0x0000,0x0059,0x8bd5,0x0000,0x0021
													; Debug Table 0x4.0x0 = 0x133,0xffff
0134 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0135 0322       | "  |		Declare_Variable	Record
0136 00db       |    |		Load_Top	At_Offset_3
0137 00d9       |    |		Load_Top	At_Offset_1
0138 017d       | }  |		Execute	Record,Structure_Write
0139 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x1 = 0x139,0xfffe
013a 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
013b 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
013c e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4.0x2 = 0x13c,0xfffd
013d e003       |    |		Load	0x0,0x3
013e 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
013f 00e3       |    |		Load_Encached	Natural_Cache
0140 03f1       |    |		Declare_Variable	Discrete,With_Value
0141			BODY_0130:
0141 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x4.0x3 = 0x141,0x1
0142 0a01       |    |		Execute_Immediate	Plus,0x1
0143 c403       |    |		Store	0x2,0x3
0144 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x4.0x4 = 0x144,0x2
0145 00d9       |    |		Load_Top	At_Offset_1
0146 027a       | z  |		Execute	Discrete,Less_Equal
0147 6807       |h   |		Jump_Zero	0x14f
0148 00da       |    |		Load_Top	At_Offset_2
0149 e003       |    |		Load	0x0,0x3
014a 1852       | R  |		Execute	Package,Field_Execute,Field_Number 0x52
014b 0f20       |    |		Execute_Immediate	Equal,0x20
014c 6802       |h   |		Jump_Zero	0x14f
014d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x4.0x5 = 0x14d,0x3
014e 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
014f e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x4.0x6 = 0x14f,0x4
0150 a403       |    |		Store_Unchecked	0x2,0x3
0151 00cf       |    |		Action	Mark_Auxiliary
0152 780b       |x   |		Jump	0x15e
0153 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4.0x7 = 0x153,0x6
0154 e003       |    |		Load	0x0,0x3
0155 1852       | R  |		Execute	Package,Field_Execute,Field_Number 0x52
0156 0f20       |    |		Execute_Immediate	Equal,0x20
0157 6802       |h   |		Jump_Zero	0x15a
0158 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0x8 = 0x158,0x7
0159 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
015a 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0x9 = 0x15a,0x8
015b 0aff       |    |		Execute_Immediate	Plus,-0x1
015c c403       |    |		Store	0x2,0x3
015d 00c9       |    |		Action	Pop_Auxiliary_Loop
015e 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0xa = 0x15e,0x5
015f 0c02       |    |		Execute_Immediate	Greater_Equal,0x2
0160 00db       |    |		Load_Top	At_Offset_3
0161 e5fe       |    |		Load	0x2,-0x2
0162 027b       | {  |		Execute	Discrete,Greater_Equal
0163 0279       | y  |		Execute	Discrete,And
0164 77ee       |w   |		Jump_Nonzero	0x153
0165 00ce       |    |		Action	Pop_Auxiliary
0166 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x4.0xb = 0x166,0x9
0167 a403       |    |		Store_Unchecked	0x2,0x3
0168 00cf       |    |		Action	Mark_Auxiliary
0169 780b       |x   |		Jump	0x175
016a 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4.0xc = 0x16a,0xb
016b e003       |    |		Load	0x0,0x3
016c 1852       | R  |		Execute	Package,Field_Execute,Field_Number 0x52
016d 0f20       |    |		Execute_Immediate	Equal,0x20
016e 6802       |h   |		Jump_Zero	0x171
016f 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0xd = 0x16f,0xc
0170 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0171 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0xe = 0x171,0xd
0172 0a01       |    |		Execute_Immediate	Plus,0x1
0173 c403       |    |		Store	0x2,0x3
0174 00c9       |    |		Action	Pop_Auxiliary_Loop
0175 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0xf = 0x175,0xa
0176 00da       |    |		Load_Top	At_Offset_2
0177 027a       | z  |		Execute	Discrete,Less_Equal
0178 77f1       |w   |		Jump_Nonzero	0x16a
0179 00ce       |    |		Action	Pop_Auxiliary
017a 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0x10 = 0x17a,0xe
017b 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
017c 0000 0000  |    |		.BLANK	0000[0x4]
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0193       |    |		.CONST	0x0193								; Address of begin
0181 0004       |    |		.CONST	0x0004								; Address of exception handler
0182 0005       |    |		.CONST	0x0005								; Number of locals
0183			INIT_0180:
0183 e003       |    |		Load	0x0,0x3								; Debug Table 0x5 = .DEBUG	0x0183,0x0b4c,0x0001,0x0000,0x0059,0x8bd5,0x0000,0x0031
													; Debug Table 0x5.0x0 = 0x183,0xffff
0184 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0185 0322       | "  |		Declare_Variable	Record
0186 00d8       |    |		Load_Top	At_Offset_0
0187 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0188 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x5.0x1 = 0x188,0xfffe
0189 e003       |    |		Load	0x0,0x3								; Debug Table 0x5.0x2 = 0x189,0xfffd
018a 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
018b 0322       | "  |		Declare_Variable	Record
018c 00d8       |    |		Load_Top	At_Offset_0
018d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
018e e003       |    |		Load	0x0,0x3								; Debug Table 0x5.0x3 = 0x18e,0xfffc
018f 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0190 0322       | "  |		Declare_Variable	Record
0191 00d8       |    |		Load_Top	At_Offset_0
0192 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0193			BODY_0180:
0193 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x4 = 0x193,0x1
0194 00da       |    |		Load_Top	At_Offset_2
0195 00e1       |    |		Load_Encached	Boolean_Cache
0196 e5fd       |    |		Load	0x2,-0x3
0197 2509       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x9
0198 e006       |    |		Load	0x0,0x6
0199 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
019a c403       |    |		Store	0x2,0x3
019b 00d2       |    |		Pop_Control	Pop_Count_2
019c e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x5.0x5 = 0x19c,0x2
019d 2404       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x4
019e 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
019f 2602       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
01a0 e402       |    |		Load	0x2,0x2
01a1 017d       | }  |		Execute	Record,Structure_Write
01a2 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5.0x6 = 0x1a2,0x3
01a3 684d       |hM  |		Jump_Zero	0x1f1
01a4 00db       |    |		Load_Top	At_Offset_3
01a5 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01a6 00da       |    |		Load_Top	At_Offset_2
01a7 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01a8 012f       | /  |		Execute	Any,Equal
01a9 6847       |hG  |		Jump_Zero	0x1f1
01aa e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5.0x7 = 0x1aa,0x4
01ab 01db       |    |		Execute	Vector,Length
01ac 7021       |p!  |		Jump_Nonzero	0x1ce
01ad e5fd       |    |		Load	0x2,-0x3
01ae 2509       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x9
01af e5fd       |    |		Load	0x2,-0x3
01b0 2404       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x4
01b1 e006       |    |		Load	0x0,0x6
01b2 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
01b3 701a       |p   |		Jump_Nonzero	0x1ce
01b4 00d9       |    |		Load_Top	At_Offset_1
01b5 8222       | "  |		Call	0x1,0x22
01b6 6817       |h   |		Jump_Zero	0x1ce
01b7 00d9       |    |		Load_Top	At_Offset_1
01b8 8224       | $  |		Call	0x1,0x24
01b9 6814       |h   |		Jump_Zero	0x1ce
01ba e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x5.0x8 = 0x1ba,0x5
01bb 2c04       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4
01bc e212       |    |		Load	0x1,0x12
01bd 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0x9 = 0x1bd,0x401
01be 00d9       |    |		Load_Top	At_Offset_1
01bf 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0xa = 0x1bf,0x801
01c0 0227       | '  |		Execute	Access,All_Reference
01c1 0335       | 5  |		Declare_Variable	Array,Duplicate
01c2 00d0       |    |		Action	Swap_Control
01c3 00d1       |    |		Pop_Control	Pop_Count_1
01c4 00d0       |    |		Action	Swap_Control
01c5 00d1       |    |		Pop_Control	Pop_Count_1
01c6 e007       |    |		Load	0x0,0x7								; Debug Table 0x5.0xb = 0x1c6,0x401
01c7 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01c8 00d1       |    |		Pop_Control	Pop_Count_1
01c9 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0xc = 0x1c9,0x402
01ca 00da       |    |		Load_Top	At_Offset_2
01cb 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
01cc 00d2       |    |		Pop_Control	Pop_Count_2
01cd 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01ce e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x5.0xd = 0x1ce,0x6
01cf e008       |    |		Load	0x0,0x8
01d0 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
01d1 00d1       |    |		Pop_Control	Pop_Count_1
01d2 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5.0xe = 0x1d2,0x7
01d3 01db       |    |		Execute	Vector,Length
01d4 7011       |p   |		Jump_Nonzero	0x1e6
01d5 00d9       |    |		Load_Top	At_Offset_1
01d6 8222       | "  |		Call	0x1,0x22
01d7 680e       |h   |		Jump_Zero	0x1e6
01d8 00d9       |    |		Load_Top	At_Offset_1
01d9 8224       | $  |		Call	0x1,0x24
01da 680b       |h   |		Jump_Zero	0x1e6
01db e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x5.0xf = 0x1db,0x8
01dc 4801       |H   |		Short_Literal	0x1
01dd 4800       |H   |		Short_Literal	0x0
01de e5fe       |    |		Load	0x2,-0x2
01df e404       |    |		Load	0x2,0x4
01e0 8223       | #  |		Call	0x1,0x23
01e1 e405       |    |		Load	0x2,0x5
01e2 e404       |    |		Load	0x2,0x4
01e3 8221       | !  |		Call	0x1,0x21
01e4 00d1       |    |		Pop_Control	Pop_Count_1
01e5 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01e6 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x5.0x10 = 0x1e6,0x9
01e7 4801       |H   |		Short_Literal	0x1
01e8 4800       |H   |		Short_Literal	0x0
01e9 e5fe       |    |		Load	0x2,-0x2
01ea e5ff       |    |		Load	0x2,-0x1
01eb 821d       |    |		Call	0x1,0x1d
01ec e405       |    |		Load	0x2,0x5
01ed e404       |    |		Load	0x2,0x4
01ee 8221       | !  |		Call	0x1,0x21
01ef 00d1       |    |		Pop_Control	Pop_Count_1
01f0 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01f1 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5.0x11 = 0x1f1,0xa
01f2 01db       |    |		Execute	Vector,Length
01f3 702c       |p,  |		Jump_Nonzero	0x220
01f4 00db       |    |		Load_Top	At_Offset_3
01f5 8222       | "  |		Call	0x1,0x22
01f6 6829       |h)  |		Jump_Zero	0x220
01f7 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x5.0x12 = 0x1f7,0xb
01f8 8225       | %  |		Call	0x1,0x25
01f9 6812       |h   |		Jump_Zero	0x20c
01fa 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x5.0x13 = 0x1fa,0xc
01fb 00da       |    |		Load_Top	At_Offset_2
01fc 017d       | }  |		Execute	Record,Structure_Write
01fd 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x14 = 0x1fd,0xd
01fe 00da       |    |		Load_Top	At_Offset_2
01ff 8226       | &  |		Call	0x1,0x26
0200 00d2       |    |		Pop_Control	Pop_Count_2
0201 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x5.0x15 = 0x201,0xe
0202 4800       |H   |		Short_Literal	0x0
0203 4800       |H   |		Short_Literal	0x0
0204 e5fe       |    |		Load	0x2,-0x2
0205 e404       |    |		Load	0x2,0x4
0206 8223       | #  |		Call	0x1,0x23
0207 e405       |    |		Load	0x2,0x5
0208 e404       |    |		Load	0x2,0x4
0209 8221       | !  |		Call	0x1,0x21
020a 00d1       |    |		Pop_Control	Pop_Count_1
020b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
020c e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x5.0x16 = 0x20c,0xf
020d 2c04       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4
020e e214       |    |		Load	0x1,0x14
020f 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0x17 = 0x20f,0xc01
0210 00d9       |    |		Load_Top	At_Offset_1
0211 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x18 = 0x211,0x1001
0212 0227       | '  |		Execute	Access,All_Reference
0213 0335       | 5  |		Declare_Variable	Array,Duplicate
0214 00d0       |    |		Action	Swap_Control
0215 00d1       |    |		Pop_Control	Pop_Count_1
0216 00d0       |    |		Action	Swap_Control
0217 00d1       |    |		Pop_Control	Pop_Count_1
0218 e007       |    |		Load	0x0,0x7								; Debug Table 0x5.0x19 = 0x218,0xc01
0219 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
021a 00d1       |    |		Pop_Control	Pop_Count_1
021b 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x1a = 0x21b,0xc02
021c 00da       |    |		Load_Top	At_Offset_2
021d 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
021e 00d2       |    |		Pop_Control	Pop_Count_2
021f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0220 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x5.0x1b = 0x220,0x10
0221 2c04       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4
0222 e214       |    |		Load	0x1,0x14
0223 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0x1c = 0x223,0x1401
0224 00d9       |    |		Load_Top	At_Offset_1
0225 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x1d = 0x225,0x1801
0226 0227       | '  |		Execute	Access,All_Reference
0227 0335       | 5  |		Declare_Variable	Array,Duplicate
0228 00d0       |    |		Action	Swap_Control
0229 00d1       |    |		Pop_Control	Pop_Count_1
022a 00d0       |    |		Action	Swap_Control
022b 00d1       |    |		Pop_Control	Pop_Count_1
022c e007       |    |		Load	0x0,0x7								; Debug Table 0x5.0x1e = 0x22c,0x1401
022d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
022e 00d1       |    |		Pop_Control	Pop_Count_1
022f 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x1f = 0x22f,0x1402
0230 00da       |    |		Load_Top	At_Offset_2
0231 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
0232 00d2       |    |		Pop_Control	Pop_Count_2
0233 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0234 0000 0000  |    |		.BLANK	0000[0x4]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 0246       | F  |		.CONST	0x0246								; Address of begin
0239 0004       |    |		.CONST	0x0004								; Address of exception handler
023a 0004       |    |		.CONST	0x0004								; Number of locals
023b			INIT_0238:
023b 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x6 = .DEBUG	0x023b,0x0b8e,0x0001,0x0000,0x0059,0x8bd5,0x0000,0x0044
													; Debug Table 0x6.0x0 = 0x23b,0xffff
023c e003       |    |		Load	0x0,0x3								; Debug Table 0x6.0x1 = 0x23c,0xfffe
023d 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
023e 0322       | "  |		Declare_Variable	Record
023f 00d8       |    |		Load_Top	At_Offset_0
0240 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0241 e003       |    |		Load	0x0,0x3								; Debug Table 0x6.0x2 = 0x241,0xfffd
0242 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0243 0322       | "  |		Declare_Variable	Record
0244 00d8       |    |		Load_Top	At_Offset_0
0245 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0246			BODY_0238:
0246 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x3 = 0x246,0x1
0247 00da       |    |		Load_Top	At_Offset_2
0248 00e1       |    |		Load_Encached	Boolean_Cache
0249 e5fd       |    |		Load	0x2,-0x3
024a 2509       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x9
024b e006       |    |		Load	0x0,0x6
024c 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
024d c402       |    |		Store	0x2,0x2
024e 00d2       |    |		Pop_Control	Pop_Count_2
024f 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x4 = 0x24f,0x2
0250 6840       |h@  |		Jump_Zero	0x291
0251 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x6.0x5 = 0x251,0x3
0252 2404       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x4
0253 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
0254 2602       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
0255 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0256 00da       |    |		Load_Top	At_Offset_2
0257 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0258 012f       | /  |		Execute	Any,Equal
0259 7014       |p   |		Jump_Nonzero	0x26e
025a e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x6.0x6 = 0x25a,0x4
025b 2c04       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4
025c e215       |    |		Load	0x1,0x15
025d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x7 = 0x25d,0x401
025e 00d9       |    |		Load_Top	At_Offset_1
025f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x8 = 0x25f,0x801
0260 0227       | '  |		Execute	Access,All_Reference
0261 0335       | 5  |		Declare_Variable	Array,Duplicate
0262 00d0       |    |		Action	Swap_Control
0263 00d1       |    |		Pop_Control	Pop_Count_1
0264 00d0       |    |		Action	Swap_Control
0265 00d1       |    |		Pop_Control	Pop_Count_1
0266 e007       |    |		Load	0x0,0x7								; Debug Table 0x6.0x9 = 0x266,0x401
0267 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0268 00d1       |    |		Pop_Control	Pop_Count_1
0269 4800       |H   |		Short_Literal	0x0							; Debug Table 0x6.0xa = 0x269,0x402
026a 00da       |    |		Load_Top	At_Offset_2
026b 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
026c 00d2       |    |		Pop_Control	Pop_Count_2
026d 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
026e e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x6.0xb = 0x26e,0x5
026f e008       |    |		Load	0x0,0x8
0270 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0271 00d1       |    |		Pop_Control	Pop_Count_1
0272 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x6.0xc = 0x272,0x6
0273 01db       |    |		Execute	Vector,Length
0274 7011       |p   |		Jump_Nonzero	0x286
0275 00d9       |    |		Load_Top	At_Offset_1
0276 8222       | "  |		Call	0x1,0x22
0277 680e       |h   |		Jump_Zero	0x286
0278 00d9       |    |		Load_Top	At_Offset_1
0279 8224       | $  |		Call	0x1,0x24
027a 680b       |h   |		Jump_Zero	0x286
027b e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x6.0xd = 0x27b,0x7
027c 4801       |H   |		Short_Literal	0x1
027d 4801       |H   |		Short_Literal	0x1
027e e5fe       |    |		Load	0x2,-0x2
027f e403       |    |		Load	0x2,0x3
0280 8223       | #  |		Call	0x1,0x23
0281 e404       |    |		Load	0x2,0x4
0282 e403       |    |		Load	0x2,0x3
0283 8221       | !  |		Call	0x1,0x21
0284 00d1       |    |		Pop_Control	Pop_Count_1
0285 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0286 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x6.0xe = 0x286,0x8
0287 4801       |H   |		Short_Literal	0x1
0288 4801       |H   |		Short_Literal	0x1
0289 e5fe       |    |		Load	0x2,-0x2
028a e5ff       |    |		Load	0x2,-0x1
028b 821d       |    |		Call	0x1,0x1d
028c e404       |    |		Load	0x2,0x4
028d e403       |    |		Load	0x2,0x3
028e 8221       | !  |		Call	0x1,0x21
028f 00d1       |    |		Pop_Control	Pop_Count_1
0290 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0291 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x6.0xf = 0x291,0x9
0292 2c04       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4
0293 e214       |    |		Load	0x1,0x14
0294 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x10 = 0x294,0xc01
0295 00d9       |    |		Load_Top	At_Offset_1
0296 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x11 = 0x296,0x1001
0297 0227       | '  |		Execute	Access,All_Reference
0298 0335       | 5  |		Declare_Variable	Array,Duplicate
0299 00d0       |    |		Action	Swap_Control
029a 00d1       |    |		Pop_Control	Pop_Count_1
029b 00d0       |    |		Action	Swap_Control
029c 00d1       |    |		Pop_Control	Pop_Count_1
029d e007       |    |		Load	0x0,0x7								; Debug Table 0x6.0x12 = 0x29d,0xc01
029e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
029f 00d1       |    |		Pop_Control	Pop_Count_1
02a0 4800       |H   |		Short_Literal	0x0							; Debug Table 0x6.0x13 = 0x2a0,0xc02
02a1 00da       |    |		Load_Top	At_Offset_2
02a2 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
02a3 00d2       |    |		Pop_Control	Pop_Count_2
02a4 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02a5 0000 0000  |    |		.XXX[0x3]
02a7 0000       |    |
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02ab       |    |		.CONST	0x02ab								; Address of begin
02a9 02b3       |    |		.CONST	0x02b3								; Address of exception handler
02aa 0001       |    |		.CONST	0x0001								; Number of locals
02ab			BODY_02a8:
02ab			INIT_02a8:
02ab e009       |    |		Load	0x0,0x9								; Debug Table 0x7 = .DEBUG	0x02ab,0x0bb8,0x0002,0x0000,0x0059,0x8e75,0x0000,0x0076
													; Debug Table 0x7.0x0 = 0x2ab,0x1
02ac 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
02ad e217       |    |		Load	0x1,0x17
02ae e002       |    |		Load	0x0,0x2
02af 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
02b0 e002       |    |		Load	0x0,0x2
02b1 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
02b2 00ca       |    |		Action	Exit_Nullary_Function
02b3			TRAP_02a8:
02b3 0007       |    |		Action	Break_Optional
02b4 4fff       |O   |		Short_Literal	-0x1							; Debug Table 0x7.0x1 = 0x2b4,0x2
02b5 00ca       |    |		Action	Exit_Nullary_Function
02b6 0000 0000  |    |		.XXX[0x2]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bb       |    |		.CONST	0x02bb								; Address of begin
02b9 02cf       |    |		.CONST	0x02cf								; Address of exception handler
02ba 0001       |    |		.CONST	0x0001								; Number of locals
02bb			BODY_02b8:
02bb			INIT_02b8:
02bb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x8 = .DEBUG	0x02bb,0x0bbe,0x0002,0x0000,0x0059,0x8e75,0x0000,0x0094
													; Debug Table 0x8.0x0 = 0x2bb,0x1
02bc 0092 093e  |   >|		Action	Push_String_Extended,0x93e					; " null "
02be 01df       |    |		Execute	Vector,Equal
02bf 6802       |h   |		Jump_Zero	0x2c2
02c0 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x8.0x1 = 0x2c0,0x2
02c1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02c2 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x8.0x2 = 0x2c2,0x3
02c3 01db       |    |		Execute	Vector,Length
02c4 6802       |h   |		Jump_Zero	0x2c7
02c5 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x8.0x3 = 0x2c5,0x4
02c6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02c7 e009       |    |		Load	0x0,0x9								; Debug Table 0x8.0x4 = 0x2c7,0x5
02c8 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
02c9 e216       |    |		Load	0x1,0x16
02ca e002       |    |		Load	0x0,0x2
02cb 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
02cc e002       |    |		Load	0x0,0x2
02cd 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
02ce 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02cf			TRAP_02b8:
02cf 0007       |    |		Action	Break_Optional
02d0 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x8.0x5 = 0x2d0,0x6
02d1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02d2 0000 0000  |    |		.BLANK	0000[0x6]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02db       |    |		.CONST	0x02db								; Address of begin
02d9 02f1       |    |		.CONST	0x02f1								; Address of exception handler
02da 0001       |    |		.CONST	0x0001								; Number of locals
02db			BODY_02d8:
02db			INIT_02d8:
02db 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0x9 = .DEBUG	0x02db,0x0bcc,0x0001,0x0000,0x0059,0x8e75,0x0000,0x00c8
													; Debug Table 0x9.0x0 = 0x2db,0x1
02dc e009       |    |		Load	0x0,0x9								; Debug Table 0x9.0x1 = 0x2dc,0xfbff
02dd 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
02de e218       |    |		Load	0x1,0x18
02df e002       |    |		Load	0x0,0x2
02e0 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
02e1 e002       |    |		Load	0x0,0x2
02e2 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
02e3 00cf       |    |		Action	Mark_Auxiliary
02e4 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0x2 = 0x2e4,0x401
02e5 01d9       |    |		Execute	Vector,Reverse_Bounds
02e6 0263       | c  |		Execute	Discrete,Above_Bound
02e7 7008       |p   |		Jump_Nonzero	0x2f0
02e8 4801       |H   |		Short_Literal	0x1							; Debug Table 0x9.0x3 = 0x2e8,0x402
02e9 00d9       |    |		Load_Top	At_Offset_1
02ea e403       |    |		Load	0x2,0x3
02eb 01d7       |    |		Execute	Vector,Field_Read
02ec e5ff       |    |		Load	0x2,-0x1
02ed 01d6       |    |		Execute	Vector,Field_Write
02ee 00c8       |    |		Action	Pop_Auxiliary_Range
02ef 3ff8       |?   |		Loop_Increasing	0x2e8
02f0 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02f1			TRAP_02d8:
02f1 0007       |    |		Action	Break_Optional
02f2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x9.0x4 = 0x2f2,0x2
02f3 0000 0000  |    |		.BLANK	0000[0x5]
02f8 ; --------------------------------------------------------------------------------------
02f8 ; SUBPROGRAM
02f8 ; --------------------------------------------------------------------------------------
02f8 0301       |    |		.CONST	0x0301								; Address of begin
02f9 030a       |    |		.CONST	0x030a								; Address of exception handler
02fa 0002       |    |		.CONST	0x0002								; Number of locals
02fb			INIT_02f8:
02fb e003       |    |		Load	0x0,0x3								; Debug Table 0xa = .DEBUG	0x02fb,0x0bd8,0x0002,0x0000,0x0059,0x8e75,0x0000,0x00fd
													; Debug Table 0xa.0x0 = 0x2fb,0xffff
02fc 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
02fd 0322       | "  |		Declare_Variable	Record
02fe 00db       |    |		Load_Top	At_Offset_3
02ff 00d9       |    |		Load_Top	At_Offset_1
0300 017d       | }  |		Execute	Record,Structure_Write
0301			BODY_02f8:
0301 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0x1 = 0x301,0x1
0302 4801       |H   |		Short_Literal	0x1
0303 e003       |    |		Load	0x0,0x3
0304 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0305 00d1       |    |		Pop_Control	Pop_Count_1
0306 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0x2 = 0x306,0x2
0307 e003       |    |		Load	0x0,0x3
0308 1892       |    |		Execute	Package,Field_Execute,Field_Number 0x92
0309 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
030a			TRAP_02f8:
030a 010e       |    |		Execute	Exception,Is_Constraint_Error
030b 6802       |h   |		Jump_Zero	0x30e
030c 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0xa.0x3 = 0x30c,0x3
030d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
030e 0100       |    |		Execute	Exception,Raise
030f 0000       |    |		.XXX[0x1]
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 031b       |    |		.CONST	0x031b								; Address of begin
0311 0341       | A  |		.CONST	0x0341								; Address of exception handler
0312 0003       |    |		.CONST	0x0003								; Number of locals
0313			INIT_0310:
0313 e003       |    |		Load	0x0,0x3								; Debug Table 0xb = .DEBUG	0x0313,0x0be2,0x0001,0x0000,0x0059,0x8e75,0x0000,0x012c
													; Debug Table 0xb.0x0 = 0x313,0xffff
0314 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0315 0322       | "  |		Declare_Variable	Record
0316 00db       |    |		Load_Top	At_Offset_3
0317 00d9       |    |		Load_Top	At_Offset_1
0318 017d       | }  |		Execute	Record,Structure_Write
0319 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0xb.0x1 = 0x319,0xfffe
031a 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
031b			BODY_0310:
031b 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0xb.0x2 = 0x31b,0x1
031c e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xb.0x3 = 0x31c,0xfbff
031d e003       |    |		Load	0x0,0x3
031e 1892       |    |		Execute	Package,Field_Execute,Field_Number 0x92
031f 00cf       |    |		Action	Mark_Auxiliary
0320 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xb.0x4 = 0x320,0x401
0321 01d9       |    |		Execute	Vector,Reverse_Bounds
0322 0263       | c  |		Execute	Discrete,Above_Bound
0323 700c       |p   |		Jump_Nonzero	0x330
0324 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x5 = 0x324,0x402
0325 e405       |    |		Load	0x2,0x5
0326 01d7       |    |		Execute	Vector,Field_Read
0327 0e20       |    |		Execute_Immediate	Not_Equal,0x20
0328 6802       |h   |		Jump_Zero	0x32b
0329 00d2       |    |		Pop_Control	Pop_Count_2						; Debug Table 0xb.0x6 = 0x329,0x403
032a 7805       |x   |		Jump	0x330
032b e403       |    |		Load	0x2,0x3								; Debug Table 0xb.0x7 = 0x32b,0x404
032c 0a01       |    |		Execute_Immediate	Plus,0x1
032d c403       |    |		Store	0x2,0x3
032e 00c8       |    |		Action	Pop_Auxiliary_Range
032f 3ff4       |?   |		Loop_Increasing	0x324
0330 00ce       |    |		Action	Pop_Auxiliary
0331 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb.0x8 = 0x331,0x405
0332 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0333 6805       |h   |		Jump_Zero	0x339
0334 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xb.0x9 = 0x334,0x406
0335 00db       |    |		Load_Top	At_Offset_3
0336 e005       |    |		Load	0x0,0x5
0337 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0338 00d1       |    |		Pop_Control	Pop_Count_1
0339 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb.0xa = 0x339,0x407
033a a5fe       |    |		Store_Unchecked	0x2,-0x2
033b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0xb = 0x33b,0x408
033c 01db       |    |		Execute	Vector,Length
033d 00db       |    |		Load_Top	At_Offset_3
033e 0272       | r  |		Execute	Discrete,Minus
033f c5fd       |    |		Store	0x2,-0x3
0340 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0341			TRAP_0310:
0341 010e       |    |		Execute	Exception,Is_Constraint_Error
0342 6803       |h   |		Jump_Zero	0x346
0343 4800       |H   |		Short_Literal	0x0							; Debug Table 0xb.0xc = 0x343,0x2
0344 a5fe       |    |		Store_Unchecked	0x2,-0x2
0345 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0346 0100       |    |		Execute	Exception,Raise
0347 0000       |    |		.XXX[0x1]
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 0383       |    |		.CONST	0x0383								; Address of begin
0349 04bc       |    |		.CONST	0x04bc								; Address of exception handler
034a 0012       |    |		.CONST	0x0012								; Number of locals
034b			INIT_0348:
034b e003       |    |		Load	0x0,0x3								; Debug Table 0xc = .DEBUG	0x034b,0x0bfe,0x0001,0x0000,0x0059,0x8e75,0x0000,0x019d
													; Debug Table 0xc.0x0 = 0x34b,0xffff
034c 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
034d 0322       | "  |		Declare_Variable	Record
034e 00db       |    |		Load_Top	At_Offset_3
034f 00d9       |    |		Load_Top	At_Offset_1
0350 017d       | }  |		Execute	Record,Structure_Write
0351 e003       |    |		Load	0x0,0x3								; Debug Table 0xc.0x1 = 0x351,0xfffe
0352 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0353 0322       | "  |		Declare_Variable	Record
0354 e5fe       |    |		Load	0x2,-0x2
0355 00d9       |    |		Load_Top	At_Offset_1
0356 017d       | }  |		Execute	Record,Structure_Write
0357 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0xc.0x2 = 0x357,0xfffd
0358 e003       |    |		Load	0x0,0x3								; Debug Table 0xc.0x3 = 0x358,0xfffc
0359 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
035a e003       |    |		Load	0x0,0x3								; Debug Table 0xc.0x4 = 0x35a,0xfffb
035b 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
035c 0322       | "  |		Declare_Variable	Record
035d e5ff       |    |		Load	0x2,-0x1
035e 00d9       |    |		Load_Top	At_Offset_1
035f 017d       | }  |		Execute	Record,Structure_Write
0360 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xc.0x5 = 0x360,0xfffa
0361 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0362 821c       |    |		Call	0x1,0x1c							; Debug Table 0xc.0x6 = 0x362,0xfff9
0363 00e2       |    |		Load_Encached	Integer_Cache
0364 03f1       |    |		Declare_Variable	Discrete,With_Value
0365 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0xc.0x7 = 0x365,0xfff8
0366 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0367 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0xc.0x8 = 0x367,0xfff7
0368 e219       |    |		Load	0x1,0x19							; Debug Table 0xc.0x9 = 0x368,0xfff6
0369 0337       | 7  |		Declare_Variable	Array
036a e219       |    |		Load	0x1,0x19
036b 0337       | 7  |		Declare_Variable	Array
036c 487f       |H   |		Short_Literal	0x7f
036d 4800       |H   |		Short_Literal	0x0
036e 4800       |H   |		Short_Literal	0x0
036f 00d9       |    |		Load_Top	At_Offset_1
0370 e40c       |    |		Load	0x2,0xc
0371 01d6       |    |		Execute	Vector,Field_Write
0372 3ffb       |?   |		Loop_Increasing	0x36e
0373 00d9       |    |		Load_Top	At_Offset_1
0374 01d4       |    |		Execute	Vector,Structure_Write
0375 029f 059b  |    |		Declare_Subprogram	INIT_0598,For_Call				; Debug Table 0xc.0xa = 0x375,0xfff5
0377 029f 05bb  |    |		Declare_Subprogram	INIT_05b8,For_Call				; Debug Table 0xc.0xb = 0x377,0xfff4
0379 029f 05eb  |    |		Declare_Subprogram	INIT_05e8,For_Call				; Debug Table 0xc.0xc = 0x379,0xfff3
037b 029f 069b  |    |		Declare_Subprogram	INIT_0698,For_Call				; Debug Table 0xc.0xd = 0x37b,0xfff2
037d 029f 07cb  |    |		Declare_Subprogram	INIT_07c8,For_Call				; Debug Table 0xc.0xe = 0x37d,0xfff1
037f 029f 088b  |    |		Declare_Subprogram	INIT_0888,For_Call				; Debug Table 0xc.0xf = 0x37f,0xfff0
0381 029f 08a3  |    |		Declare_Subprogram	INIT_08a0,For_Call				; Debug Table 0xc.0x10 = 0x381,0xffef
0383			BODY_0348:
0383 e5f9       |    |		Load	0x2,-0x7							; Debug Table 0xc.0x11 = 0x383,0x1
0384 2404       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x4
0385 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0386 e003       |    |		Load	0x0,0x3
0387 1875       | u  |		Execute	Package,Field_Execute,Field_Number 0x75
0388 e40b       |    |		Load	0x2,0xb								; Debug Table 0xc.0x12 = 0x388,0x2
0389 821e       |    |		Call	0x1,0x1e
038a 00d1       |    |		Pop_Control	Pop_Count_1
038b e402       |    |		Load	0x2,0x2								; Debug Table 0xc.0x13 = 0x38b,0x3
													; Debug Table 0xc.0x14 = 0x38b,0x401
038c 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
038d 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
038e 0f01       |    |		Execute_Immediate	Equal,0x1
038f 701e       |p   |		Jump_Nonzero	0x3ae							; Debug Table 0xc.0x15 = 0x38f,0x3
0390 e402       |    |		Load	0x2,0x2								; Debug Table 0xc.0x16 = 0x390,0x4
0391 4801       |H   |		Short_Literal	0x1
0392 e005       |    |		Load	0x0,0x5
0393 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0394 00d1       |    |		Pop_Control	Pop_Count_1
0395 e402       |    |		Load	0x2,0x2								; Debug Table 0xc.0x17 = 0x395,0x5
0396 e406       |    |		Load	0x2,0x6
0397 017d       | }  |		Execute	Record,Structure_Write
0398 e403       |    |		Load	0x2,0x3								; Debug Table 0xc.0x18 = 0x398,0x6
0399 4801       |H   |		Short_Literal	0x1
039a e003       |    |		Load	0x0,0x3
039b 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
039c 00d1       |    |		Pop_Control	Pop_Count_1
039d e402       |    |		Load	0x2,0x2								; Debug Table 0xc.0x19 = 0x39d,0x7
039e e003       |    |		Load	0x0,0x3
039f 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
03a0 e403       |    |		Load	0x2,0x3
03a1 e003       |    |		Load	0x0,0x3
03a2 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
03a3 027f       |    |		Execute	Discrete,Equal
03a4 6809       |h   |		Jump_Zero	0x3ae
03a5 e403       |    |		Load	0x2,0x3								; Debug Table 0xc.0x1a = 0x3a5,0x8
03a6 e5ff       |    |		Load	0x2,-0x1
03a7 e003       |    |		Load	0x0,0x3
03a8 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
03a9 0aff       |    |		Execute_Immediate	Plus,-0x1
03aa 0248       | H  |		Execute	Discrete,Check_In_Integer
03ab e003       |    |		Load	0x0,0x3
03ac 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
03ad 00d1       |    |		Pop_Control	Pop_Count_1
03ae e403       |    |		Load	0x2,0x3								; Debug Table 0xc.0x1b = 0x3ae,0x9
													; Debug Table 0xc.0x1c = 0x3ae,0x801
03af 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
03b0 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
03b1 0f01       |    |		Execute_Immediate	Equal,0x1
03b2 6804       |h   |		Jump_Zero	0x3b7							; Debug Table 0xc.0x1d = 0x3b2,0x9
03b3 e403       |    |		Load	0x2,0x3								; Debug Table 0xc.0x1e = 0x3b3,0xa
03b4 8411       |    |		Call	0x2,0x11
03b5 00d1       |    |		Pop_Control	Pop_Count_1
03b6 7809       |x   |		Jump	0x3c0
03b7 e403       |    |		Load	0x2,0x3								; Debug Table 0xc.0x1f = 0x3b7,0xb
03b8 e00a       |    |		Load	0x0,0xa
03b9 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
03ba 7005       |p   |		Jump_Nonzero	0x3c0
03bb e403       |    |		Load	0x2,0x3								; Debug Table 0xc.0x20 = 0x3bb,0xc
03bc 4800       |H   |		Short_Literal	0x0
03bd e005       |    |		Load	0x0,0x5
03be 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
03bf 00d1       |    |		Pop_Control	Pop_Count_1
03c0 e408       |    |		Load	0x2,0x8								; Debug Table 0xc.0x21 = 0x3c0,0xd
03c1 4fff       |O   |		Short_Literal	-0x1
03c2 027f       |    |		Execute	Discrete,Equal
03c3 680b       |h   |		Jump_Zero	0x3cf
03c4 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0xc.0x22 = 0x3c4,0xe
03c5 00e3       |    |		Load_Encached	Natural_Cache
03c6 e402       |    |		Load	0x2,0x2
03c7 8220       |    |		Call	0x1,0x20
03c8 c408       |    |		Store	0x2,0x8
03c9 c404       |    |		Store	0x2,0x4
03ca e404       |    |		Load	0x2,0x4								; Debug Table 0xc.0x23 = 0x3ca,0xf
03cb 7009       |p   |		Jump_Nonzero	0x3d5
03cc 4800       |H   |		Short_Literal	0x0							; Debug Table 0xc.0x24 = 0x3cc,0x10
03cd a408       |    |		Store_Unchecked	0x2,0x8
03ce 7806       |x   |		Jump	0x3d5
03cf 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0xc.0x25 = 0x3cf,0x11
03d0 00e3       |    |		Load_Encached	Natural_Cache
03d1 e402       |    |		Load	0x2,0x2
03d2 8220       |    |		Call	0x1,0x20
03d3 c409       |    |		Store	0x2,0x9
03d4 c404       |    |		Store	0x2,0x4
03d5 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xc.0x26 = 0x3d5,0x12
03d6 01db       |    |		Execute	Vector,Length
03d7 0a01       |    |		Execute_Immediate	Plus,0x1
03d8 c40a       |    |		Store	0x2,0xa
03d9 e408       |    |		Load	0x2,0x8								; Debug Table 0xc.0x27 = 0x3d9,0x13
03da 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
03db 6804       |h   |		Jump_Zero	0x3e0
03dc e40a       |    |		Load	0x2,0xa								; Debug Table 0xc.0x28 = 0x3dc,0x14
03dd e408       |    |		Load	0x2,0x8
03de 0273       | s  |		Execute	Discrete,Plus
03df c40a       |    |		Store	0x2,0xa
03e0 e40a       |    |		Load	0x2,0xa								; Debug Table 0xc.0x29 = 0x3e0,0x15
03e1 e5fc       |    |		Load	0x2,-0x4
03e2 027b       | {  |		Execute	Discrete,Greater_Equal
03e3 6819       |h   |		Jump_Zero	0x3fd
03e4 e5f9       |    |		Load	0x2,-0x7							; Debug Table 0xc.0x2a = 0x3e4,0x16
03e5 2c04       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4
03e6 e213       |    |		Load	0x1,0x13
03e7 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xc.0x2b = 0x3e7,0xc01
03e8 00d9       |    |		Load_Top	At_Offset_1
03e9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x2c = 0x3e9,0x1001
03ea 0227       | '  |		Execute	Access,All_Reference
03eb 0335       | 5  |		Declare_Variable	Array,Duplicate
03ec 00d0       |    |		Action	Swap_Control
03ed 00d1       |    |		Pop_Control	Pop_Count_1
03ee 00d0       |    |		Action	Swap_Control
03ef 00d1       |    |		Pop_Control	Pop_Count_1
03f0 e007       |    |		Load	0x0,0x7								; Debug Table 0xc.0x2d = 0x3f0,0xc01
03f1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03f2 00d1       |    |		Pop_Control	Pop_Count_1
03f3 4800       |H   |		Short_Literal	0x0							; Debug Table 0xc.0x2e = 0x3f3,0xc02
03f4 00da       |    |		Load_Top	At_Offset_2
03f5 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
03f6 00d2       |    |		Pop_Control	Pop_Count_2
03f7 e5f9       |    |		Load	0x2,-0x7							; Debug Table 0xc.0x2f = 0x3f7,0x17
03f8 2404       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x4
03f9 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
03fa e003       |    |		Load	0x0,0x3
03fb 1876       | v  |		Execute	Package,Field_Execute,Field_Number 0x76
03fc 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7					; Debug Table 0xc.0x30 = 0x3fc,0x18
03fd e402       |    |		Load	0x2,0x2								; Debug Table 0xc.0x31 = 0x3fd,0x19
03fe 840d       |    |		Call	0x2,0xd
03ff 00d1       |    |		Pop_Control	Pop_Count_1
0400 e403       |    |		Load	0x2,0x3								; Debug Table 0xc.0x32 = 0x400,0x1a
0401 e40b       |    |		Load	0x2,0xb
0402 e402       |    |		Load	0x2,0x2
0403 840f       |    |		Call	0x2,0xf
0404 00d1       |    |		Pop_Control	Pop_Count_1
0405 e403       |    |		Load	0x2,0x3								; Debug Table 0xc.0x33 = 0x405,0x1b
0406 e003       |    |		Load	0x0,0x3
0407 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0408 c405       |    |		Store	0x2,0x5
0409 00cf       |    |		Action	Mark_Auxiliary
040a 7887       |x   |		Jump	0x492
040b e402       |    |		Load	0x2,0x2								; Debug Table 0xc.0x34 = 0x40b,0x1d
040c e003       |    |		Load	0x0,0x3
040d 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
040e a404       |    |		Store_Unchecked	0x2,0x4
040f e404       |    |		Load	0x2,0x4								; Debug Table 0xc.0x35 = 0x40f,0x1e
0410 e5fc       |    |		Load	0x2,-0x4
0411 027d       | }  |		Execute	Discrete,Greater
0412 6813       |h   |		Jump_Zero	0x426
0413 e404       |    |		Load	0x2,0x4								; Debug Table 0xc.0x36 = 0x413,0x1f
0414 e402       |    |		Load	0x2,0x2
0415 840e       |    |		Call	0x2,0xe
0416 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0xc.0x37 = 0x416,0x20
0417 6802       |h   |		Jump_Zero	0x41a
0418 e402       |    |		Load	0x2,0x2								; Debug Table 0xc.0x38 = 0x418,0x21
0419 8410       |    |		Call	0x2,0x10
041a e402       |    |		Load	0x2,0x2								; Debug Table 0xc.0x39 = 0x41a,0x22
													; Debug Table 0xc.0x3a = 0x41a,0x1401
041b 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
041c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
041d 0a01       |    |		Execute_Immediate	Plus,0x1
041e e402       |    |		Load	0x2,0x2
041f 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0420 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0421 4801       |H   |		Short_Literal	0x1							; Debug Table 0xc.0x3b = 0x421,0x1402
0422 e402       |    |		Load	0x2,0x2
0423 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0424 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0425 786b       |xk  |		Jump	0x491
0426 e402       |    |		Load	0x2,0x2								; Debug Table 0xc.0x3c = 0x426,0x23
0427 e003       |    |		Load	0x0,0x3
0428 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0429 e405       |    |		Load	0x2,0x5
042a 027c       | |  |		Execute	Discrete,Less
042b 685a       |hZ  |		Jump_Zero	0x486
042c e404       |    |		Load	0x2,0x4								; Debug Table 0xc.0x3d = 0x42c,0x24
042d e5fc       |    |		Load	0x2,-0x4
042e 027c       | |  |		Execute	Discrete,Less
042f 6840       |h@  |		Jump_Zero	0x470
0430 e404       |    |		Load	0x2,0x4								; Debug Table 0xc.0x3e = 0x430,0x25
0431 e5fc       |    |		Load	0x2,-0x4
0432 0aff       |    |		Execute_Immediate	Plus,-0x1
0433 027f       |    |		Execute	Discrete,Equal
0434 681a       |h   |		Jump_Zero	0x44f
0435 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0xc.0x3f = 0x435,0x26
0436 6802       |h   |		Jump_Zero	0x439
0437 e402       |    |		Load	0x2,0x2								; Debug Table 0xc.0x40 = 0x437,0x27
0438 8410       |    |		Call	0x2,0x10
0439 e402       |    |		Load	0x2,0x2								; Debug Table 0xc.0x41 = 0x439,0x28
													; Debug Table 0xc.0x42 = 0x439,0x1801
043a 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
043b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
043c 0a01       |    |		Execute_Immediate	Plus,0x1
043d e402       |    |		Load	0x2,0x2
043e 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
043f 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0440 4801       |H   |		Short_Literal	0x1							; Debug Table 0xc.0x43 = 0x440,0x1802
0441 e402       |    |		Load	0x2,0x2
0442 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0443 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0444 e402       |    |		Load	0x2,0x2								; Debug Table 0xc.0x44 = 0x444,0x29
0445 e003       |    |		Load	0x0,0x3
0446 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0447 e405       |    |		Load	0x2,0x5
0448 027d       | }  |		Execute	Discrete,Greater
0449 6801       |h   |		Jump_Zero	0x44b
044a 784d       |xM  |		Jump	0x498								; Debug Table 0xc.0x45 = 0x44a,0x2a
044b e402       |    |		Load	0x2,0x2								; Debug Table 0xc.0x46 = 0x44b,0x2b
044c 840d       |    |		Call	0x2,0xd
044d 00d1       |    |		Pop_Control	Pop_Count_1
044e 7842       |xB  |		Jump	0x491
044f e402       |    |		Load	0x2,0x2								; Debug Table 0xc.0x47 = 0x44f,0x2c
0450 4801       |H   |		Short_Literal	0x1
0451 e005       |    |		Load	0x0,0x5
0452 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0453 00d1       |    |		Pop_Control	Pop_Count_1
0454 e405       |    |		Load	0x2,0x5								; Debug Table 0xc.0x48 = 0x454,0x2d
0455 0aff       |    |		Execute_Immediate	Plus,-0x1
0456 c405       |    |		Store	0x2,0x5
0457 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xc.0x49 = 0x457,0x2e
0458 01db       |    |		Execute	Vector,Length
0459 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
045a 680b       |h   |		Jump_Zero	0x466
045b e402       |    |		Load	0x2,0x2
045c 840c       |    |		Call	0x2,0xc
045d 6808       |h   |		Jump_Zero	0x466
045e e402       |    |		Load	0x2,0x2								; Debug Table 0xc.0x4a = 0x45e,0x2f
045f e5fd       |    |		Load	0x2,-0x3
0460 01db       |    |		Execute	Vector,Length
0461 00e3       |    |		Load_Encached	Natural_Cache
0462 025b       | [  |		Execute	Discrete,Check_In_Type
0463 e005       |    |		Load	0x0,0x5
0464 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0465 00d1       |    |		Pop_Control	Pop_Count_1
0466 e402       |    |		Load	0x2,0x2								; Debug Table 0xc.0x4b = 0x466,0x30
0467 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0468 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0469 e40a       |    |		Load	0x2,0xa
046a 027d       | }  |		Execute	Discrete,Greater
046b 6825       |h%  |		Jump_Zero	0x491
046c e402       |    |		Load	0x2,0x2								; Debug Table 0xc.0x4c = 0x46c,0x31
046d 8412       |    |		Call	0x2,0x12
046e 00d1       |    |		Pop_Control	Pop_Count_1
046f 7821       |x!  |		Jump	0x491
0470 e402       |    |		Load	0x2,0x2								; Debug Table 0xc.0x4d = 0x470,0x32
													; Debug Table 0xc.0x4e = 0x470,0x1c01
0471 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0472 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0473 0a01       |    |		Execute_Immediate	Plus,0x1
0474 e402       |    |		Load	0x2,0x2
0475 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0476 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0477 4801       |H   |		Short_Literal	0x1							; Debug Table 0xc.0x4f = 0x477,0x1c02
0478 e402       |    |		Load	0x2,0x2
0479 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
047a 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
047b e402       |    |		Load	0x2,0x2								; Debug Table 0xc.0x50 = 0x47b,0x33
047c e003       |    |		Load	0x0,0x3
047d 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
047e e405       |    |		Load	0x2,0x5
047f 027d       | }  |		Execute	Discrete,Greater
0480 6801       |h   |		Jump_Zero	0x482
0481 7816       |x   |		Jump	0x498								; Debug Table 0xc.0x51 = 0x481,0x34
0482 e402       |    |		Load	0x2,0x2								; Debug Table 0xc.0x52 = 0x482,0x35
0483 840d       |    |		Call	0x2,0xd
0484 00d1       |    |		Pop_Control	Pop_Count_1
0485 780b       |x   |		Jump	0x491
0486 e402       |    |		Load	0x2,0x2								; Debug Table 0xc.0x53 = 0x486,0x36
													; Debug Table 0xc.0x54 = 0x486,0x2001
0487 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0488 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0489 0a01       |    |		Execute_Immediate	Plus,0x1
048a e402       |    |		Load	0x2,0x2
048b 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
048c 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
048d 4801       |H   |		Short_Literal	0x1							; Debug Table 0xc.0x55 = 0x48d,0x2002
048e e402       |    |		Load	0x2,0x2
048f 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0490 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0491 00c9       |    |		Action	Pop_Auxiliary_Loop
0492 e402       |    |		Load	0x2,0x2								; Debug Table 0xc.0x56 = 0x492,0x1c
0493 e003       |    |		Load	0x0,0x3
0494 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0495 e405       |    |		Load	0x2,0x5
0496 027a       | z  |		Execute	Discrete,Less_Equal
0497 7773       |ws  |		Jump_Nonzero	0x40b
0498 00ce       |    |		Action	Pop_Auxiliary
0499 e402       |    |		Load	0x2,0x2								; Debug Table 0xc.0x57 = 0x499,0x37
049a 8411       |    |		Call	0x2,0x11
049b 00d1       |    |		Pop_Control	Pop_Count_1
049c e402       |    |		Load	0x2,0x2								; Debug Table 0xc.0x58 = 0x49c,0x38
049d e5f9       |    |		Load	0x2,-0x7
049e 2404       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x4
049f 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
04a0 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
04a1 e5fa       |    |		Load	0x2,-0x6							; Debug Table 0xc.0x59 = 0x4a1,0x39
04a2 6813       |h   |		Jump_Zero	0x4b6
04a3 e5f9       |    |		Load	0x2,-0x7							; Debug Table 0xc.0x5a = 0x4a3,0x3a
04a4 2509       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x9
04a5 e00b       |    |		Load	0x0,0xb
04a6 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04a7 0322       | "  |		Declare_Variable	Record
04a8 e402       |    |		Load	0x2,0x2
04a9 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
04aa 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
04ab 0a01       |    |		Execute_Immediate	Plus,0x1
04ac 00d9       |    |		Load_Top	At_Offset_1
04ad 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
04ae 4801       |H   |		Short_Literal	0x1
04af 00d9       |    |		Load_Top	At_Offset_1
04b0 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
04b1 e406       |    |		Load	0x2,0x6
04b2 e006       |    |		Load	0x0,0x6
04b3 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
04b4 e5f9       |    |		Load	0x2,-0x7
04b5 2909       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x9
04b6 e5f9       |    |		Load	0x2,-0x7							; Debug Table 0xc.0x5b = 0x4b6,0x3b
04b7 2404       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x4
04b8 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
04b9 e003       |    |		Load	0x0,0x3
04ba 1876       | v  |		Execute	Package,Field_Execute,Field_Number 0x76
04bb 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
04bc			TRAP_0348:
04bc 0007       |    |		Action	Break_Optional
04bd e5f9       |    |		Load	0x2,-0x7							; Debug Table 0xc.0x5c = 0x4bd,0x3c
04be 2404       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x4
04bf 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
04c0 e003       |    |		Load	0x0,0x3
04c1 1876       | v  |		Execute	Package,Field_Execute,Field_Number 0x76
04c2 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x5d = 0x4c2,0x3d
04c3 0101       |    |		Execute	Exception,Reraise
04c4 0000 0000  |    |		.BLANK	0000[0x4]
04c8 ; --------------------------------------------------------------------------------------
04c8 ; SUBPROGRAM
04c8 ; --------------------------------------------------------------------------------------
04c8 04cb       |    |		.CONST	0x04cb								; Address of begin
04c9 04d6       |    |		.CONST	0x04d6								; Address of exception handler
04ca 0001       |    |		.CONST	0x0001								; Number of locals
04cb			BODY_04c8:
04cb			INIT_04c8:
04cb 0092 093f  |   ?|		Action	Push_String_Extended,0x93f					; "OBJECT_EDITOR"
													; Debug Table 0xd = .DEBUG	0x04cb,0x0cbc,0x0002,0x0000,0x0059,0x8e75,0x0000,0x0a28
													; Debug Table 0xd.0x0 = 0x4cb,0x1
04cd 00db       |    |		Load_Top	At_Offset_3
04ce 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
04cf e003       |    |		Load	0x0,0x3
04d0 1b36       | 6  |		Execute	Package,Field_Read,Field_Number 0x36
04d1 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
04d2 0092 0940  |   @|		Action	Push_String_Extended,0x940					; "(ada)"
04d4 01df       |    |		Execute	Vector,Equal
04d5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04d6			TRAP_04c8:
04d6 0007       |    |		Action	Break_Optional
04d7 4800       |H   |		Short_Literal	0x0							; Debug Table 0xd.0x1 = 0x4d7,0x2
04d8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04d9 0000 0000  |    |		.BLANK	0000[0x7]
04e0 ; --------------------------------------------------------------------------------------
04e0 ; SUBPROGRAM
04e0 ; --------------------------------------------------------------------------------------
04e0 04e8       |    |		.CONST	0x04e8								; Address of begin
04e1 0004       |    |		.CONST	0x0004								; Address of exception handler
04e2 0002       |    |		.CONST	0x0002								; Number of locals
04e3			INIT_04e0:
04e3 4820       |H   |		Short_Literal	0x20							; Debug Table 0xe = .DEBUG	0x04e3,0x0cc2,0x0002,0x0000,0x0059,0x8e75,0x0000,0x0a4d
													; Debug Table 0xe.0x0 = 0x4e3,0xffff
04e4 00db       |    |		Load_Top	At_Offset_3
04e5 821f       |    |		Call	0x1,0x1f
04e6 e004       |    |		Load	0x0,0x4
04e7 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
04e8			BODY_04e0:
04e8 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x1 = 0x4e8,0x1
04e9 01db       |    |		Execute	Vector,Length
04ea 0c03       |    |		Execute_Immediate	Greater_Equal,0x3
04eb 681e       |h   |		Jump_Zero	0x50a
04ec 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x2 = 0x4ec,0x2
04ed 01dd       |    |		Execute	Vector,First
04ee 0a02       |    |		Execute_Immediate	Plus,0x2
04ef 0248       | H  |		Execute	Discrete,Check_In_Integer
04f0 00d9       |    |		Load_Top	At_Offset_1
04f1 01d7       |    |		Execute	Vector,Field_Read
04f2 e004       |    |		Load	0x0,0x4
04f3 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
04f4 4861       |Ha  |		Short_Literal	0x61
04f5 487a       |Hz  |		Short_Literal	0x7a
04f6 0262       | b  |		Execute	Discrete,In_Range
04f7 6809       |h   |		Jump_Zero	0x501
04f8 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x3 = 0x4f8,0x3
04f9 01dd       |    |		Execute	Vector,First
04fa 00d9       |    |		Load_Top	At_Offset_1
04fb 01dd       |    |		Execute	Vector,First
04fc 0a01       |    |		Execute_Immediate	Plus,0x1
04fd 0248       | H  |		Execute	Discrete,Check_In_Integer
04fe 00da       |    |		Load_Top	At_Offset_2
04ff 01cf       |    |		Execute	Vector,Slice_Read
0500 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0501 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x4 = 0x501,0x4
0502 01dd       |    |		Execute	Vector,First
0503 00d9       |    |		Load_Top	At_Offset_1
0504 01dd       |    |		Execute	Vector,First
0505 0a02       |    |		Execute_Immediate	Plus,0x2
0506 0248       | H  |		Execute	Discrete,Check_In_Integer
0507 00da       |    |		Load_Top	At_Offset_2
0508 01cf       |    |		Execute	Vector,Slice_Read
0509 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
050a 0092 0941  |   A|		Action	Push_String_Extended,0x941					; "-- "
													; Debug Table 0xe.0x5 = 0x50a,0x5
050c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
050d 0000 0000  |    |		.XXX[0x3]
050f 0000       |    |
0510 ; --------------------------------------------------------------------------------------
0510 ; SUBPROGRAM
0510 ; --------------------------------------------------------------------------------------
0510 0518       |    |		.CONST	0x0518								; Address of begin
0511 0004       |    |		.CONST	0x0004								; Address of exception handler
0512 0002       |    |		.CONST	0x0002								; Number of locals
0513			INIT_0510:
0513 4820       |H   |		Short_Literal	0x20							; Debug Table 0xf = .DEBUG	0x0513,0x0cd0,0x0002,0x0000,0x0059,0x8e75,0x0000,0x0aad
													; Debug Table 0xf.0x0 = 0x513,0xffff
0514 00db       |    |		Load_Top	At_Offset_3
0515 821f       |    |		Call	0x1,0x1f
0516 e004       |    |		Load	0x0,0x4
0517 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0518			BODY_0510:
0518 4800       |H   |		Short_Literal	0x0							; Debug Table 0xf.0x1 = 0x518,0x1
0519 00d9       |    |		Load_Top	At_Offset_1
051a 0092 0942  |   B|		Action	Push_String_Extended,0x942					; "--"
051c e004       |    |		Load	0x0,0x4
051d 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
051e 00d9       |    |		Load_Top	At_Offset_1
051f 01dd       |    |		Execute	Vector,First
0520 027f       |    |		Execute	Discrete,Equal
0521 6802       |h   |		Jump_Zero	0x524
0522 4801       |H   |		Short_Literal	0x1							; Debug Table 0xf.0x2 = 0x522,0x2
0523 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0524 4800       |H   |		Short_Literal	0x0							; Debug Table 0xf.0x3 = 0x524,0x3
0525 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0526 0000 0000  |    |		.XXX[0x2]
0528 ; --------------------------------------------------------------------------------------
0528 ; SUBPROGRAM
0528 ; --------------------------------------------------------------------------------------
0528 0530       | 0  |		.CONST	0x0530								; Address of begin
0529 0004       |    |		.CONST	0x0004								; Address of exception handler
052a 0002       |    |		.CONST	0x0002								; Number of locals
052b			INIT_0528:
052b 4820       |H   |		Short_Literal	0x20							; Debug Table 0x10 = .DEBUG	0x052b,0x0cda,0x0002,0x0000,0x0059,0x8e75,0x0000,0x0ae0
													; Debug Table 0x10.0x0 = 0x52b,0xffff
052c 00db       |    |		Load_Top	At_Offset_3
052d 821f       |    |		Call	0x1,0x1f
052e e004       |    |		Load	0x0,0x4
052f 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0530			BODY_0528:
0530 4800       |H   |		Short_Literal	0x0							; Debug Table 0x10.0x1 = 0x530,0x1
0531 00d9       |    |		Load_Top	At_Offset_1
0532 0092 0942  |   B|		Action	Push_String_Extended,0x942					; "--"
0534 e004       |    |		Load	0x0,0x4
0535 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0536 00d9       |    |		Load_Top	At_Offset_1
0537 01dd       |    |		Execute	Vector,First
0538 027f       |    |		Execute	Discrete,Equal
0539 6809       |h   |		Jump_Zero	0x543
053a 4820       |H   |		Short_Literal	0x20
053b 00d9       |    |		Load_Top	At_Offset_1
053c e004       |    |		Load	0x0,0x4
053d 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
053e 01db       |    |		Execute	Vector,Length
053f 0c03       |    |		Execute_Immediate	Greater_Equal,0x3
0540 6802       |h   |		Jump_Zero	0x543
0541 4801       |H   |		Short_Literal	0x1							; Debug Table 0x10.0x2 = 0x541,0x2
0542 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0543 4800       |H   |		Short_Literal	0x0							; Debug Table 0x10.0x3 = 0x543,0x3
0544 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0545 0000 0000  |    |		.XXX[0x3]
0547 0000       |    |
0548 ; --------------------------------------------------------------------------------------
0548 ; SUBPROGRAM
0548 ; --------------------------------------------------------------------------------------
0548 055b       | [  |		.CONST	0x055b								; Address of begin
0549 0004       |    |		.CONST	0x0004								; Address of exception handler
054a 0004       |    |		.CONST	0x0004								; Number of locals
054b			INIT_0548:
054b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x11 = .DEBUG	0x054b,0x0ce4,0x0001,0x0000,0x0059,0x8e75,0x0000,0x0b21
													; Debug Table 0x11.0x0 = 0x54b,0xffff
054c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
054d e003       |    |		Load	0x0,0x3
054e 184c       | L  |		Execute	Package,Field_Execute,Field_Number 0x4c
054f 00e3       |    |		Load_Encached	Natural_Cache
0550 03f1       |    |		Declare_Variable	Discrete,With_Value
0551 e003       |    |		Load	0x0,0x3								; Debug Table 0x11.0x1 = 0x551,0xfffe
0552 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0553 0322       | "  |		Declare_Variable	Record
0554 00d8       |    |		Load_Top	At_Offset_0
0555 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0556 e003       |    |		Load	0x0,0x3								; Debug Table 0x11.0x2 = 0x556,0xfffd
0557 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0558 0322       | "  |		Declare_Variable	Record
0559 00d8       |    |		Load_Top	At_Offset_0
055a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
055b			BODY_0548:
055b 4801       |H   |		Short_Literal	0x1							; Debug Table 0x11.0x3 = 0x55b,0x1
055c e5ff       |    |		Load	0x2,-0x1
055d 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
055e 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
055f e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x11.0x4 = 0x55f,0x2
0560 00d9       |    |		Load_Top	At_Offset_1
0561 017d       | }  |		Execute	Record,Structure_Write
0562 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x5 = 0x562,0x3
0563 00da       |    |		Load_Top	At_Offset_2
0564 017d       | }  |		Execute	Record,Structure_Write
0565 00cf       |    |		Action	Mark_Auxiliary
0566 780f       |x   |		Jump	0x576
0567 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x11.0x6 = 0x567,0x5
0568 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0569 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
056a 0aff       |    |		Execute_Immediate	Plus,-0x1
056b 00da       |    |		Load_Top	At_Offset_2
056c 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
056d 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
056e 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x11.0x7 = 0x56e,0x6
056f 8225       | %  |		Call	0x1,0x25
0570 680a       |h   |		Jump_Zero	0x57b
0571 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x11.0x8 = 0x571,0x7
0572 e5ff       |    |		Load	0x2,-0x1
0573 017d       | }  |		Execute	Record,Structure_Write
0574 7800       |x   |		Jump	0x575
0575 00c9       |    |		Action	Pop_Auxiliary_Loop
0576 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x11.0x9 = 0x576,0x4
0577 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0578 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0579 0c02       |    |		Execute_Immediate	Greater_Equal,0x2
057a 77ec       |w   |		Jump_Nonzero	0x567
057b 00c9       |    |		Action	Pop_Auxiliary_Loop
057c 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x11.0xa = 0x57c,0x9
													; Debug Table 0x11.0xb = 0x57c,0xa
057d 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
057e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
057f 0a01       |    |		Execute_Immediate	Plus,0x1
0580 00db       |    |		Load_Top	At_Offset_3
0581 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0582 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0583 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x11.0xc = 0x583,0xb
0584 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0585 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0586 e402       |    |		Load	0x2,0x2
0587 027d       | }  |		Execute	Discrete,Greater
0588 6804       |h   |		Jump_Zero	0x58d
0589 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x11.0xd = 0x589,0xc
058a e5fe       |    |		Load	0x2,-0x2
058b 017d       | }  |		Execute	Record,Structure_Write
058c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x11.0xe = 0x58c,0xd
058d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x11.0xf = 0x58d,0xe
058e 8225       | %  |		Call	0x1,0x25
058f 6801       |h   |		Jump_Zero	0x591
0590 7804       |x   |		Jump	0x595								; Debug Table 0x11.0x10 = 0x590,0xf
0591 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x11.0x11 = 0x591,0x10
0592 e5fe       |    |		Load	0x2,-0x2
0593 017d       | }  |		Execute	Record,Structure_Write
0594 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x11.0x12 = 0x594,0x11
0595 00c9       |    |		Action	Pop_Auxiliary_Loop
0596 7fe5       |    |		Jump	0x57c
0597 0000       |    |		.XXX[0x1]
0598 ; --------------------------------------------------------------------------------------
0598 ; SUBPROGRAM
0598 ; --------------------------------------------------------------------------------------
0598 05a1       |    |		.CONST	0x05a1								; Address of begin
0599 05b0       |    |		.CONST	0x05b0								; Address of exception handler
059a 0002       |    |		.CONST	0x0002								; Number of locals
059b			INIT_0598:
059b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x12 = .DEBUG	0x059b,0x0d0c,0x0002,0x0000,0x0059,0x8e75,0x0000,0x0208
													; Debug Table 0x12.0x0 = 0x59b,0xffff
059c e003       |    |		Load	0x0,0x3
059d 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
059e e003       |    |		Load	0x0,0x3
059f 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
05a0 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
05a1			BODY_0598:
05a1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0x1 = 0x5a1,0x1
05a2 e5fd       |    |		Load	0x2,-0x3
05a3 01db       |    |		Execute	Vector,Length
05a4 0273       | s  |		Execute	Discrete,Plus
05a5 0248       | H  |		Execute	Discrete,Check_In_Integer
05a6 0aff       |    |		Execute_Immediate	Plus,-0x1
05a7 00e4       |    |		Load_Encached	Positive_Cache
05a8 025b       | [  |		Execute	Discrete,Check_In_Type
05a9 00d9       |    |		Load_Top	At_Offset_1
05aa e7ff       |    |		Load	0x3,-0x1
05ab e005       |    |		Load	0x0,0x5
05ac 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
05ad e5fd       |    |		Load	0x2,-0x3
05ae 01df       |    |		Execute	Vector,Equal
05af 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05b0			TRAP_0598:
05b0 010e       |    |		Execute	Exception,Is_Constraint_Error
05b1 6802       |h   |		Jump_Zero	0x5b4
05b2 4800       |H   |		Short_Literal	0x0							; Debug Table 0x12.0x2 = 0x5b2,0x2
05b3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05b4 0100       |    |		Execute	Exception,Raise
05b5 0000 0000  |    |		.XXX[0x3]
05b7 0000       |    |
05b8 ; --------------------------------------------------------------------------------------
05b8 ; SUBPROGRAM
05b8 ; --------------------------------------------------------------------------------------
05b8 05bb       |    |		.CONST	0x05bb								; Address of begin
05b9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ba 0001       |    |		.CONST	0x0001								; Number of locals
05bb			BODY_05b8:
05bb			INIT_05b8:
05bb e408       |    |		Load	0x2,0x8								; Debug Table 0x13 = .DEBUG	0x05bb,0x0d14,0x0001,0x0000,0x0059,0x8e75,0x0000,0x0241
													; Debug Table 0x13.0x0 = 0x5bb,0x1
05bc 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
05bd 6812       |h   |		Jump_Zero	0x5d0
05be 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x13.0x1 = 0x5be,0x2
05bf 4801       |H   |		Short_Literal	0x1
05c0 e408       |    |		Load	0x2,0x8
05c1 00e9       |    |		Load_Encached	String_Cache
05c2 0334       | 4  |		Declare_Variable	Array,With_Constraint
05c3 00d8       |    |		Load_Top	At_Offset_0
05c4 01dc       |    |		Execute	Vector,Last
05c5 4801       |H   |		Short_Literal	0x1
05c6 0263       | c  |		Execute	Discrete,Above_Bound
05c7 7005       |p   |		Jump_Nonzero	0x5cd
05c8 4820       |H   |		Short_Literal	0x20
05c9 00d9       |    |		Load_Top	At_Offset_1
05ca e603       |    |		Load	0x3,0x3
05cb 01d6       |    |		Execute	Vector,Field_Write
05cc 3ffb       |?   |		Loop_Increasing	0x5c8
05cd e005       |    |		Load	0x0,0x5
05ce 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
05cf 00d1       |    |		Pop_Control	Pop_Count_1
05d0 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x13.0x2 = 0x5d0,0x3
05d1 01db       |    |		Execute	Vector,Length
05d2 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
05d3 680f       |h   |		Jump_Zero	0x5e3
05d4 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x13.0x3 = 0x5d4,0x4
05d5 840c       |    |		Call	0x2,0xc
05d6 7006       |p   |		Jump_Nonzero	0x5dd
05d7 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x13.0x4 = 0x5d7,0x5
05d8 e5fd       |    |		Load	0x2,-0x3
05d9 e005       |    |		Load	0x0,0x5
05da 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
05db 00d1       |    |		Pop_Control	Pop_Count_1
05dc 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
05dd 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x13.0x5 = 0x5dd,0x6
05de e5fd       |    |		Load	0x2,-0x3
05df 01db       |    |		Execute	Vector,Length
05e0 e003       |    |		Load	0x0,0x3
05e1 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
05e2 00d1       |    |		Pop_Control	Pop_Count_1
05e3 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
05e4 0000 0000  |    |		.BLANK	0000[0x4]
05e8 ; --------------------------------------------------------------------------------------
05e8 ; SUBPROGRAM
05e8 ; --------------------------------------------------------------------------------------
05e8 05f8       |    |		.CONST	0x05f8								; Address of begin
05e9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ea 0003       |    |		.CONST	0x0003								; Number of locals
05eb			INIT_05e8:
05eb e003       |    |		Load	0x0,0x3								; Debug Table 0x14 = .DEBUG	0x05eb,0x0d22,0x0001,0x0000,0x0059,0x8e75,0x0000,0x028c
													; Debug Table 0x14.0x0 = 0x5eb,0xffff
05ec 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
05ed 0322       | "  |		Declare_Variable	Record
05ee 00db       |    |		Load_Top	At_Offset_3
05ef 00d9       |    |		Load_Top	At_Offset_1
05f0 017d       | }  |		Execute	Record,Structure_Write
05f1 e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x14.0x1 = 0x5f1,0xfffe
05f2 00e4       |    |		Load_Encached	Positive_Cache
05f3 025b       | [  |		Execute	Discrete,Check_In_Type
05f4 4801       |H   |		Short_Literal	0x1
05f5 e7ff       |    |		Load	0x3,-0x1
05f6 e005       |    |		Load	0x0,0x5
05f7 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
05f8			BODY_05e8:
05f8 00cf       |    |		Action	Mark_Auxiliary
05f9 e40a       |    |		Load	0x2,0xa								; Debug Table 0x14.0x2 = 0x5f9,0x1
05fa e5fc       |    |		Load	0x2,-0x4
05fb 0a01       |    |		Execute_Immediate	Plus,0x1
05fc 0248       | H  |		Execute	Discrete,Check_In_Integer
05fd 0264       | d  |		Execute	Discrete,Below_Bound
05fe 7049       |pI  |		Jump_Nonzero	0x648
05ff 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x14.0x3 = 0x5ff,0x2
0600 e603       |    |		Load	0x3,0x3
0601 01d7       |    |		Execute	Vector,Field_Read
0602 0f20       |    |		Execute_Immediate	Equal,0x20
0603 6842       |hB  |		Jump_Zero	0x646
0604 e602       |    |		Load	0x3,0x2								; Debug Table 0x14.0x4 = 0x604,0x3
0605 00d9       |    |		Load_Top	At_Offset_1
0606 00e4       |    |		Load_Encached	Positive_Cache
0607 025b       | [  |		Execute	Discrete,Check_In_Type
0608 e003       |    |		Load	0x0,0x3
0609 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
060a 00d1       |    |		Pop_Control	Pop_Count_1
060b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x14.0x5 = 0x60b,0x4
060c e7fe       |    |		Load	0x3,-0x2
060d 027c       | |  |		Execute	Discrete,Less
060e 680d       |h   |		Jump_Zero	0x61c
060f 00d8       |    |		Load_Top	At_Offset_0
0610 0a01       |    |		Execute_Immediate	Plus,0x1
0611 0248       | H  |		Execute	Discrete,Check_In_Integer
0612 e603       |    |		Load	0x3,0x3
0613 01d7       |    |		Execute	Vector,Field_Read
0614 0f20       |    |		Execute_Immediate	Equal,0x20
0615 6806       |h   |		Jump_Zero	0x61c
0616 e602       |    |		Load	0x3,0x2								; Debug Table 0x14.0x6 = 0x616,0x5
0617 4802       |H   |		Short_Literal	0x2
0618 e005       |    |		Load	0x0,0x5
0619 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
061a 00d1       |    |		Pop_Control	Pop_Count_1
061b 781e       |x   |		Jump	0x63a
061c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x14.0x7 = 0x61c,0x6
061d e40a       |    |		Load	0x2,0xa
061e 027d       | }  |		Execute	Discrete,Greater
061f 6815       |h   |		Jump_Zero	0x635
0620 00d8       |    |		Load_Top	At_Offset_0
0621 0aff       |    |		Execute_Immediate	Plus,-0x1
0622 0248       | H  |		Execute	Discrete,Check_In_Integer
0623 e603       |    |		Load	0x3,0x3
0624 01d7       |    |		Execute	Vector,Field_Read
0625 0f20       |    |		Execute_Immediate	Equal,0x20
0626 680e       |h   |		Jump_Zero	0x635
0627 e602       |    |		Load	0x3,0x2								; Debug Table 0x14.0x8 = 0x627,0x7
0628 00d9       |    |		Load_Top	At_Offset_1
0629 0aff       |    |		Execute_Immediate	Plus,-0x1
062a 00e4       |    |		Load_Encached	Positive_Cache
062b 025b       | [  |		Execute	Discrete,Check_In_Type
062c e003       |    |		Load	0x0,0x3
062d 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
062e 00d1       |    |		Pop_Control	Pop_Count_1
062f e602       |    |		Load	0x3,0x2								; Debug Table 0x14.0x9 = 0x62f,0x8
0630 4802       |H   |		Short_Literal	0x2
0631 e005       |    |		Load	0x0,0x5
0632 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0633 00d1       |    |		Pop_Control	Pop_Count_1
0634 7805       |x   |		Jump	0x63a
0635 e602       |    |		Load	0x3,0x2								; Debug Table 0x14.0xa = 0x635,0x9
0636 4801       |H   |		Short_Literal	0x1
0637 e005       |    |		Load	0x0,0x5
0638 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0639 00d1       |    |		Pop_Control	Pop_Count_1
063a e602       |    |		Load	0x3,0x2								; Debug Table 0x14.0xb = 0x63a,0xa
063b 4801       |H   |		Short_Literal	0x1
063c e005       |    |		Load	0x0,0x5
063d 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
063e 00d1       |    |		Pop_Control	Pop_Count_1
063f e602       |    |		Load	0x3,0x2								; Debug Table 0x14.0xc = 0x63f,0xb
0640 840d       |    |		Call	0x2,0xd
0641 00d1       |    |		Pop_Control	Pop_Count_1
0642 e405       |    |		Load	0x2,0x5								; Debug Table 0x14.0xd = 0x642,0xc
0643 0a01       |    |		Execute_Immediate	Plus,0x1
0644 c405       |    |		Store	0x2,0x5
0645 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x14.0xe = 0x645,0xd
0646 00c8       |    |		Action	Pop_Auxiliary_Range
0647 37b7       |7   |		Loop_Decreasing	0x5ff
0648 00c9       |    |		Action	Pop_Auxiliary_Loop
0649 e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x14.0xf = 0x649,0xe
064a e5fc       |    |		Load	0x2,-0x4
064b 0a02       |    |		Execute_Immediate	Plus,0x2
064c 0248       | H  |		Execute	Discrete,Check_In_Integer
064d 0263       | c  |		Execute	Discrete,Above_Bound
064e 7030       |p0  |		Jump_Nonzero	0x67f
064f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x14.0x10 = 0x64f,0xf
0650 e603       |    |		Load	0x3,0x3
0651 01d7       |    |		Execute	Vector,Field_Read
0652 0f20       |    |		Execute_Immediate	Equal,0x20
0653 6829       |h)  |		Jump_Zero	0x67d
0654 e602       |    |		Load	0x3,0x2								; Debug Table 0x14.0x11 = 0x654,0x10
0655 00d9       |    |		Load_Top	At_Offset_1
0656 00e4       |    |		Load_Encached	Positive_Cache
0657 025b       | [  |		Execute	Discrete,Check_In_Type
0658 e003       |    |		Load	0x0,0x3
0659 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
065a 00d1       |    |		Pop_Control	Pop_Count_1
065b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x14.0x12 = 0x65b,0x11
065c e7fe       |    |		Load	0x3,-0x2
065d 027c       | |  |		Execute	Discrete,Less
065e 680d       |h   |		Jump_Zero	0x66c
065f 00d8       |    |		Load_Top	At_Offset_0
0660 0a01       |    |		Execute_Immediate	Plus,0x1
0661 0248       | H  |		Execute	Discrete,Check_In_Integer
0662 e603       |    |		Load	0x3,0x3
0663 01d7       |    |		Execute	Vector,Field_Read
0664 0f20       |    |		Execute_Immediate	Equal,0x20
0665 6806       |h   |		Jump_Zero	0x66c
0666 e602       |    |		Load	0x3,0x2								; Debug Table 0x14.0x13 = 0x666,0x12
0667 4802       |H   |		Short_Literal	0x2
0668 e005       |    |		Load	0x0,0x5
0669 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
066a 00d1       |    |		Pop_Control	Pop_Count_1
066b 7805       |x   |		Jump	0x671
066c e602       |    |		Load	0x3,0x2								; Debug Table 0x14.0x14 = 0x66c,0x13
066d 4801       |H   |		Short_Literal	0x1
066e e005       |    |		Load	0x0,0x5
066f 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0670 00d1       |    |		Pop_Control	Pop_Count_1
0671 e602       |    |		Load	0x3,0x2								; Debug Table 0x14.0x15 = 0x671,0x14
0672 4801       |H   |		Short_Literal	0x1
0673 e005       |    |		Load	0x0,0x5
0674 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0675 00d1       |    |		Pop_Control	Pop_Count_1
0676 e602       |    |		Load	0x3,0x2								; Debug Table 0x14.0x16 = 0x676,0x15
0677 840d       |    |		Call	0x2,0xd
0678 00d1       |    |		Pop_Control	Pop_Count_1
0679 e405       |    |		Load	0x2,0x5								; Debug Table 0x14.0x17 = 0x679,0x16
067a 0a01       |    |		Execute_Immediate	Plus,0x1
067b c405       |    |		Store	0x2,0x5
067c 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x14.0x18 = 0x67c,0x17
067d 00c8       |    |		Action	Pop_Auxiliary_Range
067e 3fd0       |?   |		Loop_Increasing	0x64f
067f 00ce       |    |		Action	Pop_Auxiliary
0680 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x14.0x19 = 0x680,0x18
													; Debug Table 0x14.0x1a = 0x680,0x401
0681 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0682 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0683 0a01       |    |		Execute_Immediate	Plus,0x1
0684 00da       |    |		Load_Top	At_Offset_2
0685 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0686 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0687 4801       |H   |		Short_Literal	0x1							; Debug Table 0x14.0x1b = 0x687,0x402
0688 00da       |    |		Load_Top	At_Offset_2
0689 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
068a 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
068b 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x14.0x1c = 0x68b,0x19
068c e003       |    |		Load	0x0,0x3
068d 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
068e e405       |    |		Load	0x2,0x5
068f 027a       | z  |		Execute	Discrete,Less_Equal
0690 6803       |h   |		Jump_Zero	0x694
0691 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x14.0x1d = 0x691,0x1a
0692 840d       |    |		Call	0x2,0xd
0693 00d1       |    |		Pop_Control	Pop_Count_1
0694 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0695 0000 0000  |    |		.XXX[0x3]
0697 0000       |    |
0698 ; --------------------------------------------------------------------------------------
0698 ; SUBPROGRAM
0698 ; --------------------------------------------------------------------------------------
0698 06c3       |    |		.CONST	0x06c3								; Address of begin
0699 07c4       |    |		.CONST	0x07c4								; Address of exception handler
069a 0010       |    |		.CONST	0x0010								; Number of locals
069b			INIT_0698:
069b 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x15 = .DEBUG	0x069b,0x0d60,0x0001,0x0000,0x0059,0x8e75,0x0000,0x039b
													; Debug Table 0x15.0x0 = 0x69b,0xffff
069c 00e8       |    |		Load_Encached	Character_Cache						; Debug Table 0x15.0x1 = 0x69c,0xfffe
069d 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x15.0x2 = 0x69d,0xfffd
069e 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x15.0x3 = 0x69e,0xfffc
069f 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x15.0x4 = 0x69f,0xfffb
06a0 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
06a1 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x15.0x5 = 0x6a1,0xfffa
06a2 e003       |    |		Load	0x0,0x3
06a3 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
06a4 00e3       |    |		Load_Encached	Natural_Cache
06a5 03f1       |    |		Declare_Variable	Discrete,With_Value
06a6 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x15.0x6 = 0x6a6,0xfff9
06a7 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x15.0x7 = 0x6a7,0xfff8
06a8 e003       |    |		Load	0x0,0x3								; Debug Table 0x15.0x8 = 0x6a8,0xfff7
06a9 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
06aa 0322       | "  |		Declare_Variable	Record
06ab 00d8       |    |		Load_Top	At_Offset_0
06ac 1c00       |    |		Execute_Immediate	Run_Utility,0x0
06ad e003       |    |		Load	0x0,0x3								; Debug Table 0x15.0x9 = 0x6ad,0xfff6
06ae 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
06af 0322       | "  |		Declare_Variable	Record
06b0 e7ff       |    |		Load	0x3,-0x1
06b1 00d9       |    |		Load_Top	At_Offset_1
06b2 017d       | }  |		Execute	Record,Structure_Write
06b3 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x15.0xa = 0x6b3,0xfff5
06b4 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
06b5 e003       |    |		Load	0x0,0x3								; Debug Table 0x15.0xb = 0x6b5,0xfff4
06b6 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
06b7 0322       | "  |		Declare_Variable	Record
06b8 00d8       |    |		Load_Top	At_Offset_0
06b9 1c00       |    |		Execute_Immediate	Run_Utility,0x0
06ba 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x15.0xc = 0x6ba,0xfff3
06bb 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
06bc 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
06bd 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x15.0xd = 0x6bd,0xfff2
06be 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
06bf 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
06c0 e7fd       |    |		Load	0x3,-0x3							; Debug Table 0x15.0xe = 0x6c0,0xfff1
06c1 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
06c2 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
06c3			BODY_0698:
06c3 00cf       |    |		Action	Mark_Auxiliary
06c4 78fa       |x   |		Jump	0x7bf
06c5 4800       |H   |		Short_Literal	0x0							; Debug Table 0x15.0xf = 0x6c5,0x2
06c6 a602       |    |		Store_Unchecked	0x3,0x2
06c7 e607       |    |		Load	0x3,0x7								; Debug Table 0x15.0x10 = 0x6c7,0x3
06c8 e60e       |    |		Load	0x3,0xe
06c9 0272       | r  |		Execute	Discrete,Minus
06ca 0248       | H  |		Execute	Discrete,Check_In_Integer
06cb 0a01       |    |		Execute_Immediate	Plus,0x1
06cc c608       |    |		Store	0x3,0x8
06cd e60b       |    |		Load	0x3,0xb								; Debug Table 0x15.0x11 = 0x6cd,0x4
06ce e60d       |    |		Load	0x3,0xd
06cf 017d       | }  |		Execute	Record,Structure_Write
06d0 e607       |    |		Load	0x3,0x7								; Debug Table 0x15.0x12 = 0x6d0,0x5
06d1 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
06d2 68b8       |h   |		Jump_Zero	0x78b
06d3 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0x15.0x13 = 0x6d3,0x6
06d4 e607       |    |		Load	0x3,0x7								; Debug Table 0x15.0x14 = 0x6d4,0xfbff
06d5 00e4       |    |		Load_Encached	Positive_Cache
06d6 025b       | [  |		Execute	Discrete,Check_In_Type
06d7 e60e       |    |		Load	0x3,0xe
06d8 00e4       |    |		Load_Encached	Positive_Cache
06d9 025b       | [  |		Execute	Discrete,Check_In_Type
06da e60d       |    |		Load	0x3,0xd
06db e005       |    |		Load	0x0,0x5
06dc 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
06dd e60e       |    |		Load	0x3,0xe								; Debug Table 0x15.0x15 = 0x6dd,0xfbfe
06de e60e       |    |		Load	0x3,0xe
06df 00da       |    |		Load_Top	At_Offset_2
06e0 01db       |    |		Execute	Vector,Length
06e1 0273       | s  |		Execute	Discrete,Plus
06e2 0aff       |    |		Execute_Immediate	Plus,-0x1
06e3 0248       | H  |		Execute	Discrete,Check_In_Integer
06e4 00e9       |    |		Load_Encached	String_Cache
06e5 035b       | [  |		Declare_Type	Array,Constrained
06e6 0337       | 7  |		Declare_Variable	Array
06e7 00d9       |    |		Load_Top	At_Offset_1
06e8 00d9       |    |		Load_Top	At_Offset_1
06e9 01d4       |    |		Execute	Vector,Structure_Write
06ea e60e       |    |		Load	0x3,0xe								; Debug Table 0x15.0x16 = 0x6ea,0x401
06eb a604       |    |		Store_Unchecked	0x3,0x4
06ec 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x15.0x17 = 0x6ec,0x402
06ed 01dc       |    |		Execute	Vector,Last
06ee c609       |    |		Store	0x3,0x9
06ef 00cf       |    |		Action	Mark_Auxiliary
06f0 7851       |xQ  |		Jump	0x742
06f1 e60e       |    |		Load	0x3,0xe								; Debug Table 0x15.0x18 = 0x6f1,0x404
06f2 00da       |    |		Load_Top	At_Offset_2
06f3 01d7       |    |		Execute	Vector,Field_Read
06f4 a603       |    |		Store_Unchecked	0x3,0x3
06f5 e603       |    |		Load	0x3,0x3								; Debug Table 0x15.0x19 = 0x6f5,0x405
06f6 0f20       |    |		Execute_Immediate	Equal,0x20
06f7 682f       |h/  |		Jump_Zero	0x727
06f8 e606       |    |		Load	0x3,0x6								; Debug Table 0x15.0x1a = 0x6f8,0x406
06f9 6827       |h'  |		Jump_Zero	0x721
06fa e60c       |    |		Load	0x3,0xc								; Debug Table 0x15.0x1b = 0x6fa,0x407
06fb 6806       |h   |		Jump_Zero	0x702
06fc 4800       |H   |		Short_Literal	0x0							; Debug Table 0x15.0x1c = 0x6fc,0x408
06fd a60c       |    |		Store_Unchecked	0x3,0xc
06fe e60e       |    |		Load	0x3,0xe								; Debug Table 0x15.0x1d = 0x6fe,0x409
06ff 0a01       |    |		Execute_Immediate	Plus,0x1
0700 c60e       |    |		Store	0x3,0xe
0701 783f       |x?  |		Jump	0x741
0702 e602       |    |		Load	0x3,0x2								; Debug Table 0x15.0x1e = 0x702,0x40a
0703 700d       |p   |		Jump_Nonzero	0x711
0704 4801       |H   |		Short_Literal	0x1							; Debug Table 0x15.0x1f = 0x704,0x40b
0705 a602       |    |		Store_Unchecked	0x3,0x2
0706 e60e       |    |		Load	0x3,0xe								; Debug Table 0x15.0x20 = 0x706,0x40c
0707 a604       |    |		Store_Unchecked	0x3,0x4
0708 e607       |    |		Load	0x3,0x7								; Debug Table 0x15.0x21 = 0x708,0x40d
0709 e60e       |    |		Load	0x3,0xe
070a 0272       | r  |		Execute	Discrete,Minus
070b 0248       | H  |		Execute	Discrete,Check_In_Integer
070c 0a01       |    |		Execute_Immediate	Plus,0x1
070d c608       |    |		Store	0x3,0x8
070e e60b       |    |		Load	0x3,0xb								; Debug Table 0x15.0x22 = 0x70e,0x40e
070f e60d       |    |		Load	0x3,0xd
0710 017d       | }  |		Execute	Record,Structure_Write
0711 e60e       |    |		Load	0x3,0xe								; Debug Table 0x15.0x23 = 0x711,0x40f
0712 0a01       |    |		Execute_Immediate	Plus,0x1
0713 0248       | H  |		Execute	Discrete,Check_In_Integer
0714 e609       |    |		Load	0x3,0x9
0715 00db       |    |		Load_Top	At_Offset_3
0716 01cf       |    |		Execute	Vector,Slice_Read
0717 e60e       |    |		Load	0x3,0xe
0718 e609       |    |		Load	0x3,0x9
0719 0aff       |    |		Execute_Immediate	Plus,-0x1
071a 0248       | H  |		Execute	Discrete,Check_In_Integer
071b e614       |    |		Load	0x3,0x14
071c 01ce       |    |		Execute	Vector,Slice_Write
071d e609       |    |		Load	0x3,0x9								; Debug Table 0x15.0x24 = 0x71d,0x410
071e 0aff       |    |		Execute_Immediate	Plus,-0x1
071f c609       |    |		Store	0x3,0x9
0720 7820       |x   |		Jump	0x741
0721 4801       |H   |		Short_Literal	0x1							; Debug Table 0x15.0x25 = 0x721,0x411
0722 a606       |    |		Store_Unchecked	0x3,0x6
0723 e60e       |    |		Load	0x3,0xe								; Debug Table 0x15.0x26 = 0x723,0x412
0724 0a01       |    |		Execute_Immediate	Plus,0x1
0725 c60e       |    |		Store	0x3,0xe
0726 781a       |x   |		Jump	0x741
0727 e603       |    |		Load	0x3,0x3								; Debug Table 0x15.0x27 = 0x727,0x413
0728 e7fe       |    |		Load	0x3,-0x2
0729 01d7       |    |		Execute	Vector,Field_Read
072a 680d       |h   |		Jump_Zero	0x738
072b e606       |    |		Load	0x3,0x6								; Debug Table 0x15.0x28 = 0x72b,0x414
072c 6805       |h   |		Jump_Zero	0x732
072d 4800       |H   |		Short_Literal	0x0							; Debug Table 0x15.0x29 = 0x72d,0x415
072e a606       |    |		Store_Unchecked	0x3,0x6
072f 4800       |H   |		Short_Literal	0x0							; Debug Table 0x15.0x2a = 0x72f,0x416
0730 a60c       |    |		Store_Unchecked	0x3,0xc
0731 7802       |x   |		Jump	0x734
0732 4801       |H   |		Short_Literal	0x1							; Debug Table 0x15.0x2b = 0x732,0x417
0733 a60c       |    |		Store_Unchecked	0x3,0xc
0734 e60e       |    |		Load	0x3,0xe								; Debug Table 0x15.0x2c = 0x734,0x418
0735 0a01       |    |		Execute_Immediate	Plus,0x1
0736 c60e       |    |		Store	0x3,0xe
0737 7809       |x   |		Jump	0x741
0738 e606       |    |		Load	0x3,0x6								; Debug Table 0x15.0x2d = 0x738,0x419
0739 6802       |h   |		Jump_Zero	0x73c
073a 4800       |H   |		Short_Literal	0x0							; Debug Table 0x15.0x2e = 0x73a,0x41a
073b a606       |    |		Store_Unchecked	0x3,0x6
073c e60e       |    |		Load	0x3,0xe								; Debug Table 0x15.0x2f = 0x73c,0x41b
073d 0a01       |    |		Execute_Immediate	Plus,0x1
073e c60e       |    |		Store	0x3,0xe
073f 4800       |H   |		Short_Literal	0x0							; Debug Table 0x15.0x30 = 0x73f,0x41c
0740 a60c       |    |		Store_Unchecked	0x3,0xc
0741 00c9       |    |		Action	Pop_Auxiliary_Loop
0742 e60e       |    |		Load	0x3,0xe								; Debug Table 0x15.0x31 = 0x742,0x403
0743 e609       |    |		Load	0x3,0x9
0744 027c       | |  |		Execute	Discrete,Less
0745 77ab       |w   |		Jump_Nonzero	0x6f1
0746 00ce       |    |		Action	Pop_Auxiliary
0747 e60e       |    |		Load	0x3,0xe								; Debug Table 0x15.0x32 = 0x747,0x41d
0748 e609       |    |		Load	0x3,0x9
0749 027f       |    |		Execute	Discrete,Equal
074a 682e       |h.  |		Jump_Zero	0x779
074b e60e       |    |		Load	0x3,0xe								; Debug Table 0x15.0x33 = 0x74b,0x41e
074c 00d9       |    |		Load_Top	At_Offset_1
074d 01d7       |    |		Execute	Vector,Field_Read
074e 0f20       |    |		Execute_Immediate	Equal,0x20
074f 6829       |h)  |		Jump_Zero	0x779
0750 e606       |    |		Load	0x3,0x6								; Debug Table 0x15.0x34 = 0x750,0x41f
0751 6812       |h   |		Jump_Zero	0x764
0752 e602       |    |		Load	0x3,0x2								; Debug Table 0x15.0x35 = 0x752,0x420
0753 700c       |p   |		Jump_Nonzero	0x760
0754 4801       |H   |		Short_Literal	0x1							; Debug Table 0x15.0x36 = 0x754,0x421
0755 a602       |    |		Store_Unchecked	0x3,0x2
0756 e60e       |    |		Load	0x3,0xe								; Debug Table 0x15.0x37 = 0x756,0x422
0757 0aff       |    |		Execute_Immediate	Plus,-0x1
0758 c604       |    |		Store	0x3,0x4
0759 e607       |    |		Load	0x3,0x7								; Debug Table 0x15.0x38 = 0x759,0x423
075a e60e       |    |		Load	0x3,0xe
075b 0272       | r  |		Execute	Discrete,Minus
075c c608       |    |		Store	0x3,0x8
075d e60b       |    |		Load	0x3,0xb								; Debug Table 0x15.0x39 = 0x75d,0x424
075e e60d       |    |		Load	0x3,0xd
075f 017d       | }  |		Execute	Record,Structure_Write
0760 e609       |    |		Load	0x3,0x9								; Debug Table 0x15.0x3a = 0x760,0x425
0761 0afe       |    |		Execute_Immediate	Plus,-0x2
0762 c609       |    |		Store	0x3,0x9
0763 7812       |x   |		Jump	0x776
0764 e602       |    |		Load	0x3,0x2								; Debug Table 0x15.0x3b = 0x764,0x426
0765 700d       |p   |		Jump_Nonzero	0x773
0766 4801       |H   |		Short_Literal	0x1							; Debug Table 0x15.0x3c = 0x766,0x427
0767 a602       |    |		Store_Unchecked	0x3,0x2
0768 e60e       |    |		Load	0x3,0xe								; Debug Table 0x15.0x3d = 0x768,0x428
0769 a604       |    |		Store_Unchecked	0x3,0x4
076a e607       |    |		Load	0x3,0x7								; Debug Table 0x15.0x3e = 0x76a,0x429
076b e60e       |    |		Load	0x3,0xe
076c 0272       | r  |		Execute	Discrete,Minus
076d 0248       | H  |		Execute	Discrete,Check_In_Integer
076e 0a01       |    |		Execute_Immediate	Plus,0x1
076f c608       |    |		Store	0x3,0x8
0770 e60b       |    |		Load	0x3,0xb								; Debug Table 0x15.0x3f = 0x770,0x42a
0771 e60d       |    |		Load	0x3,0xd
0772 017d       | }  |		Execute	Record,Structure_Write
0773 e609       |    |		Load	0x3,0x9								; Debug Table 0x15.0x40 = 0x773,0x42b
0774 0aff       |    |		Execute_Immediate	Plus,-0x1
0775 c609       |    |		Store	0x3,0x9
0776 e60e       |    |		Load	0x3,0xe								; Debug Table 0x15.0x41 = 0x776,0x42c
0777 0a01       |    |		Execute_Immediate	Plus,0x1
0778 c60e       |    |		Store	0x3,0xe
0779 e602       |    |		Load	0x3,0x2								; Debug Table 0x15.0x42 = 0x779,0x42d
077a 680a       |h   |		Jump_Zero	0x785
077b e60d       |    |		Load	0x3,0xd								; Debug Table 0x15.0x43 = 0x77b,0x42e
077c e60d       |    |		Load	0x3,0xd
077d e604       |    |		Load	0x3,0x4
077e e609       |    |		Load	0x3,0x9
077f e614       |    |		Load	0x3,0x14
0780 01cf       |    |		Execute	Vector,Slice_Read
0781 e608       |    |		Load	0x3,0x8
0782 e005       |    |		Load	0x0,0x5
0783 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0784 00d2       |    |		Pop_Control	Pop_Count_2
0785 e60f       |    |		Load	0x3,0xf								; Debug Table 0x15.0x44 = 0x785,0x42f
0786 0a01       |    |		Execute_Immediate	Plus,0x1
0787 c60f       |    |		Store	0x3,0xf
0788 00d2       |    |		Pop_Control	Pop_Count_2
0789 00ce       |    |		Action	Pop_Auxiliary
078a 7812       |x   |		Jump	0x79d
078b e60b       |    |		Load	0x3,0xb								; Debug Table 0x15.0x45 = 0x78b,0x7
078c e60a       |    |		Load	0x3,0xa
078d 017d       | }  |		Execute	Record,Structure_Write
078e e60a       |    |		Load	0x3,0xa								; Debug Table 0x15.0x46 = 0x78e,0x8
078f 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0790 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0791 0a01       |    |		Execute_Immediate	Plus,0x1
0792 e60a       |    |		Load	0x3,0xa
0793 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0794 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0795 e60b       |    |		Load	0x3,0xb								; Debug Table 0x15.0x47 = 0x795,0x9
0796 e60a       |    |		Load	0x3,0xa
0797 e005       |    |		Load	0x0,0x5
0798 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0799 00d1       |    |		Pop_Control	Pop_Count_1
079a 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x15.0x48 = 0x79a,0xa
079b 0aff       |    |		Execute_Immediate	Plus,-0x1
079c c610       |    |		Store	0x3,0x10
079d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x15.0x49 = 0x79d,0xb
079e 00da       |    |		Load_Top	At_Offset_2
079f 027d       | }  |		Execute	Discrete,Greater
07a0 6801       |h   |		Jump_Zero	0x7a2
07a1 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x15.0x4a = 0x7a1,0xc
07a2 4801       |H   |		Short_Literal	0x1							; Debug Table 0x15.0x4b = 0x7a2,0xd
07a3 a60e       |    |		Store_Unchecked	0x3,0xe
07a4 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x15.0x4c = 0x7a4,0xe
07a5 00e3       |    |		Load_Encached	Natural_Cache
07a6 e60b       |    |		Load	0x3,0xb
07a7 8220       |    |		Call	0x1,0x20
07a8 c605       |    |		Store	0x3,0x5
07a9 c607       |    |		Store	0x3,0x7
07aa e60b       |    |		Load	0x3,0xb								; Debug Table 0x15.0x4d = 0x7aa,0xf
07ab 840c       |    |		Call	0x2,0xc
07ac 680d       |h   |		Jump_Zero	0x7ba
07ad e60b       |    |		Load	0x3,0xb								; Debug Table 0x15.0x4e = 0x7ad,0x10
07ae e5fd       |    |		Load	0x2,-0x3
07af 01db       |    |		Execute	Vector,Length
07b0 00e3       |    |		Load_Encached	Natural_Cache
07b1 025b       | [  |		Execute	Discrete,Check_In_Type
07b2 e005       |    |		Load	0x0,0x5
07b3 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
07b4 00d1       |    |		Pop_Control	Pop_Count_1
07b5 e607       |    |		Load	0x3,0x7								; Debug Table 0x15.0x4f = 0x7b5,0x11
07b6 e5fd       |    |		Load	0x2,-0x3
07b7 01db       |    |		Execute	Vector,Length
07b8 0272       | r  |		Execute	Discrete,Minus
07b9 c607       |    |		Store	0x3,0x7
07ba 4801       |H   |		Short_Literal	0x1							; Debug Table 0x15.0x50 = 0x7ba,0x12
07bb a606       |    |		Store_Unchecked	0x3,0x6
07bc 4800       |H   |		Short_Literal	0x0							; Debug Table 0x15.0x51 = 0x7bc,0x13
07bd a60c       |    |		Store_Unchecked	0x3,0xc
07be 00c9       |    |		Action	Pop_Auxiliary_Loop
07bf 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x15.0x52 = 0x7bf,0x1
07c0 00da       |    |		Load_Top	At_Offset_2
07c1 027a       | z  |		Execute	Discrete,Less_Equal
07c2 7702       |w   |		Jump_Nonzero	0x6c5
07c3 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
07c4			TRAP_0698:
07c4 010e       |    |		Execute	Exception,Is_Constraint_Error
07c5 6801       |h   |		Jump_Zero	0x7c7
07c6 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x15.0x53 = 0x7c6,0x14
07c7 0100       |    |		Execute	Exception,Raise
07c8 ; --------------------------------------------------------------------------------------
07c8 ; SUBPROGRAM
07c8 ; --------------------------------------------------------------------------------------
07c8 07ef       |    |		.CONST	0x07ef								; Address of begin
07c9 0004       |    |		.CONST	0x0004								; Address of exception handler
07ca 000a       |    |		.CONST	0x000a								; Number of locals
07cb			INIT_07c8:
07cb e003       |    |		Load	0x0,0x3								; Debug Table 0x16 = .DEBUG	0x07cb,0x0e0a,0x0001,0x0000,0x0059,0x8e75,0x0000,0x05db
													; Debug Table 0x16.0x0 = 0x7cb,0xffff
07cc 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
07cd 0322       | "  |		Declare_Variable	Record
07ce 00db       |    |		Load_Top	At_Offset_3
07cf 00d9       |    |		Load_Top	At_Offset_1
07d0 017d       | }  |		Execute	Record,Structure_Write
07d1 4820       |H   |		Short_Literal	0x20							; Debug Table 0x16.0x1 = 0x7d1,0xfffe
07d2 00d9       |    |		Load_Top	At_Offset_1
07d3 821f       |    |		Call	0x1,0x1f
07d4 e004       |    |		Load	0x0,0x4
07d5 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
07d6 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x16.0x2 = 0x7d6,0xfffd
07d7 01dd       |    |		Execute	Vector,First
07d8 e408       |    |		Load	0x2,0x8
07d9 0273       | s  |		Execute	Discrete,Plus
07da 0248       | H  |		Execute	Discrete,Check_In_Integer
07db e5fd       |    |		Load	0x2,-0x3
07dc 01db       |    |		Execute	Vector,Length
07dd 0273       | s  |		Execute	Discrete,Plus
07de 00e3       |    |		Load_Encached	Natural_Cache
07df 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
07e0 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x16.0x3 = 0x7e0,0xfffc
07e1 00da       |    |		Load_Top	At_Offset_2
07e2 01db       |    |		Execute	Vector,Length
07e3 0272       | r  |		Execute	Discrete,Minus
07e4 0248       | H  |		Execute	Discrete,Check_In_Integer
07e5 00e2       |    |		Load_Encached	Integer_Cache
07e6 03f1       |    |		Declare_Variable	Discrete,With_Value
07e7 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x16.0x4 = 0x7e7,0xfffb
07e8 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
07e9 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x16.0x5 = 0x7e9,0xfffa
07ea 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x16.0x6 = 0x7ea,0xfff9
07eb 00e8       |    |		Load_Encached	Character_Cache						; Debug Table 0x16.0x7 = 0x7eb,0xfff8
07ec 060a       |    |		Execute_Immediate	Set_Value_Unchecked,0xa
07ed 029f 08d3  |    |		Declare_Subprogram	INIT_08d0,For_Call				; Debug Table 0x16.0x8 = 0x7ed,0xfff7
07ef			BODY_07c8:
07ef 00cf       |    |		Action	Mark_Auxiliary
07f0 782f       |x/  |		Jump	0x820
07f1 e604       |    |		Load	0x3,0x4								; Debug Table 0x16.0x9 = 0x7f1,0x2
07f2 e603       |    |		Load	0x3,0x3
07f3 01d7       |    |		Execute	Vector,Field_Read
07f4 0f20       |    |		Execute_Immediate	Equal,0x20
07f5 6822       |h"  |		Jump_Zero	0x818
07f6 e606       |    |		Load	0x3,0x6								; Debug Table 0x16.0xa = 0x7f6,0x3
07f7 0a01       |    |		Execute_Immediate	Plus,0x1
07f8 c606       |    |		Store	0x3,0x6
07f9 e604       |    |		Load	0x3,0x4								; Debug Table 0x16.0xb = 0x7f9,0x4
07fa 0a01       |    |		Execute_Immediate	Plus,0x1
07fb c604       |    |		Store	0x3,0x4
07fc 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x16.0xc = 0x7fc,0x5
07fd e40b       |    |		Load	0x2,0xb
07fe 01d7       |    |		Execute	Vector,Field_Read
07ff 6808       |h   |		Jump_Zero	0x808
0800 e604       |    |		Load	0x3,0x4
0801 e603       |    |		Load	0x3,0x3
0802 01d7       |    |		Execute	Vector,Field_Read
0803 0f20       |    |		Execute_Immediate	Equal,0x20
0804 6803       |h   |		Jump_Zero	0x808
0805 e604       |    |		Load	0x3,0x4								; Debug Table 0x16.0xd = 0x805,0x6
0806 0a01       |    |		Execute_Immediate	Plus,0x1
0807 c604       |    |		Store	0x3,0x4
0808 00cf       |    |		Action	Mark_Auxiliary
0809 7808       |x   |		Jump	0x812
080a e605       |    |		Load	0x3,0x5								; Debug Table 0x16.0xe = 0x80a,0x8
080b 0a01       |    |		Execute_Immediate	Plus,0x1
080c 0248       | H  |		Execute	Discrete,Check_In_Integer
080d a605       |    |		Store_Unchecked	0x3,0x5
080e e604       |    |		Load	0x3,0x4								; Debug Table 0x16.0xf = 0x80e,0x9
080f 0a01       |    |		Execute_Immediate	Plus,0x1
0810 c604       |    |		Store	0x3,0x4
0811 00c9       |    |		Action	Pop_Auxiliary_Loop
0812 e604       |    |		Load	0x3,0x4								; Debug Table 0x16.0x10 = 0x812,0x7
0813 e603       |    |		Load	0x3,0x3
0814 01d7       |    |		Execute	Vector,Field_Read
0815 0f20       |    |		Execute_Immediate	Equal,0x20
0816 77f3       |w   |		Jump_Nonzero	0x80a
0817 00ce       |    |		Action	Pop_Auxiliary
0818 e604       |    |		Load	0x3,0x4								; Debug Table 0x16.0x11 = 0x818,0xa
0819 e603       |    |		Load	0x3,0x3
081a 01d7       |    |		Execute	Vector,Field_Read
081b 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
081c e604       |    |		Load	0x3,0x4								; Debug Table 0x16.0x12 = 0x81c,0xb
081d 0a01       |    |		Execute_Immediate	Plus,0x1
081e c604       |    |		Store	0x3,0x4
081f 00c9       |    |		Action	Pop_Auxiliary_Loop
0820 e604       |    |		Load	0x3,0x4								; Debug Table 0x16.0x13 = 0x820,0x1
0821 e603       |    |		Load	0x3,0x3
0822 01dc       |    |		Execute	Vector,Last
0823 027c       | |  |		Execute	Discrete,Less
0824 77cc       |w   |		Jump_Nonzero	0x7f1
0825 00ce       |    |		Action	Pop_Auxiliary
0826 e606       |    |		Load	0x3,0x6								; Debug Table 0x16.0x14 = 0x826,0xc
0827 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0828 6858       |hX  |		Jump_Zero	0x881
0829 e605       |    |		Load	0x3,0x5
082a 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
082b 6855       |hU  |		Jump_Zero	0x881
082c e605       |    |		Load	0x3,0x5								; Debug Table 0x16.0x15 = 0x82c,0xd
082d e606       |    |		Load	0x3,0x6
082e 0270       | p  |		Execute	Discrete,Divide
082f c607       |    |		Store	0x3,0x7
0830 e605       |    |		Load	0x3,0x5								; Debug Table 0x16.0x16 = 0x830,0xe
0831 e606       |    |		Load	0x3,0x6
0832 e607       |    |		Load	0x3,0x7
0833 0271       | q  |		Execute	Discrete,Times
0834 0248       | H  |		Execute	Discrete,Check_In_Integer
0835 0272       | r  |		Execute	Discrete,Minus
0836 005b       | [  |		Store_Top	Discrete,At_Offset_3
0837 e602       |    |		Load	0x3,0x2								; Debug Table 0x16.0x17 = 0x837,0xf
0838 e40a       |    |		Load	0x2,0xa
0839 00e4       |    |		Load_Encached	Positive_Cache
083a 025b       | [  |		Execute	Discrete,Check_In_Type
083b e003       |    |		Load	0x0,0x3
083c 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
083d 00d1       |    |		Pop_Control	Pop_Count_1
083e e407       |    |		Load	0x2,0x7								; Debug Table 0x16.0x18 = 0x83e,0x10
083f 681d       |h   |		Jump_Zero	0x85d
0840 00cf       |    |		Action	Mark_Auxiliary
0841 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x16.0x19 = 0x841,0x11
0842 4801       |H   |		Short_Literal	0x1
0843 0263       | c  |		Execute	Discrete,Above_Bound
0844 7009       |p   |		Jump_Nonzero	0x84e
0845 e602       |    |		Load	0x3,0x2								; Debug Table 0x16.0x1a = 0x845,0x12
0846 e607       |    |		Load	0x3,0x7
0847 0a01       |    |		Execute_Immediate	Plus,0x1
0848 00e3       |    |		Load_Encached	Natural_Cache
0849 025b       | [  |		Execute	Discrete,Check_In_Type
084a 860a       |    |		Call	0x3,0xa
084b 00d1       |    |		Pop_Control	Pop_Count_1
084c 00c8       |    |		Action	Pop_Auxiliary_Range
084d 3ff7       |?   |		Loop_Increasing	0x845
084e 00c9       |    |		Action	Pop_Auxiliary_Loop
084f e606       |    |		Load	0x3,0x6								; Debug Table 0x16.0x1b = 0x84f,0x13
0850 e608       |    |		Load	0x3,0x8
0851 0a01       |    |		Execute_Immediate	Plus,0x1
0852 0248       | H  |		Execute	Discrete,Check_In_Integer
0853 0263       | c  |		Execute	Discrete,Above_Bound
0854 7006       |p   |		Jump_Nonzero	0x85b
0855 e602       |    |		Load	0x3,0x2								; Debug Table 0x16.0x1c = 0x855,0x14
0856 e607       |    |		Load	0x3,0x7
0857 860a       |    |		Call	0x3,0xa
0858 00d1       |    |		Pop_Control	Pop_Count_1
0859 00c8       |    |		Action	Pop_Auxiliary_Range
085a 3ffa       |?   |		Loop_Increasing	0x855
085b 00ce       |    |		Action	Pop_Auxiliary
085c 7821       |x!  |		Jump	0x87e
085d 00cf       |    |		Action	Mark_Auxiliary
085e e606       |    |		Load	0x3,0x6								; Debug Table 0x16.0x1d = 0x85e,0x15
085f e608       |    |		Load	0x3,0x8
0860 0272       | r  |		Execute	Discrete,Minus
0861 0248       | H  |		Execute	Discrete,Check_In_Integer
0862 4801       |H   |		Short_Literal	0x1
0863 0263       | c  |		Execute	Discrete,Above_Bound
0864 7006       |p   |		Jump_Nonzero	0x86b
0865 e602       |    |		Load	0x3,0x2								; Debug Table 0x16.0x1e = 0x865,0x16
0866 e607       |    |		Load	0x3,0x7
0867 860a       |    |		Call	0x3,0xa
0868 00d1       |    |		Pop_Control	Pop_Count_1
0869 00c8       |    |		Action	Pop_Auxiliary_Range
086a 3ffa       |?   |		Loop_Increasing	0x865
086b 00c9       |    |		Action	Pop_Auxiliary_Loop
086c e606       |    |		Load	0x3,0x6								; Debug Table 0x16.0x1f = 0x86c,0x17
086d e606       |    |		Load	0x3,0x6
086e e608       |    |		Load	0x3,0x8
086f 0272       | r  |		Execute	Discrete,Minus
0870 0a01       |    |		Execute_Immediate	Plus,0x1
0871 0248       | H  |		Execute	Discrete,Check_In_Integer
0872 0263       | c  |		Execute	Discrete,Above_Bound
0873 7009       |p   |		Jump_Nonzero	0x87d
0874 e602       |    |		Load	0x3,0x2								; Debug Table 0x16.0x20 = 0x874,0x18
0875 e607       |    |		Load	0x3,0x7
0876 0a01       |    |		Execute_Immediate	Plus,0x1
0877 00e3       |    |		Load_Encached	Natural_Cache
0878 025b       | [  |		Execute	Discrete,Check_In_Type
0879 860a       |    |		Call	0x3,0xa
087a 00d1       |    |		Pop_Control	Pop_Count_1
087b 00c8       |    |		Action	Pop_Auxiliary_Range
087c 3ff7       |?   |		Loop_Increasing	0x874
087d 00ce       |    |		Action	Pop_Auxiliary
087e e407       |    |		Load	0x2,0x7								; Debug Table 0x16.0x21 = 0x87e,0x19
087f 0f00       |    |		Execute_Immediate	Equal,0x0
0880 a407       |    |		Store_Unchecked	0x2,0x7
0881 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0882 0000 0000  |    |		.BLANK	0000[0x6]
0888 ; --------------------------------------------------------------------------------------
0888 ; SUBPROGRAM
0888 ; --------------------------------------------------------------------------------------
0888 088b       |    |		.CONST	0x088b								; Address of begin
0889 0897       |    |		.CONST	0x0897								; Address of exception handler
088a 0001       |    |		.CONST	0x0001								; Number of locals
088b			BODY_0888:
088b			INIT_0888:
088b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x17 = .DEBUG	0x088b,0x0e50,0x0001,0x0000,0x0059,0x8e75,0x0000,0x07c2
													; Debug Table 0x17.0x0 = 0x88b,0x1
088c 4801       |H   |		Short_Literal	0x1
088d e003       |    |		Load	0x0,0x3
088e 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
088f 00d1       |    |		Pop_Control	Pop_Count_1
0890 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x17.0x1 = 0x890,0x2
0891 00db       |    |		Load_Top	At_Offset_3
0892 e003       |    |		Load	0x0,0x3
0893 184e       | N  |		Execute	Package,Field_Execute,Field_Number 0x4e
0894 e003       |    |		Load	0x0,0x3
0895 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0896 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0897			TRAP_0888:
0897 010e       |    |		Execute	Exception,Is_Constraint_Error
0898 6801       |h   |		Jump_Zero	0x89a
0899 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x17.0x2 = 0x899,0x3
089a 0100       |    |		Execute	Exception,Raise
089b 0000 0000  |    |		.BLANK	0000[0x5]
08a0 ; --------------------------------------------------------------------------------------
08a0 ; SUBPROGRAM
08a0 ; --------------------------------------------------------------------------------------
08a0 08a9       |    |		.CONST	0x08a9								; Address of begin
08a1 0004       |    |		.CONST	0x0004								; Address of exception handler
08a2 0002       |    |		.CONST	0x0002								; Number of locals
08a3			INIT_08a0:
08a3 e003       |    |		Load	0x0,0x3								; Debug Table 0x18 = .DEBUG	0x08a3,0x0e58,0x0001,0x0000,0x0059,0x8e75,0x0000,0x07e8
													; Debug Table 0x18.0x0 = 0x8a3,0xffff
08a4 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
08a5 0322       | "  |		Declare_Variable	Record
08a6 00db       |    |		Load_Top	At_Offset_3
08a7 00d9       |    |		Load_Top	At_Offset_1
08a8 017d       | }  |		Execute	Record,Structure_Write
08a9			BODY_08a0:
08a9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x18.0x1 = 0x8a9,0x1
08aa e003       |    |		Load	0x0,0x3
08ab 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
08ac 0e01       |    |		Execute_Immediate	Not_Equal,0x1
08ad 6805       |h   |		Jump_Zero	0x8b3
08ae 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x18.0x2 = 0x8ae,0x2
08af 4801       |H   |		Short_Literal	0x1
08b0 e003       |    |		Load	0x0,0x3
08b1 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
08b2 00d1       |    |		Pop_Control	Pop_Count_1
08b3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x18.0x3 = 0x8b3,0x3
08b4 e005       |    |		Load	0x0,0x5
08b5 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
08b6 0e20       |    |		Execute_Immediate	Not_Equal,0x20
08b7 6812       |h   |		Jump_Zero	0x8ca
08b8 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x18.0x4 = 0x8b8,0x4
08b9 e005       |    |		Load	0x0,0x5
08ba 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
08bb e40b       |    |		Load	0x2,0xb
08bc 01d7       |    |		Execute	Vector,Field_Read
08bd 6807       |h   |		Jump_Zero	0x8c5
08be 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x18.0x5 = 0x8be,0x5
08bf 0092 0943  |   C|		Action	Push_String_Extended,0x943					; "  "
08c1 e005       |    |		Load	0x0,0x5
08c2 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
08c3 00d1       |    |		Pop_Control	Pop_Count_1
08c4 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
08c5 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x18.0x6 = 0x8c5,0x6
08c6 4820       |H   |		Short_Literal	0x20
08c7 e005       |    |		Load	0x0,0x5
08c8 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
08c9 00d1       |    |		Pop_Control	Pop_Count_1
08ca 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
08cb 0000 0000  |    |		.BLANK	0000[0x5]
08d0 ; --------------------------------------------------------------------------------------
08d0 ; SUBPROGRAM
08d0 ; --------------------------------------------------------------------------------------
08d0 08dd       |    |		.CONST	0x08dd								; Address of begin
08d1 0004       |    |		.CONST	0x0004								; Address of exception handler
08d2 0005       |    |		.CONST	0x0005								; Number of locals
08d3			INIT_08d0:
08d3 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x19 = .DEBUG	0x08d3,0x0e68,0x0001,0x0000,0x0059,0x8e75,0x0000,0x0630
													; Debug Table 0x19.0x0 = 0x8d3,0xffff
08d4 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x19.0x1 = 0x8d4,0xfffe
08d5 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
08d6 00e8       |    |		Load_Encached	Character_Cache						; Debug Table 0x19.0x2 = 0x8d6,0xfffd
08d7 060a       |    |		Execute_Immediate	Set_Value_Unchecked,0xa
08d8 e9fe       |    |		Load	0x4,-0x2							; Debug Table 0x19.0x3 = 0x8d8,0xfffc
08d9 e005       |    |		Load	0x0,0x5
08da 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
08db 00e8       |    |		Load_Encached	Character_Cache
08dc 03f1       |    |		Declare_Variable	Discrete,With_Value
08dd			BODY_08d0:
08dd 00cf       |    |		Action	Mark_Auxiliary
08de 780c       |x   |		Jump	0x8eb
08df 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x19.0x4 = 0x8df,0x2
08e0 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
08e1 e9fe       |    |		Load	0x4,-0x2							; Debug Table 0x19.0x5 = 0x8e1,0x3
08e2 4801       |H   |		Short_Literal	0x1
08e3 e003       |    |		Load	0x0,0x3
08e4 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
08e5 00d1       |    |		Pop_Control	Pop_Count_1
08e6 e9fe       |    |		Load	0x4,-0x2							; Debug Table 0x19.0x6 = 0x8e6,0x4
08e7 e005       |    |		Load	0x0,0x5
08e8 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
08e9 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
08ea 00c9       |    |		Action	Pop_Auxiliary_Loop
08eb 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x19.0x7 = 0x8eb,0x1
08ec 0e20       |    |		Execute_Immediate	Not_Equal,0x20
08ed 77f1       |w   |		Jump_Nonzero	0x8df
08ee 00ce       |    |		Action	Pop_Auxiliary
08ef e9fe       |    |		Load	0x4,-0x2							; Debug Table 0x19.0x8 = 0x8ef,0x5
08f0 4801       |H   |		Short_Literal	0x1
08f1 e003       |    |		Load	0x0,0x3
08f2 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
08f3 00d1       |    |		Pop_Control	Pop_Count_1
08f4 00cf       |    |		Action	Mark_Auxiliary
08f5 7809       |x   |		Jump	0x8ff
08f6 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x19.0x9 = 0x8f6,0x7
08f7 0a01       |    |		Execute_Immediate	Plus,0x1
08f8 c803       |    |		Store	0x4,0x3
08f9 e9fe       |    |		Load	0x4,-0x2							; Debug Table 0x19.0xa = 0x8f9,0x8
08fa 4801       |H   |		Short_Literal	0x1
08fb e003       |    |		Load	0x0,0x3
08fc 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
08fd 00d1       |    |		Pop_Control	Pop_Count_1
08fe 00c9       |    |		Action	Pop_Auxiliary_Loop
08ff e9fe       |    |		Load	0x4,-0x2							; Debug Table 0x19.0xb = 0x8ff,0x6
0900 e005       |    |		Load	0x0,0x5
0901 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0902 0f20       |    |		Execute_Immediate	Equal,0x20
0903 77f2       |w   |		Jump_Nonzero	0x8f6
0904 00ce       |    |		Action	Pop_Auxiliary
0905 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x19.0xc = 0x905,0x9
0906 e40b       |    |		Load	0x2,0xb
0907 01d7       |    |		Execute	Vector,Field_Read
0908 6806       |h   |		Jump_Zero	0x90f
0909 00da       |    |		Load_Top	At_Offset_2
090a 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
090b 6803       |h   |		Jump_Zero	0x90f
090c 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x19.0xd = 0x90c,0xa
090d 0aff       |    |		Execute_Immediate	Plus,-0x1
090e 005b       | [  |		Store_Top	Discrete,At_Offset_3
090f e9ff       |    |		Load	0x4,-0x1							; Debug Table 0x19.0xe = 0x90f,0xb
0910 00db       |    |		Load_Top	At_Offset_3
0911 0272       | r  |		Execute	Discrete,Minus
0912 0248       | H  |		Execute	Discrete,Check_In_Integer
0913 a802       |    |		Store_Unchecked	0x4,0x2
0914 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x19.0xf = 0x914,0xc
0915 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0916 6813       |h   |		Jump_Zero	0x92a
0917 e9fe       |    |		Load	0x4,-0x2							; Debug Table 0x19.0x10 = 0x917,0xd
0918 4801       |H   |		Short_Literal	0x1
0919 e802       |    |		Load	0x4,0x2
091a 00e9       |    |		Load_Encached	String_Cache
091b 0334       | 4  |		Declare_Variable	Array,With_Constraint
091c 00d8       |    |		Load_Top	At_Offset_0
091d 01dc       |    |		Execute	Vector,Last
091e 4801       |H   |		Short_Literal	0x1
091f 0263       | c  |		Execute	Discrete,Above_Bound
0920 7005       |p   |		Jump_Nonzero	0x926
0921 4820       |H   |		Short_Literal	0x20
0922 00d9       |    |		Load_Top	At_Offset_1
0923 e807       |    |		Load	0x4,0x7
0924 01d6       |    |		Execute	Vector,Field_Write
0925 3ffb       |?   |		Loop_Increasing	0x921
0926 e005       |    |		Load	0x0,0x5
0927 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0928 00d1       |    |		Pop_Control	Pop_Count_1
0929 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
092a 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x19.0x11 = 0x92a,0xe
092b 0d00       |    |		Execute_Immediate	Less,0x0
092c 6808       |h   |		Jump_Zero	0x935
092d e9fe       |    |		Load	0x4,-0x2							; Debug Table 0x19.0x12 = 0x92d,0xf
092e e802       |    |		Load	0x4,0x2
092f 0275       | u  |		Execute	Discrete,Unary_Minus
0930 00e3       |    |		Load_Encached	Natural_Cache
0931 025b       | [  |		Execute	Discrete,Check_In_Type
0932 e005       |    |		Load	0x0,0x5
0933 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0934 00d1       |    |		Pop_Control	Pop_Count_1
0935 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0936 ; --------------------------------------------------------------------------------------
0936 ; STRING TABLE
0936 ; --------------------------------------------------------------------------------------
0936 001e       |    |		.STRTAB	0x001e->0x0945							; "!.?"
0937 001f       |    |		.STRTAB	0x001f->0x0946							; "The cursor must be in the selection."
0938 0041       | A  |		.STRTAB	0x0041->0x0958							; "Not enough room between margins for the leading text."
0939 0074       | t  |		.STRTAB	0x0074->0x0973							; "A selection is needed in the current image."
093a 009d       |    |		.STRTAB	0x009d->0x0988							; "The selection is not in this image."
093b 00be       |    |		.STRTAB	0x00be->0x099a							; "IMAGE_FILL_EXTRA_SPACE"
093c 00d2       |    |		.STRTAB	0x00d2->0x09a5							; "IMAGE_FILL_INDENT"
093d 00e1       |    |		.STRTAB	0x00e1->0x09ad							; "IMAGE_FILL_PREFIX"
093e 00f0       |    |		.STRTAB	0x00f0->0x09b6							; " null "
093f 00f4       |    |		.STRTAB	0x00f4->0x09b9							; "OBJECT_EDITOR"
0940 00ff       |    |		.STRTAB	0x00ff->0x09bf							; "(ada)"
0941 0102       |    |		.STRTAB	0x0102->0x09c2							; "-- "
0942 0103       |    |		.STRTAB	0x0103->0x09c3							; "--"
0943 0103       |    |		.STRTAB	0x0103->0x09c4							; "  "
0944 0103       |    |		.STREND 0x0103->0x09c5
0945 212e 3f54  |!.?T|		.STRTAB_STRINGS
09c6 0000 0000  |    |		.XXX[0x2]
09c8 ; --------------------------------------------------------------------------------------
09c8 ; Debug Table
09c8 ; --------------------------------------------------------------------------------------
09c8 0003 001a  |    |		.CONST	0x0003,0x001a
09ca 000b 0a9a  |    |		.DEBUG	0x000b,0x0a9a,0x8000,0x0000,0x0059,0x8bd5,0x0000,0x0007
09d2 0016 0aa6  |    |		.DEBUG	0x0016,0x0aa6,0x8000,0x0000,0x0059,0x8e75,0x0000,0x0015
09da 00ab 0afc  |    |		.DEBUG	0x00ab,0x0afc,0x0002,0x0000,0x0059,0x8bd5,0x0000,0x0008
09e2 00bb 0b00  |    |		.DEBUG	0x00bb,0x0b00,0x0001,0x0000,0x0059,0x8bd5,0x0000,0x0013
09ea 0133 0b28  | 3 (|		.DEBUG	0x0133,0x0b28,0x0002,0x0000,0x0059,0x8bd5,0x0000,0x0021
09f2 0183 0b4c  |   L|		.DEBUG	0x0183,0x0b4c,0x0001,0x0000,0x0059,0x8bd5,0x0000,0x0031
09fa 023b 0b8e  | ;  |		.DEBUG	0x023b,0x0b8e,0x0001,0x0000,0x0059,0x8bd5,0x0000,0x0044
0a02 02ab 0bb8  |    |		.DEBUG	0x02ab,0x0bb8,0x0002,0x0000,0x0059,0x8e75,0x0000,0x0076
0a0a 02bb 0bbe  |    |		.DEBUG	0x02bb,0x0bbe,0x0002,0x0000,0x0059,0x8e75,0x0000,0x0094
0a12 02db 0bcc  |    |		.DEBUG	0x02db,0x0bcc,0x0001,0x0000,0x0059,0x8e75,0x0000,0x00c8
0a1a 02fb 0bd8  |    |		.DEBUG	0x02fb,0x0bd8,0x0002,0x0000,0x0059,0x8e75,0x0000,0x00fd
0a22 0313 0be2  |    |		.DEBUG	0x0313,0x0be2,0x0001,0x0000,0x0059,0x8e75,0x0000,0x012c
0a2a 034b 0bfe  | K  |		.DEBUG	0x034b,0x0bfe,0x0001,0x0000,0x0059,0x8e75,0x0000,0x019d
0a32 04cb 0cbc  |    |		.DEBUG	0x04cb,0x0cbc,0x0002,0x0000,0x0059,0x8e75,0x0000,0x0a28
0a3a 04e3 0cc2  |    |		.DEBUG	0x04e3,0x0cc2,0x0002,0x0000,0x0059,0x8e75,0x0000,0x0a4d
0a42 0513 0cd0  |    |		.DEBUG	0x0513,0x0cd0,0x0002,0x0000,0x0059,0x8e75,0x0000,0x0aad
0a4a 052b 0cda  | +  |		.DEBUG	0x052b,0x0cda,0x0002,0x0000,0x0059,0x8e75,0x0000,0x0ae0
0a52 054b 0ce4  | K  |		.DEBUG	0x054b,0x0ce4,0x0001,0x0000,0x0059,0x8e75,0x0000,0x0b21
0a5a 059b 0d0c  |    |		.DEBUG	0x059b,0x0d0c,0x0002,0x0000,0x0059,0x8e75,0x0000,0x0208
0a62 05bb 0d14  |    |		.DEBUG	0x05bb,0x0d14,0x0001,0x0000,0x0059,0x8e75,0x0000,0x0241
0a6a 05eb 0d22  |   "|		.DEBUG	0x05eb,0x0d22,0x0001,0x0000,0x0059,0x8e75,0x0000,0x028c
0a72 069b 0d60  |   `|		.DEBUG	0x069b,0x0d60,0x0001,0x0000,0x0059,0x8e75,0x0000,0x039b
0a7a 07cb 0e0a  |    |		.DEBUG	0x07cb,0x0e0a,0x0001,0x0000,0x0059,0x8e75,0x0000,0x05db
0a82 088b 0e50  |   P|		.DEBUG	0x088b,0x0e50,0x0001,0x0000,0x0059,0x8e75,0x0000,0x07c2
0a8a 08a3 0e58  |   X|		.DEBUG	0x08a3,0x0e58,0x0001,0x0000,0x0059,0x8e75,0x0000,0x07e8
0a92 08d3 0e68  |   h|		.DEBUG	0x08d3,0x0e68,0x0001,0x0000,0x0059,0x8e75,0x0000,0x0630
0a9a ; --------------------------------------------------------------------------------------
0a9a ; Debug3 Subtable 0x0
0a9a ; --------------------------------------------------------------------------------------
0a9a 0005 0000  |    |		.DBG3TAB	0x0005,0x0000
0a9c 000b ffff  |    |		.CONST	0x000b,0xffff
0a9e 000d fffe  |    |		.CONST	0x000d,0xfffe
0aa0 000f fffd  |    |		.CONST	0x000f,0xfffd
0aa2 0011 fffc  |    |		.CONST	0x0011,0xfffc
0aa4 0013 fffb  |    |		.CONST	0x0013,0xfffb
0aa6 ; --------------------------------------------------------------------------------------
0aa6 ; Debug3 Subtable 0x1
0aa6 ; --------------------------------------------------------------------------------------
0aa6 001b 000f  |    |		.DBG3TAB	0x001b,0x000f
0aa8 0016 ffff  |    |		.CONST	0x0016,0xffff
0aaa 0018 fffe  |    |		.CONST	0x0018,0xfffe
0aac 001a fffd  |    |		.CONST	0x001a,0xfffd
0aae 001c fffc  |    |		.CONST	0x001c,0xfffc
0ab0 001e fffb  |    |		.CONST	0x001e,0xfffb
0ab2 0023 fffa  | #  |		.CONST	0x0023,0xfffa
0ab4 0028 fff9  | (  |		.CONST	0x0028,0xfff9
0ab6 002d fff8  | -  |		.CONST	0x002d,0xfff8
0ab8 0033 fff7  | 3  |		.CONST	0x0033,0xfff7
0aba 0035 fff6  | 5  |		.CONST	0x0035,0xfff6
0abc 0037 fff5  | 7  |		.CONST	0x0037,0xfff5
0abe 0037 fff4  | 7  |		.CONST	0x0037,0xfff4
0ac0 0039 fff3  | 9  |		.CONST	0x0039,0xfff3
0ac2 003b fff2  | ;  |		.CONST	0x003b,0xfff2
0ac4 003d fff1  | =  |		.CONST	0x003d,0xfff1
0ac6 003f fff0  | ?  |		.CONST	0x003f,0xfff0
0ac8 0041 ffef  | A  |		.CONST	0x0041,0xffef
0aca 0043 ffee  | C  |		.CONST	0x0043,0xffee
0acc 0045 ffed  | E  |		.CONST	0x0045,0xffed
0ace 0047 ffec  | G  |		.CONST	0x0047,0xffec
0ad0 0049 ffeb  | I  |		.CONST	0x0049,0xffeb
0ad2 004b ffea  | K  |		.CONST	0x004b,0xffea
0ad4 004d ffe9  | M  |		.CONST	0x004d,0xffe9
0ad6 004f ffe8  | O  |		.CONST	0x004f,0xffe8
0ad8 0051 ffe7  | Q  |		.CONST	0x0051,0xffe7
0ada 0053 ffe6  | S  |		.CONST	0x0053,0xffe6
0adc 0055 ffe5  | U  |		.CONST	0x0055,0xffe5
0ade 0057 0001  | W  |		.CONST	0x0057,0x0001
0ae0 0059 0401  | Y  |		.CONST	0x0059,0x0401
0ae2 005f 0001  | _  |		.CONST	0x005f,0x0001
0ae4 0060 0002  | `  |		.CONST	0x0060,0x0002
0ae6 0062 0801  | b  |		.CONST	0x0062,0x0801
0ae8 0068 0002  | h  |		.CONST	0x0068,0x0002
0aea 0069 0003  | i  |		.CONST	0x0069,0x0003
0aec 006b 0c01  | k  |		.CONST	0x006b,0x0c01
0aee 0071 0003  | q  |		.CONST	0x0071,0x0003
0af0 0072 0004  | r  |		.CONST	0x0072,0x0004
0af2 0074 1001  | t  |		.CONST	0x0074,0x1001
0af4 007a 0004  | z  |		.CONST	0x007a,0x0004
0af6 007b 0005  | {  |		.CONST	0x007b,0x0005
0af8 0088 0006  |    |		.CONST	0x0088,0x0006
0afa 0095 0007  |    |		.CONST	0x0095,0x0007
0afc ; --------------------------------------------------------------------------------------
0afc ; Debug3 Subtable 0x2
0afc ; --------------------------------------------------------------------------------------
0afc 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0afe 00ab 0001  |    |		.CONST	0x00ab,0x0001
0b00 ; --------------------------------------------------------------------------------------
0b00 ; Debug3 Subtable 0x3
0b00 ; --------------------------------------------------------------------------------------
0b00 0005 000e  |    |		.DBG3TAB	0x0005,0x000e
0b02 00bb ffff  |    |		.CONST	0x00bb,0xffff
0b04 00c4 fffe  |    |		.CONST	0x00c4,0xfffe
0b06 00c9 fffd  |    |		.CONST	0x00c9,0xfffd
0b08 00cd fffc  |    |		.CONST	0x00cd,0xfffc
0b0a 00d1 fffb  |    |		.CONST	0x00d1,0xfffb
0b0c 00d3 0001  |    |		.CONST	0x00d3,0x0001
0b0e 00d7 0002  |    |		.CONST	0x00d7,0x0002
0b10 00dc 0003  |    |		.CONST	0x00dc,0x0003
0b12 00de 0004  |    |		.CONST	0x00de,0x0004
0b14 00e3 0005  |    |		.CONST	0x00e3,0x0005
0b16 00e7 0006  |    |		.CONST	0x00e7,0x0006
0b18 00f1 0007  |    |		.CONST	0x00f1,0x0007
0b1a 00f4 0008  |    |		.CONST	0x00f4,0x0008
0b1c 00fb 0009  |    |		.CONST	0x00fb,0x0009
0b1e 0103 000a  |    |		.CONST	0x0103,0x000a
0b20 0108 000b  |    |		.CONST	0x0108,0x000b
0b22 010b 000c  |    |		.CONST	0x010b,0x000c
0b24 011e 000d  |    |		.CONST	0x011e,0x000d
0b26 0121 000e  | !  |		.CONST	0x0121,0x000e
0b28 ; --------------------------------------------------------------------------------------
0b28 ; Debug3 Subtable 0x4
0b28 ; --------------------------------------------------------------------------------------
0b28 0003 000e  |    |		.DBG3TAB	0x0003,0x000e
0b2a 0133 ffff  | 3  |		.CONST	0x0133,0xffff
0b2c 0139 fffe  | 9  |		.CONST	0x0139,0xfffe
0b2e 013c fffd  | <  |		.CONST	0x013c,0xfffd
0b30 0141 0001  | A  |		.CONST	0x0141,0x0001
0b32 0144 0002  | D  |		.CONST	0x0144,0x0002
0b34 014d 0003  | M  |		.CONST	0x014d,0x0003
0b36 014f 0004  | O  |		.CONST	0x014f,0x0004
0b38 0153 0006  | S  |		.CONST	0x0153,0x0006
0b3a 0158 0007  | X  |		.CONST	0x0158,0x0007
0b3c 015a 0008  | Z  |		.CONST	0x015a,0x0008
0b3e 015e 0005  | ^  |		.CONST	0x015e,0x0005
0b40 0166 0009  | f  |		.CONST	0x0166,0x0009
0b42 016a 000b  | j  |		.CONST	0x016a,0x000b
0b44 016f 000c  | o  |		.CONST	0x016f,0x000c
0b46 0171 000d  | q  |		.CONST	0x0171,0x000d
0b48 0175 000a  | u  |		.CONST	0x0175,0x000a
0b4a 017a 000e  | z  |		.CONST	0x017a,0x000e
0b4c ; --------------------------------------------------------------------------------------
0b4c ; Debug3 Subtable 0x5
0b4c ; --------------------------------------------------------------------------------------
0b4c 0004 001c  |    |		.DBG3TAB	0x0004,0x001c
0b4e 0183 ffff  |    |		.CONST	0x0183,0xffff
0b50 0188 fffe  |    |		.CONST	0x0188,0xfffe
0b52 0189 fffd  |    |		.CONST	0x0189,0xfffd
0b54 018e fffc  |    |		.CONST	0x018e,0xfffc
0b56 0193 0001  |    |		.CONST	0x0193,0x0001
0b58 019c 0002  |    |		.CONST	0x019c,0x0002
0b5a 01a2 0003  |    |		.CONST	0x01a2,0x0003
0b5c 01aa 0004  |    |		.CONST	0x01aa,0x0004
0b5e 01ba 0005  |    |		.CONST	0x01ba,0x0005
0b60 01bd 0401  |    |		.CONST	0x01bd,0x0401
0b62 01bf 0801  |    |		.CONST	0x01bf,0x0801
0b64 01c6 0401  |    |		.CONST	0x01c6,0x0401
0b66 01c9 0402  |    |		.CONST	0x01c9,0x0402
0b68 01ce 0006  |    |		.CONST	0x01ce,0x0006
0b6a 01d2 0007  |    |		.CONST	0x01d2,0x0007
0b6c 01db 0008  |    |		.CONST	0x01db,0x0008
0b6e 01e6 0009  |    |		.CONST	0x01e6,0x0009
0b70 01f1 000a  |    |		.CONST	0x01f1,0x000a
0b72 01f7 000b  |    |		.CONST	0x01f7,0x000b
0b74 01fa 000c  |    |		.CONST	0x01fa,0x000c
0b76 01fd 000d  |    |		.CONST	0x01fd,0x000d
0b78 0201 000e  |    |		.CONST	0x0201,0x000e
0b7a 020c 000f  |    |		.CONST	0x020c,0x000f
0b7c 020f 0c01  |    |		.CONST	0x020f,0x0c01
0b7e 0211 1001  |    |		.CONST	0x0211,0x1001
0b80 0218 0c01  |    |		.CONST	0x0218,0x0c01
0b82 021b 0c02  |    |		.CONST	0x021b,0x0c02
0b84 0220 0010  |    |		.CONST	0x0220,0x0010
0b86 0223 1401  | #  |		.CONST	0x0223,0x1401
0b88 0225 1801  | %  |		.CONST	0x0225,0x1801
0b8a 022c 1401  | ,  |		.CONST	0x022c,0x1401
0b8c 022f 1402  | /  |		.CONST	0x022f,0x1402
0b8e ; --------------------------------------------------------------------------------------
0b8e ; Debug3 Subtable 0x6
0b8e ; --------------------------------------------------------------------------------------
0b8e 0003 0011  |    |		.DBG3TAB	0x0003,0x0011
0b90 023b ffff  | ;  |		.CONST	0x023b,0xffff
0b92 023c fffe  | <  |		.CONST	0x023c,0xfffe
0b94 0241 fffd  | A  |		.CONST	0x0241,0xfffd
0b96 0246 0001  | F  |		.CONST	0x0246,0x0001
0b98 024f 0002  | O  |		.CONST	0x024f,0x0002
0b9a 0251 0003  | Q  |		.CONST	0x0251,0x0003
0b9c 025a 0004  | Z  |		.CONST	0x025a,0x0004
0b9e 025d 0401  | ]  |		.CONST	0x025d,0x0401
0ba0 025f 0801  | _  |		.CONST	0x025f,0x0801
0ba2 0266 0401  | f  |		.CONST	0x0266,0x0401
0ba4 0269 0402  | i  |		.CONST	0x0269,0x0402
0ba6 026e 0005  | n  |		.CONST	0x026e,0x0005
0ba8 0272 0006  | r  |		.CONST	0x0272,0x0006
0baa 027b 0007  | {  |		.CONST	0x027b,0x0007
0bac 0286 0008  |    |		.CONST	0x0286,0x0008
0bae 0291 0009  |    |		.CONST	0x0291,0x0009
0bb0 0294 0c01  |    |		.CONST	0x0294,0x0c01
0bb2 0296 1001  |    |		.CONST	0x0296,0x1001
0bb4 029d 0c01  |    |		.CONST	0x029d,0x0c01
0bb6 02a0 0c02  |    |		.CONST	0x02a0,0x0c02
0bb8 ; --------------------------------------------------------------------------------------
0bb8 ; Debug3 Subtable 0x7
0bb8 ; --------------------------------------------------------------------------------------
0bb8 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0bba 02ab 0001  |    |		.CONST	0x02ab,0x0001
0bbc 02b4 0002  |    |		.CONST	0x02b4,0x0002
0bbe ; --------------------------------------------------------------------------------------
0bbe ; Debug3 Subtable 0x8
0bbe ; --------------------------------------------------------------------------------------
0bbe 0000 0006  |    |		.DBG3TAB	0x0000,0x0006
0bc0 02bb 0001  |    |		.CONST	0x02bb,0x0001
0bc2 02c0 0002  |    |		.CONST	0x02c0,0x0002
0bc4 02c2 0003  |    |		.CONST	0x02c2,0x0003
0bc6 02c5 0004  |    |		.CONST	0x02c5,0x0004
0bc8 02c7 0005  |    |		.CONST	0x02c7,0x0005
0bca 02d0 0006  |    |		.CONST	0x02d0,0x0006
0bcc ; --------------------------------------------------------------------------------------
0bcc ; Debug3 Subtable 0x9
0bcc ; --------------------------------------------------------------------------------------
0bcc 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
0bce 02db 0001  |    |		.CONST	0x02db,0x0001
0bd0 02dc fbff  |    |		.CONST	0x02dc,0xfbff
0bd2 02e4 0401  |    |		.CONST	0x02e4,0x0401
0bd4 02e8 0402  |    |		.CONST	0x02e8,0x0402
0bd6 02f2 0002  |    |		.CONST	0x02f2,0x0002
0bd8 ; --------------------------------------------------------------------------------------
0bd8 ; Debug3 Subtable 0xa
0bd8 ; --------------------------------------------------------------------------------------
0bd8 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
0bda 02fb ffff  |    |		.CONST	0x02fb,0xffff
0bdc 0301 0001  |    |		.CONST	0x0301,0x0001
0bde 0306 0002  |    |		.CONST	0x0306,0x0002
0be0 030c 0003  |    |		.CONST	0x030c,0x0003
0be2 ; --------------------------------------------------------------------------------------
0be2 ; Debug3 Subtable 0xb
0be2 ; --------------------------------------------------------------------------------------
0be2 0003 000a  |    |		.DBG3TAB	0x0003,0x000a
0be4 0313 ffff  |    |		.CONST	0x0313,0xffff
0be6 0319 fffe  |    |		.CONST	0x0319,0xfffe
0be8 031b 0001  |    |		.CONST	0x031b,0x0001
0bea 031c fbff  |    |		.CONST	0x031c,0xfbff
0bec 0320 0401  |    |		.CONST	0x0320,0x0401
0bee 0324 0402  | $  |		.CONST	0x0324,0x0402
0bf0 0329 0403  | )  |		.CONST	0x0329,0x0403
0bf2 032b 0404  | +  |		.CONST	0x032b,0x0404
0bf4 0331 0405  | 1  |		.CONST	0x0331,0x0405
0bf6 0334 0406  | 4  |		.CONST	0x0334,0x0406
0bf8 0339 0407  | 9  |		.CONST	0x0339,0x0407
0bfa 033b 0408  | ;  |		.CONST	0x033b,0x0408
0bfc 0343 0002  | C  |		.CONST	0x0343,0x0002
0bfe ; --------------------------------------------------------------------------------------
0bfe ; Debug3 Subtable 0xc
0bfe ; --------------------------------------------------------------------------------------
0bfe 0011 004d  |   M|		.DBG3TAB	0x0011,0x004d
0c00 034b ffff  | K  |		.CONST	0x034b,0xffff
0c02 0351 fffe  | Q  |		.CONST	0x0351,0xfffe
0c04 0357 fffd  | W  |		.CONST	0x0357,0xfffd
0c06 0358 fffc  | X  |		.CONST	0x0358,0xfffc
0c08 035a fffb  | Z  |		.CONST	0x035a,0xfffb
0c0a 0360 fffa  | `  |		.CONST	0x0360,0xfffa
0c0c 0362 fff9  | b  |		.CONST	0x0362,0xfff9
0c0e 0365 fff8  | e  |		.CONST	0x0365,0xfff8
0c10 0367 fff7  | g  |		.CONST	0x0367,0xfff7
0c12 0368 fff6  | h  |		.CONST	0x0368,0xfff6
0c14 0375 fff5  | u  |		.CONST	0x0375,0xfff5
0c16 0377 fff4  | w  |		.CONST	0x0377,0xfff4
0c18 0379 fff3  | y  |		.CONST	0x0379,0xfff3
0c1a 037b fff2  | {  |		.CONST	0x037b,0xfff2
0c1c 037d fff1  | }  |		.CONST	0x037d,0xfff1
0c1e 037f fff0  |    |		.CONST	0x037f,0xfff0
0c20 0381 ffef  |    |		.CONST	0x0381,0xffef
0c22 0383 0001  |    |		.CONST	0x0383,0x0001
0c24 0388 0002  |    |		.CONST	0x0388,0x0002
0c26 038b 0003  |    |		.CONST	0x038b,0x0003
0c28 038b 0401  |    |		.CONST	0x038b,0x0401
0c2a 038f 0003  |    |		.CONST	0x038f,0x0003
0c2c 0390 0004  |    |		.CONST	0x0390,0x0004
0c2e 0395 0005  |    |		.CONST	0x0395,0x0005
0c30 0398 0006  |    |		.CONST	0x0398,0x0006
0c32 039d 0007  |    |		.CONST	0x039d,0x0007
0c34 03a5 0008  |    |		.CONST	0x03a5,0x0008
0c36 03ae 0009  |    |		.CONST	0x03ae,0x0009
0c38 03ae 0801  |    |		.CONST	0x03ae,0x0801
0c3a 03b2 0009  |    |		.CONST	0x03b2,0x0009
0c3c 03b3 000a  |    |		.CONST	0x03b3,0x000a
0c3e 03b7 000b  |    |		.CONST	0x03b7,0x000b
0c40 03bb 000c  |    |		.CONST	0x03bb,0x000c
0c42 03c0 000d  |    |		.CONST	0x03c0,0x000d
0c44 03c4 000e  |    |		.CONST	0x03c4,0x000e
0c46 03ca 000f  |    |		.CONST	0x03ca,0x000f
0c48 03cc 0010  |    |		.CONST	0x03cc,0x0010
0c4a 03cf 0011  |    |		.CONST	0x03cf,0x0011
0c4c 03d5 0012  |    |		.CONST	0x03d5,0x0012
0c4e 03d9 0013  |    |		.CONST	0x03d9,0x0013
0c50 03dc 0014  |    |		.CONST	0x03dc,0x0014
0c52 03e0 0015  |    |		.CONST	0x03e0,0x0015
0c54 03e4 0016  |    |		.CONST	0x03e4,0x0016
0c56 03e7 0c01  |    |		.CONST	0x03e7,0x0c01
0c58 03e9 1001  |    |		.CONST	0x03e9,0x1001
0c5a 03f0 0c01  |    |		.CONST	0x03f0,0x0c01
0c5c 03f3 0c02  |    |		.CONST	0x03f3,0x0c02
0c5e 03f7 0017  |    |		.CONST	0x03f7,0x0017
0c60 03fc 0018  |    |		.CONST	0x03fc,0x0018
0c62 03fd 0019  |    |		.CONST	0x03fd,0x0019
0c64 0400 001a  |    |		.CONST	0x0400,0x001a
0c66 0405 001b  |    |		.CONST	0x0405,0x001b
0c68 040b 001d  |    |		.CONST	0x040b,0x001d
0c6a 040f 001e  |    |		.CONST	0x040f,0x001e
0c6c 0413 001f  |    |		.CONST	0x0413,0x001f
0c6e 0416 0020  |    |		.CONST	0x0416,0x0020
0c70 0418 0021  |   !|		.CONST	0x0418,0x0021
0c72 041a 0022  |   "|		.CONST	0x041a,0x0022
0c74 041a 1401  |    |		.CONST	0x041a,0x1401
0c76 0421 1402  | !  |		.CONST	0x0421,0x1402
0c78 0426 0023  | & #|		.CONST	0x0426,0x0023
0c7a 042c 0024  | , $|		.CONST	0x042c,0x0024
0c7c 0430 0025  | 0 %|		.CONST	0x0430,0x0025
0c7e 0435 0026  | 5 &|		.CONST	0x0435,0x0026
0c80 0437 0027  | 7 '|		.CONST	0x0437,0x0027
0c82 0439 0028  | 9 (|		.CONST	0x0439,0x0028
0c84 0439 1801  | 9  |		.CONST	0x0439,0x1801
0c86 0440 1802  | @  |		.CONST	0x0440,0x1802
0c88 0444 0029  | D )|		.CONST	0x0444,0x0029
0c8a 044a 002a  | J *|		.CONST	0x044a,0x002a
0c8c 044b 002b  | K +|		.CONST	0x044b,0x002b
0c8e 044f 002c  | O ,|		.CONST	0x044f,0x002c
0c90 0454 002d  | T -|		.CONST	0x0454,0x002d
0c92 0457 002e  | W .|		.CONST	0x0457,0x002e
0c94 045e 002f  | ^ /|		.CONST	0x045e,0x002f
0c96 0466 0030  | f 0|		.CONST	0x0466,0x0030
0c98 046c 0031  | l 1|		.CONST	0x046c,0x0031
0c9a 0470 0032  | p 2|		.CONST	0x0470,0x0032
0c9c 0470 1c01  | p  |		.CONST	0x0470,0x1c01
0c9e 0477 1c02  | w  |		.CONST	0x0477,0x1c02
0ca0 047b 0033  | { 3|		.CONST	0x047b,0x0033
0ca2 0481 0034  |   4|		.CONST	0x0481,0x0034
0ca4 0482 0035  |   5|		.CONST	0x0482,0x0035
0ca6 0486 0036  |   6|		.CONST	0x0486,0x0036
0ca8 0486 2001  |    |		.CONST	0x0486,0x2001
0caa 048d 2002  |    |		.CONST	0x048d,0x2002
0cac 0492 001c  |    |		.CONST	0x0492,0x001c
0cae 0499 0037  |   7|		.CONST	0x0499,0x0037
0cb0 049c 0038  |   8|		.CONST	0x049c,0x0038
0cb2 04a1 0039  |   9|		.CONST	0x04a1,0x0039
0cb4 04a3 003a  |   :|		.CONST	0x04a3,0x003a
0cb6 04b6 003b  |   ;|		.CONST	0x04b6,0x003b
0cb8 04bd 003c  |   <|		.CONST	0x04bd,0x003c
0cba 04c2 003d  |   =|		.CONST	0x04c2,0x003d
0cbc ; --------------------------------------------------------------------------------------
0cbc ; Debug3 Subtable 0xd
0cbc ; --------------------------------------------------------------------------------------
0cbc 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0cbe 04cb 0001  |    |		.CONST	0x04cb,0x0001
0cc0 04d7 0002  |    |		.CONST	0x04d7,0x0002
0cc2 ; --------------------------------------------------------------------------------------
0cc2 ; Debug3 Subtable 0xe
0cc2 ; --------------------------------------------------------------------------------------
0cc2 0001 0005  |    |		.DBG3TAB	0x0001,0x0005
0cc4 04e3 ffff  |    |		.CONST	0x04e3,0xffff
0cc6 04e8 0001  |    |		.CONST	0x04e8,0x0001
0cc8 04ec 0002  |    |		.CONST	0x04ec,0x0002
0cca 04f8 0003  |    |		.CONST	0x04f8,0x0003
0ccc 0501 0004  |    |		.CONST	0x0501,0x0004
0cce 050a 0005  |    |		.CONST	0x050a,0x0005
0cd0 ; --------------------------------------------------------------------------------------
0cd0 ; Debug3 Subtable 0xf
0cd0 ; --------------------------------------------------------------------------------------
0cd0 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
0cd2 0513 ffff  |    |		.CONST	0x0513,0xffff
0cd4 0518 0001  |    |		.CONST	0x0518,0x0001
0cd6 0522 0002  | "  |		.CONST	0x0522,0x0002
0cd8 0524 0003  | $  |		.CONST	0x0524,0x0003
0cda ; --------------------------------------------------------------------------------------
0cda ; Debug3 Subtable 0x10
0cda ; --------------------------------------------------------------------------------------
0cda 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
0cdc 052b ffff  | +  |		.CONST	0x052b,0xffff
0cde 0530 0001  | 0  |		.CONST	0x0530,0x0001
0ce0 0541 0002  | A  |		.CONST	0x0541,0x0002
0ce2 0543 0003  | C  |		.CONST	0x0543,0x0003
0ce4 ; --------------------------------------------------------------------------------------
0ce4 ; Debug3 Subtable 0x11
0ce4 ; --------------------------------------------------------------------------------------
0ce4 0003 0010  |    |		.DBG3TAB	0x0003,0x0010
0ce6 054b ffff  | K  |		.CONST	0x054b,0xffff
0ce8 0551 fffe  | Q  |		.CONST	0x0551,0xfffe
0cea 0556 fffd  | V  |		.CONST	0x0556,0xfffd
0cec 055b 0001  | [  |		.CONST	0x055b,0x0001
0cee 055f 0002  | _  |		.CONST	0x055f,0x0002
0cf0 0562 0003  | b  |		.CONST	0x0562,0x0003
0cf2 0567 0005  | g  |		.CONST	0x0567,0x0005
0cf4 056e 0006  | n  |		.CONST	0x056e,0x0006
0cf6 0571 0007  | q  |		.CONST	0x0571,0x0007
0cf8 0576 0004  | v  |		.CONST	0x0576,0x0004
0cfa 057c 0009  | |  |		.CONST	0x057c,0x0009
0cfc 057c 000a  | |  |		.CONST	0x057c,0x000a
0cfe 0583 000b  |    |		.CONST	0x0583,0x000b
0d00 0589 000c  |    |		.CONST	0x0589,0x000c
0d02 058c 000d  |    |		.CONST	0x058c,0x000d
0d04 058d 000e  |    |		.CONST	0x058d,0x000e
0d06 0590 000f  |    |		.CONST	0x0590,0x000f
0d08 0591 0010  |    |		.CONST	0x0591,0x0010
0d0a 0594 0011  |    |		.CONST	0x0594,0x0011
0d0c ; --------------------------------------------------------------------------------------
0d0c ; Debug3 Subtable 0x12
0d0c ; --------------------------------------------------------------------------------------
0d0c 0001 0002  |    |		.DBG3TAB	0x0001,0x0002
0d0e 059b ffff  |    |		.CONST	0x059b,0xffff
0d10 05a1 0001  |    |		.CONST	0x05a1,0x0001
0d12 05b2 0002  |    |		.CONST	0x05b2,0x0002
0d14 ; --------------------------------------------------------------------------------------
0d14 ; Debug3 Subtable 0x13
0d14 ; --------------------------------------------------------------------------------------
0d14 0000 0006  |    |		.DBG3TAB	0x0000,0x0006
0d16 05bb 0001  |    |		.CONST	0x05bb,0x0001
0d18 05be 0002  |    |		.CONST	0x05be,0x0002
0d1a 05d0 0003  |    |		.CONST	0x05d0,0x0003
0d1c 05d4 0004  |    |		.CONST	0x05d4,0x0004
0d1e 05d7 0005  |    |		.CONST	0x05d7,0x0005
0d20 05dd 0006  |    |		.CONST	0x05dd,0x0006
0d22 ; --------------------------------------------------------------------------------------
0d22 ; Debug3 Subtable 0x14
0d22 ; --------------------------------------------------------------------------------------
0d22 0002 001c  |    |		.DBG3TAB	0x0002,0x001c
0d24 05eb ffff  |    |		.CONST	0x05eb,0xffff
0d26 05f1 fffe  |    |		.CONST	0x05f1,0xfffe
0d28 05f9 0001  |    |		.CONST	0x05f9,0x0001
0d2a 05ff 0002  |    |		.CONST	0x05ff,0x0002
0d2c 0604 0003  |    |		.CONST	0x0604,0x0003
0d2e 060b 0004  |    |		.CONST	0x060b,0x0004
0d30 0616 0005  |    |		.CONST	0x0616,0x0005
0d32 061c 0006  |    |		.CONST	0x061c,0x0006
0d34 0627 0007  | '  |		.CONST	0x0627,0x0007
0d36 062f 0008  | /  |		.CONST	0x062f,0x0008
0d38 0635 0009  | 5  |		.CONST	0x0635,0x0009
0d3a 063a 000a  | :  |		.CONST	0x063a,0x000a
0d3c 063f 000b  | ?  |		.CONST	0x063f,0x000b
0d3e 0642 000c  | B  |		.CONST	0x0642,0x000c
0d40 0645 000d  | E  |		.CONST	0x0645,0x000d
0d42 0649 000e  | I  |		.CONST	0x0649,0x000e
0d44 064f 000f  | O  |		.CONST	0x064f,0x000f
0d46 0654 0010  | T  |		.CONST	0x0654,0x0010
0d48 065b 0011  | [  |		.CONST	0x065b,0x0011
0d4a 0666 0012  | f  |		.CONST	0x0666,0x0012
0d4c 066c 0013  | l  |		.CONST	0x066c,0x0013
0d4e 0671 0014  | q  |		.CONST	0x0671,0x0014
0d50 0676 0015  | v  |		.CONST	0x0676,0x0015
0d52 0679 0016  | y  |		.CONST	0x0679,0x0016
0d54 067c 0017  | |  |		.CONST	0x067c,0x0017
0d56 0680 0018  |    |		.CONST	0x0680,0x0018
0d58 0680 0401  |    |		.CONST	0x0680,0x0401
0d5a 0687 0402  |    |		.CONST	0x0687,0x0402
0d5c 068b 0019  |    |		.CONST	0x068b,0x0019
0d5e 0691 001a  |    |		.CONST	0x0691,0x001a
0d60 ; --------------------------------------------------------------------------------------
0d60 ; Debug3 Subtable 0x15
0d60 ; --------------------------------------------------------------------------------------
0d60 0011 0043  |   C|		.DBG3TAB	0x0011,0x0043
0d62 069b ffff  |    |		.CONST	0x069b,0xffff
0d64 069c fffe  |    |		.CONST	0x069c,0xfffe
0d66 069d fffd  |    |		.CONST	0x069d,0xfffd
0d68 069e fffc  |    |		.CONST	0x069e,0xfffc
0d6a 069f fffb  |    |		.CONST	0x069f,0xfffb
0d6c 06a1 fffa  |    |		.CONST	0x06a1,0xfffa
0d6e 06a6 fff9  |    |		.CONST	0x06a6,0xfff9
0d70 06a7 fff8  |    |		.CONST	0x06a7,0xfff8
0d72 06a8 fff7  |    |		.CONST	0x06a8,0xfff7
0d74 06ad fff6  |    |		.CONST	0x06ad,0xfff6
0d76 06b3 fff5  |    |		.CONST	0x06b3,0xfff5
0d78 06b5 fff4  |    |		.CONST	0x06b5,0xfff4
0d7a 06ba fff3  |    |		.CONST	0x06ba,0xfff3
0d7c 06bd fff2  |    |		.CONST	0x06bd,0xfff2
0d7e 06c0 fff1  |    |		.CONST	0x06c0,0xfff1
0d80 06c5 0002  |    |		.CONST	0x06c5,0x0002
0d82 06c7 0003  |    |		.CONST	0x06c7,0x0003
0d84 06cd 0004  |    |		.CONST	0x06cd,0x0004
0d86 06d0 0005  |    |		.CONST	0x06d0,0x0005
0d88 06d3 0006  |    |		.CONST	0x06d3,0x0006
0d8a 06d4 fbff  |    |		.CONST	0x06d4,0xfbff
0d8c 06dd fbfe  |    |		.CONST	0x06dd,0xfbfe
0d8e 06ea 0401  |    |		.CONST	0x06ea,0x0401
0d90 06ec 0402  |    |		.CONST	0x06ec,0x0402
0d92 06f1 0404  |    |		.CONST	0x06f1,0x0404
0d94 06f5 0405  |    |		.CONST	0x06f5,0x0405
0d96 06f8 0406  |    |		.CONST	0x06f8,0x0406
0d98 06fa 0407  |    |		.CONST	0x06fa,0x0407
0d9a 06fc 0408  |    |		.CONST	0x06fc,0x0408
0d9c 06fe 0409  |    |		.CONST	0x06fe,0x0409
0d9e 0702 040a  |    |		.CONST	0x0702,0x040a
0da0 0704 040b  |    |		.CONST	0x0704,0x040b
0da2 0706 040c  |    |		.CONST	0x0706,0x040c
0da4 0708 040d  |    |		.CONST	0x0708,0x040d
0da6 070e 040e  |    |		.CONST	0x070e,0x040e
0da8 0711 040f  |    |		.CONST	0x0711,0x040f
0daa 071d 0410  |    |		.CONST	0x071d,0x0410
0dac 0721 0411  | !  |		.CONST	0x0721,0x0411
0dae 0723 0412  | #  |		.CONST	0x0723,0x0412
0db0 0727 0413  | '  |		.CONST	0x0727,0x0413
0db2 072b 0414  | +  |		.CONST	0x072b,0x0414
0db4 072d 0415  | -  |		.CONST	0x072d,0x0415
0db6 072f 0416  | /  |		.CONST	0x072f,0x0416
0db8 0732 0417  | 2  |		.CONST	0x0732,0x0417
0dba 0734 0418  | 4  |		.CONST	0x0734,0x0418
0dbc 0738 0419  | 8  |		.CONST	0x0738,0x0419
0dbe 073a 041a  | :  |		.CONST	0x073a,0x041a
0dc0 073c 041b  | <  |		.CONST	0x073c,0x041b
0dc2 073f 041c  | ?  |		.CONST	0x073f,0x041c
0dc4 0742 0403  | B  |		.CONST	0x0742,0x0403
0dc6 0747 041d  | G  |		.CONST	0x0747,0x041d
0dc8 074b 041e  | K  |		.CONST	0x074b,0x041e
0dca 0750 041f  | P  |		.CONST	0x0750,0x041f
0dcc 0752 0420  | R  |		.CONST	0x0752,0x0420
0dce 0754 0421  | T !|		.CONST	0x0754,0x0421
0dd0 0756 0422  | V "|		.CONST	0x0756,0x0422
0dd2 0759 0423  | Y #|		.CONST	0x0759,0x0423
0dd4 075d 0424  | ] $|		.CONST	0x075d,0x0424
0dd6 0760 0425  | ` %|		.CONST	0x0760,0x0425
0dd8 0764 0426  | d &|		.CONST	0x0764,0x0426
0dda 0766 0427  | f '|		.CONST	0x0766,0x0427
0ddc 0768 0428  | h (|		.CONST	0x0768,0x0428
0dde 076a 0429  | j )|		.CONST	0x076a,0x0429
0de0 0770 042a  | p *|		.CONST	0x0770,0x042a
0de2 0773 042b  | s +|		.CONST	0x0773,0x042b
0de4 0776 042c  | v ,|		.CONST	0x0776,0x042c
0de6 0779 042d  | y -|		.CONST	0x0779,0x042d
0de8 077b 042e  | { .|		.CONST	0x077b,0x042e
0dea 0785 042f  |   /|		.CONST	0x0785,0x042f
0dec 078b 0007  |    |		.CONST	0x078b,0x0007
0dee 078e 0008  |    |		.CONST	0x078e,0x0008
0df0 0795 0009  |    |		.CONST	0x0795,0x0009
0df2 079a 000a  |    |		.CONST	0x079a,0x000a
0df4 079d 000b  |    |		.CONST	0x079d,0x000b
0df6 07a1 000c  |    |		.CONST	0x07a1,0x000c
0df8 07a2 000d  |    |		.CONST	0x07a2,0x000d
0dfa 07a4 000e  |    |		.CONST	0x07a4,0x000e
0dfc 07aa 000f  |    |		.CONST	0x07aa,0x000f
0dfe 07ad 0010  |    |		.CONST	0x07ad,0x0010
0e00 07b5 0011  |    |		.CONST	0x07b5,0x0011
0e02 07ba 0012  |    |		.CONST	0x07ba,0x0012
0e04 07bc 0013  |    |		.CONST	0x07bc,0x0013
0e06 07bf 0001  |    |		.CONST	0x07bf,0x0001
0e08 07c6 0014  |    |		.CONST	0x07c6,0x0014
0e0a ; --------------------------------------------------------------------------------------
0e0a ; Debug3 Subtable 0x16
0e0a ; --------------------------------------------------------------------------------------
0e0a 0009 0019  |    |		.DBG3TAB	0x0009,0x0019
0e0c 07cb ffff  |    |		.CONST	0x07cb,0xffff
0e0e 07d1 fffe  |    |		.CONST	0x07d1,0xfffe
0e10 07d6 fffd  |    |		.CONST	0x07d6,0xfffd
0e12 07e0 fffc  |    |		.CONST	0x07e0,0xfffc
0e14 07e7 fffb  |    |		.CONST	0x07e7,0xfffb
0e16 07e9 fffa  |    |		.CONST	0x07e9,0xfffa
0e18 07ea fff9  |    |		.CONST	0x07ea,0xfff9
0e1a 07eb fff8  |    |		.CONST	0x07eb,0xfff8
0e1c 07ed fff7  |    |		.CONST	0x07ed,0xfff7
0e1e 07f1 0002  |    |		.CONST	0x07f1,0x0002
0e20 07f6 0003  |    |		.CONST	0x07f6,0x0003
0e22 07f9 0004  |    |		.CONST	0x07f9,0x0004
0e24 07fc 0005  |    |		.CONST	0x07fc,0x0005
0e26 0805 0006  |    |		.CONST	0x0805,0x0006
0e28 080a 0008  |    |		.CONST	0x080a,0x0008
0e2a 080e 0009  |    |		.CONST	0x080e,0x0009
0e2c 0812 0007  |    |		.CONST	0x0812,0x0007
0e2e 0818 000a  |    |		.CONST	0x0818,0x000a
0e30 081c 000b  |    |		.CONST	0x081c,0x000b
0e32 0820 0001  |    |		.CONST	0x0820,0x0001
0e34 0826 000c  | &  |		.CONST	0x0826,0x000c
0e36 082c 000d  | ,  |		.CONST	0x082c,0x000d
0e38 0830 000e  | 0  |		.CONST	0x0830,0x000e
0e3a 0837 000f  | 7  |		.CONST	0x0837,0x000f
0e3c 083e 0010  | >  |		.CONST	0x083e,0x0010
0e3e 0841 0011  | A  |		.CONST	0x0841,0x0011
0e40 0845 0012  | E  |		.CONST	0x0845,0x0012
0e42 084f 0013  | O  |		.CONST	0x084f,0x0013
0e44 0855 0014  | U  |		.CONST	0x0855,0x0014
0e46 085e 0015  | ^  |		.CONST	0x085e,0x0015
0e48 0865 0016  | e  |		.CONST	0x0865,0x0016
0e4a 086c 0017  | l  |		.CONST	0x086c,0x0017
0e4c 0874 0018  | t  |		.CONST	0x0874,0x0018
0e4e 087e 0019  | ~  |		.CONST	0x087e,0x0019
0e50 ; --------------------------------------------------------------------------------------
0e50 ; Debug3 Subtable 0x17
0e50 ; --------------------------------------------------------------------------------------
0e50 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0e52 088b 0001  |    |		.CONST	0x088b,0x0001
0e54 0890 0002  |    |		.CONST	0x0890,0x0002
0e56 0899 0003  |    |		.CONST	0x0899,0x0003
0e58 ; --------------------------------------------------------------------------------------
0e58 ; Debug3 Subtable 0x18
0e58 ; --------------------------------------------------------------------------------------
0e58 0001 0006  |    |		.DBG3TAB	0x0001,0x0006
0e5a 08a3 ffff  |    |		.CONST	0x08a3,0xffff
0e5c 08a9 0001  |    |		.CONST	0x08a9,0x0001
0e5e 08ae 0002  |    |		.CONST	0x08ae,0x0002
0e60 08b3 0003  |    |		.CONST	0x08b3,0x0003
0e62 08b8 0004  |    |		.CONST	0x08b8,0x0004
0e64 08be 0005  |    |		.CONST	0x08be,0x0005
0e66 08c5 0006  |    |		.CONST	0x08c5,0x0006
0e68 ; --------------------------------------------------------------------------------------
0e68 ; Debug3 Subtable 0x19
0e68 ; --------------------------------------------------------------------------------------
0e68 0004 000f  |    |		.DBG3TAB	0x0004,0x000f
0e6a 08d3 ffff  |    |		.CONST	0x08d3,0xffff
0e6c 08d4 fffe  |    |		.CONST	0x08d4,0xfffe
0e6e 08d6 fffd  |    |		.CONST	0x08d6,0xfffd
0e70 08d8 fffc  |    |		.CONST	0x08d8,0xfffc
0e72 08df 0002  |    |		.CONST	0x08df,0x0002
0e74 08e1 0003  |    |		.CONST	0x08e1,0x0003
0e76 08e6 0004  |    |		.CONST	0x08e6,0x0004
0e78 08eb 0001  |    |		.CONST	0x08eb,0x0001
0e7a 08ef 0005  |    |		.CONST	0x08ef,0x0005
0e7c 08f6 0007  |    |		.CONST	0x08f6,0x0007
0e7e 08f9 0008  |    |		.CONST	0x08f9,0x0008
0e80 08ff 0006  |    |		.CONST	0x08ff,0x0006
0e82 0905 0009  |    |		.CONST	0x0905,0x0009
0e84 090c 000a  |    |		.CONST	0x090c,0x000a
0e86 090f 000b  |    |		.CONST	0x090f,0x000b
0e88 0914 000c  |    |		.CONST	0x0914,0x000c
0e8a 0917 000d  |    |		.CONST	0x0917,0x000d
0e8c 092a 000e  | *  |		.CONST	0x092a,0x000e
0e8e 092d 000f  | -  |		.CONST	0x092d,0x000f
0e90 0000 0000  |    |		.BLANK	0000[0x170]