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

⟦031e19085⟧

    Length: 5120 (0x1400)
    Notes: 00_class, 5811_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 5811       |X   |		.CONST	0x5811								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0660       | `  |		.CONST	0x0660								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0000       |    |		.CONST	0x0000								; Offset to segment table (only in elab segments)
0007 0004       |    |		.CONST	0x0004								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00eb       |    |		.CONST	0x00eb								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0054       | T  |		.CONST	0x0054								; Number of locals
000b			INIT_0008:
000b 0007       |    |		Action	Break_Optional							; Debug Table 0x0 = .DEBUG	0x000b,0x079a,0xc000,0x0000,0x0037,0x4d94,0x0000,0x0013
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 029a 00f3  |    |		Declare_Subprogram	INIT_00f0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0xd,0xfffd
000f 029a 011b  |    |		Declare_Subprogram	INIT_0118,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0xf,0xfffc
0011 029a 0143  |   C|		Declare_Subprogram	INIT_0140,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x11,0xfffb
0013 029a 0163  |   c|		Declare_Subprogram	INIT_0160,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x13,0xfffa
0015 029a 018b  |    |		Declare_Subprogram	INIT_0188,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x15,0xfff9
0017 029a 019b  |    |		Declare_Subprogram	INIT_0198,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x17,0xfff8
0019 029a 01c3  |    |		Declare_Subprogram	INIT_01c0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x19,0xfff7
001b e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x9 = 0x1b,0xfff6
001c 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
001d 0129       | )  |		Execute	Any,Make_Visible
001e 029a 01cb  |    |		Declare_Subprogram	INIT_01c8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x1e,0xfff5
0020 029a 01db  |    |		Declare_Subprogram	INIT_01d8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x20,0xfff4
0022 029a 01e3  |    |		Declare_Subprogram	INIT_01e0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xc = 0x22,0xfff3
0024 029a 01eb  |    |		Declare_Subprogram	INIT_01e8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xd = 0x24,0xfff2
0026 00bf       |    |		Action	Accept_Activation
0027 0007       |    |		Action	Break_Optional							; Debug Table 0x1 = .DEBUG	0x0027,0x07b8,0xc000,0x0000,0x0037,0x4da4,0x0000,0x0015
													; Debug Table 0x1.0x0 = 0x27,0xffff
0028 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x1 = 0x28,0xfffe
0029 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x2 = 0x29,0xfffd
002a e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x3 = 0x2a,0xfffc
002b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
002c e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x4 = 0x2c,0xfffb
002d 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
002e e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x5 = 0x2e,0xfffa
002f 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0030 e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x6 = 0x30,0xfff9
0031 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0032 0322       | "  |		Declare_Variable	Record
0033 e002       |    |		Load	0x0,0x2
0034 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
0035 e003       |    |		Load	0x0,0x3
0036 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0037 0119       |    |		Execute	Any,Check_In_Formal_Type
0038 00d9       |    |		Load_Top	At_Offset_1
0039 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
003a 4800       |H   |		Short_Literal	0x0
003b 00d9       |    |		Load_Top	At_Offset_1
003c 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
003d e212       |    |		Load	0x1,0x12							; Debug Table 0x1.0x7 = 0x3d,0xfff8
003e 029f 01f3  |    |		Declare_Subprogram	INIT_01f0,For_Call
0040 4801       |H   |		Short_Literal	0x1
0041 032d       | -  |		Declare_Type	Record,Defined
0042 03a5       |    |		Declare_Type	Heap_Access,Indirect_Literal,Values_Relative		; Debug Table 0x1.0x8 = 0x42,0xfff7
0043 00d9       |    |		Load_Top	At_Offset_1
0044 02a0       |    |		Declare_Subprogram	Null_Subprogram
0045 00da       |    |		Load_Top	At_Offset_2
0046 03a3       |    |		Complete_Type	Heap_Access,By_Defining
0047 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x9 = 0x47,0xfff6
0048 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0xa = 0x48,0xfff5
0049 e233       | 3  |		Load	0x1,0x33							; Debug Table 0x1.0xb = 0x49,0xfff4
004a e233       | 3  |		Load	0x1,0x33
004b e233       | 3  |		Load	0x1,0x33
004c e233       | 3  |		Load	0x1,0x33
004d e004       |    |		Load	0x0,0x4
004e 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
004f e004       |    |		Load	0x0,0x4
0050 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0051 e004       |    |		Load	0x0,0x4
0052 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0053 e004       |    |		Load	0x0,0x4
0054 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0055 e217       |    |		Load	0x1,0x17
0056 e217       |    |		Load	0x1,0x17
0057 029f 020b  |    |		Declare_Subprogram	INIT_0208,For_Call
0059 480a       |H   |		Short_Literal	0xa
005a 032d       | -  |		Declare_Type	Record,Defined
005b 03a5       |    |		Declare_Type	Heap_Access,Indirect_Literal,Values_Relative		; Debug Table 0x1.0xc = 0x5b,0xfff3
005c 00d9       |    |		Load_Top	At_Offset_1
005d 02a0       |    |		Declare_Subprogram	Null_Subprogram
005e 00da       |    |		Load_Top	At_Offset_2
005f 03a3       |    |		Complete_Type	Heap_Access,By_Defining
0060 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0xd = 0x60,0xfff2
0061 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0xe = 0x61,0xfff1
0062 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0xf = 0x62,0xfff0
0063 4805       |H   |		Short_Literal	0x5
0064 029f 023b  |   ;|		Declare_Subprogram	INIT_0238,For_Call
0066 03fd       |    |		Declare_Type	Discrete,Defined
0067 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x10 = 0x67,0xffef
0068 e005       |    |		Load	0x0,0x5
0069 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
006a e233       | 3  |		Load	0x1,0x33
006b e218       |    |		Load	0x1,0x18
006c e005       |    |		Load	0x0,0x5
006d 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
006e e004       |    |		Load	0x0,0x4
006f 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0070 e004       |    |		Load	0x0,0x4
0071 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0072 e234       | 4  |		Load	0x1,0x34
0073 e001       |    |		Load	0x0,0x1
0074 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0075 029f 0253  |   S|		Declare_Subprogram	INIT_0250,For_Call
0077 4809       |H   |		Short_Literal	0x9
0078 032d       | -  |		Declare_Type	Record,Defined
0079 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x11 = 0x79,0xffee
007a 0322       | "  |		Declare_Variable	Record
007b 00d8       |    |		Load_Top	At_Offset_0
007c 1c00       |    |		Execute_Immediate	Run_Utility,0x0
007d 029d 0273  |   s|		Declare_Subprogram	INIT_0270,For_Outer_Call			; Debug Table 0x1.0x12 = 0x7d,0xffed
007f 029d 0283  |    |		Declare_Subprogram	INIT_0280,For_Outer_Call			; Debug Table 0x1.0x13 = 0x7f,0xffec
0081 029d 02a3  |    |		Declare_Subprogram	INIT_02a0,For_Outer_Call			; Debug Table 0x1.0x14 = 0x81,0xffeb
0083 029d 02b3  |    |		Declare_Subprogram	INIT_02b0,For_Outer_Call			; Debug Table 0x1.0x15 = 0x83,0xffea
0085 029d 02bb  |    |		Declare_Subprogram	INIT_02b8,For_Outer_Call			; Debug Table 0x1.0x16 = 0x85,0xffe9
0087 029d 02c3  |    |		Declare_Subprogram	INIT_02c0,For_Outer_Call			; Debug Table 0x1.0x17 = 0x87,0xffe8
0089 029d 030b  |    |		Declare_Subprogram	INIT_0308,For_Outer_Call			; Debug Table 0x1.0x18 = 0x89,0xffe7
008b 029d 037b  |   {|		Declare_Subprogram	INIT_0378,For_Outer_Call			; Debug Table 0x1.0x19 = 0x8b,0xffe6
008d 029d 038b  |    |		Declare_Subprogram	INIT_0388,For_Outer_Call			; Debug Table 0x1.0x1a = 0x8d,0xffe5
008f 029d 03bb  |    |		Declare_Subprogram	INIT_03b8,For_Outer_Call			; Debug Table 0x1.0x1b = 0x8f,0xffe4
0091 029d 04b3  |    |		Declare_Subprogram	INIT_04b0,For_Outer_Call			; Debug Table 0x1.0x1c = 0x91,0xffe3
0093 029d 04e3  |    |		Declare_Subprogram	INIT_04e0,For_Outer_Call			; Debug Table 0x1.0x1d = 0x93,0xffe2
0095 029d 0513  |    |		Declare_Subprogram	INIT_0510,For_Outer_Call			; Debug Table 0x1.0x1e = 0x95,0xffe1
0097 029d 051b  |    |		Declare_Subprogram	INIT_0518,For_Outer_Call			; Debug Table 0x1.0x1f = 0x97,0xffe0
0099 029d 052b  |   +|		Declare_Subprogram	INIT_0528,For_Outer_Call			; Debug Table 0x1.0x20 = 0x99,0xffdf
009b 029d 053b  |   ;|		Declare_Subprogram	INIT_0538,For_Outer_Call			; Debug Table 0x1.0x21 = 0x9b,0xffde
009d 029d 056b  |   k|		Declare_Subprogram	INIT_0568,For_Outer_Call			; Debug Table 0x1.0x22 = 0x9d,0xffdd
009f 029d 05b3  |    |		Declare_Subprogram	INIT_05b0,For_Outer_Call			; Debug Table 0x1.0x23 = 0x9f,0xffdc
00a1 029d 05cb  |    |		Declare_Subprogram	INIT_05c8,For_Outer_Call			; Debug Table 0x1.0x24 = 0xa1,0xffdb
00a3 029b 05db  |    |		Declare_Subprogram	INIT_05d8,For_Outer_Call,Unelaborated		; Debug Table 0x1.0x25 = 0xa3,0xffda
00a5 029b 0603  |    |		Declare_Subprogram	INIT_0600,For_Outer_Call,Unelaborated		; Debug Table 0x1.0x26 = 0xa5,0xffd9
00a7 6258       |bX  |		Indirect_Literal	Discrete,0x300,{0x00000000, 0x00374da4}		; Debug Table 0x1.0x27 = 0xa7,0xffd8
00a8 6253       |bS  |		Indirect_Literal	Discrete,0x2fc,{0x00000000, 0x00000657}
00a9 e20f       |    |		Load	0x1,0xf
00aa e210       |    |		Load	0x1,0x10
00ab e211       |    |		Load	0x1,0x11
00ac 0335       | 5  |		Declare_Variable	Array,Duplicate
00ad 00d0       |    |		Action	Swap_Control
00ae 00d1       |    |		Pop_Control	Pop_Count_1
00af e238       | 8  |		Load	0x1,0x38
00b0 e213       |    |		Load	0x1,0x13
00b1 1d3f       | ?  |		Execute_Immediate	Reference_Lex_1,0x3f
00b2 1d40       | @  |		Execute_Immediate	Reference_Lex_1,0x40
00b3 1d3e       | >  |		Execute_Immediate	Reference_Lex_1,0x3e
00b4 1d41       | A  |		Execute_Immediate	Reference_Lex_1,0x41
00b5 1d42       | B  |		Execute_Immediate	Reference_Lex_1,0x42
00b6 e23a       | :  |		Load	0x1,0x3a
00b7 1d43       | C  |		Execute_Immediate	Reference_Lex_1,0x43
00b8 1d44       | D  |		Execute_Immediate	Reference_Lex_1,0x44
00b9 e23c       | <  |		Load	0x1,0x3c
00ba 1d45       | E  |		Execute_Immediate	Reference_Lex_1,0x45
00bb 1d47       | G  |		Execute_Immediate	Reference_Lex_1,0x47
00bc 1d46       | F  |		Execute_Immediate	Reference_Lex_1,0x46
00bd 1d48       | H  |		Execute_Immediate	Reference_Lex_1,0x48
00be 1d49       | I  |		Execute_Immediate	Reference_Lex_1,0x49
00bf 1d4a       | J  |		Execute_Immediate	Reference_Lex_1,0x4a
00c0 1d4b       | K  |		Execute_Immediate	Reference_Lex_1,0x4b
00c1 1d4c       | L  |		Execute_Immediate	Reference_Lex_1,0x4c
00c2 1d4d       | M  |		Execute_Immediate	Reference_Lex_1,0x4d
00c3 1d4e       | N  |		Execute_Immediate	Reference_Lex_1,0x4e
00c4 1d4f       | O  |		Execute_Immediate	Reference_Lex_1,0x4f
00c5 e226       | &  |		Load	0x1,0x26
00c6 1d50       | P  |		Execute_Immediate	Reference_Lex_1,0x50
00c7 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f
00c8 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
00c9 1d51       | Q  |		Execute_Immediate	Reference_Lex_1,0x51
00ca 1d52       | R  |		Execute_Immediate	Reference_Lex_1,0x52
00cb e006       |    |		Load	0x0,0x6
00cc 0387       |    |		Declare_Variable	Package
00cd 00d8       |    |		Load_Top	At_Offset_0
00ce 020f       |    |		Execute	Module,Activate
00cf 029d 062b  |   +|		Declare_Subprogram	INIT_0628,For_Outer_Call			; Debug Table 0x1.0x28 = 0xcf,0xffd7
00d1 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27				; Debug Table 0x1.0x29 = 0xd1,0xffd6
00d2 00c7       |    |		Action	Elaborate_Subprogram
00d3 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28				; Debug Table 0x1.0x2a = 0xd3,0xffd5
00d4 00c7       |    |		Action	Elaborate_Subprogram
00d5 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29				; Debug Table 0x1.0x2b = 0xd5,0xffd4
00d6 00c7       |    |		Action	Elaborate_Subprogram
00d7 1d2a       | *  |		Execute_Immediate	Reference_Lex_1,0x2a				; Debug Table 0x1.0x2c = 0xd7,0xffd3
00d8 00c7       |    |		Action	Elaborate_Subprogram
00d9 1d2b       | +  |		Execute_Immediate	Reference_Lex_1,0x2b				; Debug Table 0x1.0x2d = 0xd9,0xffd2
00da 00c7       |    |		Action	Elaborate_Subprogram
00db 1d2c       | ,  |		Execute_Immediate	Reference_Lex_1,0x2c				; Debug Table 0x1.0x2e = 0xdb,0xffd1
00dc 00c7       |    |		Action	Elaborate_Subprogram
00dd 1d51       | Q  |		Execute_Immediate	Reference_Lex_1,0x51				; Debug Table 0x1.0x2f = 0xdd,0xffd0
00de 00c7       |    |		Action	Elaborate_Subprogram
00df 1d52       | R  |		Execute_Immediate	Reference_Lex_1,0x52				; Debug Table 0x1.0x30 = 0xdf,0xffcf
00e0 00c7       |    |		Action	Elaborate_Subprogram
00e1 1d2d       | -  |		Execute_Immediate	Reference_Lex_1,0x2d				; Debug Table 0x1.0x31 = 0xe1,0xffce
00e2 00c7       |    |		Action	Elaborate_Subprogram
00e3 1d2f       | /  |		Execute_Immediate	Reference_Lex_1,0x2f				; Debug Table 0x1.0x32 = 0xe3,0xffcd
00e4 00c7       |    |		Action	Elaborate_Subprogram
00e5 1d30       | 0  |		Execute_Immediate	Reference_Lex_1,0x30				; Debug Table 0x1.0x33 = 0xe5,0xffcc
00e6 00c7       |    |		Action	Elaborate_Subprogram
00e7 1d31       | 1  |		Execute_Immediate	Reference_Lex_1,0x31				; Debug Table 0x1.0x34 = 0xe7,0xffcb
00e8 00c7       |    |		Action	Elaborate_Subprogram
00e9 1d32       | 2  |		Execute_Immediate	Reference_Lex_1,0x32				; Debug Table 0x1.0x35 = 0xe9,0xffca
00ea 00c7       |    |		Action	Elaborate_Subprogram
00eb			BODY_0008:
00eb 00bc       |    |		Action	Signal_Activated
00ec 00bb       |    |		Action	Signal_Completion
00ed 0000 0000  |    |		.XXX[0x3]
00ef 0000       |    |
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f8       |    |		.CONST	0x00f8								; Address of begin
00f1 0004       |    |		.CONST	0x0004								; Address of exception handler
00f2 0002       |    |		.CONST	0x0002								; Number of locals
00f3			INIT_00f0:
00f3 e23c       | <  |		Load	0x1,0x3c							; Debug Table 0x2 = .DEBUG	0x00f3,0x0826,0x1001,0x0000,0x0037,0x4d94,0x0000,0x0184
													; Debug Table 0x2.0x0 = 0xf3,0xffff
00f4 0322       | "  |		Declare_Variable	Record
00f5 e23d       | =  |		Load	0x1,0x3d
00f6 00d9       |    |		Load_Top	At_Offset_1
00f7 017d       | }  |		Execute	Record,Structure_Write
00f8			BODY_00f0:
00f8 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2.0x1 = 0xf8,0x1
00f9 00d9       |    |		Load_Top	At_Offset_1
00fa 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00fb 4802       |H   |		Short_Literal	0x2							; Debug Table 0x2.0x2 = 0xfb,0x2
00fc 00d9       |    |		Load_Top	At_Offset_1
00fd 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00fe 8254       | T  |		Call	0x1,0x54							; Debug Table 0x2.0x3 = 0xfe,0x3
00ff 00d9       |    |		Load_Top	At_Offset_1
0100 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0101 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x4 = 0x101,0x4
0102 00d9       |    |		Load_Top	At_Offset_1
0103 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0104 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x2.0x5 = 0x104,0x5
0105 00d9       |    |		Load_Top	At_Offset_1
0106 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
0107 e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x2.0x6 = 0x107,0x6
0108 00d9       |    |		Load_Top	At_Offset_1
0109 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
010a e007       |    |		Load	0x0,0x7								; Debug Table 0x2.0x7 = 0x10a,0x7
010b 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
010c 00d9       |    |		Load_Top	At_Offset_1
010d e5fb       |    |		Load	0x2,-0x5
010e e5fc       |    |		Load	0x2,-0x4
010f e5fd       |    |		Load	0x2,-0x3
0110 e253       | S  |		Load	0x1,0x53
0111 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
0112 00d2       |    |		Pop_Control	Pop_Count_2
0113 c5f9       |    |		Store	0x2,-0x7
0114 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x8 = 0x114,0x8
0115 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0116 c5fa       |    |		Store	0x2,-0x6
0117 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 0120       |    |		.CONST	0x0120								; Address of begin
0119 0004       |    |		.CONST	0x0004								; Address of exception handler
011a 0002       |    |		.CONST	0x0002								; Number of locals
011b			INIT_0118:
011b e23c       | <  |		Load	0x1,0x3c							; Debug Table 0x3 = .DEBUG	0x011b,0x083a,0x1001,0x0000,0x0037,0x4d94,0x0000,0x01b5
													; Debug Table 0x3.0x0 = 0x11b,0xffff
011c 0322       | "  |		Declare_Variable	Record
011d e23d       | =  |		Load	0x1,0x3d
011e 00d9       |    |		Load_Top	At_Offset_1
011f 017d       | }  |		Execute	Record,Structure_Write
0120			BODY_0118:
0120 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3.0x1 = 0x120,0x1
0121 00d9       |    |		Load_Top	At_Offset_1
0122 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0123 4802       |H   |		Short_Literal	0x2							; Debug Table 0x3.0x2 = 0x123,0x2
0124 00d9       |    |		Load_Top	At_Offset_1
0125 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0126 8254       | T  |		Call	0x1,0x54							; Debug Table 0x3.0x3 = 0x126,0x3
0127 00d9       |    |		Load_Top	At_Offset_1
0128 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0129 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3.0x4 = 0x129,0x4
012a 00d9       |    |		Load_Top	At_Offset_1
012b 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
012c e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x3.0x5 = 0x12c,0x5
012d 00d9       |    |		Load_Top	At_Offset_1
012e 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
012f e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x3.0x6 = 0x12f,0x6
0130 00d9       |    |		Load_Top	At_Offset_1
0131 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0132 e007       |    |		Load	0x0,0x7								; Debug Table 0x3.0x7 = 0x132,0x7
0133 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0134 00d9       |    |		Load_Top	At_Offset_1
0135 e5fb       |    |		Load	0x2,-0x5
0136 e5fc       |    |		Load	0x2,-0x4
0137 e5ff       |    |		Load	0x2,-0x1
0138 e253       | S  |		Load	0x1,0x53
0139 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
013a 00d1       |    |		Pop_Control	Pop_Count_1
013b c5f9       |    |		Store	0x2,-0x7
013c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x8 = 0x13c,0x8
013d 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
013e c5fa       |    |		Store	0x2,-0x6
013f 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0148       | H  |		.CONST	0x0148								; Address of begin
0141 0004       |    |		.CONST	0x0004								; Address of exception handler
0142 0002       |    |		.CONST	0x0002								; Number of locals
0143			INIT_0140:
0143 e23c       | <  |		Load	0x1,0x3c							; Debug Table 0x4 = .DEBUG	0x0143,0x084e,0x1001,0x0000,0x0037,0x4d94,0x0000,0x01e6
													; Debug Table 0x4.0x0 = 0x143,0xffff
0144 0322       | "  |		Declare_Variable	Record
0145 e23d       | =  |		Load	0x1,0x3d
0146 00d9       |    |		Load_Top	At_Offset_1
0147 017d       | }  |		Execute	Record,Structure_Write
0148			BODY_0140:
0148 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0x1 = 0x148,0x1
0149 00d9       |    |		Load_Top	At_Offset_1
014a 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
014b 4802       |H   |		Short_Literal	0x2							; Debug Table 0x4.0x2 = 0x14b,0x2
014c 00d9       |    |		Load_Top	At_Offset_1
014d 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
014e 8254       | T  |		Call	0x1,0x54							; Debug Table 0x4.0x3 = 0x14e,0x3
014f 00d9       |    |		Load_Top	At_Offset_1
0150 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0151 4801       |H   |		Short_Literal	0x1							; Debug Table 0x4.0x4 = 0x151,0x4
0152 00d9       |    |		Load_Top	At_Offset_1
0153 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0154 e007       |    |		Load	0x0,0x7								; Debug Table 0x4.0x5 = 0x154,0x5
0155 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0156 00d9       |    |		Load_Top	At_Offset_1
0157 e5fc       |    |		Load	0x2,-0x4
0158 e5fd       |    |		Load	0x2,-0x3
0159 e5fe       |    |		Load	0x2,-0x2
015a e5ff       |    |		Load	0x2,-0x1
015b e253       | S  |		Load	0x1,0x53
015c 1833       | 3  |		Execute	Package,Field_Execute,Field_Number 0x33
015d 00d1       |    |		Pop_Control	Pop_Count_1
015e c5fb       |    |		Store	0x2,-0x5
015f 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0168       | h  |		.CONST	0x0168								; Address of begin
0161 0004       |    |		.CONST	0x0004								; Address of exception handler
0162 0002       |    |		.CONST	0x0002								; Number of locals
0163			INIT_0160:
0163 e23c       | <  |		Load	0x1,0x3c							; Debug Table 0x5 = .DEBUG	0x0163,0x085c,0x1001,0x0000,0x0037,0x4d94,0x0000,0x020a
													; Debug Table 0x5.0x0 = 0x163,0xffff
0164 0322       | "  |		Declare_Variable	Record
0165 e23d       | =  |		Load	0x1,0x3d
0166 00d9       |    |		Load_Top	At_Offset_1
0167 017d       | }  |		Execute	Record,Structure_Write
0168			BODY_0160:
0168 4802       |H   |		Short_Literal	0x2							; Debug Table 0x5.0x1 = 0x168,0x1
0169 00d9       |    |		Load_Top	At_Offset_1
016a 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
016b 4802       |H   |		Short_Literal	0x2							; Debug Table 0x5.0x2 = 0x16b,0x2
016c 00d9       |    |		Load_Top	At_Offset_1
016d 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
016e 8254       | T  |		Call	0x1,0x54							; Debug Table 0x5.0x3 = 0x16e,0x3
016f 00d9       |    |		Load_Top	At_Offset_1
0170 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0171 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x5.0x4 = 0x171,0x4
0172 00d9       |    |		Load_Top	At_Offset_1
0173 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0174 e007       |    |		Load	0x0,0x7								; Debug Table 0x5.0x5 = 0x174,0x5
0175 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0176 00d9       |    |		Load_Top	At_Offset_1
0177 e5fd       |    |		Load	0x2,-0x3
0178 e5fe       |    |		Load	0x2,-0x2
0179 e5ff       |    |		Load	0x2,-0x1
017a e253       | S  |		Load	0x1,0x53
017b 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
017c 00d1       |    |		Pop_Control	Pop_Count_1
017d c5fb       |    |		Store	0x2,-0x5
017e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x6 = 0x17e,0x6
017f 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0180 c5fc       |    |		Store	0x2,-0x4
0181 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0182 0000 0000  |    |		.BLANK	0000[0x6]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 018b       |    |		.CONST	0x018b								; Address of begin
0189 0004       |    |		.CONST	0x0004								; Address of exception handler
018a 0001       |    |		.CONST	0x0001								; Number of locals
018b			BODY_0188:
018b			INIT_0188:
018b e007       |    |		Load	0x0,0x7								; Debug Table 0x6 = .DEBUG	0x018b,0x086c,0x1001,0x0000,0x0037,0x4d94,0x0000,0x022c
													; Debug Table 0x6.0x0 = 0x18b,0x1
018c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
018d 00db       |    |		Load_Top	At_Offset_3
018e e253       | S  |		Load	0x1,0x53
018f 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
0190 c5ff       |    |		Store	0x2,-0x1
0191 c5fe       |    |		Store	0x2,-0x2
0192 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0193 0000 0000  |    |		.BLANK	0000[0x5]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 01a0       |    |		.CONST	0x01a0								; Address of begin
0199 0004       |    |		.CONST	0x0004								; Address of exception handler
019a 0002       |    |		.CONST	0x0002								; Number of locals
019b			INIT_0198:
019b e23c       | <  |		Load	0x1,0x3c							; Debug Table 0x7 = .DEBUG	0x019b,0x0870,0x1001,0x0000,0x0037,0x4d94,0x0000,0x023a
													; Debug Table 0x7.0x0 = 0x19b,0xffff
019c 0322       | "  |		Declare_Variable	Record
019d e23d       | =  |		Load	0x1,0x3d
019e 00d9       |    |		Load_Top	At_Offset_1
019f 017d       | }  |		Execute	Record,Structure_Write
01a0			BODY_0198:
01a0 4805       |H   |		Short_Literal	0x5							; Debug Table 0x7.0x1 = 0x1a0,0x1
01a1 00d9       |    |		Load_Top	At_Offset_1
01a2 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01a3 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x7.0x2 = 0x1a3,0x2
01a4 00d9       |    |		Load_Top	At_Offset_1
01a5 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01a6 8254       | T  |		Call	0x1,0x54							; Debug Table 0x7.0x3 = 0x1a6,0x3
01a7 00d9       |    |		Load_Top	At_Offset_1
01a8 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
01a9 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x7.0x4 = 0x1a9,0x4
01aa 00d9       |    |		Load_Top	At_Offset_1
01ab 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
01ac e007       |    |		Load	0x0,0x7								; Debug Table 0x7.0x5 = 0x1ac,0x5
01ad 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01ae 00d9       |    |		Load_Top	At_Offset_1
01af e5fc       |    |		Load	0x2,-0x4
01b0 e5fd       |    |		Load	0x2,-0x3
01b1 e5ff       |    |		Load	0x2,-0x1
01b2 e253       | S  |		Load	0x1,0x53
01b3 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
01b4 00d1       |    |		Pop_Control	Pop_Count_1
01b5 c5fa       |    |		Store	0x2,-0x6
01b6 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x6 = 0x1b6,0x6
01b7 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
01b8 c5fb       |    |		Store	0x2,-0x5
01b9 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
01ba 0000 0000  |    |		.BLANK	0000[0x6]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01c3       |    |		.CONST	0x01c3								; Address of begin
01c1 0004       |    |		.CONST	0x0004								; Address of exception handler
01c2 0001       |    |		.CONST	0x0001								; Number of locals
01c3			BODY_01c0:
01c3			INIT_01c0:
01c3 e253       | S  |		Load	0x1,0x53							; Debug Table 0x8 = .DEBUG	0x01c3,0x0880,0x1001,0x0000,0x0037,0x4d94,0x0000,0x0264
													; Debug Table 0x8.0x0 = 0x1c3,0x1
01c4 1834       | 4  |		Execute	Package,Field_Execute,Field_Number 0x34
01c5 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01c6 0000 0000  |    |		.XXX[0x2]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01cb       |    |		.CONST	0x01cb								; Address of begin
01c9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ca 0001       |    |		.CONST	0x0001								; Number of locals
01cb			BODY_01c8:
01cb			INIT_01c8:
01cb e253       | S  |		Load	0x1,0x53							; Debug Table 0x9 = .DEBUG	0x01cb,0x0884,0x1001,0x0000,0x0037,0x4d94,0x0000,0x026e
													; Debug Table 0x9.0x0 = 0x1cb,0x1
01cc 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
01cd 00db       |    |		Load_Top	At_Offset_3
01ce e253       | S  |		Load	0x1,0x53
01cf 1836       | 6  |		Execute	Package,Field_Execute,Field_Number 0x36
01d0 c5fe       |    |		Store	0x2,-0x2
01d1 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01d2 0000 0000  |    |		.BLANK	0000[0x6]
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01db       |    |		.CONST	0x01db								; Address of begin
01d9 0004       |    |		.CONST	0x0004								; Address of exception handler
01da 0001       |    |		.CONST	0x0001								; Number of locals
01db			BODY_01d8:
01db			INIT_01d8:
01db 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa = .DEBUG	0x01db,0x0888,0x1001,0x0000,0x0037,0x4d94,0x0000,0x027f
													; Debug Table 0xa.0x0 = 0x1db,0x1
01dc e253       | S  |		Load	0x1,0x53
01dd 1837       | 7  |		Execute	Package,Field_Execute,Field_Number 0x37
01de 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
01df 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e3       |    |		.CONST	0x01e3								; Address of begin
01e1 0004       |    |		.CONST	0x0004								; Address of exception handler
01e2 0001       |    |		.CONST	0x0001								; Number of locals
01e3			BODY_01e0:
01e3			INIT_01e0:
01e3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb = .DEBUG	0x01e3,0x088c,0x1002,0x0000,0x0037,0x4d94,0x0000,0x0287
													; Debug Table 0xb.0x0 = 0x1e3,0x1
01e4 e253       | S  |		Load	0x1,0x53
01e5 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
01e6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01e7 0000       |    |		.XXX[0x1]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01eb       |    |		.CONST	0x01eb								; Address of begin
01e9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ea 0001       |    |		.CONST	0x0001								; Number of locals
01eb			BODY_01e8:
01eb			INIT_01e8:
01eb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xc = .DEBUG	0x01eb,0x0890,0x1002,0x0000,0x0037,0x4d94,0x0000,0x0292
													; Debug Table 0xc.0x0 = 0x1eb,0x1
01ec e253       | S  |		Load	0x1,0x53
01ed 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
01ee 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01ef 0000       |    |		.XXX[0x1]
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01f3       |    |		.CONST	0x01f3								; Address of begin
01f1 0004       |    |		.CONST	0x0004								; Address of exception handler
01f2 0001       |    |		.CONST	0x0001								; Number of locals
01f3			BODY_01f0:
01f3			INIT_01f0:
01f3 4608       |F   |		Jump_Case	0x9							; Debug Table 0xd = .DEBUG	0x01f3,0x0894,0x1005,0x0000,0x0037,0x4da4,0x0000,0x005e
01f4 7808       |x   |		Jump	0x1fd								; case 0x0
01f5 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
01f6 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
01f7 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
01f8 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
01f9 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
01fa 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
01fb 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x7
01fc 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x8
01fd 00da       |    |		Load_Top	At_Offset_2
01fe 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
01ff 0125       | %  |		Execute	Any,Set_Constraint
0200 00da       |    |		Load_Top	At_Offset_2
0201 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0202 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0203 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0204 0000 0000  |    |		.BLANK	0000[0x4]
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 020b       |    |		.CONST	0x020b								; Address of begin
0209 0004       |    |		.CONST	0x0004								; Address of exception handler
020a 0001       |    |		.CONST	0x0001								; Number of locals
020b			BODY_0208:
020b			INIT_0208:
020b 4608       |F   |		Jump_Case	0x9							; Debug Table 0xe = .DEBUG	0x020b,0x0896,0x1005,0x0000,0x0037,0x4da4,0x0000,0x0075
020c 7808       |x   |		Jump	0x215								; case 0x0
020d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
020e 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
020f 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
0210 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
0211 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
0212 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
0213 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x7
0214 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x8
0215 e236       | 6  |		Load	0x1,0x36
0216 00db       |    |		Load_Top	At_Offset_3
0217 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0218 e236       | 6  |		Load	0x1,0x36
0219 00db       |    |		Load_Top	At_Offset_3
021a 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
021b e236       | 6  |		Load	0x1,0x36
021c 00db       |    |		Load_Top	At_Offset_3
021d 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
021e e236       | 6  |		Load	0x1,0x36
021f 00db       |    |		Load_Top	At_Offset_3
0220 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0221 00da       |    |		Load_Top	At_Offset_2
0222 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0223 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0224 00da       |    |		Load_Top	At_Offset_2
0225 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0226 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0227 00da       |    |		Load_Top	At_Offset_2
0228 3408       |4   |		Execute	Record,Field_Reference,Field_Number 0x8
0229 0125       | %  |		Execute	Any,Set_Constraint
022a 00da       |    |		Load_Top	At_Offset_2
022b 3408       |4   |		Execute	Record,Field_Reference,Field_Number 0x8
022c 1c00       |    |		Execute_Immediate	Run_Utility,0x0
022d 00da       |    |		Load_Top	At_Offset_2
022e 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
022f 0125       | %  |		Execute	Any,Set_Constraint
0230 00da       |    |		Load_Top	At_Offset_2
0231 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
0232 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0233 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0234 0000 0000  |    |		.BLANK	0000[0x4]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 023b       | ;  |		.CONST	0x023b								; Address of begin
0239 0004       |    |		.CONST	0x0004								; Address of exception handler
023a 0001       |    |		.CONST	0x0001								; Number of locals
023b			BODY_0238:
023b			INIT_0238:
023b 4603       |F   |		Jump_Case	0x4							; Debug Table 0xf = .DEBUG	0x023b,0x0898,0x1005,0x0000,0x0037,0x4da4,0x0000,0x00c5
023c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
023d 7802       |x   |		Jump	0x240								; case 0x1
023e 7805       |x   |		Jump	0x244								; case 0x2
023f 7809       |x   |		Jump	0x249								; case 0x3
0240 00da       |    |		Load_Top	At_Offset_2
0241 0091 063a  |   :|		Action	Push_String_Extended_Indexed,0x63a				; "COPY_OP"
0243 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0244 00db       |    |		Load_Top	At_Offset_3
0245 00db       |    |		Load_Top	At_Offset_3
0246 00e0       |    |		Load_Encached	Standard_Cache
0247 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0248 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0249 00da       |    |		Load_Top	At_Offset_2
024a 00e0       |    |		Load_Encached	Standard_Cache
024b 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
024c 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
024d 0000 0000  |    |		.XXX[0x3]
024f 0000       |    |
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 0253       | S  |		.CONST	0x0253								; Address of begin
0251 0004       |    |		.CONST	0x0004								; Address of exception handler
0252 0001       |    |		.CONST	0x0001								; Number of locals
0253			BODY_0250:
0253			INIT_0250:
0253 4608       |F   |		Jump_Case	0x9							; Debug Table 0x10 = .DEBUG	0x0253,0x089a,0x1005,0x0000,0x0037,0x4da4,0x0000,0x00cf
0254 7808       |x   |		Jump	0x25d								; case 0x0
0255 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
0256 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
0257 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
0258 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
0259 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
025a 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
025b 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x7
025c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x8
025d 00da       |    |		Load_Top	At_Offset_2
025e 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
025f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0260 00da       |    |		Load_Top	At_Offset_2
0261 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
0262 0125       | %  |		Execute	Any,Set_Constraint
0263 00da       |    |		Load_Top	At_Offset_2
0264 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
0265 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0266 00da       |    |		Load_Top	At_Offset_2
0267 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0268 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0269 00da       |    |		Load_Top	At_Offset_2
026a 3407       |4   |		Execute	Record,Field_Reference,Field_Number 0x7
026b 1c00       |    |		Execute_Immediate	Run_Utility,0x0
026c 00da       |    |		Load_Top	At_Offset_2
026d 3408       |4   |		Execute	Record,Field_Reference,Field_Number 0x8
026e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
026f 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0273       | s  |		.CONST	0x0273								; Address of begin
0271 0004       |    |		.CONST	0x0004								; Address of exception handler
0272 0001       |    |		.CONST	0x0001								; Number of locals
0273			BODY_0270:
0273			INIT_0270:
0273 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x11 = .DEBUG	0x0273,0x089c,0x1001,0x0000,0x0037,0x4da4,0x0000,0x010f
													; Debug Table 0x11.0x0 = 0x273,0x1
0274 0219       |    |		Execute	Heap_Access,All_Read
0275 e5fe       |    |		Load	0x2,-0x2
0276 00d9       |    |		Load_Top	At_Offset_1
0277 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0278 8216       |    |		Call	0x1,0x16
0279 00da       |    |		Load_Top	At_Offset_2
027a 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
027b c5fe       |    |		Store	0x2,-0x2
027c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
027d 0000 0000  |    |		.XXX[0x3]
027f 0000       |    |
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 028c       |    |		.CONST	0x028c								; Address of begin
0281 0004       |    |		.CONST	0x0004								; Address of exception handler
0282 0002       |    |		.CONST	0x0002								; Number of locals
0283			INIT_0280:
0283 e238       | 8  |		Load	0x1,0x38							; Debug Table 0x12 = .DEBUG	0x0283,0x08a0,0x1001,0x0000,0x0037,0x4da4,0x0000,0x0126
													; Debug Table 0x12.0x0 = 0x283,0xffff
0284 e238       | 8  |		Load	0x1,0x38
0285 e5ff       |    |		Load	0x2,-0x1
0286 039c       |    |		Declare_Variable	Heap_Access,By_Allocation
0287 00d8       |    |		Load_Top	At_Offset_0
0288 0217       |    |		Execute	Heap_Access,All_Reference
0289 1c00       |    |		Execute_Immediate	Run_Utility,0x0
028a 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
028b 0007       |    |		Action	Break_Optional							; Debug Table 0x12.0x1 = 0x28b,0xfffe
028c			BODY_0280:
028c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0x2 = 0x28c,0x1
028d 0219       |    |		Execute	Heap_Access,All_Read
028e 00d8       |    |		Load_Top	At_Offset_0
028f 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0290 0120       |    |		Execute	Any,Is_Value
0291 6802       |h   |		Jump_Zero	0x294
0292 e212       |    |		Load	0x1,0x12
0293 7804       |x   |		Jump	0x298
0294 00d8       |    |		Load_Top	At_Offset_0
0295 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0296 e212       |    |		Load	0x1,0x12
0297 0119       |    |		Execute	Any,Check_In_Formal_Type
0298 e5ff       |    |		Load	0x2,-0x1
0299 8214       |    |		Call	0x1,0x14
029a 00d9       |    |		Load_Top	At_Offset_1
029b 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
029c 00d1       |    |		Pop_Control	Pop_Count_1
029d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0x3 = 0x29d,0x2
029e a5fe       |    |		Store_Unchecked	0x2,-0x2
029f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02a3       |    |		.CONST	0x02a3								; Address of begin
02a1 0004       |    |		.CONST	0x0004								; Address of exception handler
02a2 0001       |    |		.CONST	0x0001								; Number of locals
02a3			BODY_02a0:
02a3			INIT_02a0:
02a3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x13 = .DEBUG	0x02a3,0x08aa,0x1001,0x0000,0x0037,0x4da4,0x0000,0x014e
													; Debug Table 0x13.0x0 = 0x2a3,0x1
02a4 0219       |    |		Execute	Heap_Access,All_Read
02a5 00d8       |    |		Load_Top	At_Offset_0
02a6 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02a7 e5ff       |    |		Load	0x2,-0x1
02a8 0217       |    |		Execute	Heap_Access,All_Reference
02a9 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02aa e212       |    |		Load	0x1,0x12
02ab 0119       |    |		Execute	Any,Check_In_Formal_Type
02ac 8215       |    |		Call	0x1,0x15
02ad 00d9       |    |		Load_Top	At_Offset_1
02ae 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
02af 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02b3       |    |		.CONST	0x02b3								; Address of begin
02b1 0004       |    |		.CONST	0x0004								; Address of exception handler
02b2 0001       |    |		.CONST	0x0001								; Number of locals
02b3			BODY_02b0:
02b3			INIT_02b0:
02b3 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x14 = .DEBUG	0x02b3,0x08ae,0x1001,0x0000,0x0037,0x4da4,0x0000,0x016b
													; Debug Table 0x14.0x0 = 0x2b3,0x1
02b4 0000 0000  |    |		.BLANK	0000[0x4]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bb       |    |		.CONST	0x02bb								; Address of begin
02b9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ba 0001       |    |		.CONST	0x0001								; Number of locals
02bb			BODY_02b8:
02bb			INIT_02b8:
02bb 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x15 = .DEBUG	0x02bb,0x08b2,0x1001,0x0000,0x0037,0x4da4,0x0000,0x0178
													; Debug Table 0x15.0x0 = 0x2bb,0x1
02bc 0000 0000  |    |		.BLANK	0000[0x4]
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02cc       |    |		.CONST	0x02cc								; Address of begin
02c1 0004       |    |		.CONST	0x0004								; Address of exception handler
02c2 0002       |    |		.CONST	0x0002								; Number of locals
02c3			INIT_02c0:
02c3 e23a       | :  |		Load	0x1,0x3a							; Debug Table 0x16 = .DEBUG	0x02c3,0x08b6,0x1001,0x0000,0x0037,0x4da4,0x0000,0x0185
													; Debug Table 0x16.0x0 = 0x2c3,0xffff
02c4 e23a       | :  |		Load	0x1,0x3a
02c5 e5fe       |    |		Load	0x2,-0x2
02c6 039c       |    |		Declare_Variable	Heap_Access,By_Allocation
02c7 00d8       |    |		Load_Top	At_Offset_0
02c8 0217       |    |		Execute	Heap_Access,All_Reference
02c9 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02ca 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
02cb 0007       |    |		Action	Break_Optional							; Debug Table 0x16.0x1 = 0x2cb,0xfffe
02cc			BODY_02c0:
02cc e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x16.0x2 = 0x2cc,0x1
02cd 0219       |    |		Execute	Heap_Access,All_Read
02ce 00d9       |    |		Load_Top	At_Offset_1
02cf 0219       |    |		Execute	Heap_Access,All_Read
02d0 00d9       |    |		Load_Top	At_Offset_1
02d1 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02d2 00d9       |    |		Load_Top	At_Offset_1
02d3 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
02d4 0120       |    |		Execute	Any,Is_Value
02d5 6802       |h   |		Jump_Zero	0x2d8
02d6 e217       |    |		Load	0x1,0x17
02d7 7804       |x   |		Jump	0x2dc
02d8 00d9       |    |		Load_Top	At_Offset_1
02d9 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
02da e217       |    |		Load	0x1,0x17
02db 0119       |    |		Execute	Any,Check_In_Formal_Type
02dc 8219       |    |		Call	0x1,0x19
02dd 00da       |    |		Load_Top	At_Offset_2
02de 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
02df 00da       |    |		Load_Top	At_Offset_2
02e0 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
02e1 00d2       |    |		Pop_Control	Pop_Count_2
02e2 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x16.0x3 = 0x2e2,0x2
02e3 0219       |    |		Execute	Heap_Access,All_Read
02e4 00d9       |    |		Load_Top	At_Offset_1
02e5 0219       |    |		Execute	Heap_Access,All_Read
02e6 00d9       |    |		Load_Top	At_Offset_1
02e7 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02e8 00d9       |    |		Load_Top	At_Offset_1
02e9 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
02ea 0120       |    |		Execute	Any,Is_Value
02eb 6802       |h   |		Jump_Zero	0x2ee
02ec e217       |    |		Load	0x1,0x17
02ed 7804       |x   |		Jump	0x2f2
02ee 00d9       |    |		Load_Top	At_Offset_1
02ef 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
02f0 e217       |    |		Load	0x1,0x17
02f1 0119       |    |		Execute	Any,Check_In_Formal_Type
02f2 8219       |    |		Call	0x1,0x19
02f3 00da       |    |		Load_Top	At_Offset_2
02f4 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
02f5 00da       |    |		Load_Top	At_Offset_2
02f6 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
02f7 00d2       |    |		Pop_Control	Pop_Count_2
02f8 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x16.0x4 = 0x2f8,0x3
02f9 a5ff       |    |		Store_Unchecked	0x2,-0x1
02fa 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02fb 0000       |    |		.XXX[0x1]
02fc 0000 0000  |    |		.LITERAL	{0x00000000, 0x00000657}
0300 0000 0000  |    |		.LITERAL	{0x00000000, 0x00374da4}
0304 0000 0000  |    |		.BLANK	0000[0x4]
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 030b       |    |		.CONST	0x030b								; Address of begin
0309 0004       |    |		.CONST	0x0004								; Address of exception handler
030a 0001       |    |		.CONST	0x0001								; Number of locals
030b			BODY_0308:
030b			INIT_0308:
030b e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x17 = .DEBUG	0x030b,0x08c2,0x1001,0x0000,0x0037,0x4da4,0x0000,0x01b6
													; Debug Table 0x17.0x0 = 0x30b,0x1
030c e23a       | :  |		Load	0x1,0x3a
030d 8243       | C  |		Call	0x1,0x43
030e c5fb       |    |		Store	0x2,-0x5
030f c5fc       |    |		Store	0x2,-0x4
0310 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x17.0x1 = 0x310,0x2
0311 0219       |    |		Execute	Heap_Access,All_Read
0312 e5fc       |    |		Load	0x2,-0x4
0313 0219       |    |		Execute	Heap_Access,All_Read
0314 00d9       |    |		Load_Top	At_Offset_1
0315 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0316 00d9       |    |		Load_Top	At_Offset_1
0317 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0318 e5fe       |    |		Load	0x2,-0x2
0319 0217       |    |		Execute	Heap_Access,All_Reference
031a 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
031b e217       |    |		Load	0x1,0x17
031c 0119       |    |		Execute	Any,Check_In_Formal_Type
031d e5ff       |    |		Load	0x2,-0x1
031e 0217       |    |		Execute	Heap_Access,All_Reference
031f 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0320 e212       |    |		Load	0x1,0x12
0321 0119       |    |		Execute	Any,Check_In_Formal_Type
0322 821b       |    |		Call	0x1,0x1b
0323 00da       |    |		Load_Top	At_Offset_2
0324 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0325 00da       |    |		Load_Top	At_Offset_2
0326 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
0327 00d2       |    |		Pop_Control	Pop_Count_2
0328 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x17.0x2 = 0x328,0x3
0329 0219       |    |		Execute	Heap_Access,All_Read
032a e5fc       |    |		Load	0x2,-0x4
032b 0219       |    |		Execute	Heap_Access,All_Read
032c 00d9       |    |		Load_Top	At_Offset_1
032d 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
032e 00d9       |    |		Load_Top	At_Offset_1
032f 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0330 e5fe       |    |		Load	0x2,-0x2
0331 0217       |    |		Execute	Heap_Access,All_Reference
0332 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0333 e217       |    |		Load	0x1,0x17
0334 0119       |    |		Execute	Any,Check_In_Formal_Type
0335 e5ff       |    |		Load	0x2,-0x1
0336 0217       |    |		Execute	Heap_Access,All_Reference
0337 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0338 e212       |    |		Load	0x1,0x12
0339 0119       |    |		Execute	Any,Check_In_Formal_Type
033a 821b       |    |		Call	0x1,0x1b
033b 00da       |    |		Load_Top	At_Offset_2
033c 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
033d 00da       |    |		Load_Top	At_Offset_2
033e 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
033f 00d2       |    |		Pop_Control	Pop_Count_2
0340 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x17.0x3 = 0x340,0x4
0341 0217       |    |		Execute	Heap_Access,All_Reference
0342 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0343 e5fb       |    |		Load	0x2,-0x5
0344 0217       |    |		Execute	Heap_Access,All_Reference
0345 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0346 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x17.0x4 = 0x346,0x5
0347 0217       |    |		Execute	Heap_Access,All_Reference
0348 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0349 e5fb       |    |		Load	0x2,-0x5
034a 0217       |    |		Execute	Heap_Access,All_Reference
034b 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
034c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x17.0x5 = 0x34c,0x6
034d 0217       |    |		Execute	Heap_Access,All_Reference
034e 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
034f e5fb       |    |		Load	0x2,-0x5
0350 0217       |    |		Execute	Heap_Access,All_Reference
0351 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0352 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x17.0x6 = 0x352,0x7
0353 0217       |    |		Execute	Heap_Access,All_Reference
0354 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
0355 e5fb       |    |		Load	0x2,-0x5
0356 0217       |    |		Execute	Heap_Access,All_Reference
0357 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0358 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x17.0x7 = 0x358,0x8
0359 0217       |    |		Execute	Heap_Access,All_Reference
035a 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
035b e5fb       |    |		Load	0x2,-0x5
035c 0217       |    |		Execute	Heap_Access,All_Reference
035d 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
035e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x17.0x8 = 0x35e,0x9
035f 0217       |    |		Execute	Heap_Access,All_Reference
0360 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0361 e5fb       |    |		Load	0x2,-0x5
0362 0217       |    |		Execute	Heap_Access,All_Reference
0363 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
0364 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x17.0x9 = 0x364,0xa
0365 0217       |    |		Execute	Heap_Access,All_Reference
0366 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0367 e5fb       |    |		Load	0x2,-0x5
0368 0217       |    |		Execute	Heap_Access,All_Reference
0369 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
036a 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x17.0xa = 0x36a,0xb
036b 0217       |    |		Execute	Heap_Access,All_Reference
036c 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
036d e5fb       |    |		Load	0x2,-0x5
036e 0217       |    |		Execute	Heap_Access,All_Reference
036f 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
0370 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0371 0000 0000  |    |		.BLANK	0000[0x7]
0378 ; --------------------------------------------------------------------------------------
0378 ; SUBPROGRAM
0378 ; --------------------------------------------------------------------------------------
0378 037b       | {  |		.CONST	0x037b								; Address of begin
0379 0004       |    |		.CONST	0x0004								; Address of exception handler
037a 0001       |    |		.CONST	0x0001								; Number of locals
037b			BODY_0378:
037b			INIT_0378:
037b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x18 = .DEBUG	0x037b,0x08da,0x1002,0x0000,0x0037,0x4da4,0x0000,0x023f
													; Debug Table 0x18.0x0 = 0x37b,0x1
037c 6803       |h   |		Jump_Zero	0x380
037d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x18.0x1 = 0x37d,0x2
037e 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
037f 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0380 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x18.0x2 = 0x380,0x3
0381 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0382 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0383 0000 0000  |    |		.BLANK	0000[0x5]
0388 ; --------------------------------------------------------------------------------------
0388 ; SUBPROGRAM
0388 ; --------------------------------------------------------------------------------------
0388 038b       |    |		.CONST	0x038b								; Address of begin
0389 0004       |    |		.CONST	0x0004								; Address of exception handler
038a 0001       |    |		.CONST	0x0001								; Number of locals
038b			BODY_0388:
038b			INIT_0388:
038b e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x19 = .DEBUG	0x038b,0x08e2,0x1001,0x0000,0x0037,0x4da4,0x0000,0x0261
													; Debug Table 0x19.0x0 = 0x38b,0x1
038c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
038d 4605       |F   |		Jump_Case	0x6
038e 7805       |x   |		Jump	0x394								; case 0x0
038f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; case 0x1
0390 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; case 0x2
0391 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; case 0x3
0392 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; case 0x4
0393 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; case 0x5
0394 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x19.0x1 = 0x394,0x3
0395 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
0396 00db       |    |		Load_Top	At_Offset_3
0397 0217       |    |		Execute	Heap_Access,All_Reference
0398 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0399 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x19.0x2 = 0x399,0x4
039a 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
039b 00db       |    |		Load_Top	At_Offset_3
039c 0217       |    |		Execute	Heap_Access,All_Reference
039d 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
039e e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x19.0x3 = 0x39e,0x5
039f 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
03a0 e5fe       |    |		Load	0x2,-0x2
03a1 0217       |    |		Execute	Heap_Access,All_Reference
03a2 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
03a3 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x19.0x4 = 0x3a3,0x6
03a4 0219       |    |		Execute	Heap_Access,All_Read
03a5 00db       |    |		Load_Top	At_Offset_3
03a6 0219       |    |		Execute	Heap_Access,All_Read
03a7 00d9       |    |		Load_Top	At_Offset_1
03a8 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
03a9 00d9       |    |		Load_Top	At_Offset_1
03aa 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
03ab e5fe       |    |		Load	0x2,-0x2
03ac 0217       |    |		Execute	Heap_Access,All_Reference
03ad 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
03ae e217       |    |		Load	0x1,0x17
03af 0119       |    |		Execute	Any,Check_In_Formal_Type
03b0 821a       |    |		Call	0x1,0x1a
03b1 00da       |    |		Load_Top	At_Offset_2
03b2 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
03b3 00da       |    |		Load_Top	At_Offset_2
03b4 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
03b5 00d2       |    |		Pop_Control	Pop_Count_2
03b6 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03b7 0000       |    |		.XXX[0x1]
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03bb       |    |		.CONST	0x03bb								; Address of begin
03b9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ba 0001       |    |		.CONST	0x0001								; Number of locals
03bb			BODY_03b8:
03bb			INIT_03b8:
03bb 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a = .DEBUG	0x03bb,0x08ee,0x1001,0x0000,0x0037,0x4da4,0x0000,0x02b0
													; Debug Table 0x1a.0x0 = 0x3bb,0x1
03bc 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
03bd 4605       |F   |		Jump_Case	0x6
03be 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; case 0x0
03bf 7828       |x(  |		Jump	0x3e8								; case 0x1
03c0 7853       |xS  |		Jump	0x414								; case 0x2
03c1 7865       |xe  |		Jump	0x427								; case 0x3
03c2 789b       |x   |		Jump	0x45e								; case 0x4
03c3 7800       |x   |		Jump	0x3c4								; case 0x5
03c4 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x1a.0x1 = 0x3c4,0x2
03c5 0219       |    |		Execute	Heap_Access,All_Read
03c6 00db       |    |		Load_Top	At_Offset_3
03c7 0219       |    |		Execute	Heap_Access,All_Read
03c8 00d9       |    |		Load_Top	At_Offset_1
03c9 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
03ca e5fe       |    |		Load	0x2,-0x2
03cb 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
03cc 00da       |    |		Load_Top	At_Offset_2
03cd 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
03ce 821d       |    |		Call	0x1,0x1d
03cf 00db       |    |		Load_Top	At_Offset_3
03d0 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
03d1 e5fe       |    |		Load	0x2,-0x2
03d2 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
03d3 00da       |    |		Load_Top	At_Offset_2
03d4 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
03d5 00d2       |    |		Pop_Control	Pop_Count_2
03d6 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x2 = 0x3d6,0x3
03d7 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
03d8 00db       |    |		Load_Top	At_Offset_3
03d9 0217       |    |		Execute	Heap_Access,All_Reference
03da 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
03db 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x3 = 0x3db,0x4
03dc 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
03dd 4603       |F   |		Jump_Case	0x4
03de 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; case 0x0
03df 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; case 0x1
03e0 7801       |x   |		Jump	0x3e2								; case 0x2
03e1 7800       |x   |		Jump	0x3e2								; case 0x3
03e2 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x4 = 0x3e2,0x6
03e3 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
03e4 00db       |    |		Load_Top	At_Offset_3
03e5 0217       |    |		Execute	Heap_Access,All_Reference
03e6 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
03e7 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03e8 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x5 = 0x3e8,0x8
03e9 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
03ea 00db       |    |		Load_Top	At_Offset_3
03eb 0217       |    |		Execute	Heap_Access,All_Reference
03ec 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
03ed 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x6 = 0x3ed,0x9
03ee 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
03ef 00db       |    |		Load_Top	At_Offset_3
03f0 0217       |    |		Execute	Heap_Access,All_Reference
03f1 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
03f2 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x7 = 0x3f2,0xa
03f3 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
03f4 00db       |    |		Load_Top	At_Offset_3
03f5 0217       |    |		Execute	Heap_Access,All_Reference
03f6 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
03f7 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x8 = 0x3f7,0xb
03f8 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
03f9 00db       |    |		Load_Top	At_Offset_3
03fa 0217       |    |		Execute	Heap_Access,All_Reference
03fb 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
03fc 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x9 = 0x3fc,0xc
03fd 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
03fe 00db       |    |		Load_Top	At_Offset_3
03ff 0217       |    |		Execute	Heap_Access,All_Reference
0400 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
0401 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x1a.0xa = 0x401,0xd
0402 0219       |    |		Execute	Heap_Access,All_Read
0403 00db       |    |		Load_Top	At_Offset_3
0404 0219       |    |		Execute	Heap_Access,All_Read
0405 00d9       |    |		Load_Top	At_Offset_1
0406 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0407 e5fe       |    |		Load	0x2,-0x2
0408 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0409 00da       |    |		Load_Top	At_Offset_2
040a 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
040b 821d       |    |		Call	0x1,0x1d
040c 00db       |    |		Load_Top	At_Offset_3
040d 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
040e e5fe       |    |		Load	0x2,-0x2
040f 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0410 00da       |    |		Load_Top	At_Offset_2
0411 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0412 00d2       |    |		Pop_Control	Pop_Count_2
0413 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0414 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x1a.0xb = 0x414,0xe
0415 0219       |    |		Execute	Heap_Access,All_Read
0416 00db       |    |		Load_Top	At_Offset_3
0417 0219       |    |		Execute	Heap_Access,All_Read
0418 00d9       |    |		Load_Top	At_Offset_1
0419 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
041a e5fe       |    |		Load	0x2,-0x2
041b 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
041c 00da       |    |		Load_Top	At_Offset_2
041d 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
041e 821d       |    |		Call	0x1,0x1d
041f 00db       |    |		Load_Top	At_Offset_3
0420 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
0421 e5fe       |    |		Load	0x2,-0x2
0422 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0423 00da       |    |		Load_Top	At_Offset_2
0424 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0425 00d2       |    |		Pop_Control	Pop_Count_2
0426 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0427 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1a.0xc = 0x427,0xf
0428 0217       |    |		Execute	Heap_Access,All_Reference
0429 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
042a e5fe       |    |		Load	0x2,-0x2
042b 3407       |4   |		Execute	Record,Field_Reference,Field_Number 0x7
042c 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
042d 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
042e 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1a.0xd = 0x42e,0x10
042f 0217       |    |		Execute	Heap_Access,All_Reference
0430 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0431 e5fe       |    |		Load	0x2,-0x2
0432 3407       |4   |		Execute	Record,Field_Reference,Field_Number 0x7
0433 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0434 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0435 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1a.0xe = 0x435,0x11
0436 0217       |    |		Execute	Heap_Access,All_Reference
0437 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
0438 e5fe       |    |		Load	0x2,-0x2
0439 3407       |4   |		Execute	Record,Field_Reference,Field_Number 0x7
043a 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
043b 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
043c 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1a.0xf = 0x43c,0x12
043d 0217       |    |		Execute	Heap_Access,All_Reference
043e 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
043f e5fe       |    |		Load	0x2,-0x2
0440 3407       |4   |		Execute	Record,Field_Reference,Field_Number 0x7
0441 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0442 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0443 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1a.0x10 = 0x443,0x13
0444 0217       |    |		Execute	Heap_Access,All_Reference
0445 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0446 e5fe       |    |		Load	0x2,-0x2
0447 3407       |4   |		Execute	Record,Field_Reference,Field_Number 0x7
0448 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0449 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
044a 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1a.0x11 = 0x44a,0x14
044b 0217       |    |		Execute	Heap_Access,All_Reference
044c 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
044d e217       |    |		Load	0x1,0x17
044e 0119       |    |		Execute	Any,Check_In_Formal_Type
044f 821c       |    |		Call	0x1,0x1c
0450 e5fe       |    |		Load	0x2,-0x2
0451 3407       |4   |		Execute	Record,Field_Reference,Field_Number 0x7
0452 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0453 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0454 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x12 = 0x454,0x15
0455 3407       |4   |		Execute	Record,Field_Reference,Field_Number 0x7
0456 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0457 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0458 0248       | H  |		Execute	Discrete,Check_In_Integer
0459 e5fe       |    |		Load	0x2,-0x2
045a 3407       |4   |		Execute	Record,Field_Reference,Field_Number 0x7
045b 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
045c 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
045d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
045e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x13 = 0x45e,0x16
045f 3408       |4   |		Execute	Record,Field_Reference,Field_Number 0x8
0460 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0461 4603       |F   |		Jump_Case	0x4
0462 7803       |x   |		Jump	0x466								; case 0x0
0463 780a       |x   |		Jump	0x46e								; case 0x1
0464 7811       |x   |		Jump	0x476								; case 0x2
0465 781f       |x   |		Jump	0x485								; case 0x3
0466 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x14 = 0x466,0x17
0467 3408       |4   |		Execute	Record,Field_Reference,Field_Number 0x8
0468 2402       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x2
0469 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
046a 00db       |    |		Load_Top	At_Offset_3
046b 0217       |    |		Execute	Heap_Access,All_Reference
046c 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
046d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
046e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x15 = 0x46e,0x18
046f 3408       |4   |		Execute	Record,Field_Reference,Field_Number 0x8
0470 2402       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x2
0471 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0472 00db       |    |		Load_Top	At_Offset_3
0473 0217       |    |		Execute	Heap_Access,All_Reference
0474 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
0475 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0476 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x16 = 0x476,0x19
0477 3408       |4   |		Execute	Record,Field_Reference,Field_Number 0x8
0478 2402       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x2
0479 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
047a 00db       |    |		Load_Top	At_Offset_3
047b 0217       |    |		Execute	Heap_Access,All_Reference
047c 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
047d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x17 = 0x47d,0x1a
047e 3408       |4   |		Execute	Record,Field_Reference,Field_Number 0x8
047f 2402       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x2
0480 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0481 00db       |    |		Load_Top	At_Offset_3
0482 0217       |    |		Execute	Heap_Access,All_Reference
0483 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
0484 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0485 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x18 = 0x485,0x1b
0486 3407       |4   |		Execute	Record,Field_Reference,Field_Number 0x7
0487 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0488 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0489 00db       |    |		Load_Top	At_Offset_3
048a 0217       |    |		Execute	Heap_Access,All_Reference
048b 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
048c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x19 = 0x48c,0x1c
048d 3407       |4   |		Execute	Record,Field_Reference,Field_Number 0x7
048e 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
048f 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0490 00db       |    |		Load_Top	At_Offset_3
0491 0217       |    |		Execute	Heap_Access,All_Reference
0492 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0493 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x1a = 0x493,0x1d
0494 3407       |4   |		Execute	Record,Field_Reference,Field_Number 0x7
0495 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0496 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
0497 00db       |    |		Load_Top	At_Offset_3
0498 0217       |    |		Execute	Heap_Access,All_Reference
0499 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
049a 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x1b = 0x49a,0x1e
049b 3408       |4   |		Execute	Record,Field_Reference,Field_Number 0x8
049c 2402       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x2
049d 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
049e 00db       |    |		Load_Top	At_Offset_3
049f 0217       |    |		Execute	Heap_Access,All_Reference
04a0 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
04a1 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x1c = 0x4a1,0x1f
04a2 3408       |4   |		Execute	Record,Field_Reference,Field_Number 0x8
04a3 2402       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x2
04a4 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
04a5 00db       |    |		Load_Top	At_Offset_3
04a6 0217       |    |		Execute	Heap_Access,All_Reference
04a7 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
04a8 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
04a9 0000 0000  |    |		.BLANK	0000[0x7]
04b0 ; --------------------------------------------------------------------------------------
04b0 ; SUBPROGRAM
04b0 ; --------------------------------------------------------------------------------------
04b0 04b3       |    |		.CONST	0x04b3								; Address of begin
04b1 0004       |    |		.CONST	0x0004								; Address of exception handler
04b2 0001       |    |		.CONST	0x0001								; Number of locals
04b3			BODY_04b0:
04b3			INIT_04b0:
04b3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1b = .DEBUG	0x04b3,0x092a,0x1001,0x0000,0x0037,0x4da4,0x0000,0x0428
													; Debug Table 0x1b.0x0 = 0x4b3,0x1
04b4 0219       |    |		Execute	Heap_Access,All_Read
04b5 00db       |    |		Load_Top	At_Offset_3
04b6 0219       |    |		Execute	Heap_Access,All_Read
04b7 00d9       |    |		Load_Top	At_Offset_1
04b8 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
04b9 00d9       |    |		Load_Top	At_Offset_1
04ba 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
04bb e5ff       |    |		Load	0x2,-0x1
04bc 0217       |    |		Execute	Heap_Access,All_Reference
04bd 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
04be e217       |    |		Load	0x1,0x17
04bf 0119       |    |		Execute	Any,Check_In_Formal_Type
04c0 821a       |    |		Call	0x1,0x1a
04c1 00da       |    |		Load_Top	At_Offset_2
04c2 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
04c3 00da       |    |		Load_Top	At_Offset_2
04c4 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
04c5 00d2       |    |		Pop_Control	Pop_Count_2
04c6 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1b.0x1 = 0x4c6,0x2
04c7 0217       |    |		Execute	Heap_Access,All_Reference
04c8 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
04c9 00db       |    |		Load_Top	At_Offset_3
04ca 0217       |    |		Execute	Heap_Access,All_Reference
04cb 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
04cc 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1b.0x2 = 0x4cc,0x3
04cd 0217       |    |		Execute	Heap_Access,All_Reference
04ce 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
04cf 00db       |    |		Load_Top	At_Offset_3
04d0 0217       |    |		Execute	Heap_Access,All_Reference
04d1 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
04d2 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1b.0x3 = 0x4d2,0x4
04d3 0217       |    |		Execute	Heap_Access,All_Reference
04d4 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
04d5 00db       |    |		Load_Top	At_Offset_3
04d6 0217       |    |		Execute	Heap_Access,All_Reference
04d7 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
04d8 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
04d9 0000 0000  |    |		.BLANK	0000[0x7]
04e0 ; --------------------------------------------------------------------------------------
04e0 ; SUBPROGRAM
04e0 ; --------------------------------------------------------------------------------------
04e0 04e3       |    |		.CONST	0x04e3								; Address of begin
04e1 0004       |    |		.CONST	0x0004								; Address of exception handler
04e2 0001       |    |		.CONST	0x0001								; Number of locals
04e3			BODY_04e0:
04e3			INIT_04e0:
04e3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1c = .DEBUG	0x04e3,0x0934,0x1001,0x0000,0x0037,0x4da4,0x0000,0x045f
													; Debug Table 0x1c.0x0 = 0x4e3,0x1
04e4 0219       |    |		Execute	Heap_Access,All_Read
04e5 00db       |    |		Load_Top	At_Offset_3
04e6 0219       |    |		Execute	Heap_Access,All_Read
04e7 00d9       |    |		Load_Top	At_Offset_1
04e8 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
04e9 00d9       |    |		Load_Top	At_Offset_1
04ea 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
04eb e5ff       |    |		Load	0x2,-0x1
04ec 0217       |    |		Execute	Heap_Access,All_Reference
04ed 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
04ee e217       |    |		Load	0x1,0x17
04ef 0119       |    |		Execute	Any,Check_In_Formal_Type
04f0 821a       |    |		Call	0x1,0x1a
04f1 00da       |    |		Load_Top	At_Offset_2
04f2 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
04f3 00da       |    |		Load_Top	At_Offset_2
04f4 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
04f5 00d2       |    |		Pop_Control	Pop_Count_2
04f6 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1c.0x1 = 0x4f6,0x2
04f7 0217       |    |		Execute	Heap_Access,All_Reference
04f8 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
04f9 00db       |    |		Load_Top	At_Offset_3
04fa 0217       |    |		Execute	Heap_Access,All_Reference
04fb 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
04fc 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1c.0x2 = 0x4fc,0x3
04fd 0217       |    |		Execute	Heap_Access,All_Reference
04fe 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
04ff 00db       |    |		Load_Top	At_Offset_3
0500 0217       |    |		Execute	Heap_Access,All_Reference
0501 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0502 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1c.0x3 = 0x502,0x4
0503 0217       |    |		Execute	Heap_Access,All_Reference
0504 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0505 00db       |    |		Load_Top	At_Offset_3
0506 0217       |    |		Execute	Heap_Access,All_Reference
0507 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
0508 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0509 0000 0000  |    |		.BLANK	0000[0x7]
0510 ; --------------------------------------------------------------------------------------
0510 ; SUBPROGRAM
0510 ; --------------------------------------------------------------------------------------
0510 0513       |    |		.CONST	0x0513								; Address of begin
0511 0004       |    |		.CONST	0x0004								; Address of exception handler
0512 0001       |    |		.CONST	0x0001								; Number of locals
0513			BODY_0510:
0513			INIT_0510:
0513 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x1d = .DEBUG	0x0513,0x093e,0x1001,0x0000,0x0037,0x4da4,0x0000,0x0496
													; Debug Table 0x1d.0x0 = 0x513,0x1
0514 0000 0000  |    |		.BLANK	0000[0x4]
0518 ; --------------------------------------------------------------------------------------
0518 ; SUBPROGRAM
0518 ; --------------------------------------------------------------------------------------
0518 051b       |    |		.CONST	0x051b								; Address of begin
0519 0004       |    |		.CONST	0x0004								; Address of exception handler
051a 0001       |    |		.CONST	0x0001								; Number of locals
051b			BODY_0518:
051b			INIT_0518:
051b 4802       |H   |		Short_Literal	0x2							; Debug Table 0x1e = .DEBUG	0x051b,0x0942,0x1001,0x0000,0x0037,0x4da4,0x0000,0x04a7
													; Debug Table 0x1e.0x0 = 0x51b,0x1
051c 00db       |    |		Load_Top	At_Offset_3
051d e008       |    |		Load	0x0,0x8
051e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
051f 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1e.0x1 = 0x51f,0x2
0520 0217       |    |		Execute	Heap_Access,All_Reference
0521 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0522 e212       |    |		Load	0x1,0x12
0523 0119       |    |		Execute	Any,Check_In_Formal_Type
0524 00db       |    |		Load_Top	At_Offset_3
0525 8221       | !  |		Call	0x1,0x21
0526 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0527 0000       |    |		.XXX[0x1]
0528 ; --------------------------------------------------------------------------------------
0528 ; SUBPROGRAM
0528 ; --------------------------------------------------------------------------------------
0528 052b       | +  |		.CONST	0x052b								; Address of begin
0529 0004       |    |		.CONST	0x0004								; Address of exception handler
052a 0001       |    |		.CONST	0x0001								; Number of locals
052b			BODY_0528:
052b			INIT_0528:
052b 4802       |H   |		Short_Literal	0x2							; Debug Table 0x1f = .DEBUG	0x052b,0x0948,0x1001,0x0000,0x0037,0x4da4,0x0000,0x04c5
													; Debug Table 0x1f.0x0 = 0x52b,0x1
052c 00db       |    |		Load_Top	At_Offset_3
052d e008       |    |		Load	0x0,0x8
052e 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
052f 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1f.0x1 = 0x52f,0x2
0530 0219       |    |		Execute	Heap_Access,All_Read
0531 00d8       |    |		Load_Top	At_Offset_0
0532 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0533 e5ff       |    |		Load	0x2,-0x1
0534 8222       | "  |		Call	0x1,0x22
0535 00d9       |    |		Load_Top	At_Offset_1
0536 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0537 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0538 ; --------------------------------------------------------------------------------------
0538 ; SUBPROGRAM
0538 ; --------------------------------------------------------------------------------------
0538 053b       | ;  |		.CONST	0x053b								; Address of begin
0539 0004       |    |		.CONST	0x0004								; Address of exception handler
053a 0001       |    |		.CONST	0x0001								; Number of locals
053b			BODY_0538:
053b			INIT_0538:
053b e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x20 = .DEBUG	0x053b,0x094e,0x1001,0x0000,0x0037,0x4da4,0x0000,0x04e3
													; Debug Table 0x20.0x0 = 0x53b,0x1
053c 0217       |    |		Execute	Heap_Access,All_Reference
053d 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
053e 00db       |    |		Load_Top	At_Offset_3
053f e008       |    |		Load	0x0,0x8
0540 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0541 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x20.0x1 = 0x541,0x2
0542 0217       |    |		Execute	Heap_Access,All_Reference
0543 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0544 00db       |    |		Load_Top	At_Offset_3
0545 e008       |    |		Load	0x0,0x8
0546 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0547 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x20.0x2 = 0x547,0x3
0548 0217       |    |		Execute	Heap_Access,All_Reference
0549 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
054a 00db       |    |		Load_Top	At_Offset_3
054b e008       |    |		Load	0x0,0x8
054c 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
054d e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x20.0x3 = 0x54d,0x4
054e 0217       |    |		Execute	Heap_Access,All_Reference
054f 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0550 00db       |    |		Load_Top	At_Offset_3
0551 e008       |    |		Load	0x0,0x8
0552 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0553 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x20.0x4 = 0x553,0x5
0554 0217       |    |		Execute	Heap_Access,All_Reference
0555 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0556 00db       |    |		Load_Top	At_Offset_3
0557 e008       |    |		Load	0x0,0x8
0558 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0559 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x20.0x5 = 0x559,0x6
055a 0217       |    |		Execute	Heap_Access,All_Reference
055b 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
055c e217       |    |		Load	0x1,0x17
055d 0119       |    |		Execute	Any,Check_In_Formal_Type
055e e5fe       |    |		Load	0x2,-0x2
055f 0217       |    |		Execute	Heap_Access,All_Reference
0560 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0561 e212       |    |		Load	0x1,0x12
0562 0119       |    |		Execute	Any,Check_In_Formal_Type
0563 e5ff       |    |		Load	0x2,-0x1
0564 8223       | #  |		Call	0x1,0x23
0565 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0566 0000 0000  |    |		.XXX[0x2]
0568 ; --------------------------------------------------------------------------------------
0568 ; SUBPROGRAM
0568 ; --------------------------------------------------------------------------------------
0568 056c       | l  |		.CONST	0x056c								; Address of begin
0569 0004       |    |		.CONST	0x0004								; Address of exception handler
056a 0002       |    |		.CONST	0x0002								; Number of locals
056b			INIT_0568:
056b 00e5       |    |		Load_Encached	Long_Integer_Cache					; Debug Table 0x21 = .DEBUG	0x056b,0x095c,0x1001,0x0000,0x0037,0x4da4,0x0000,0x0529
													; Debug Table 0x21.0x0 = 0x56b,0xffff
056c			BODY_0568:
056c e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x21.0x1 = 0x56c,0x1
056d 7005       |p   |		Jump_Nonzero	0x573
056e e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x21.0x2 = 0x56e,0x2
056f e23a       | :  |		Load	0x1,0x3a
0570 8243       | C  |		Call	0x1,0x43
0571 c5fd       |    |		Store	0x2,-0x3
0572 c5fe       |    |		Store	0x2,-0x2
0573 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x21.0x3 = 0x573,0x3
0574 0219       |    |		Execute	Heap_Access,All_Read
0575 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0576 00d8       |    |		Load_Top	At_Offset_0
0577 e5ff       |    |		Load	0x2,-0x1
0578 e008       |    |		Load	0x0,0x8
0579 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
057a 00d2       |    |		Pop_Control	Pop_Count_2
057b e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x21.0x4 = 0x57b,0x4
057c 0219       |    |		Execute	Heap_Access,All_Read
057d 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
057e 00d8       |    |		Load_Top	At_Offset_0
057f e5ff       |    |		Load	0x2,-0x1
0580 e008       |    |		Load	0x0,0x8
0581 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0582 00d2       |    |		Pop_Control	Pop_Count_2
0583 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x21.0x5 = 0x583,0x5
0584 0219       |    |		Execute	Heap_Access,All_Read
0585 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0586 00d8       |    |		Load_Top	At_Offset_0
0587 e5ff       |    |		Load	0x2,-0x1
0588 e008       |    |		Load	0x0,0x8
0589 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
058a 00d2       |    |		Pop_Control	Pop_Count_2
058b e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x21.0x6 = 0x58b,0x6
058c 0219       |    |		Execute	Heap_Access,All_Read
058d 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
058e 00d8       |    |		Load_Top	At_Offset_0
058f e5ff       |    |		Load	0x2,-0x1
0590 e008       |    |		Load	0x0,0x8
0591 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0592 00d2       |    |		Pop_Control	Pop_Count_2
0593 00e5       |    |		Load_Encached	Long_Integer_Cache					; Debug Table 0x21.0x7 = 0x593,0x7
0594 e5ff       |    |		Load	0x2,-0x1
0595 e008       |    |		Load	0x0,0x8
0596 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0597 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0598 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x21.0x8 = 0x598,0x8
0599 0248       | H  |		Execute	Discrete,Check_In_Integer
059a e5fd       |    |		Load	0x2,-0x3
059b 0217       |    |		Execute	Heap_Access,All_Reference
059c 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
059d e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x21.0x9 = 0x59d,0x9
059e 0219       |    |		Execute	Heap_Access,All_Read
059f e5fe       |    |		Load	0x2,-0x2
05a0 0219       |    |		Execute	Heap_Access,All_Read
05a1 00d9       |    |		Load_Top	At_Offset_1
05a2 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
05a3 00d9       |    |		Load_Top	At_Offset_1
05a4 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
05a5 e5ff       |    |		Load	0x2,-0x1
05a6 8224       | $  |		Call	0x1,0x24
05a7 00da       |    |		Load_Top	At_Offset_2
05a8 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
05a9 00da       |    |		Load_Top	At_Offset_2
05aa 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
05ab 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
05ac 0000 0000  |    |		.BLANK	0000[0x4]
05b0 ; --------------------------------------------------------------------------------------
05b0 ; SUBPROGRAM
05b0 ; --------------------------------------------------------------------------------------
05b0 05b3       |    |		.CONST	0x05b3								; Address of begin
05b1 0004       |    |		.CONST	0x0004								; Address of exception handler
05b2 0001       |    |		.CONST	0x0001								; Number of locals
05b3			BODY_05b0:
05b3			INIT_05b0:
05b3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x22 = .DEBUG	0x05b3,0x0972,0x1002,0x0000,0x0037,0x4da4,0x0000,0x0584
													; Debug Table 0x22.0x0 = 0x5b3,0x1
05b4 0217       |    |		Execute	Heap_Access,All_Reference
05b5 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
05b6 e217       |    |		Load	0x1,0x17
05b7 0119       |    |		Execute	Any,Check_In_Formal_Type
05b8 00db       |    |		Load_Top	At_Offset_3
05b9 8225       | %  |		Call	0x1,0x25
05ba 7008       |p   |		Jump_Nonzero	0x5c3
05bb 00db       |    |		Load_Top	At_Offset_3
05bc 0217       |    |		Execute	Heap_Access,All_Reference
05bd 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
05be e217       |    |		Load	0x1,0x17
05bf 0119       |    |		Execute	Any,Check_In_Formal_Type
05c0 00db       |    |		Load_Top	At_Offset_3
05c1 8225       | %  |		Call	0x1,0x25
05c2 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
05c3 4801       |H   |		Short_Literal	0x1
05c4 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
05c5 0000 0000  |    |		.XXX[0x3]
05c7 0000       |    |
05c8 ; --------------------------------------------------------------------------------------
05c8 ; SUBPROGRAM
05c8 ; --------------------------------------------------------------------------------------
05c8 05cb       |    |		.CONST	0x05cb								; Address of begin
05c9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ca 0001       |    |		.CONST	0x0001								; Number of locals
05cb			BODY_05c8:
05cb			INIT_05c8:
05cb e007       |    |		Load	0x0,0x7								; Debug Table 0x23 = .DEBUG	0x05cb,0x0976,0x1001,0x0000,0x0037,0x4da4,0x0000,0x05a8
													; Debug Table 0x23.0x0 = 0x5cb,0x1
05cc 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
05cd e5f8       |    |		Load	0x2,-0x8
05ce e5f9       |    |		Load	0x2,-0x7
05cf e5fa       |    |		Load	0x2,-0x6
05d0 e5fb       |    |		Load	0x2,-0x5
05d1 e5fc       |    |		Load	0x2,-0x4
05d2 e5fd       |    |		Load	0x2,-0x3
05d3 821e       |    |		Call	0x1,0x1e
05d4 00d1       |    |		Pop_Control	Pop_Count_1
05d5 c5f7       |    |		Store	0x2,-0x9
05d6 4508       |E   |		Exit_Suprogram	New_Top_Offset 0x8
05d7 0000       |    |		.XXX[0x1]
05d8 ; --------------------------------------------------------------------------------------
05d8 ; SUBPROGRAM
05d8 ; --------------------------------------------------------------------------------------
05d8 05e0       |    |		.CONST	0x05e0								; Address of begin
05d9 0004       |    |		.CONST	0x0004								; Address of exception handler
05da 0002       |    |		.CONST	0x0002								; Number of locals
05db			INIT_05d8:
05db e23c       | <  |		Load	0x1,0x3c							; Debug Table 0x24 = .DEBUG	0x05db,0x097a,0x1001,0x0000,0x0037,0x4da4,0x0000,0x0601
													; Debug Table 0x24.0x0 = 0x5db,0xffff
05dc 0322       | "  |		Declare_Variable	Record
05dd e23d       | =  |		Load	0x1,0x3d
05de 00d9       |    |		Load_Top	At_Offset_1
05df 017d       | }  |		Execute	Record,Structure_Write
05e0			BODY_05d8:
05e0 4803       |H   |		Short_Literal	0x3							; Debug Table 0x24.0x1 = 0x5e0,0x1
05e1 00d9       |    |		Load_Top	At_Offset_1
05e2 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
05e3 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x24.0x2 = 0x5e3,0x2
05e4 00d9       |    |		Load_Top	At_Offset_1
05e5 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
05e6 e236       | 6  |		Load	0x1,0x36							; Debug Table 0x24.0x3 = 0x5e6,0x3
05e7 00d9       |    |		Load_Top	At_Offset_1
05e8 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
05e9 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x24.0x4 = 0x5e9,0x4
05ea 6806       |h   |		Jump_Zero	0x5f1
05eb e5fe       |    |		Load	0x2,-0x2
05ec 0f01       |    |		Execute_Immediate	Equal,0x1
05ed 7003       |p   |		Jump_Nonzero	0x5f1
05ee 4802       |H   |		Short_Literal	0x2							; Debug Table 0x24.0x5 = 0x5ee,0x5
05ef a5fa       |    |		Store_Unchecked	0x2,-0x6
05f0 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
05f1 e007       |    |		Load	0x0,0x7								; Debug Table 0x24.0x6 = 0x5f1,0x6
05f2 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
05f3 00d9       |    |		Load_Top	At_Offset_1
05f4 e5fc       |    |		Load	0x2,-0x4
05f5 e5fd       |    |		Load	0x2,-0x3
05f6 e5ff       |    |		Load	0x2,-0x1
05f7 e253       | S  |		Load	0x1,0x53
05f8 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
05f9 00d1       |    |		Pop_Control	Pop_Count_1
05fa c5fa       |    |		Store	0x2,-0x6
05fb 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x24.0x7 = 0x5fb,0x7
05fc 3407       |4   |		Execute	Record,Field_Reference,Field_Number 0x7
05fd e5fb       |    |		Load	0x2,-0x5
05fe 017d       | }  |		Execute	Record,Structure_Write
05ff 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0600 ; --------------------------------------------------------------------------------------
0600 ; SUBPROGRAM
0600 ; --------------------------------------------------------------------------------------
0600 0608       |    |		.CONST	0x0608								; Address of begin
0601 0004       |    |		.CONST	0x0004								; Address of exception handler
0602 0002       |    |		.CONST	0x0002								; Number of locals
0603			INIT_0600:
0603 e23c       | <  |		Load	0x1,0x3c							; Debug Table 0x25 = .DEBUG	0x0603,0x098c,0x1001,0x0000,0x0037,0x4da4,0x0000,0x062c
													; Debug Table 0x25.0x0 = 0x603,0xffff
0604 0322       | "  |		Declare_Variable	Record
0605 e23d       | =  |		Load	0x1,0x3d
0606 00d9       |    |		Load_Top	At_Offset_1
0607 017d       | }  |		Execute	Record,Structure_Write
0608			BODY_0600:
0608 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x25.0x1 = 0x608,0x1
0609 0f02       |    |		Execute_Immediate	Equal,0x2
060a 7006       |p   |		Jump_Nonzero	0x611
060b e5fd       |    |		Load	0x2,-0x3
060c 0f03       |    |		Execute_Immediate	Equal,0x3
060d 7003       |p   |		Jump_Nonzero	0x611
060e 4802       |H   |		Short_Literal	0x2							; Debug Table 0x25.0x2 = 0x60e,0x2
060f a5fa       |    |		Store_Unchecked	0x2,-0x6
0610 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0611 4804       |H   |		Short_Literal	0x4							; Debug Table 0x25.0x3 = 0x611,0x3
0612 00d9       |    |		Load_Top	At_Offset_1
0613 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0614 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x25.0x4 = 0x614,0x4
0615 00d9       |    |		Load_Top	At_Offset_1
0616 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0617 e236       | 6  |		Load	0x1,0x36							; Debug Table 0x25.0x5 = 0x617,0x5
0618 00d9       |    |		Load_Top	At_Offset_1
0619 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
061a e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x25.0x6 = 0x61a,0x6
061b 00d9       |    |		Load_Top	At_Offset_1
061c 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
061d e007       |    |		Load	0x0,0x7								; Debug Table 0x25.0x7 = 0x61d,0x7
061e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
061f 00d9       |    |		Load_Top	At_Offset_1
0620 e5fb       |    |		Load	0x2,-0x5
0621 e5fc       |    |		Load	0x2,-0x4
0622 e5ff       |    |		Load	0x2,-0x1
0623 e253       | S  |		Load	0x1,0x53
0624 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
0625 00d1       |    |		Pop_Control	Pop_Count_1
0626 c5fa       |    |		Store	0x2,-0x6
0627 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0628 ; --------------------------------------------------------------------------------------
0628 ; SUBPROGRAM
0628 ; --------------------------------------------------------------------------------------
0628 062b       | +  |		.CONST	0x062b								; Address of begin
0629 0004       |    |		.CONST	0x0004								; Address of exception handler
062a 0001       |    |		.CONST	0x0001								; Number of locals
062b			BODY_0628:
062b			INIT_0628:
062b e001       |    |		Load	0x0,0x1								; Debug Table 0x26 = .DEBUG	0x062b,0x099e,0x1002,0x0000,0x0037,0x4da4,0x0000,0x06b9
													; Debug Table 0x26.0x0 = 0x62b,0x1
062c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
062d 0322       | "  |		Declare_Variable	Record
062e e003       |    |		Load	0x0,0x3
062f 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0630 e003       |    |		Load	0x0,0x3
0631 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0632 0119       |    |		Execute	Any,Check_In_Formal_Type
0633 00d9       |    |		Load_Top	At_Offset_1
0634 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0635 e009       |    |		Load	0x0,0x9
0636 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0637 00d9       |    |		Load_Top	At_Offset_1
0638 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0639 00ca       |    |		Action	Exit_Nullary_Function
063a ; --------------------------------------------------------------------------------------
063a ; STRING TABLE
063a ; --------------------------------------------------------------------------------------
063a 000e       |    |		.STRTAB	0x000e->0x0641							; "COPY_OP"
063b 0013       |    |		.STRTAB	0x0013->0x0644							; "CREATE_OP"
063c 001a       |    |		.STRTAB	0x001a->0x0649							; "DESTROY_OP"
063d 0022       | "  |		.STRTAB	0x0022->0x064e							; "GET_INFO_OP"
063e 002b       | +  |		.STRTAB	0x002b->0x0653							; "SET_INFO_OP"
063f 0034       | 4  |		.STRTAB	0x0034->0x0659							; "OPERATE_OP"
0640 003c       | <  |		.STREND 0x003c->0x065e
0641 434f 5059  |COPY|		.STRTAB_STRINGS
065e 0000 0000  |    |		.XXX[0x2]
0660 ; --------------------------------------------------------------------------------------
0660 ; Debug Table
0660 ; --------------------------------------------------------------------------------------
0660 0003 0027  |   '|		.CONST	0x0003,0x0027
0662 000b 079a  |    |		.DEBUG	0x000b,0x079a,0xc000,0x0000,0x0037,0x4d94,0x0000,0x0013
066a 0027 07b8  | '  |		.DEBUG	0x0027,0x07b8,0xc000,0x0000,0x0037,0x4da4,0x0000,0x0015
0672 00f3 0826  |   &|		.DEBUG	0x00f3,0x0826,0x1001,0x0000,0x0037,0x4d94,0x0000,0x0184
067a 011b 083a  |   :|		.DEBUG	0x011b,0x083a,0x1001,0x0000,0x0037,0x4d94,0x0000,0x01b5
0682 0143 084e  | C N|		.DEBUG	0x0143,0x084e,0x1001,0x0000,0x0037,0x4d94,0x0000,0x01e6
068a 0163 085c  | c \|		.DEBUG	0x0163,0x085c,0x1001,0x0000,0x0037,0x4d94,0x0000,0x020a
0692 018b 086c  |   l|		.DEBUG	0x018b,0x086c,0x1001,0x0000,0x0037,0x4d94,0x0000,0x022c
069a 019b 0870  |   p|		.DEBUG	0x019b,0x0870,0x1001,0x0000,0x0037,0x4d94,0x0000,0x023a
06a2 01c3 0880  |    |		.DEBUG	0x01c3,0x0880,0x1001,0x0000,0x0037,0x4d94,0x0000,0x0264
06aa 01cb 0884  |    |		.DEBUG	0x01cb,0x0884,0x1001,0x0000,0x0037,0x4d94,0x0000,0x026e
06b2 01db 0888  |    |		.DEBUG	0x01db,0x0888,0x1001,0x0000,0x0037,0x4d94,0x0000,0x027f
06ba 01e3 088c  |    |		.DEBUG	0x01e3,0x088c,0x1002,0x0000,0x0037,0x4d94,0x0000,0x0287
06c2 01eb 0890  |    |		.DEBUG	0x01eb,0x0890,0x1002,0x0000,0x0037,0x4d94,0x0000,0x0292
06ca 01f3 0894  |    |		.DEBUG	0x01f3,0x0894,0x1005,0x0000,0x0037,0x4da4,0x0000,0x005e
06d2 020b 0896  |    |		.DEBUG	0x020b,0x0896,0x1005,0x0000,0x0037,0x4da4,0x0000,0x0075
06da 023b 0898  | ;  |		.DEBUG	0x023b,0x0898,0x1005,0x0000,0x0037,0x4da4,0x0000,0x00c5
06e2 0253 089a  | S  |		.DEBUG	0x0253,0x089a,0x1005,0x0000,0x0037,0x4da4,0x0000,0x00cf
06ea 0273 089c  | s  |		.DEBUG	0x0273,0x089c,0x1001,0x0000,0x0037,0x4da4,0x0000,0x010f
06f2 0283 08a0  |    |		.DEBUG	0x0283,0x08a0,0x1001,0x0000,0x0037,0x4da4,0x0000,0x0126
06fa 02a3 08aa  |    |		.DEBUG	0x02a3,0x08aa,0x1001,0x0000,0x0037,0x4da4,0x0000,0x014e
0702 02b3 08ae  |    |		.DEBUG	0x02b3,0x08ae,0x1001,0x0000,0x0037,0x4da4,0x0000,0x016b
070a 02bb 08b2  |    |		.DEBUG	0x02bb,0x08b2,0x1001,0x0000,0x0037,0x4da4,0x0000,0x0178
0712 02c3 08b6  |    |		.DEBUG	0x02c3,0x08b6,0x1001,0x0000,0x0037,0x4da4,0x0000,0x0185
071a 030b 08c2  |    |		.DEBUG	0x030b,0x08c2,0x1001,0x0000,0x0037,0x4da4,0x0000,0x01b6
0722 037b 08da  | {  |		.DEBUG	0x037b,0x08da,0x1002,0x0000,0x0037,0x4da4,0x0000,0x023f
072a 038b 08e2  |    |		.DEBUG	0x038b,0x08e2,0x1001,0x0000,0x0037,0x4da4,0x0000,0x0261
0732 03bb 08ee  |    |		.DEBUG	0x03bb,0x08ee,0x1001,0x0000,0x0037,0x4da4,0x0000,0x02b0
073a 04b3 092a  |   *|		.DEBUG	0x04b3,0x092a,0x1001,0x0000,0x0037,0x4da4,0x0000,0x0428
0742 04e3 0934  |   4|		.DEBUG	0x04e3,0x0934,0x1001,0x0000,0x0037,0x4da4,0x0000,0x045f
074a 0513 093e  |   >|		.DEBUG	0x0513,0x093e,0x1001,0x0000,0x0037,0x4da4,0x0000,0x0496
0752 051b 0942  |   B|		.DEBUG	0x051b,0x0942,0x1001,0x0000,0x0037,0x4da4,0x0000,0x04a7
075a 052b 0948  | + H|		.DEBUG	0x052b,0x0948,0x1001,0x0000,0x0037,0x4da4,0x0000,0x04c5
0762 053b 094e  | ; N|		.DEBUG	0x053b,0x094e,0x1001,0x0000,0x0037,0x4da4,0x0000,0x04e3
076a 056b 095c  | k \|		.DEBUG	0x056b,0x095c,0x1001,0x0000,0x0037,0x4da4,0x0000,0x0529
0772 05b3 0972  |   r|		.DEBUG	0x05b3,0x0972,0x1002,0x0000,0x0037,0x4da4,0x0000,0x0584
077a 05cb 0976  |   v|		.DEBUG	0x05cb,0x0976,0x1001,0x0000,0x0037,0x4da4,0x0000,0x05a8
0782 05db 097a  |   z|		.DEBUG	0x05db,0x097a,0x1001,0x0000,0x0037,0x4da4,0x0000,0x0601
078a 0603 098c  |    |		.DEBUG	0x0603,0x098c,0x1001,0x0000,0x0037,0x4da4,0x0000,0x062c
0792 062b 099e  | +  |		.DEBUG	0x062b,0x099e,0x1002,0x0000,0x0037,0x4da4,0x0000,0x06b9
079a ; --------------------------------------------------------------------------------------
079a ; Debug3 Subtable 0x0
079a ; --------------------------------------------------------------------------------------
079a 000e 0000  |    |		.DBG3TAB	0x000e,0x0000
079c 000b ffff  |    |		.CONST	0x000b,0xffff
079e 000c fffe  |    |		.CONST	0x000c,0xfffe
07a0 000d fffd  |    |		.CONST	0x000d,0xfffd
07a2 000f fffc  |    |		.CONST	0x000f,0xfffc
07a4 0011 fffb  |    |		.CONST	0x0011,0xfffb
07a6 0013 fffa  |    |		.CONST	0x0013,0xfffa
07a8 0015 fff9  |    |		.CONST	0x0015,0xfff9
07aa 0017 fff8  |    |		.CONST	0x0017,0xfff8
07ac 0019 fff7  |    |		.CONST	0x0019,0xfff7
07ae 001b fff6  |    |		.CONST	0x001b,0xfff6
07b0 001e fff5  |    |		.CONST	0x001e,0xfff5
07b2 0020 fff4  |    |		.CONST	0x0020,0xfff4
07b4 0022 fff3  | "  |		.CONST	0x0022,0xfff3
07b6 0024 fff2  | $  |		.CONST	0x0024,0xfff2
07b8 ; --------------------------------------------------------------------------------------
07b8 ; Debug3 Subtable 0x1
07b8 ; --------------------------------------------------------------------------------------
07b8 0036 0000  | 6  |		.DBG3TAB	0x0036,0x0000
07ba 0027 ffff  | '  |		.CONST	0x0027,0xffff
07bc 0028 fffe  | (  |		.CONST	0x0028,0xfffe
07be 0029 fffd  | )  |		.CONST	0x0029,0xfffd
07c0 002a fffc  | *  |		.CONST	0x002a,0xfffc
07c2 002c fffb  | ,  |		.CONST	0x002c,0xfffb
07c4 002e fffa  | .  |		.CONST	0x002e,0xfffa
07c6 0030 fff9  | 0  |		.CONST	0x0030,0xfff9
07c8 003d fff8  | =  |		.CONST	0x003d,0xfff8
07ca 0042 fff7  | B  |		.CONST	0x0042,0xfff7
07cc 0047 fff6  | G  |		.CONST	0x0047,0xfff6
07ce 0048 fff5  | H  |		.CONST	0x0048,0xfff5
07d0 0049 fff4  | I  |		.CONST	0x0049,0xfff4
07d2 005b fff3  | [  |		.CONST	0x005b,0xfff3
07d4 0060 fff2  | `  |		.CONST	0x0060,0xfff2
07d6 0061 fff1  | a  |		.CONST	0x0061,0xfff1
07d8 0062 fff0  | b  |		.CONST	0x0062,0xfff0
07da 0067 ffef  | g  |		.CONST	0x0067,0xffef
07dc 0079 ffee  | y  |		.CONST	0x0079,0xffee
07de 007d ffed  | }  |		.CONST	0x007d,0xffed
07e0 007f ffec  |    |		.CONST	0x007f,0xffec
07e2 0081 ffeb  |    |		.CONST	0x0081,0xffeb
07e4 0083 ffea  |    |		.CONST	0x0083,0xffea
07e6 0085 ffe9  |    |		.CONST	0x0085,0xffe9
07e8 0087 ffe8  |    |		.CONST	0x0087,0xffe8
07ea 0089 ffe7  |    |		.CONST	0x0089,0xffe7
07ec 008b ffe6  |    |		.CONST	0x008b,0xffe6
07ee 008d ffe5  |    |		.CONST	0x008d,0xffe5
07f0 008f ffe4  |    |		.CONST	0x008f,0xffe4
07f2 0091 ffe3  |    |		.CONST	0x0091,0xffe3
07f4 0093 ffe2  |    |		.CONST	0x0093,0xffe2
07f6 0095 ffe1  |    |		.CONST	0x0095,0xffe1
07f8 0097 ffe0  |    |		.CONST	0x0097,0xffe0
07fa 0099 ffdf  |    |		.CONST	0x0099,0xffdf
07fc 009b ffde  |    |		.CONST	0x009b,0xffde
07fe 009d ffdd  |    |		.CONST	0x009d,0xffdd
0800 009f ffdc  |    |		.CONST	0x009f,0xffdc
0802 00a1 ffdb  |    |		.CONST	0x00a1,0xffdb
0804 00a3 ffda  |    |		.CONST	0x00a3,0xffda
0806 00a5 ffd9  |    |		.CONST	0x00a5,0xffd9
0808 00a7 ffd8  |    |		.CONST	0x00a7,0xffd8
080a 00cf ffd7  |    |		.CONST	0x00cf,0xffd7
080c 00d1 ffd6  |    |		.CONST	0x00d1,0xffd6
080e 00d3 ffd5  |    |		.CONST	0x00d3,0xffd5
0810 00d5 ffd4  |    |		.CONST	0x00d5,0xffd4
0812 00d7 ffd3  |    |		.CONST	0x00d7,0xffd3
0814 00d9 ffd2  |    |		.CONST	0x00d9,0xffd2
0816 00db ffd1  |    |		.CONST	0x00db,0xffd1
0818 00dd ffd0  |    |		.CONST	0x00dd,0xffd0
081a 00df ffcf  |    |		.CONST	0x00df,0xffcf
081c 00e1 ffce  |    |		.CONST	0x00e1,0xffce
081e 00e3 ffcd  |    |		.CONST	0x00e3,0xffcd
0820 00e5 ffcc  |    |		.CONST	0x00e5,0xffcc
0822 00e7 ffcb  |    |		.CONST	0x00e7,0xffcb
0824 00e9 ffca  |    |		.CONST	0x00e9,0xffca
0826 ; --------------------------------------------------------------------------------------
0826 ; Debug3 Subtable 0x2
0826 ; --------------------------------------------------------------------------------------
0826 0001 0008  |    |		.DBG3TAB	0x0001,0x0008
0828 00f3 ffff  |    |		.CONST	0x00f3,0xffff
082a 00f8 0001  |    |		.CONST	0x00f8,0x0001
082c 00fb 0002  |    |		.CONST	0x00fb,0x0002
082e 00fe 0003  |    |		.CONST	0x00fe,0x0003
0830 0101 0004  |    |		.CONST	0x0101,0x0004
0832 0104 0005  |    |		.CONST	0x0104,0x0005
0834 0107 0006  |    |		.CONST	0x0107,0x0006
0836 010a 0007  |    |		.CONST	0x010a,0x0007
0838 0114 0008  |    |		.CONST	0x0114,0x0008
083a ; --------------------------------------------------------------------------------------
083a ; Debug3 Subtable 0x3
083a ; --------------------------------------------------------------------------------------
083a 0001 0008  |    |		.DBG3TAB	0x0001,0x0008
083c 011b ffff  |    |		.CONST	0x011b,0xffff
083e 0120 0001  |    |		.CONST	0x0120,0x0001
0840 0123 0002  | #  |		.CONST	0x0123,0x0002
0842 0126 0003  | &  |		.CONST	0x0126,0x0003
0844 0129 0004  | )  |		.CONST	0x0129,0x0004
0846 012c 0005  | ,  |		.CONST	0x012c,0x0005
0848 012f 0006  | /  |		.CONST	0x012f,0x0006
084a 0132 0007  | 2  |		.CONST	0x0132,0x0007
084c 013c 0008  | <  |		.CONST	0x013c,0x0008
084e ; --------------------------------------------------------------------------------------
084e ; Debug3 Subtable 0x4
084e ; --------------------------------------------------------------------------------------
084e 0001 0005  |    |		.DBG3TAB	0x0001,0x0005
0850 0143 ffff  | C  |		.CONST	0x0143,0xffff
0852 0148 0001  | H  |		.CONST	0x0148,0x0001
0854 014b 0002  | K  |		.CONST	0x014b,0x0002
0856 014e 0003  | N  |		.CONST	0x014e,0x0003
0858 0151 0004  | Q  |		.CONST	0x0151,0x0004
085a 0154 0005  | T  |		.CONST	0x0154,0x0005
085c ; --------------------------------------------------------------------------------------
085c ; Debug3 Subtable 0x5
085c ; --------------------------------------------------------------------------------------
085c 0001 0006  |    |		.DBG3TAB	0x0001,0x0006
085e 0163 ffff  | c  |		.CONST	0x0163,0xffff
0860 0168 0001  | h  |		.CONST	0x0168,0x0001
0862 016b 0002  | k  |		.CONST	0x016b,0x0002
0864 016e 0003  | n  |		.CONST	0x016e,0x0003
0866 0171 0004  | q  |		.CONST	0x0171,0x0004
0868 0174 0005  | t  |		.CONST	0x0174,0x0005
086a 017e 0006  | ~  |		.CONST	0x017e,0x0006
086c ; --------------------------------------------------------------------------------------
086c ; Debug3 Subtable 0x6
086c ; --------------------------------------------------------------------------------------
086c 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
086e 018b 0001  |    |		.CONST	0x018b,0x0001
0870 ; --------------------------------------------------------------------------------------
0870 ; Debug3 Subtable 0x7
0870 ; --------------------------------------------------------------------------------------
0870 0001 0006  |    |		.DBG3TAB	0x0001,0x0006
0872 019b ffff  |    |		.CONST	0x019b,0xffff
0874 01a0 0001  |    |		.CONST	0x01a0,0x0001
0876 01a3 0002  |    |		.CONST	0x01a3,0x0002
0878 01a6 0003  |    |		.CONST	0x01a6,0x0003
087a 01a9 0004  |    |		.CONST	0x01a9,0x0004
087c 01ac 0005  |    |		.CONST	0x01ac,0x0005
087e 01b6 0006  |    |		.CONST	0x01b6,0x0006
0880 ; --------------------------------------------------------------------------------------
0880 ; Debug3 Subtable 0x8
0880 ; --------------------------------------------------------------------------------------
0880 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0882 01c3 0001  |    |		.CONST	0x01c3,0x0001
0884 ; --------------------------------------------------------------------------------------
0884 ; Debug3 Subtable 0x9
0884 ; --------------------------------------------------------------------------------------
0884 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0886 01cb 0001  |    |		.CONST	0x01cb,0x0001
0888 ; --------------------------------------------------------------------------------------
0888 ; Debug3 Subtable 0xa
0888 ; --------------------------------------------------------------------------------------
0888 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
088a 01db 0001  |    |		.CONST	0x01db,0x0001
088c ; --------------------------------------------------------------------------------------
088c ; Debug3 Subtable 0xb
088c ; --------------------------------------------------------------------------------------
088c 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
088e 01e3 0001  |    |		.CONST	0x01e3,0x0001
0890 ; --------------------------------------------------------------------------------------
0890 ; Debug3 Subtable 0xc
0890 ; --------------------------------------------------------------------------------------
0890 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0892 01eb 0001  |    |		.CONST	0x01eb,0x0001
0894 ; --------------------------------------------------------------------------------------
0894 ; Debug3 Subtable 0xd
0894 ; --------------------------------------------------------------------------------------
0894 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0896 ; --------------------------------------------------------------------------------------
0896 ; Debug3 Subtable 0xe
0896 ; --------------------------------------------------------------------------------------
0896 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0898 ; --------------------------------------------------------------------------------------
0898 ; Debug3 Subtable 0xf
0898 ; --------------------------------------------------------------------------------------
0898 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
089a ; --------------------------------------------------------------------------------------
089a ; Debug3 Subtable 0x10
089a ; --------------------------------------------------------------------------------------
089a 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
089c ; --------------------------------------------------------------------------------------
089c ; Debug3 Subtable 0x11
089c ; --------------------------------------------------------------------------------------
089c 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
089e 0273 0001  | s  |		.CONST	0x0273,0x0001
08a0 ; --------------------------------------------------------------------------------------
08a0 ; Debug3 Subtable 0x12
08a0 ; --------------------------------------------------------------------------------------
08a0 0002 0002  |    |		.DBG3TAB	0x0002,0x0002
08a2 0283 ffff  |    |		.CONST	0x0283,0xffff
08a4 028b fffe  |    |		.CONST	0x028b,0xfffe
08a6 028c 0001  |    |		.CONST	0x028c,0x0001
08a8 029d 0002  |    |		.CONST	0x029d,0x0002
08aa ; --------------------------------------------------------------------------------------
08aa ; Debug3 Subtable 0x13
08aa ; --------------------------------------------------------------------------------------
08aa 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
08ac 02a3 0001  |    |		.CONST	0x02a3,0x0001
08ae ; --------------------------------------------------------------------------------------
08ae ; Debug3 Subtable 0x14
08ae ; --------------------------------------------------------------------------------------
08ae 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
08b0 02b3 0001  |    |		.CONST	0x02b3,0x0001
08b2 ; --------------------------------------------------------------------------------------
08b2 ; Debug3 Subtable 0x15
08b2 ; --------------------------------------------------------------------------------------
08b2 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
08b4 02bb 0001  |    |		.CONST	0x02bb,0x0001
08b6 ; --------------------------------------------------------------------------------------
08b6 ; Debug3 Subtable 0x16
08b6 ; --------------------------------------------------------------------------------------
08b6 0002 0003  |    |		.DBG3TAB	0x0002,0x0003
08b8 02c3 ffff  |    |		.CONST	0x02c3,0xffff
08ba 02cb fffe  |    |		.CONST	0x02cb,0xfffe
08bc 02cc 0001  |    |		.CONST	0x02cc,0x0001
08be 02e2 0002  |    |		.CONST	0x02e2,0x0002
08c0 02f8 0003  |    |		.CONST	0x02f8,0x0003
08c2 ; --------------------------------------------------------------------------------------
08c2 ; Debug3 Subtable 0x17
08c2 ; --------------------------------------------------------------------------------------
08c2 0000 000b  |    |		.DBG3TAB	0x0000,0x000b
08c4 030b 0001  |    |		.CONST	0x030b,0x0001
08c6 0310 0002  |    |		.CONST	0x0310,0x0002
08c8 0328 0003  | (  |		.CONST	0x0328,0x0003
08ca 0340 0004  | @  |		.CONST	0x0340,0x0004
08cc 0346 0005  | F  |		.CONST	0x0346,0x0005
08ce 034c 0006  | L  |		.CONST	0x034c,0x0006
08d0 0352 0007  | R  |		.CONST	0x0352,0x0007
08d2 0358 0008  | X  |		.CONST	0x0358,0x0008
08d4 035e 0009  | ^  |		.CONST	0x035e,0x0009
08d6 0364 000a  | d  |		.CONST	0x0364,0x000a
08d8 036a 000b  | j  |		.CONST	0x036a,0x000b
08da ; --------------------------------------------------------------------------------------
08da ; Debug3 Subtable 0x18
08da ; --------------------------------------------------------------------------------------
08da 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
08dc 037b 0001  | {  |		.CONST	0x037b,0x0001
08de 037d 0002  | }  |		.CONST	0x037d,0x0002
08e0 0380 0003  |    |		.CONST	0x0380,0x0003
08e2 ; --------------------------------------------------------------------------------------
08e2 ; Debug3 Subtable 0x19
08e2 ; --------------------------------------------------------------------------------------
08e2 0000 0005  |    |		.DBG3TAB	0x0000,0x0005
08e4 038b 0001  |    |		.CONST	0x038b,0x0001
08e6 0394 0003  |    |		.CONST	0x0394,0x0003
08e8 0399 0004  |    |		.CONST	0x0399,0x0004
08ea 039e 0005  |    |		.CONST	0x039e,0x0005
08ec 03a3 0006  |    |		.CONST	0x03a3,0x0006
08ee ; --------------------------------------------------------------------------------------
08ee ; Debug3 Subtable 0x1a
08ee ; --------------------------------------------------------------------------------------
08ee 0000 001d  |    |		.DBG3TAB	0x0000,0x001d
08f0 03bb 0001  |    |		.CONST	0x03bb,0x0001
08f2 03c4 0002  |    |		.CONST	0x03c4,0x0002
08f4 03d6 0003  |    |		.CONST	0x03d6,0x0003
08f6 03db 0004  |    |		.CONST	0x03db,0x0004
08f8 03e2 0006  |    |		.CONST	0x03e2,0x0006
08fa 03e8 0008  |    |		.CONST	0x03e8,0x0008
08fc 03ed 0009  |    |		.CONST	0x03ed,0x0009
08fe 03f2 000a  |    |		.CONST	0x03f2,0x000a
0900 03f7 000b  |    |		.CONST	0x03f7,0x000b
0902 03fc 000c  |    |		.CONST	0x03fc,0x000c
0904 0401 000d  |    |		.CONST	0x0401,0x000d
0906 0414 000e  |    |		.CONST	0x0414,0x000e
0908 0427 000f  | '  |		.CONST	0x0427,0x000f
090a 042e 0010  | .  |		.CONST	0x042e,0x0010
090c 0435 0011  | 5  |		.CONST	0x0435,0x0011
090e 043c 0012  | <  |		.CONST	0x043c,0x0012
0910 0443 0013  | C  |		.CONST	0x0443,0x0013
0912 044a 0014  | J  |		.CONST	0x044a,0x0014
0914 0454 0015  | T  |		.CONST	0x0454,0x0015
0916 045e 0016  | ^  |		.CONST	0x045e,0x0016
0918 0466 0017  | f  |		.CONST	0x0466,0x0017
091a 046e 0018  | n  |		.CONST	0x046e,0x0018
091c 0476 0019  | v  |		.CONST	0x0476,0x0019
091e 047d 001a  | }  |		.CONST	0x047d,0x001a
0920 0485 001b  |    |		.CONST	0x0485,0x001b
0922 048c 001c  |    |		.CONST	0x048c,0x001c
0924 0493 001d  |    |		.CONST	0x0493,0x001d
0926 049a 001e  |    |		.CONST	0x049a,0x001e
0928 04a1 001f  |    |		.CONST	0x04a1,0x001f
092a ; --------------------------------------------------------------------------------------
092a ; Debug3 Subtable 0x1b
092a ; --------------------------------------------------------------------------------------
092a 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
092c 04b3 0001  |    |		.CONST	0x04b3,0x0001
092e 04c6 0002  |    |		.CONST	0x04c6,0x0002
0930 04cc 0003  |    |		.CONST	0x04cc,0x0003
0932 04d2 0004  |    |		.CONST	0x04d2,0x0004
0934 ; --------------------------------------------------------------------------------------
0934 ; Debug3 Subtable 0x1c
0934 ; --------------------------------------------------------------------------------------
0934 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
0936 04e3 0001  |    |		.CONST	0x04e3,0x0001
0938 04f6 0002  |    |		.CONST	0x04f6,0x0002
093a 04fc 0003  |    |		.CONST	0x04fc,0x0003
093c 0502 0004  |    |		.CONST	0x0502,0x0004
093e ; --------------------------------------------------------------------------------------
093e ; Debug3 Subtable 0x1d
093e ; --------------------------------------------------------------------------------------
093e 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0940 0513 0001  |    |		.CONST	0x0513,0x0001
0942 ; --------------------------------------------------------------------------------------
0942 ; Debug3 Subtable 0x1e
0942 ; --------------------------------------------------------------------------------------
0942 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0944 051b 0001  |    |		.CONST	0x051b,0x0001
0946 051f 0002  |    |		.CONST	0x051f,0x0002
0948 ; --------------------------------------------------------------------------------------
0948 ; Debug3 Subtable 0x1f
0948 ; --------------------------------------------------------------------------------------
0948 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
094a 052b 0001  | +  |		.CONST	0x052b,0x0001
094c 052f 0002  | /  |		.CONST	0x052f,0x0002
094e ; --------------------------------------------------------------------------------------
094e ; Debug3 Subtable 0x20
094e ; --------------------------------------------------------------------------------------
094e 0000 0006  |    |		.DBG3TAB	0x0000,0x0006
0950 053b 0001  | ;  |		.CONST	0x053b,0x0001
0952 0541 0002  | A  |		.CONST	0x0541,0x0002
0954 0547 0003  | G  |		.CONST	0x0547,0x0003
0956 054d 0004  | M  |		.CONST	0x054d,0x0004
0958 0553 0005  | S  |		.CONST	0x0553,0x0005
095a 0559 0006  | Y  |		.CONST	0x0559,0x0006
095c ; --------------------------------------------------------------------------------------
095c ; Debug3 Subtable 0x21
095c ; --------------------------------------------------------------------------------------
095c 0001 0009  |    |		.DBG3TAB	0x0001,0x0009
095e 056b ffff  | k  |		.CONST	0x056b,0xffff
0960 056c 0001  | l  |		.CONST	0x056c,0x0001
0962 056e 0002  | n  |		.CONST	0x056e,0x0002
0964 0573 0003  | s  |		.CONST	0x0573,0x0003
0966 057b 0004  | {  |		.CONST	0x057b,0x0004
0968 0583 0005  |    |		.CONST	0x0583,0x0005
096a 058b 0006  |    |		.CONST	0x058b,0x0006
096c 0593 0007  |    |		.CONST	0x0593,0x0007
096e 0598 0008  |    |		.CONST	0x0598,0x0008
0970 059d 0009  |    |		.CONST	0x059d,0x0009
0972 ; --------------------------------------------------------------------------------------
0972 ; Debug3 Subtable 0x22
0972 ; --------------------------------------------------------------------------------------
0972 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0974 05b3 0001  |    |		.CONST	0x05b3,0x0001
0976 ; --------------------------------------------------------------------------------------
0976 ; Debug3 Subtable 0x23
0976 ; --------------------------------------------------------------------------------------
0976 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0978 05cb 0001  |    |		.CONST	0x05cb,0x0001
097a ; --------------------------------------------------------------------------------------
097a ; Debug3 Subtable 0x24
097a ; --------------------------------------------------------------------------------------
097a 0001 0007  |    |		.DBG3TAB	0x0001,0x0007
097c 05db ffff  |    |		.CONST	0x05db,0xffff
097e 05e0 0001  |    |		.CONST	0x05e0,0x0001
0980 05e3 0002  |    |		.CONST	0x05e3,0x0002
0982 05e6 0003  |    |		.CONST	0x05e6,0x0003
0984 05e9 0004  |    |		.CONST	0x05e9,0x0004
0986 05ee 0005  |    |		.CONST	0x05ee,0x0005
0988 05f1 0006  |    |		.CONST	0x05f1,0x0006
098a 05fb 0007  |    |		.CONST	0x05fb,0x0007
098c ; --------------------------------------------------------------------------------------
098c ; Debug3 Subtable 0x25
098c ; --------------------------------------------------------------------------------------
098c 0001 0007  |    |		.DBG3TAB	0x0001,0x0007
098e 0603 ffff  |    |		.CONST	0x0603,0xffff
0990 0608 0001  |    |		.CONST	0x0608,0x0001
0992 060e 0002  |    |		.CONST	0x060e,0x0002
0994 0611 0003  |    |		.CONST	0x0611,0x0003
0996 0614 0004  |    |		.CONST	0x0614,0x0004
0998 0617 0005  |    |		.CONST	0x0617,0x0005
099a 061a 0006  |    |		.CONST	0x061a,0x0006
099c 061d 0007  |    |		.CONST	0x061d,0x0007
099e ; --------------------------------------------------------------------------------------
099e ; Debug3 Subtable 0x26
099e ; --------------------------------------------------------------------------------------
099e 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
09a0 062b 0001  | +  |		.CONST	0x062b,0x0001
09a2 0000 0000  |    |		.BLANK	0000[0x5e]