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

⟦e37be62aa⟧

    Length: 7168 (0x1c00)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_ccb0b3

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5800       |X   |		.CONST	0x5800								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0c50       | P  |		.CONST	0x0c50								; 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 8007       |    |		.CONST	0x8007								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0199       |    |		.CONST	0x0199								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0055       | U  |		.CONST	0x0055								; Number of locals
000b			INIT_0008:
000b e001       |    |		Load	0x0,0x1
000c 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
000d 0129       | )  |		Execute	Any,Make_Visible
000e 029a 01a3  |    |		Declare_Subprogram	INIT_01a0,For_Outer_Call,Visible,Unelaborated
0010 029a 01b3  |    |		Declare_Subprogram	INIT_01b0,For_Outer_Call,Visible,Unelaborated
0012 029a 01c3  |    |		Declare_Subprogram	INIT_01c0,For_Outer_Call,Visible,Unelaborated
0014 00c4       |    |		Action	Make_Default
0015 00c4       |    |		Action	Make_Default
0016 00c4       |    |		Action	Make_Default
0017 00c4       |    |		Action	Make_Default
0018 00c4       |    |		Action	Make_Default
0019 00c4       |    |		Action	Make_Default
001a 00c4       |    |		Action	Make_Default
001b 00c4       |    |		Action	Make_Default
001c 00c4       |    |		Action	Make_Default
001d 00c4       |    |		Action	Make_Default
001e 00c4       |    |		Action	Make_Default
001f 00c4       |    |		Action	Make_Default
0020 00c4       |    |		Action	Make_Default
0021 00c4       |    |		Action	Make_Default
0022 00c4       |    |		Action	Make_Default
0023 00c4       |    |		Action	Make_Default
0024 00c4       |    |		Action	Make_Default
0025 00c4       |    |		Action	Make_Default
0026 00c4       |    |		Action	Make_Default
0027 00c4       |    |		Action	Make_Default
0028 00c4       |    |		Action	Make_Default
0029 00c4       |    |		Action	Make_Default
002a 00c4       |    |		Action	Make_Default
002b 00c4       |    |		Action	Make_Default
002c 00c4       |    |		Action	Make_Default
002d 00c4       |    |		Action	Make_Default
002e 00c4       |    |		Action	Make_Default
002f 00c4       |    |		Action	Make_Default
0030 00c4       |    |		Action	Make_Default
0031 00c4       |    |		Action	Make_Default
0032 00c4       |    |		Action	Make_Default
0033 00c4       |    |		Action	Make_Default
0034 00c4       |    |		Action	Make_Default
0035 00c4       |    |		Action	Make_Default
0036 00c4       |    |		Action	Make_Default
0037 029a 01d3  |    |		Declare_Subprogram	INIT_01d0,For_Outer_Call,Visible,Unelaborated
0039 c233       | 3  |		Store	0x1,0x33
003a 029a 0223  |   #|		Declare_Subprogram	INIT_0220,For_Outer_Call,Visible,Unelaborated
003c c211       |    |		Store	0x1,0x11
003d 029a 0233  |   3|		Declare_Subprogram	INIT_0230,For_Outer_Call,Visible,Unelaborated
003f c212       |    |		Store	0x1,0x12
0040 029a 026b  |   k|		Declare_Subprogram	INIT_0268,For_Outer_Call,Visible,Unelaborated
0042 c213       |    |		Store	0x1,0x13
0043 029a 0273  |   s|		Declare_Subprogram	INIT_0270,For_Outer_Call,Visible,Unelaborated
0045 c214       |    |		Store	0x1,0x14
0046 029a 029b  |    |		Declare_Subprogram	INIT_0298,For_Outer_Call,Visible,Unelaborated
0048 c215       |    |		Store	0x1,0x15
0049 e002       |    |		Load	0x0,0x2
004a 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
004b 0129       | )  |		Execute	Any,Make_Visible
004c c216       |    |		Store	0x1,0x16
004d e216       |    |		Load	0x1,0x16
004e 0266       | f  |		Execute	Discrete,Bounds
004f 00e1       |    |		Load_Encached	Boolean_Cache
0050 02a0       |    |		Declare_Subprogram	Null_Subprogram
0051 4801       |H   |		Short_Literal	0x1
0052 035e       | ^  |		Declare_Type	Array,Defined,Visible
0053 c217       |    |		Store	0x1,0x17
0054 e217       |    |		Load	0x1,0x17
0055 0337       | 7  |		Declare_Variable	Array
0056 4800       |H   |		Short_Literal	0x0
0057 4800       |H   |		Short_Literal	0x0
0058 00da       |    |		Load_Top	At_Offset_2
0059 01d6       |    |		Execute	Vector,Field_Write
005a 4805       |H   |		Short_Literal	0x5
005b 4801       |H   |		Short_Literal	0x1
005c 4801       |H   |		Short_Literal	0x1
005d 00d9       |    |		Load_Top	At_Offset_1
005e e234       | 4  |		Load	0x1,0x34
005f 01d6       |    |		Execute	Vector,Field_Write
0060 3ffb       |?   |		Loop_Increasing	0x5c
0061 e217       |    |		Load	0x1,0x17
0062 01c3       |    |		Execute	Vector,Check_In_Type
0063 0129       | )  |		Execute	Any,Make_Visible
0064 c218       |    |		Store	0x1,0x18
0065 029a 02a3  |    |		Declare_Subprogram	INIT_02a0,For_Outer_Call,Visible,Unelaborated
0067 c219       |    |		Store	0x1,0x19
0068 029a 02c3  |    |		Declare_Subprogram	INIT_02c0,For_Outer_Call,Visible,Unelaborated
006a c21a       |    |		Store	0x1,0x1a
006b 029a 02eb  |    |		Declare_Subprogram	INIT_02e8,For_Outer_Call,Visible,Unelaborated
006d c21b       |    |		Store	0x1,0x1b
006e 029a 02fb  |    |		Declare_Subprogram	INIT_02f8,For_Outer_Call,Visible,Unelaborated
0070 c21c       |    |		Store	0x1,0x1c
0071 029a 030b  |    |		Declare_Subprogram	INIT_0308,For_Outer_Call,Visible,Unelaborated
0073 c21d       |    |		Store	0x1,0x1d
0074 00e3       |    |		Load_Encached	Natural_Cache
0075 0266       | f  |		Execute	Discrete,Bounds
0076 e20d       |    |		Load	0x1,0xd
0077 02a0       |    |		Declare_Subprogram	Null_Subprogram
0078 4801       |H   |		Short_Literal	0x1
0079 0351       | Q  |		Declare_Type	Array,Defined,Visible,Bounds_With_Object
007a c21e       |    |		Store	0x1,0x1e
007b 00e3       |    |		Load_Encached	Natural_Cache
007c e003       |    |		Load	0x0,0x3
007d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
007e 4801       |H   |		Short_Literal	0x1
007f 612c       |a,  |		Indirect_Literal	Discrete,0x1ac,{0x00000000, 0x7fffffff}
0080 e21e       |    |		Load	0x1,0x1e
0081 034f       | O  |		Declare_Type	Array,Constrained,Visible,Bounds_With_Object
0082 029f 0b4b  |   K|		Declare_Subprogram	INIT_0b48,For_Call
0084 4800       |H   |		Short_Literal	0x0
0085 4801       |H   |		Short_Literal	0x1
0086 4801       |H   |		Short_Literal	0x1
0087 4800       |H   |		Short_Literal	0x0
0088 4801       |H   |		Short_Literal	0x1
0089 4801       |H   |		Short_Literal	0x1
008a 031e       |    |		Declare_Type	Variant_Record,Defined,Visible
008b c21f       |    |		Store	0x1,0x1f
008c e217       |    |		Load	0x1,0x17
008d e004       |    |		Load	0x0,0x4
008e 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
008f 029f 0b73  |   s|		Declare_Subprogram	INIT_0b70,For_Call
0091 4802       |H   |		Short_Literal	0x2
0092 032e       | .  |		Declare_Type	Record,Defined,Visible
0093 c220       |    |		Store	0x1,0x20
0094 00e3       |    |		Load_Encached	Natural_Cache
0095 0266       | f  |		Execute	Discrete,Bounds
0096 e220       |    |		Load	0x1,0x20
0097 029f 0313  |    |		Declare_Subprogram	INIT_0310,For_Call
0099 4801       |H   |		Short_Literal	0x1
009a 0351       | Q  |		Declare_Type	Array,Defined,Visible,Bounds_With_Object
009b c221       | !  |		Store	0x1,0x21
009c 4801       |H   |		Short_Literal	0x1
009d 4800       |H   |		Short_Literal	0x0
009e e221       | !  |		Load	0x1,0x21
009f 035b       | [  |		Declare_Type	Array,Constrained
00a0 0336       | 6  |		Declare_Variable	Array,Visible
00a1 00d8       |    |		Load_Top	At_Offset_0
00a2 0335       | 5  |		Declare_Variable	Array,Duplicate
00a3 00cd       |    |		Action	Spare6_Action
00a4 00d9       |    |		Load_Top	At_Offset_1
00a5 01d4       |    |		Execute	Vector,Structure_Write
00a6 c222       | "  |		Store	0x1,0x22
00a7 029a 032b  |   +|		Declare_Subprogram	INIT_0328,For_Outer_Call,Visible,Unelaborated
00a9 c223       | #  |		Store	0x1,0x23
00aa 029a 036b  |   k|		Declare_Subprogram	INIT_0368,For_Outer_Call,Visible,Unelaborated
00ac c224       | $  |		Store	0x1,0x24
00ad 029a 037b  |   {|		Declare_Subprogram	INIT_0378,For_Outer_Call,Visible,Unelaborated
00af c225       | %  |		Store	0x1,0x25
00b0 029a 03d3  |    |		Declare_Subprogram	INIT_03d0,For_Outer_Call,Visible,Unelaborated
00b2 c226       | &  |		Store	0x1,0x26
00b3 029a 0493  |    |		Declare_Subprogram	INIT_0490,For_Outer_Call,Visible,Unelaborated
00b5 c227       | '  |		Store	0x1,0x27
00b6 029a 04bb  |    |		Declare_Subprogram	INIT_04b8,For_Outer_Call,Visible,Unelaborated
00b8 c228       | (  |		Store	0x1,0x28
00b9 029a 051b  |    |		Declare_Subprogram	INIT_0518,For_Outer_Call,Visible,Unelaborated
00bb c229       | )  |		Store	0x1,0x29
00bc 029a 062b  |   +|		Declare_Subprogram	INIT_0628,For_Outer_Call,Visible,Unelaborated
00be c22a       | *  |		Store	0x1,0x2a
00bf 029a 063b  |   ;|		Declare_Subprogram	INIT_0638,For_Outer_Call,Visible,Unelaborated
00c1 c22b       | +  |		Store	0x1,0x2b
00c2 e217       |    |		Load	0x1,0x17
00c3 0337       | 7  |		Declare_Variable	Array
00c4 4801       |H   |		Short_Literal	0x1
00c5 4801       |H   |		Short_Literal	0x1
00c6 00da       |    |		Load_Top	At_Offset_2
00c7 01d6       |    |		Execute	Vector,Field_Write
00c8 4801       |H   |		Short_Literal	0x1
00c9 4802       |H   |		Short_Literal	0x2
00ca 00da       |    |		Load_Top	At_Offset_2
00cb 01d6       |    |		Execute	Vector,Field_Write
00cc 4800       |H   |		Short_Literal	0x0
00cd 4800       |H   |		Short_Literal	0x0
00ce 00da       |    |		Load_Top	At_Offset_2
00cf 01d6       |    |		Execute	Vector,Field_Write
00d0 4805       |H   |		Short_Literal	0x5
00d1 4803       |H   |		Short_Literal	0x3
00d2 4800       |H   |		Short_Literal	0x0
00d3 00d9       |    |		Load_Top	At_Offset_1
00d4 e234       | 4  |		Load	0x1,0x34
00d5 01d6       |    |		Execute	Vector,Field_Write
00d6 3ffb       |?   |		Loop_Increasing	0xd2
00d7 e217       |    |		Load	0x1,0x17
00d8 01c3       |    |		Execute	Vector,Check_In_Type
00d9 0129       | )  |		Execute	Any,Make_Visible
00da c22c       | ,  |		Store	0x1,0x2c
00db e217       |    |		Load	0x1,0x17
00dc 0337       | 7  |		Declare_Variable	Array
00dd 4804       |H   |		Short_Literal	0x4
00de 4801       |H   |		Short_Literal	0x1
00df 4801       |H   |		Short_Literal	0x1
00e0 00d9       |    |		Load_Top	At_Offset_1
00e1 e234       | 4  |		Load	0x1,0x34
00e2 01d6       |    |		Execute	Vector,Field_Write
00e3 3ffb       |?   |		Loop_Increasing	0xdf
00e4 4800       |H   |		Short_Literal	0x0
00e5 4800       |H   |		Short_Literal	0x0
00e6 00da       |    |		Load_Top	At_Offset_2
00e7 01d6       |    |		Execute	Vector,Field_Write
00e8 4800       |H   |		Short_Literal	0x0
00e9 4805       |H   |		Short_Literal	0x5
00ea 00da       |    |		Load_Top	At_Offset_2
00eb 01d6       |    |		Execute	Vector,Field_Write
00ec e217       |    |		Load	0x1,0x17
00ed 01c3       |    |		Execute	Vector,Check_In_Type
00ee 0129       | )  |		Execute	Any,Make_Visible
00ef c22d       | -  |		Store	0x1,0x2d
00f0 e217       |    |		Load	0x1,0x17
00f1 0337       | 7  |		Declare_Variable	Array
00f2 4801       |H   |		Short_Literal	0x1
00f3 4805       |H   |		Short_Literal	0x5
00f4 00da       |    |		Load_Top	At_Offset_2
00f5 01d6       |    |		Execute	Vector,Field_Write
00f6 4804       |H   |		Short_Literal	0x4
00f7 4800       |H   |		Short_Literal	0x0
00f8 4800       |H   |		Short_Literal	0x0
00f9 00d9       |    |		Load_Top	At_Offset_1
00fa e234       | 4  |		Load	0x1,0x34
00fb 01d6       |    |		Execute	Vector,Field_Write
00fc 3ffb       |?   |		Loop_Increasing	0xf8
00fd e217       |    |		Load	0x1,0x17
00fe 01c3       |    |		Execute	Vector,Check_In_Type
00ff 0129       | )  |		Execute	Any,Make_Visible
0100 c22e       | .  |		Store	0x1,0x2e
0101 e217       |    |		Load	0x1,0x17
0102 0336       | 6  |		Declare_Variable	Array,Visible
0103 00d8       |    |		Load_Top	At_Offset_0
0104 0335       | 5  |		Declare_Variable	Array,Duplicate
0105 00cd       |    |		Action	Spare6_Action
0106 4805       |H   |		Short_Literal	0x5
0107 4800       |H   |		Short_Literal	0x0
0108 4801       |H   |		Short_Literal	0x1
0109 00d9       |    |		Load_Top	At_Offset_1
010a e235       | 5  |		Load	0x1,0x35
010b 01d6       |    |		Execute	Vector,Field_Write
010c 3ffb       |?   |		Loop_Increasing	0x108
010d 00d9       |    |		Load_Top	At_Offset_1
010e 01d4       |    |		Execute	Vector,Structure_Write
010f c22f       | /  |		Store	0x1,0x2f
0110 029a 0643  |   C|		Declare_Subprogram	INIT_0640,For_Outer_Call,Visible,Unelaborated
0112 c230       | 0  |		Store	0x1,0x30
0113 029a 067b  |   {|		Declare_Subprogram	INIT_0678,For_Outer_Call,Visible,Unelaborated
0115 c231       | 1  |		Store	0x1,0x31
0116 029a 06d3  |    |		Declare_Subprogram	INIT_06d0,For_Outer_Call,Visible,Unelaborated
0118 c232       | 2  |		Store	0x1,0x32
0119 00bf       |    |		Action	Accept_Activation
011a e217       |    |		Load	0x1,0x17
011b 0337       | 7  |		Declare_Variable	Array
011c 00d8       |    |		Load_Top	At_Offset_0
011d 0335       | 5  |		Declare_Variable	Array,Duplicate
011e 00cd       |    |		Action	Spare6_Action
011f 4805       |H   |		Short_Literal	0x5
0120 4800       |H   |		Short_Literal	0x0
0121 4800       |H   |		Short_Literal	0x0
0122 00d9       |    |		Load_Top	At_Offset_1
0123 e235       | 5  |		Load	0x1,0x35
0124 01d6       |    |		Execute	Vector,Field_Write
0125 3ffb       |?   |		Loop_Increasing	0x121
0126 00d9       |    |		Load_Top	At_Offset_1
0127 01d4       |    |		Execute	Vector,Structure_Write
0128 029b 06f3  |    |		Declare_Subprogram	INIT_06f0,For_Outer_Call,Unelaborated
012a a005       |    |		Store_Unchecked	0x0,0x5
012b 00c6       |    |		Action	Check_Subprogram_Elaborated
012c e220       |    |		Load	0x1,0x20
012d 00e3       |    |		Load_Encached	Natural_Cache
012e e221       | !  |		Load	0x1,0x21
012f 1d35       | 5  |		Execute_Immediate	Reference_Lex_1,0x35
0130 e006       |    |		Load	0x0,0x6
0131 e007       |    |		Load	0x0,0x7
0132 4800       |H   |		Short_Literal	0x0
0133 0007       |    |		Action	Break_Optional
0134 029d 0703  |    |		Declare_Subprogram	INIT_0700,For_Outer_Call
0136 029d 0713  |    |		Declare_Subprogram	INIT_0710,For_Outer_Call
0138 029d 072b  |   +|		Declare_Subprogram	INIT_0728,For_Outer_Call
013a 1d35       | 5  |		Execute_Immediate	Reference_Lex_1,0x35
013b 00c7       |    |		Action	Elaborate_Subprogram
013c 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
013d 00c7       |    |		Action	Elaborate_Subprogram
013e 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
013f 00c7       |    |		Action	Elaborate_Subprogram
0140 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
0141 00c7       |    |		Action	Elaborate_Subprogram
0142 1d33       | 3  |		Execute_Immediate	Reference_Lex_1,0x33
0143 00c7       |    |		Action	Elaborate_Subprogram
0144 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
0145 00c7       |    |		Action	Elaborate_Subprogram
0146 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
0147 00c7       |    |		Action	Elaborate_Subprogram
0148 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
0149 00c7       |    |		Action	Elaborate_Subprogram
014a 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
014b 00c7       |    |		Action	Elaborate_Subprogram
014c 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
014d 00c7       |    |		Action	Elaborate_Subprogram
014e 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
014f 00c7       |    |		Action	Elaborate_Subprogram
0150 e008       |    |		Load	0x0,0x8
0151 193c       | <  |		Execute	Package,Field_Reference,Field_Number 0x3c
0152 00c6       |    |		Action	Check_Subprogram_Elaborated
0153 e20d       |    |		Load	0x1,0xd
0154 4810       |H   |		Short_Literal	0x10
0155 e009       |    |		Load	0x0,0x9
0156 1911       |    |		Execute	Package,Field_Reference,Field_Number 0x11
0157 e009       |    |		Load	0x0,0x9
0158 1912       |    |		Execute	Package,Field_Reference,Field_Number 0x12
0159 e00a       |    |		Load	0x0,0xa
015a e00b       |    |		Load	0x0,0xb
015b 4800       |H   |		Short_Literal	0x0
015c 0007       |    |		Action	Break_Optional
015d 029d 073b  |   ;|		Declare_Subprogram	INIT_0738,For_Outer_Call
015f e008       |    |		Load	0x0,0x8
0160 193d       | =  |		Execute	Package,Field_Reference,Field_Number 0x3d
0161 00c6       |    |		Action	Check_Subprogram_Elaborated
0162 e20d       |    |		Load	0x1,0xd
0163 4810       |H   |		Short_Literal	0x10
0164 1d47       | G  |		Execute_Immediate	Reference_Lex_1,0x47
0165 e001       |    |		Load	0x0,0x1
0166 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0167 e00c       |    |		Load	0x0,0xc
0168 e00d       |    |		Load	0x0,0xd
0169 4800       |H   |		Short_Literal	0x0
016a 0007       |    |		Action	Break_Optional
016b 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b
016c 00c7       |    |		Action	Elaborate_Subprogram
016d 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
016e 00c7       |    |		Action	Elaborate_Subprogram
016f 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
0170 00c7       |    |		Action	Elaborate_Subprogram
0171 029d 0753  |   S|		Declare_Subprogram	INIT_0750,For_Outer_Call
0173 029d 079b  |    |		Declare_Subprogram	INIT_0798,For_Outer_Call
0175 029d 0823  |   #|		Declare_Subprogram	INIT_0820,For_Outer_Call
0177 029d 0843  |   C|		Declare_Subprogram	INIT_0840,For_Outer_Call
0179 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23
017a 00c7       |    |		Action	Elaborate_Subprogram
017b 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
017c 00c7       |    |		Action	Elaborate_Subprogram
017d 029d 08b3  |    |		Declare_Subprogram	INIT_08b0,For_Outer_Call
017f 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25
0180 00c7       |    |		Action	Elaborate_Subprogram
0181 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26
0182 00c7       |    |		Action	Elaborate_Subprogram
0183 029d 08fb  |    |		Declare_Subprogram	INIT_08f8,For_Outer_Call
0185 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27
0186 00c7       |    |		Action	Elaborate_Subprogram
0187 029d 0ac3  |    |		Declare_Subprogram	INIT_0ac0,For_Outer_Call
0189 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28
018a 00c7       |    |		Action	Elaborate_Subprogram
018b 1d2a       | *  |		Execute_Immediate	Reference_Lex_1,0x2a
018c 00c7       |    |		Action	Elaborate_Subprogram
018d 1d2b       | +  |		Execute_Immediate	Reference_Lex_1,0x2b
018e 00c7       |    |		Action	Elaborate_Subprogram
018f 1d30       | 0  |		Execute_Immediate	Reference_Lex_1,0x30
0190 00c7       |    |		Action	Elaborate_Subprogram
0191 1d31       | 1  |		Execute_Immediate	Reference_Lex_1,0x31
0192 00c7       |    |		Action	Elaborate_Subprogram
0193 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29
0194 00c7       |    |		Action	Elaborate_Subprogram
0195 1d32       | 2  |		Execute_Immediate	Reference_Lex_1,0x32
0196 00c7       |    |		Action	Elaborate_Subprogram
0197 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
0198 00c7       |    |		Action	Elaborate_Subprogram
0199			BODY_0008:
0199 00bc       |    |		Action	Signal_Activated
019a 00bb       |    |		Action	Signal_Completion
019b 0000 0000  |    |		.BLANK	0000[0x5]
01a0 ; --------------------------------------------------------------------------------------
01a0 ; SUBPROGRAM
01a0 ; --------------------------------------------------------------------------------------
01a0 01a3       |    |		.CONST	0x01a3								; Address of begin
01a1 0004       |    |		.CONST	0x0004								; Address of exception handler
01a2 0001       |    |		.CONST	0x0001								; Number of locals
01a3			BODY_01a0:
01a3			INIT_01a0:
01a3 00da       |    |		Load_Top	At_Offset_2
01a4 0217       |    |		Execute	Heap_Access,All_Reference
01a5 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01a6 0217       |    |		Execute	Heap_Access,All_Reference
01a7 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
01a8 e00e       |    |		Load	0x0,0xe
01a9 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01aa 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01ab 0000       |    |		.XXX[0x1]
01ac 0000 0000  |    |		.LITERAL	{0x00000000, 0x7fffffff}
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b3       |    |		.CONST	0x01b3								; Address of begin
01b1 0004       |    |		.CONST	0x0004								; Address of exception handler
01b2 0001       |    |		.CONST	0x0001								; Number of locals
01b3			BODY_01b0:
01b3			INIT_01b0:
01b3 00da       |    |		Load_Top	At_Offset_2
01b4 0217       |    |		Execute	Heap_Access,All_Reference
01b5 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01b6 0217       |    |		Execute	Heap_Access,All_Reference
01b7 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01b8 c5fe       |    |		Store	0x2,-0x2
01b9 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
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 00da       |    |		Load_Top	At_Offset_2
01c4 0217       |    |		Execute	Heap_Access,All_Reference
01c5 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01c6 e001       |    |		Load	0x0,0x1
01c7 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
01c8 0216       |    |		Execute	Heap_Access,Convert
01c9 a5fe       |    |		Store_Unchecked	0x2,-0x2
01ca 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01cb 0000 0000  |    |		.BLANK	0000[0x5]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01e1       |    |		.CONST	0x01e1								; Address of begin
01d1 0004       |    |		.CONST	0x0004								; Address of exception handler
01d2 0004       |    |		.CONST	0x0004								; Number of locals
01d3			INIT_01d0:
01d3 00da       |    |		Load_Top	At_Offset_2
01d4 0217       |    |		Execute	Heap_Access,All_Reference
01d5 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01d6 e001       |    |		Load	0x0,0x1
01d7 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
01d8 0216       |    |		Execute	Heap_Access,Convert
01d9 e004       |    |		Load	0x0,0x4
01da 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01db 02c7       |    |		Declare_Variable	Any
01dc 00d8       |    |		Load_Top	At_Offset_0
01dd 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01de e004       |    |		Load	0x0,0x4
01df 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
01e0 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01e1			BODY_01d0:
01e1 00da       |    |		Load_Top	At_Offset_2
01e2 0217       |    |		Execute	Heap_Access,All_Reference
01e3 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01e4 00db       |    |		Load_Top	At_Offset_3
01e5 0217       |    |		Execute	Heap_Access,All_Reference
01e6 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
01e7 012f       | /  |		Execute	Any,Equal
01e8 6825       |h%  |		Jump_Zero	0x20e
01e9 e004       |    |		Load	0x0,0x4
01ea 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
01eb 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01ec 00da       |    |		Load_Top	At_Offset_2
01ed 0120       |    |		Execute	Any,Is_Value
01ee 6803       |h   |		Jump_Zero	0x1f2
01ef e004       |    |		Load	0x0,0x4
01f0 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01f1 7801       |x   |		Jump	0x1f3
01f2 00da       |    |		Load_Top	At_Offset_2
01f3 6024       |`$  |		Indirect_Literal	Discrete,0x218,{0x00000000, 0x00004000}
01f4 e00f       |    |		Load	0x0,0xf
01f5 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01f6 e010       |    |		Load	0x0,0x10
01f7 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
01f8 e004       |    |		Load	0x0,0x4
01f9 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
01fa 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
01fb 482e       |H.  |		Short_Literal	0x2e
01fc e5ff       |    |		Load	0x2,-0x1
01fd 820e       |    |		Call	0x1,0xe
01fe 01cb       |    |		Execute	Vector,Append
01ff e5ff       |    |		Load	0x2,-0x1
0200 8211       |    |		Call	0x1,0x11
0201 01cc       |    |		Execute	Vector,Catenate
0202 e004       |    |		Load	0x0,0x4
0203 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0204 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0205 c403       |    |		Store	0x2,0x3
0206 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0207 00d8       |    |		Load_Top	At_Offset_0
0208 7002       |p   |		Jump_Nonzero	0x20b
0209 00d9       |    |		Load_Top	At_Offset_1
020a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
020b e004       |    |		Load	0x0,0x4
020c 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
020d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
020e e5ff       |    |		Load	0x2,-0x1
020f 0217       |    |		Execute	Heap_Access,All_Reference
0210 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0211 00d8       |    |		Load_Top	At_Offset_0
0212 0120       |    |		Execute	Any,Is_Value
0213 7002       |p   |		Jump_Nonzero	0x216
0214 00d8       |    |		Load_Top	At_Offset_0
0215 011e       |    |		Execute	Any,Convert
0216 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0217 0000       |    |		.XXX[0x1]
0218 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
021c 0000 0000  |    |		.BLANK	0000[0x4]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0223       | #  |		.CONST	0x0223								; Address of begin
0221 0004       |    |		.CONST	0x0004								; Address of exception handler
0222 0001       |    |		.CONST	0x0001								; Number of locals
0223			BODY_0220:
0223			INIT_0220:
0223 00da       |    |		Load_Top	At_Offset_2
0224 0217       |    |		Execute	Heap_Access,All_Reference
0225 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0226 e00e       |    |		Load	0x0,0xe
0227 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0228 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0229 0000 0000  |    |		.BLANK	0000[0x7]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0239       | 9  |		.CONST	0x0239								; Address of begin
0231 0004       |    |		.CONST	0x0004								; Address of exception handler
0232 0002       |    |		.CONST	0x0002								; Number of locals
0233			INIT_0230:
0233 00da       |    |		Load_Top	At_Offset_2
0234 0217       |    |		Execute	Heap_Access,All_Reference
0235 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0236 e001       |    |		Load	0x0,0x1
0237 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0238 0216       |    |		Execute	Heap_Access,Convert
0239			BODY_0230:
0239 00d8       |    |		Load_Top	At_Offset_0
023a 0217       |    |		Execute	Heap_Access,All_Reference
023b 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
023c e00e       |    |		Load	0x0,0xe
023d 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
023e 7009       |p   |		Jump_Nonzero	0x248
023f 00d8       |    |		Load_Top	At_Offset_0
0240 0217       |    |		Execute	Heap_Access,All_Reference
0241 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0242 e00e       |    |		Load	0x0,0xe
0243 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0244 e5ff       |    |		Load	0x2,-0x1
0245 8211       |    |		Call	0x1,0x11
0246 01cc       |    |		Execute	Vector,Catenate
0247 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0248 00d8       |    |		Load_Top	At_Offset_0
0249 0217       |    |		Execute	Heap_Access,All_Reference
024a 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
024b 00d9       |    |		Load_Top	At_Offset_1
024c 0217       |    |		Execute	Heap_Access,All_Reference
024d 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
024e 012f       | /  |		Execute	Any,Equal
024f 6808       |h   |		Jump_Zero	0x258
0250 482e       |H.  |		Short_Literal	0x2e
0251 e5ff       |    |		Load	0x2,-0x1
0252 820e       |    |		Call	0x1,0xe
0253 01cb       |    |		Execute	Vector,Append
0254 e5ff       |    |		Load	0x2,-0x1
0255 8211       |    |		Call	0x1,0x11
0256 01cc       |    |		Execute	Vector,Catenate
0257 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0258 00db       |    |		Load_Top	At_Offset_3
0259 820e       |    |		Call	0x1,0xe
025a 0092 0b85  |    |		Action	Push_String_Extended,0xb85					; "'Load_View."
025c 01cc       |    |		Execute	Vector,Catenate
025d e5ff       |    |		Load	0x2,-0x1
025e 8211       |    |		Call	0x1,0x11
025f 01cc       |    |		Execute	Vector,Catenate
0260 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0261 0000 0000  |    |		.BLANK	0000[0x7]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 026b       | k  |		.CONST	0x026b								; Address of begin
0269 0004       |    |		.CONST	0x0004								; Address of exception handler
026a 0001       |    |		.CONST	0x0001								; Number of locals
026b			BODY_0268:
026b			INIT_0268:
026b 00da       |    |		Load_Top	At_Offset_2
026c 0217       |    |		Execute	Heap_Access,All_Reference
026d 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
026e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
026f 0000       |    |		.XXX[0x1]
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
0274 0217       |    |		Execute	Heap_Access,All_Reference
0275 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0276 e001       |    |		Load	0x0,0x1
0277 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0278 0216       |    |		Execute	Heap_Access,Convert
0279 a5fe       |    |		Store_Unchecked	0x2,-0x2
027a 00da       |    |		Load_Top	At_Offset_2
027b 0217       |    |		Execute	Heap_Access,All_Reference
027c 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
027d 7011       |p   |		Jump_Nonzero	0x28f
027e e003       |    |		Load	0x0,0x3
027f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0280 4801       |H   |		Short_Literal	0x1
0281 4801       |H   |		Short_Literal	0x1
0282 e008       |    |		Load	0x0,0x8
0283 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0284 035b       | [  |		Declare_Type	Array,Constrained
0285 0337       | 7  |		Declare_Variable	Array
0286 e5ff       |    |		Load	0x2,-0x1
0287 821b       |    |		Call	0x1,0x1b
0288 4801       |H   |		Short_Literal	0x1
0289 00da       |    |		Load_Top	At_Offset_2
028a 01d6       |    |		Execute	Vector,Field_Write
028b 6004       |`   |		Indirect_Literal	Discrete,0x290,{0x00000000, 0x00001803}
028c e003       |    |		Load	0x0,0x3
028d 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
028e c5fd       |    |		Store	0x2,-0x3
028f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0290 0000 0000  |    |		.LITERAL	{0x00000000, 0x00001803}
0294 0000 0000  |    |		.BLANK	0000[0x4]
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 029b       |    |		.CONST	0x029b								; Address of begin
0299 0004       |    |		.CONST	0x0004								; Address of exception handler
029a 0001       |    |		.CONST	0x0001								; Number of locals
029b			BODY_0298:
029b			INIT_0298:
029b 00da       |    |		Load_Top	At_Offset_2
029c 0217       |    |		Execute	Heap_Access,All_Reference
029d 3c17       |<   |		Execute	Record,Field_Read,Field_Number 0x17
029e a5fe       |    |		Store_Unchecked	0x2,-0x2
029f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02a5       |    |		.CONST	0x02a5								; Address of begin
02a1 0004       |    |		.CONST	0x0004								; Address of exception handler
02a2 0002       |    |		.CONST	0x0002								; Number of locals
02a3			INIT_02a0:
02a3 e217       |    |		Load	0x1,0x17
02a4 0337       | 7  |		Declare_Variable	Array
02a5			BODY_02a0:
02a5 00cf       |    |		Action	Mark_Auxiliary
02a6 4805       |H   |		Short_Literal	0x5
02a7 4802       |H   |		Short_Literal	0x2
02a8 0007       |    |		Action	Break_Optional
02a9 00d8       |    |		Load_Top	At_Offset_0
02aa e5ff       |    |		Load	0x2,-0x1
02ab 0217       |    |		Execute	Heap_Access,All_Reference
02ac 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
02ad 01d7       |    |		Execute	Vector,Field_Read
02ae 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
02af 00d9       |    |		Load_Top	At_Offset_1
02b0 e402       |    |		Load	0x2,0x2
02b1 01d6       |    |		Execute	Vector,Field_Write
02b2 00c8       |    |		Action	Pop_Auxiliary_Range
02b3 3ff5       |?   |		Loop_Increasing	0x2a9
02b4 00ce       |    |		Action	Pop_Auxiliary
02b5 4800       |H   |		Short_Literal	0x0
02b6 4800       |H   |		Short_Literal	0x0
02b7 00da       |    |		Load_Top	At_Offset_2
02b8 01d6       |    |		Execute	Vector,Field_Write
02b9 00d8       |    |		Load_Top	At_Offset_0
02ba 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02bb 0000 0000  |    |		.BLANK	0000[0x5]
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02cd       |    |		.CONST	0x02cd								; Address of begin
02c1 0004       |    |		.CONST	0x0004								; Address of exception handler
02c2 0003       |    |		.CONST	0x0003								; Number of locals
02c3			INIT_02c0:
02c3 00da       |    |		Load_Top	At_Offset_2
02c4 0217       |    |		Execute	Heap_Access,All_Reference
02c5 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
02c6 e001       |    |		Load	0x0,0x1
02c7 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
02c8 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
02c9 1c08       |    |		Execute_Immediate	Run_Utility,0x8
02ca 00db       |    |		Load_Top	At_Offset_3
02cb 0217       |    |		Execute	Heap_Access,All_Reference
02cc 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
02cd			BODY_02c0:
02cd 00cf       |    |		Action	Mark_Auxiliary
02ce 00da       |    |		Load_Top	At_Offset_2
02cf 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02d0 01d9       |    |		Execute	Vector,Reverse_Bounds
02d1 0263       | c  |		Execute	Discrete,Above_Bound
02d2 7010       |p   |		Jump_Nonzero	0x2e3
02d3 00db       |    |		Load_Top	At_Offset_3
02d4 0217       |    |		Execute	Heap_Access,All_Reference
02d5 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02d6 e001       |    |		Load	0x0,0x1
02d7 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
02d8 0216       |    |		Execute	Heap_Access,Convert
02d9 00d9       |    |		Load_Top	At_Offset_1
02da e402       |    |		Load	0x2,0x2
02db 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02dc 01d6       |    |		Execute	Vector,Field_Write
02dd 00db       |    |		Load_Top	At_Offset_3
02de 0217       |    |		Execute	Heap_Access,All_Reference
02df 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02e0 a403       |    |		Store_Unchecked	0x2,0x3
02e1 00c8       |    |		Action	Pop_Auxiliary_Range
02e2 3ff0       |?   |		Loop_Increasing	0x2d3
02e3 00ce       |    |		Action	Pop_Auxiliary
02e4 00d9       |    |		Load_Top	At_Offset_1
02e5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02e6 0000 0000  |    |		.XXX[0x2]
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02eb       |    |		.CONST	0x02eb								; Address of begin
02e9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ea 0001       |    |		.CONST	0x0001								; Number of locals
02eb			BODY_02e8:
02eb			INIT_02e8:
02eb 00da       |    |		Load_Top	At_Offset_2
02ec e240       | @  |		Load	0x1,0x40
02ed e241       | A  |		Load	0x1,0x41
02ee 1d42       | B  |		Execute_Immediate	Reference_Lex_1,0x42
02ef 1d43       | C  |		Execute_Immediate	Reference_Lex_1,0x43
02f0 1d44       | D  |		Execute_Immediate	Reference_Lex_1,0x44
02f1 e008       |    |		Load	0x0,0x8
02f2 183c       | <  |		Execute	Package,Field_Execute,Field_Number 0x3c
02f3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02f4 0000 0000  |    |		.BLANK	0000[0x4]
02f8 ; --------------------------------------------------------------------------------------
02f8 ; SUBPROGRAM
02f8 ; --------------------------------------------------------------------------------------
02f8 02fb       |    |		.CONST	0x02fb								; Address of begin
02f9 0004       |    |		.CONST	0x0004								; Address of exception handler
02fa 0001       |    |		.CONST	0x0001								; Number of locals
02fb			BODY_02f8:
02fb			INIT_02f8:
02fb 00da       |    |		Load_Top	At_Offset_2
02fc e248       | H  |		Load	0x1,0x48
02fd e249       | I  |		Load	0x1,0x49
02fe 1d4a       | J  |		Execute_Immediate	Reference_Lex_1,0x4a
02ff e24b       | K  |		Load	0x1,0x4b
0300 1d4c       | L  |		Execute_Immediate	Reference_Lex_1,0x4c
0301 e008       |    |		Load	0x0,0x8
0302 183d       | =  |		Execute	Package,Field_Execute,Field_Number 0x3d
0303 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
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 00da       |    |		Load_Top	At_Offset_2
030c 8212       |    |		Call	0x1,0x12
030d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
030e 0000 0000  |    |		.XXX[0x2]
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 0313       |    |		.CONST	0x0313								; Address of begin
0311 0004       |    |		.CONST	0x0004								; Address of exception handler
0312 0001       |    |		.CONST	0x0001								; Number of locals
0313			BODY_0310:
0313			INIT_0310:
0313 00d1       |    |		Pop_Control	Pop_Count_1
0314 00da       |    |		Load_Top	At_Offset_2
0315 01dc       |    |		Execute	Vector,Last
0316 00db       |    |		Load_Top	At_Offset_3
0317 01dd       |    |		Execute	Vector,First
0318 0263       | c  |		Execute	Discrete,Above_Bound
0319 7006       |p   |		Jump_Nonzero	0x320
031a 00d8       |    |		Load_Top	At_Offset_0
031b e5ff       |    |		Load	0x2,-0x1
031c 01d5       |    |		Execute	Vector,Field_Reference
031d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
031e 0a01       |    |		Execute_Immediate	Plus,0x1
031f 7ff8       |    |		Jump	0x318
0320 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0321 0000 0000  |    |		.BLANK	0000[0x7]
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 0335       | 5  |		.CONST	0x0335								; Address of begin
0329 0004       |    |		.CONST	0x0004								; Address of exception handler
032a 0005       |    |		.CONST	0x0005								; Number of locals
032b			INIT_0328:
032b 00da       |    |		Load_Top	At_Offset_2
032c 0217       |    |		Execute	Heap_Access,All_Reference
032d 3c19       |<   |		Execute	Record,Field_Read,Field_Number 0x19
032e 0007       |    |		Action	Break_Optional
032f e011       |    |		Load	0x0,0x11
0330 1b2e       | .  |		Execute	Package,Field_Read,Field_Number 0x2e
0331 e011       |    |		Load	0x0,0x11
0332 1b31       | 1  |		Execute	Package,Field_Read,Field_Number 0x31
0333 e217       |    |		Load	0x1,0x17
0334 0337       | 7  |		Declare_Variable	Array
0335			BODY_0328:
0335 e012       |    |		Load	0x0,0x12
0336 6809       |h   |		Jump_Zero	0x340
0337 0092 0b86  |    |		Action	Push_String_Extended,0xb86					; "Initializing supplier list for "
0339 e5ff       |    |		Load	0x2,-0x1
033a 0217       |    |		Execute	Heap_Access,All_Reference
033b 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
033c e00e       |    |		Load	0x0,0xe
033d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
033e 01cc       |    |		Execute	Vector,Catenate
033f 8013       |    |		Call	0x0,0x13
0340 00cf       |    |		Action	Mark_Auxiliary
0341 7819       |x   |		Jump	0x35b
0342 e402       |    |		Load	0x2,0x2
0343 0217       |    |		Execute	Heap_Access,All_Reference
0344 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0345 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0346 e402       |    |		Load	0x2,0x2
0347 0217       |    |		Execute	Heap_Access,All_Reference
0348 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0349 00da       |    |		Load_Top	At_Offset_2
034a 01d4       |    |		Execute	Vector,Structure_Write
034b e402       |    |		Load	0x2,0x2
034c 0217       |    |		Execute	Heap_Access,All_Reference
034d 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
034e a403       |    |		Store_Unchecked	0x2,0x3
034f 00da       |    |		Load_Top	At_Offset_2
0350 00da       |    |		Load_Top	At_Offset_2
0351 e5ff       |    |		Load	0x2,-0x1
0352 8252       | R  |		Call	0x1,0x52
0353 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0354 e402       |    |		Load	0x2,0x2
0355 e011       |    |		Load	0x0,0x11
0356 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
0357 c402       |    |		Store	0x2,0x2
0358 00db       |    |		Load_Top	At_Offset_3
0359 a402       |    |		Store_Unchecked	0x2,0x2
035a 00c9       |    |		Action	Pop_Auxiliary_Loop
035b e402       |    |		Load	0x2,0x2
035c 77e5       |w   |		Jump_Nonzero	0x342
035d 00ce       |    |		Action	Pop_Auxiliary
035e 4800       |H   |		Short_Literal	0x0
035f e5ff       |    |		Load	0x2,-0x1
0360 0217       |    |		Execute	Heap_Access,All_Reference
0361 3818       |8   |		Execute	Record,Field_Write,Field_Number 0x18
0362 e011       |    |		Load	0x0,0x11
0363 1b2e       | .  |		Execute	Package,Field_Read,Field_Number 0x2e
0364 e5ff       |    |		Load	0x2,-0x1
0365 0217       |    |		Execute	Heap_Access,All_Reference
0366 3819       |8   |		Execute	Record,Field_Write,Field_Number 0x19
0367 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0368 ; --------------------------------------------------------------------------------------
0368 ; SUBPROGRAM
0368 ; --------------------------------------------------------------------------------------
0368 036b       | k  |		.CONST	0x036b								; Address of begin
0369 0004       |    |		.CONST	0x0004								; Address of exception handler
036a 0001       |    |		.CONST	0x0001								; Number of locals
036b			BODY_0368:
036b			INIT_0368:
036b e5fc       |    |		Load	0x2,-0x4
036c e5fd       |    |		Load	0x2,-0x3
036d e5fe       |    |		Load	0x2,-0x2
036e e5ff       |    |		Load	0x2,-0x1
036f 0217       |    |		Execute	Heap_Access,All_Reference
0370 340d       |4   |		Execute	Record,Field_Reference,Field_Number 0xd
0371 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0372 8227       | '  |		Call	0x1,0x27
0373 c5fc       |    |		Store	0x2,-0x4
0374 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0375 0000 0000  |    |		.XXX[0x3]
0377 0000       |    |
0378 ; --------------------------------------------------------------------------------------
0378 ; SUBPROGRAM
0378 ; --------------------------------------------------------------------------------------
0378 0392       |    |		.CONST	0x0392								; Address of begin
0379 0004       |    |		.CONST	0x0004								; Address of exception handler
037a 0006       |    |		.CONST	0x0006								; Number of locals
037b			INIT_0378:
037b 00db       |    |		Load_Top	At_Offset_3
037c 0217       |    |		Execute	Heap_Access,All_Reference
037d 3c19       |<   |		Execute	Record,Field_Read,Field_Number 0x19
037e 0007       |    |		Action	Break_Optional
037f e011       |    |		Load	0x0,0x11
0380 1b2e       | .  |		Execute	Package,Field_Read,Field_Number 0x2e
0381 e011       |    |		Load	0x0,0x11
0382 1b2e       | .  |		Execute	Package,Field_Read,Field_Number 0x2e
0383 e217       |    |		Load	0x1,0x17
0384 0337       | 7  |		Declare_Variable	Array
0385 00d8       |    |		Load_Top	At_Offset_0
0386 0335       | 5  |		Declare_Variable	Array,Duplicate
0387 00cd       |    |		Action	Spare6_Action
0388 4805       |H   |		Short_Literal	0x5
0389 4800       |H   |		Short_Literal	0x0
038a 4800       |H   |		Short_Literal	0x0
038b 00d9       |    |		Load_Top	At_Offset_1
038c e406       |    |		Load	0x2,0x6
038d 01d6       |    |		Execute	Vector,Field_Write
038e 3ffb       |?   |		Loop_Increasing	0x38a
038f 00d9       |    |		Load_Top	At_Offset_1
0390 01d4       |    |		Execute	Vector,Structure_Write
0391 e5ff       |    |		Load	0x2,-0x1
0392			BODY_0378:
0392 00cf       |    |		Action	Mark_Auxiliary
0393 782c       |x,  |		Jump	0x3c0
0394 00d9       |    |		Load_Top	At_Offset_1
0395 e402       |    |		Load	0x2,0x2
0396 0217       |    |		Execute	Heap_Access,All_Reference
0397 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0398 823d       | =  |		Call	0x1,0x3d
0399 681f       |h   |		Jump_Zero	0x3b9
039a e402       |    |		Load	0x2,0x2
039b 0217       |    |		Execute	Heap_Access,All_Reference
039c 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
039d 00da       |    |		Load_Top	At_Offset_2
039e 021f       |    |		Execute	Heap_Access,Equal
039f 6822       |h"  |		Jump_Zero	0x3c2
03a0 e5fd       |    |		Load	0x2,-0x3
03a1 e402       |    |		Load	0x2,0x2
03a2 0217       |    |		Execute	Heap_Access,All_Reference
03a3 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
03a4 01d0       |    |		Execute	Vector,Complement
03a5 01d3       |    |		Execute	Vector,And
03a6 00db       |    |		Load_Top	At_Offset_3
03a7 01d4       |    |		Execute	Vector,Structure_Write
03a8 e5fd       |    |		Load	0x2,-0x3
03a9 e402       |    |		Load	0x2,0x2
03aa 0217       |    |		Execute	Heap_Access,All_Reference
03ab 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
03ac 01d2       |    |		Execute	Vector,Or
03ad e402       |    |		Load	0x2,0x2
03ae 0217       |    |		Execute	Heap_Access,All_Reference
03af 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
03b0 00da       |    |		Load_Top	At_Offset_2
03b1 e234       | 4  |		Load	0x1,0x34
03b2 01de       |    |		Execute	Vector,Not_Equal
03b3 6804       |h   |		Jump_Zero	0x3b8
03b4 e5ff       |    |		Load	0x2,-0x1
03b5 00db       |    |		Load_Top	At_Offset_3
03b6 e5fe       |    |		Load	0x2,-0x2
03b7 8250       | P  |		Call	0x1,0x50
03b8 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
03b9 e402       |    |		Load	0x2,0x2
03ba a403       |    |		Store_Unchecked	0x2,0x3
03bb e402       |    |		Load	0x2,0x2
03bc 0217       |    |		Execute	Heap_Access,All_Reference
03bd 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
03be a402       |    |		Store_Unchecked	0x2,0x2
03bf 00c9       |    |		Action	Pop_Auxiliary_Loop
03c0 e402       |    |		Load	0x2,0x2
03c1 77d2       |w   |		Jump_Nonzero	0x394
03c2 00ce       |    |		Action	Pop_Auxiliary
03c3 00db       |    |		Load_Top	At_Offset_3
03c4 e402       |    |		Load	0x2,0x2
03c5 e5fd       |    |		Load	0x2,-0x3
03c6 e5ff       |    |		Load	0x2,-0x1
03c7 e5fe       |    |		Load	0x2,-0x2
03c8 8253       | S  |		Call	0x1,0x53
03c9 c403       |    |		Store	0x2,0x3
03ca 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
03cb 0000 0000  |    |		.BLANK	0000[0x5]
03d0 ; --------------------------------------------------------------------------------------
03d0 ; SUBPROGRAM
03d0 ; --------------------------------------------------------------------------------------
03d0 03e3       |    |		.CONST	0x03e3								; Address of begin
03d1 0004       |    |		.CONST	0x0004								; Address of exception handler
03d2 0005       |    |		.CONST	0x0005								; Number of locals
03d3			INIT_03d0:
03d3 e004       |    |		Load	0x0,0x4
03d4 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03d5 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
03d6 02c7       |    |		Declare_Variable	Any
03d7 00d8       |    |		Load_Top	At_Offset_0
03d8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03d9 e004       |    |		Load	0x0,0x4
03da 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03db 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
03dc e004       |    |		Load	0x0,0x4
03dd 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
03de 02c7       |    |		Declare_Variable	Any
03df 00d8       |    |		Load_Top	At_Offset_0
03e0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03e1 e004       |    |		Load	0x0,0x4
03e2 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03e3			BODY_03d0:
03e3 e004       |    |		Load	0x0,0x4
03e4 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03e5 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
03e6 e402       |    |		Load	0x2,0x2
03e7 60a0       |`   |		Indirect_Literal	Discrete,0x488,{0x00000000, 0x00004000}
03e8 e00f       |    |		Load	0x0,0xf
03e9 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
03ea e010       |    |		Load	0x0,0x10
03eb 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
03ec e014       |    |		Load	0x0,0x14
03ed 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
03ee 4801       |H   |		Short_Literal	0x1
03ef 4800       |H   |		Short_Literal	0x0
03f0 e010       |    |		Load	0x0,0x10
03f1 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
03f2 e004       |    |		Load	0x0,0x4
03f3 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03f4 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
03f5 e5ff       |    |		Load	0x2,-0x1
03f6 e004       |    |		Load	0x0,0x4
03f7 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03f8 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
03f9 c402       |    |		Store	0x2,0x2
03fa 005b       | [  |		Store_Top	Discrete,At_Offset_3
03fb 00da       |    |		Load_Top	At_Offset_2
03fc 681b       |h   |		Jump_Zero	0x418
03fd e003       |    |		Load	0x0,0x3
03fe 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03ff 4801       |H   |		Short_Literal	0x1
0400 4802       |H   |		Short_Literal	0x2
0401 e008       |    |		Load	0x0,0x8
0402 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0403 035b       | [  |		Declare_Type	Array,Constrained
0404 0337       | 7  |		Declare_Variable	Array
0405 e5ff       |    |		Load	0x2,-0x1
0406 e403       |    |		Load	0x2,0x3
0407 e008       |    |		Load	0x0,0x8
0408 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0409 4801       |H   |		Short_Literal	0x1
040a 00da       |    |		Load_Top	At_Offset_2
040b 01d6       |    |		Execute	Vector,Field_Write
040c e5fe       |    |		Load	0x2,-0x2
040d e001       |    |		Load	0x0,0x1
040e 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
040f 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0410 4802       |H   |		Short_Literal	0x2
0411 00da       |    |		Load_Top	At_Offset_2
0412 01d6       |    |		Execute	Vector,Field_Write
0413 6070       |`p  |		Indirect_Literal	Discrete,0x484,{0x00000000, 0x00001801}
0414 e003       |    |		Load	0x0,0x3
0415 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0416 c5fc       |    |		Store	0x2,-0x4
0417 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0418 00db       |    |		Load_Top	At_Offset_3
0419 e004       |    |		Load	0x0,0x4
041a 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
041b 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
041c 681a       |h   |		Jump_Zero	0x437
041d e003       |    |		Load	0x0,0x3
041e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
041f 4801       |H   |		Short_Literal	0x1
0420 4802       |H   |		Short_Literal	0x2
0421 e008       |    |		Load	0x0,0x8
0422 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0423 035b       | [  |		Declare_Type	Array,Constrained
0424 0337       | 7  |		Declare_Variable	Array
0425 e5ff       |    |		Load	0x2,-0x1
0426 e008       |    |		Load	0x0,0x8
0427 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0428 4801       |H   |		Short_Literal	0x1
0429 00da       |    |		Load_Top	At_Offset_2
042a 01d6       |    |		Execute	Vector,Field_Write
042b e5fe       |    |		Load	0x2,-0x2
042c e001       |    |		Load	0x0,0x1
042d 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
042e 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
042f 4802       |H   |		Short_Literal	0x2
0430 00da       |    |		Load_Top	At_Offset_2
0431 01d6       |    |		Execute	Vector,Field_Write
0432 604d       |`M  |		Indirect_Literal	Discrete,0x480,{0x00000000, 0x00001806}
0433 e003       |    |		Load	0x0,0x3
0434 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0435 c5fc       |    |		Store	0x2,-0x4
0436 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0437 00cf       |    |		Action	Mark_Auxiliary
0438 783a       |x:  |		Jump	0x473
0439 e004       |    |		Load	0x0,0x4
043a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
043b 00db       |    |		Load_Top	At_Offset_3
043c 0120       |    |		Execute	Any,Is_Value
043d 6803       |h   |		Jump_Zero	0x441
043e e004       |    |		Load	0x0,0x4
043f 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0440 7801       |x   |		Jump	0x442
0441 00db       |    |		Load_Top	At_Offset_3
0442 e402       |    |		Load	0x2,0x2
0443 e004       |    |		Load	0x0,0x4
0444 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0445 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0446 c404       |    |		Store	0x2,0x4
0447 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0448 00d9       |    |		Load_Top	At_Offset_1
0449 7007       |p   |		Jump_Nonzero	0x451
044a e5fc       |    |		Load	0x2,-0x4
044b e5fd       |    |		Load	0x2,-0x3
044c e5fe       |    |		Load	0x2,-0x2
044d e404       |    |		Load	0x2,0x4
044e 8227       | '  |		Call	0x1,0x27
044f c5fc       |    |		Store	0x2,-0x4
0450 781c       |x   |		Jump	0x46d
0451 e003       |    |		Load	0x0,0x3
0452 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0453 4801       |H   |		Short_Literal	0x1
0454 4802       |H   |		Short_Literal	0x2
0455 e008       |    |		Load	0x0,0x8
0456 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0457 035b       | [  |		Declare_Type	Array,Constrained
0458 0337       | 7  |		Declare_Variable	Array
0459 e402       |    |		Load	0x2,0x2
045a e004       |    |		Load	0x0,0x4
045b 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
045c 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
045d e008       |    |		Load	0x0,0x8
045e 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
045f 4801       |H   |		Short_Literal	0x1
0460 00da       |    |		Load_Top	At_Offset_2
0461 01d6       |    |		Execute	Vector,Field_Write
0462 e5fe       |    |		Load	0x2,-0x2
0463 e001       |    |		Load	0x0,0x1
0464 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0465 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0466 4802       |H   |		Short_Literal	0x2
0467 00da       |    |		Load_Top	At_Offset_2
0468 01d6       |    |		Execute	Vector,Field_Write
0469 6012       |`   |		Indirect_Literal	Discrete,0x47c,{0x00000000, 0x00001802}
046a e003       |    |		Load	0x0,0x3
046b 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
046c c5fc       |    |		Store	0x2,-0x4
046d e402       |    |		Load	0x2,0x2
046e e004       |    |		Load	0x0,0x4
046f 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0470 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0471 c402       |    |		Store	0x2,0x2
0472 00c9       |    |		Action	Pop_Auxiliary_Loop
0473 e402       |    |		Load	0x2,0x2
0474 e004       |    |		Load	0x0,0x4
0475 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0476 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0477 6fc1       |o   |		Jump_Zero	0x439
0478 00ce       |    |		Action	Pop_Auxiliary
0479 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
047a 0000 0000  |    |		.XXX[0x2]
047c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00001802}
0480 0000 0000  |    |		.LITERAL	{0x00000000, 0x00001806}
0484 0000 0000  |    |		.LITERAL	{0x00000000, 0x00001801}
0488 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
048c 0000 0000  |    |		.BLANK	0000[0x4]
0490 ; --------------------------------------------------------------------------------------
0490 ; SUBPROGRAM
0490 ; --------------------------------------------------------------------------------------
0490 0495       |    |		.CONST	0x0495								; Address of begin
0491 04a9       |    |		.CONST	0x04a9								; Address of exception handler
0492 0002       |    |		.CONST	0x0002								; Number of locals
0493			INIT_0490:
0493 e011       |    |		Load	0x0,0x11
0494 1b31       | 1  |		Execute	Package,Field_Read,Field_Number 0x31
0495			BODY_0490:
0495 e5fc       |    |		Load	0x2,-0x4
0496 e011       |    |		Load	0x0,0x11
0497 1b31       | 1  |		Execute	Package,Field_Read,Field_Number 0x31
0498 e5fe       |    |		Load	0x2,-0x2
0499 e5ff       |    |		Load	0x2,-0x1
049a 8254       | T  |		Call	0x1,0x54
049b 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
049c c5fc       |    |		Store	0x2,-0x4
049d 4800       |H   |		Short_Literal	0x0
049e e5fc       |    |		Load	0x2,-0x4
049f e003       |    |		Load	0x0,0x3
04a0 1847       | G  |		Execute	Package,Field_Execute,Field_Number 0x47
04a1 6806       |h   |		Jump_Zero	0x4a8
04a2 e5fc       |    |		Load	0x2,-0x4
04a3 e5fd       |    |		Load	0x2,-0x3
04a4 e5fe       |    |		Load	0x2,-0x2
04a5 00db       |    |		Load_Top	At_Offset_3
04a6 8225       | %  |		Call	0x1,0x25
04a7 c5fc       |    |		Store	0x2,-0x4
04a8 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
04a9			TRAP_0490:
04a9 e003       |    |		Load	0x0,0x3
04aa 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
04ab 010f       |    |		Execute	Exception,Equal
04ac 6804       |h   |		Jump_Zero	0x4b1
04ad e003       |    |		Load	0x0,0x3
04ae 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
04af a5fc       |    |		Store_Unchecked	0x2,-0x4
04b0 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
04b1 0100       |    |		Execute	Exception,Raise
04b2 0000 0000  |    |		.BLANK	0000[0x6]
04b8 ; --------------------------------------------------------------------------------------
04b8 ; SUBPROGRAM
04b8 ; --------------------------------------------------------------------------------------
04b8 04c8       |    |		.CONST	0x04c8								; Address of begin
04b9 0004       |    |		.CONST	0x0004								; Address of exception handler
04ba 0005       |    |		.CONST	0x0005								; Number of locals
04bb			INIT_04b8:
04bb 00da       |    |		Load_Top	At_Offset_2
04bc 0007       |    |		Action	Break_Optional
04bd e5fe       |    |		Load	0x2,-0x2
04be 0217       |    |		Execute	Heap_Access,All_Reference
04bf 3c19       |<   |		Execute	Record,Field_Read,Field_Number 0x19
04c0 0007       |    |		Action	Break_Optional
04c1 e011       |    |		Load	0x0,0x11
04c2 1b2e       | .  |		Execute	Package,Field_Read,Field_Number 0x2e
04c3 e217       |    |		Load	0x1,0x17
04c4 0337       | 7  |		Declare_Variable	Array
04c5 e234       | 4  |		Load	0x1,0x34
04c6 00d9       |    |		Load_Top	At_Offset_1
04c7 01d4       |    |		Execute	Vector,Structure_Write
04c8			BODY_04b8:
04c8 e012       |    |		Load	0x0,0x12
04c9 6812       |h   |		Jump_Zero	0x4dc
04ca 0092 0b87  |    |		Action	Push_String_Extended,0xb87					; "Deleting supplier "
04cc e5ff       |    |		Load	0x2,-0x1
04cd 0217       |    |		Execute	Heap_Access,All_Reference
04ce 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
04cf e00e       |    |		Load	0x0,0xe
04d0 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
04d1 01cc       |    |		Execute	Vector,Catenate
04d2 0092 0b88  |    |		Action	Push_String_Extended,0xb88					; " for "
04d4 01cc       |    |		Execute	Vector,Catenate
04d5 e5fe       |    |		Load	0x2,-0x2
04d6 0217       |    |		Execute	Heap_Access,All_Reference
04d7 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
04d8 e00e       |    |		Load	0x0,0xe
04d9 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
04da 01cc       |    |		Execute	Vector,Catenate
04db 8013       |    |		Call	0x0,0x13
04dc 00cf       |    |		Action	Mark_Auxiliary
04dd 7830       |x0  |		Jump	0x50e
04de 00db       |    |		Load_Top	At_Offset_3
04df 0217       |    |		Execute	Heap_Access,All_Reference
04e0 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
04e1 e402       |    |		Load	0x2,0x2
04e2 021f       |    |		Execute	Heap_Access,Equal
04e3 6825       |h%  |		Jump_Zero	0x509
04e4 00db       |    |		Load_Top	At_Offset_3
04e5 0217       |    |		Execute	Heap_Access,All_Reference
04e6 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
04e7 e5fd       |    |		Load	0x2,-0x3
04e8 01d3       |    |		Execute	Vector,And
04e9 00da       |    |		Load_Top	At_Offset_2
04ea 01d4       |    |		Execute	Vector,Structure_Write
04eb 00db       |    |		Load_Top	At_Offset_3
04ec 0217       |    |		Execute	Heap_Access,All_Reference
04ed 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
04ee 00da       |    |		Load_Top	At_Offset_2
04ef 01df       |    |		Execute	Vector,Equal
04f0 6807       |h   |		Jump_Zero	0x4f8
04f1 00db       |    |		Load_Top	At_Offset_3
04f2 00db       |    |		Load_Top	At_Offset_3
04f3 e5fe       |    |		Load	0x2,-0x2
04f4 8255       | U  |		Call	0x1,0x55
04f5 c404       |    |		Store	0x2,0x4
04f6 c403       |    |		Store	0x2,0x3
04f7 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
04f8 00d9       |    |		Load_Top	At_Offset_1
04f9 e234       | 4  |		Load	0x1,0x34
04fa 01de       |    |		Execute	Vector,Not_Equal
04fb 680c       |h   |		Jump_Zero	0x508
04fc 00db       |    |		Load_Top	At_Offset_3
04fd 0217       |    |		Execute	Heap_Access,All_Reference
04fe 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
04ff e5fd       |    |		Load	0x2,-0x3
0500 01d0       |    |		Execute	Vector,Complement
0501 01d3       |    |		Execute	Vector,And
0502 e403       |    |		Load	0x2,0x3
0503 0217       |    |		Execute	Heap_Access,All_Reference
0504 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0505 e402       |    |		Load	0x2,0x2
0506 00da       |    |		Load_Top	At_Offset_2
0507 8251       | Q  |		Call	0x1,0x51
0508 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0509 00db       |    |		Load_Top	At_Offset_3
050a 0217       |    |		Execute	Heap_Access,All_Reference
050b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
050c a403       |    |		Store_Unchecked	0x2,0x3
050d 00c9       |    |		Action	Pop_Auxiliary_Loop
050e 00db       |    |		Load_Top	At_Offset_3
050f 77ce       |w   |		Jump_Nonzero	0x4de
0510 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0511 0000 0000  |    |		.BLANK	0000[0x7]
0518 ; --------------------------------------------------------------------------------------
0518 ; SUBPROGRAM
0518 ; --------------------------------------------------------------------------------------
0518 0533       | 3  |		.CONST	0x0533								; Address of begin
0519 0004       |    |		.CONST	0x0004								; Address of exception handler
051a 0009       |    |		.CONST	0x0009								; Number of locals
051b			INIT_0518:
051b 00db       |    |		Load_Top	At_Offset_3
051c 0217       |    |		Execute	Heap_Access,All_Reference
051d 3c19       |<   |		Execute	Record,Field_Read,Field_Number 0x19
051e 0007       |    |		Action	Break_Optional
051f e011       |    |		Load	0x0,0x11
0520 1b2e       | .  |		Execute	Package,Field_Read,Field_Number 0x2e
0521 e011       |    |		Load	0x0,0x11
0522 1b2e       | .  |		Execute	Package,Field_Read,Field_Number 0x2e
0523 e011       |    |		Load	0x0,0x11
0524 1b31       | 1  |		Execute	Package,Field_Read,Field_Number 0x31
0525 e217       |    |		Load	0x1,0x17
0526 0337       | 7  |		Declare_Variable	Array
0527 e217       |    |		Load	0x1,0x17
0528 0337       | 7  |		Declare_Variable	Array
0529 e5ff       |    |		Load	0x2,-0x1
052a 01da       |    |		Execute	Vector,Bounds
052b e221       | !  |		Load	0x1,0x21
052c 035b       | [  |		Declare_Type	Array,Constrained
052d 0337       | 7  |		Declare_Variable	Array
052e e5ff       |    |		Load	0x2,-0x1
052f 00d9       |    |		Load_Top	At_Offset_1
0530 01d4       |    |		Execute	Vector,Structure_Write
0531 029f 0af3  |    |		Declare_Subprogram	INIT_0af0,For_Call
0533			BODY_0518:
0533 e012       |    |		Load	0x0,0x12
0534 681f       |h   |		Jump_Zero	0x554
0535 0092 0b89  |    |		Action	Push_String_Extended,0xb89					; "Replacing"
0537 e5fd       |    |		Load	0x2,-0x3
0538 e5fe       |    |		Load	0x2,-0x2
0539 8230       | 0  |		Call	0x1,0x30
053a 00e0       |    |		Load_Encached	Standard_Cache
053b 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
053c 01cc       |    |		Execute	Vector,Catenate
053d 0092 0b8a  |    |		Action	Push_String_Extended,0xb8a					; " suppliers with"
053f 01cc       |    |		Execute	Vector,Catenate
0540 e5ff       |    |		Load	0x2,-0x1
0541 01db       |    |		Execute	Vector,Length
0542 00d8       |    |		Load_Top	At_Offset_0
0543 00e2       |    |		Load_Encached	Integer_Cache
0544 0260       | `  |		Execute	Discrete,In_Type
0545 7001       |p   |		Jump_Nonzero	0x547
0546 0801       |    |		Execute_Immediate	Raise,0x1
0547 00e0       |    |		Load_Encached	Standard_Cache
0548 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0549 01cc       |    |		Execute	Vector,Catenate
054a 0092 0b8b  |    |		Action	Push_String_Extended,0xb8b					; " objects for "
054c 01cc       |    |		Execute	Vector,Catenate
054d e5fe       |    |		Load	0x2,-0x2
054e 0217       |    |		Execute	Heap_Access,All_Reference
054f 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
0550 e00e       |    |		Load	0x0,0xe
0551 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0552 01cc       |    |		Execute	Vector,Catenate
0553 8013       |    |		Call	0x0,0x13
0554 00d9       |    |		Load_Top	At_Offset_1
0555 e236       | 6  |		Load	0x1,0x36
0556 e237       | 7  |		Load	0x1,0x37
0557 e238       | 8  |		Load	0x1,0x38
0558 1d39       | 9  |		Execute_Immediate	Reference_Lex_1,0x39
0559 1d3a       | :  |		Execute_Immediate	Reference_Lex_1,0x3a
055a 8005       |    |		Call	0x0,0x5
055b 00d1       |    |		Pop_Control	Pop_Count_1
055c 00cf       |    |		Action	Mark_Auxiliary
055d 00da       |    |		Load_Top	At_Offset_2
055e 01d9       |    |		Execute	Vector,Reverse_Bounds
055f 0263       | c  |		Execute	Discrete,Above_Bound
0560 70ae       |p   |		Jump_Nonzero	0x60f
0561 e012       |    |		Load	0x0,0x12
0562 6832       |h2  |		Jump_Zero	0x595
0563 0092 0b8c  |    |		Action	Push_String_Extended,0xb8c					; "New object ("
0565 00d9       |    |		Load_Top	At_Offset_1
0566 e408       |    |		Load	0x2,0x8
0567 01d5       |    |		Execute	Vector,Field_Reference
0568 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0569 e004       |    |		Load	0x0,0x4
056a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
056b 00e0       |    |		Load_Encached	Standard_Cache
056c 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
056d 01cc       |    |		Execute	Vector,Catenate
056e 0092 0b8d  |    |		Action	Push_String_Extended,0xb8d					; ") is "
0570 01cc       |    |		Execute	Vector,Catenate
0571 00d9       |    |		Load_Top	At_Offset_1
0572 e408       |    |		Load	0x2,0x8
0573 01d5       |    |		Execute	Vector,Field_Reference
0574 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0575 e004       |    |		Load	0x0,0x4
0576 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0577 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
0578 01cc       |    |		Execute	Vector,Catenate
0579 8013       |    |		Call	0x0,0x13
057a e402       |    |		Load	0x2,0x2
057b 6819       |h   |		Jump_Zero	0x595
057c 0092 0b8e  |    |		Action	Push_String_Extended,0xb8e					; "Unique ("
057e e402       |    |		Load	0x2,0x2
057f 0217       |    |		Execute	Heap_Access,All_Reference
0580 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0581 0217       |    |		Execute	Heap_Access,All_Reference
0582 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0583 e004       |    |		Load	0x0,0x4
0584 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0585 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
0586 01cc       |    |		Execute	Vector,Catenate
0587 0092 0b8f  |    |		Action	Push_String_Extended,0xb8f					; ") ="
0589 01cc       |    |		Execute	Vector,Catenate
058a e402       |    |		Load	0x2,0x2
058b 0217       |    |		Execute	Heap_Access,All_Reference
058c 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
058d 0217       |    |		Execute	Heap_Access,All_Reference
058e 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
058f e004       |    |		Load	0x0,0x4
0590 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0591 00e0       |    |		Load_Encached	Standard_Cache
0592 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0593 01cc       |    |		Execute	Vector,Catenate
0594 8013       |    |		Call	0x0,0x13
0595 00cf       |    |		Action	Mark_Auxiliary
0596 7802       |x   |		Jump	0x599
0597 8409       |    |		Call	0x2,0x9
0598 00c9       |    |		Action	Pop_Auxiliary_Loop
0599 e402       |    |		Load	0x2,0x2
059a 77fc       |w   |		Jump_Nonzero	0x597
059b 00ce       |    |		Action	Pop_Auxiliary
059c e402       |    |		Load	0x2,0x2
059d 680b       |h   |		Jump_Zero	0x5a9
059e 00d8       |    |		Load_Top	At_Offset_0
059f e408       |    |		Load	0x2,0x8
05a0 01d5       |    |		Execute	Vector,Field_Reference
05a1 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
05a2 e402       |    |		Load	0x2,0x2
05a3 0217       |    |		Execute	Heap_Access,All_Reference
05a4 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
05a5 0217       |    |		Execute	Heap_Access,All_Reference
05a6 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
05a7 012f       | /  |		Execute	Any,Equal
05a8 7018       |p   |		Jump_Nonzero	0x5c1
05a9 e5fc       |    |		Load	0x2,-0x4
05aa e011       |    |		Load	0x0,0x11
05ab 1b31       | 1  |		Execute	Package,Field_Read,Field_Number 0x31
05ac e5fe       |    |		Load	0x2,-0x2
05ad 00db       |    |		Load_Top	At_Offset_3
05ae e408       |    |		Load	0x2,0x8
05af 01d5       |    |		Execute	Vector,Field_Reference
05b0 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
05b1 8254       | T  |		Call	0x1,0x54
05b2 c405       |    |		Store	0x2,0x5
05b3 c5fc       |    |		Store	0x2,-0x4
05b4 e405       |    |		Load	0x2,0x5
05b5 6857       |hW  |		Jump_Zero	0x60d
05b6 e404       |    |		Load	0x2,0x4
05b7 e402       |    |		Load	0x2,0x2
05b8 00da       |    |		Load_Top	At_Offset_2
05b9 e408       |    |		Load	0x2,0x8
05ba 01d5       |    |		Execute	Vector,Field_Reference
05bb 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
05bc e405       |    |		Load	0x2,0x5
05bd e5fe       |    |		Load	0x2,-0x2
05be 8253       | S  |		Call	0x1,0x53
05bf c404       |    |		Store	0x2,0x4
05c0 784c       |xL  |		Jump	0x60d
05c1 e012       |    |		Load	0x0,0x12
05c2 6803       |h   |		Jump_Zero	0x5c6
05c3 0092 0b90  |    |		Action	Push_String_Extended,0xb90					; "Changing kinds."
05c5 8013       |    |		Call	0x0,0x13
05c6 e402       |    |		Load	0x2,0x2
05c7 0217       |    |		Execute	Heap_Access,All_Reference
05c8 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
05c9 e406       |    |		Load	0x2,0x6
05ca 01d4       |    |		Execute	Vector,Structure_Write
05cb 00d8       |    |		Load_Top	At_Offset_0
05cc e408       |    |		Load	0x2,0x8
05cd 01d5       |    |		Execute	Vector,Field_Reference
05ce 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
05cf e407       |    |		Load	0x2,0x7
05d0 01d4       |    |		Execute	Vector,Structure_Write
05d1 e406       |    |		Load	0x2,0x6
05d2 e407       |    |		Load	0x2,0x7
05d3 01de       |    |		Execute	Vector,Not_Equal
05d4 6832       |h2  |		Jump_Zero	0x607
05d5 00cf       |    |		Action	Mark_Auxiliary
05d6 4805       |H   |		Short_Literal	0x5
05d7 4802       |H   |		Short_Literal	0x2
05d8 0007       |    |		Action	Break_Optional
05d9 00d8       |    |		Load_Top	At_Offset_0
05da e406       |    |		Load	0x2,0x6
05db 01d7       |    |		Execute	Vector,Field_Read
05dc 6810       |h   |		Jump_Zero	0x5ed
05dd 00d8       |    |		Load_Top	At_Offset_0
05de e407       |    |		Load	0x2,0x7
05df 01d7       |    |		Execute	Vector,Field_Read
05e0 700c       |p   |		Jump_Nonzero	0x5ed
05e1 00d8       |    |		Load_Top	At_Offset_0
05e2 e405       |    |		Load	0x2,0x5
05e3 0217       |    |		Execute	Heap_Access,All_Reference
05e4 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
05e5 01d7       |    |		Execute	Vector,Field_Read
05e6 0aff       |    |		Execute_Immediate	Plus,-0x1
05e7 00d9       |    |		Load_Top	At_Offset_1
05e8 e405       |    |		Load	0x2,0x5
05e9 0217       |    |		Execute	Heap_Access,All_Reference
05ea 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
05eb 01d6       |    |		Execute	Vector,Field_Write
05ec 7813       |x   |		Jump	0x600
05ed 00d8       |    |		Load_Top	At_Offset_0
05ee e407       |    |		Load	0x2,0x7
05ef 01d7       |    |		Execute	Vector,Field_Read
05f0 680f       |h   |		Jump_Zero	0x600
05f1 00d8       |    |		Load_Top	At_Offset_0
05f2 e406       |    |		Load	0x2,0x6
05f3 01d7       |    |		Execute	Vector,Field_Read
05f4 700b       |p   |		Jump_Nonzero	0x600
05f5 00d8       |    |		Load_Top	At_Offset_0
05f6 e405       |    |		Load	0x2,0x5
05f7 0217       |    |		Execute	Heap_Access,All_Reference
05f8 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
05f9 01d7       |    |		Execute	Vector,Field_Read
05fa 0a01       |    |		Execute_Immediate	Plus,0x1
05fb 00d9       |    |		Load_Top	At_Offset_1
05fc e405       |    |		Load	0x2,0x5
05fd 0217       |    |		Execute	Heap_Access,All_Reference
05fe 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
05ff 01d6       |    |		Execute	Vector,Field_Write
0600 00c8       |    |		Action	Pop_Auxiliary_Range
0601 3fd7       |?   |		Loop_Increasing	0x5d9
0602 00ce       |    |		Action	Pop_Auxiliary
0603 e407       |    |		Load	0x2,0x7
0604 e402       |    |		Load	0x2,0x2
0605 0217       |    |		Execute	Heap_Access,All_Reference
0606 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0607 e402       |    |		Load	0x2,0x2
0608 a404       |    |		Store_Unchecked	0x2,0x4
0609 e402       |    |		Load	0x2,0x2
060a 0217       |    |		Execute	Heap_Access,All_Reference
060b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
060c a402       |    |		Store_Unchecked	0x2,0x2
060d 00c8       |    |		Action	Pop_Auxiliary_Range
060e 3f52       |?R  |		Loop_Increasing	0x561
060f 00c9       |    |		Action	Pop_Auxiliary_Loop
0610 780d       |x   |		Jump	0x61e
0611 e402       |    |		Load	0x2,0x2
0612 0217       |    |		Execute	Heap_Access,All_Reference
0613 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0614 a403       |    |		Store_Unchecked	0x2,0x3
0615 e402       |    |		Load	0x2,0x2
0616 e404       |    |		Load	0x2,0x4
0617 e5fe       |    |		Load	0x2,-0x2
0618 8255       | U  |		Call	0x1,0x55
0619 c404       |    |		Store	0x2,0x4
061a c402       |    |		Store	0x2,0x2
061b e403       |    |		Load	0x2,0x3
061c a402       |    |		Store_Unchecked	0x2,0x2
061d 00c9       |    |		Action	Pop_Auxiliary_Loop
061e e402       |    |		Load	0x2,0x2
061f 77f1       |w   |		Jump_Nonzero	0x611
0620 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0621 0000 0000  |    |		.BLANK	0000[0x7]
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 00da       |    |		Load_Top	At_Offset_2
062c 0217       |    |		Execute	Heap_Access,All_Reference
062d 341a       |4   |		Execute	Record,Field_Reference,Field_Number 0x1a
062e 0335       | 5  |		Declare_Variable	Array,Duplicate
062f 00cd       |    |		Action	Spare6_Action
0630 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0631 0000 0000  |    |		.BLANK	0000[0x7]
0638 ; --------------------------------------------------------------------------------------
0638 ; SUBPROGRAM
0638 ; --------------------------------------------------------------------------------------
0638 063b       | ;  |		.CONST	0x063b								; Address of begin
0639 0004       |    |		.CONST	0x0004								; Address of exception handler
063a 0001       |    |		.CONST	0x0001								; Number of locals
063b			BODY_0638:
063b			INIT_0638:
063b 00db       |    |		Load_Top	At_Offset_3
063c 00db       |    |		Load_Top	At_Offset_3
063d 0217       |    |		Execute	Heap_Access,All_Reference
063e 381a       |8   |		Execute	Record,Field_Write,Field_Number 0x1a
063f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0640 ; --------------------------------------------------------------------------------------
0640 ; SUBPROGRAM
0640 ; --------------------------------------------------------------------------------------
0640 064e       | N  |		.CONST	0x064e								; Address of begin
0641 0004       |    |		.CONST	0x0004								; Address of exception handler
0642 0004       |    |		.CONST	0x0004								; Number of locals
0643			INIT_0640:
0643 e217       |    |		Load	0x1,0x17
0644 0337       | 7  |		Declare_Variable	Array
0645 e5fe       |    |		Load	0x2,-0x2
0646 00d9       |    |		Load_Top	At_Offset_1
0647 01d4       |    |		Execute	Vector,Structure_Write
0648 00db       |    |		Load_Top	At_Offset_3
0649 0217       |    |		Execute	Heap_Access,All_Reference
064a 3c19       |<   |		Execute	Record,Field_Read,Field_Number 0x19
064b 0007       |    |		Action	Break_Optional
064c 00e3       |    |		Load_Encached	Natural_Cache
064d 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
064e			BODY_0640:
064e e5fe       |    |		Load	0x2,-0x2
064f e22f       | /  |		Load	0x1,0x2f
0650 01df       |    |		Execute	Vector,Equal
0651 6805       |h   |		Jump_Zero	0x657
0652 e5ff       |    |		Load	0x2,-0x1
0653 0217       |    |		Execute	Heap_Access,All_Reference
0654 341a       |4   |		Execute	Record,Field_Reference,Field_Number 0x1a
0655 00db       |    |		Load_Top	At_Offset_3
0656 01d4       |    |		Execute	Vector,Structure_Write
0657 e5fe       |    |		Load	0x2,-0x2
0658 e218       |    |		Load	0x1,0x18
0659 01df       |    |		Execute	Vector,Equal
065a 6804       |h   |		Jump_Zero	0x65f
065b e5ff       |    |		Load	0x2,-0x1
065c 0217       |    |		Execute	Heap_Access,All_Reference
065d 3c18       |<   |		Execute	Record,Field_Read,Field_Number 0x18
065e 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
065f 00cf       |    |		Action	Mark_Auxiliary
0660 7810       |x   |		Jump	0x671
0661 00da       |    |		Load_Top	At_Offset_2
0662 0217       |    |		Execute	Heap_Access,All_Reference
0663 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0664 e402       |    |		Load	0x2,0x2
0665 01d3       |    |		Execute	Vector,And
0666 e234       | 4  |		Load	0x1,0x34
0667 01de       |    |		Execute	Vector,Not_Equal
0668 6803       |h   |		Jump_Zero	0x66c
0669 00d9       |    |		Load_Top	At_Offset_1
066a 0a01       |    |		Execute_Immediate	Plus,0x1
066b 005a       | Z  |		Store_Top	Discrete,At_Offset_2
066c 00da       |    |		Load_Top	At_Offset_2
066d 0217       |    |		Execute	Heap_Access,All_Reference
066e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
066f 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0670 00c9       |    |		Action	Pop_Auxiliary_Loop
0671 00da       |    |		Load_Top	At_Offset_2
0672 77ee       |w   |		Jump_Nonzero	0x661
0673 00ce       |    |		Action	Pop_Auxiliary
0674 00d8       |    |		Load_Top	At_Offset_0
0675 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0676 0000 0000  |    |		.XXX[0x2]
0678 ; --------------------------------------------------------------------------------------
0678 ; SUBPROGRAM
0678 ; --------------------------------------------------------------------------------------
0678 068d       |    |		.CONST	0x068d								; Address of begin
0679 0004       |    |		.CONST	0x0004								; Address of exception handler
067a 0005       |    |		.CONST	0x0005								; Number of locals
067b			INIT_0678:
067b e217       |    |		Load	0x1,0x17
067c 0337       | 7  |		Declare_Variable	Array
067d e5fe       |    |		Load	0x2,-0x2
067e 00d9       |    |		Load_Top	At_Offset_1
067f 01d4       |    |		Execute	Vector,Structure_Write
0680 00db       |    |		Load_Top	At_Offset_3
0681 0217       |    |		Execute	Heap_Access,All_Reference
0682 3c19       |<   |		Execute	Record,Field_Read,Field_Number 0x19
0683 0007       |    |		Action	Break_Optional
0684 00e3       |    |		Load_Encached	Natural_Cache
0685 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0686 4801       |H   |		Short_Literal	0x1
0687 e5ff       |    |		Load	0x2,-0x1
0688 0217       |    |		Execute	Heap_Access,All_Reference
0689 3c18       |<   |		Execute	Record,Field_Read,Field_Number 0x18
068a e21e       |    |		Load	0x1,0x1e
068b 035b       | [  |		Declare_Type	Array,Constrained
068c 0337       | 7  |		Declare_Variable	Array
068d			BODY_0678:
068d e5fe       |    |		Load	0x2,-0x2
068e e22f       | /  |		Load	0x1,0x2f
068f 01df       |    |		Execute	Vector,Equal
0690 6805       |h   |		Jump_Zero	0x696
0691 e5ff       |    |		Load	0x2,-0x1
0692 0217       |    |		Execute	Heap_Access,All_Reference
0693 341a       |4   |		Execute	Record,Field_Reference,Field_Number 0x1a
0694 e402       |    |		Load	0x2,0x2
0695 01d4       |    |		Execute	Vector,Structure_Write
0696 00cf       |    |		Action	Mark_Auxiliary
0697 7816       |x   |		Jump	0x6ae
0698 00db       |    |		Load_Top	At_Offset_3
0699 0217       |    |		Execute	Heap_Access,All_Reference
069a 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
069b e402       |    |		Load	0x2,0x2
069c 01d3       |    |		Execute	Vector,And
069d e234       | 4  |		Load	0x1,0x34
069e 01de       |    |		Execute	Vector,Not_Equal
069f 6809       |h   |		Jump_Zero	0x6a9
06a0 00da       |    |		Load_Top	At_Offset_2
06a1 0a01       |    |		Execute_Immediate	Plus,0x1
06a2 005b       | [  |		Store_Top	Discrete,At_Offset_3
06a3 00db       |    |		Load_Top	At_Offset_3
06a4 0217       |    |		Execute	Heap_Access,All_Reference
06a5 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
06a6 00db       |    |		Load_Top	At_Offset_3
06a7 00db       |    |		Load_Top	At_Offset_3
06a8 01d6       |    |		Execute	Vector,Field_Write
06a9 00db       |    |		Load_Top	At_Offset_3
06aa 0217       |    |		Execute	Heap_Access,All_Reference
06ab 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
06ac a403       |    |		Store_Unchecked	0x2,0x3
06ad 00c9       |    |		Action	Pop_Auxiliary_Loop
06ae 00db       |    |		Load_Top	At_Offset_3
06af 77e8       |w   |		Jump_Nonzero	0x698
06b0 00ce       |    |		Action	Pop_Auxiliary
06b1 00d9       |    |		Load_Top	At_Offset_1
06b2 e21f       |    |		Load	0x1,0x1f
06b3 1c08       |    |		Execute_Immediate	Run_Utility,0x8
06b4 4800       |H   |		Short_Literal	0x0
06b5 00d9       |    |		Load_Top	At_Offset_1
06b6 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
06b7 4801       |H   |		Short_Literal	0x1
06b8 00db       |    |		Load_Top	At_Offset_3
06b9 00db       |    |		Load_Top	At_Offset_3
06ba 01cf       |    |		Execute	Vector,Slice_Read
06bb 00d9       |    |		Load_Top	At_Offset_1
06bc 00d8       |    |		Load_Top	At_Offset_0
06bd 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06be 00da       |    |		Load_Top	At_Offset_2
06bf 01da       |    |		Execute	Vector,Bounds
06c0 00da       |    |		Load_Top	At_Offset_2
06c1 01da       |    |		Execute	Vector,Bounds
06c2 00da       |    |		Load_Top	At_Offset_2
06c3 027f       |    |		Execute	Discrete,Equal
06c4 7001       |p   |		Jump_Nonzero	0x6c6
06c5 08e0       |    |		Execute_Immediate	Raise,0xe0
06c6 00cd       |    |		Action	Spare6_Action
06c7 027f       |    |		Execute	Discrete,Equal
06c8 7001       |p   |		Jump_Nonzero	0x6ca
06c9 08e0       |    |		Execute_Immediate	Raise,0xe0
06ca 00d2       |    |		Pop_Control	Pop_Count_2
06cb 00d9       |    |		Load_Top	At_Offset_1
06cc 2903       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
06cd 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06ce 0000 0000  |    |		.XXX[0x2]
06d0 ; --------------------------------------------------------------------------------------
06d0 ; SUBPROGRAM
06d0 ; --------------------------------------------------------------------------------------
06d0 06d6       |    |		.CONST	0x06d6								; Address of begin
06d1 0004       |    |		.CONST	0x0004								; Address of exception handler
06d2 0002       |    |		.CONST	0x0002								; Number of locals
06d3			INIT_06d0:
06d3 00db       |    |		Load_Top	At_Offset_3
06d4 0217       |    |		Execute	Heap_Access,All_Reference
06d5 3c19       |<   |		Execute	Record,Field_Read,Field_Number 0x19
06d6			BODY_06d0:
06d6 00cf       |    |		Action	Mark_Auxiliary
06d7 7811       |x   |		Jump	0x6e9
06d8 00d9       |    |		Load_Top	At_Offset_1
06d9 0217       |    |		Execute	Heap_Access,All_Reference
06da 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
06db e5ff       |    |		Load	0x2,-0x1
06dc 021f       |    |		Execute	Heap_Access,Equal
06dd 6806       |h   |		Jump_Zero	0x6e4
06de 00d9       |    |		Load_Top	At_Offset_1
06df 0217       |    |		Execute	Heap_Access,All_Reference
06e0 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
06e1 0335       | 5  |		Declare_Variable	Array,Duplicate
06e2 00cd       |    |		Action	Spare6_Action
06e3 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06e4 00d9       |    |		Load_Top	At_Offset_1
06e5 0217       |    |		Execute	Heap_Access,All_Reference
06e6 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
06e7 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
06e8 00c9       |    |		Action	Pop_Auxiliary_Loop
06e9 00d9       |    |		Load_Top	At_Offset_1
06ea 77ed       |w   |		Jump_Nonzero	0x6d8
06eb 00ce       |    |		Action	Pop_Auxiliary
06ec e234       | 4  |		Load	0x1,0x34
06ed 0335       | 5  |		Declare_Variable	Array,Duplicate
06ee 00cd       |    |		Action	Spare6_Action
06ef 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06f0 ; --------------------------------------------------------------------------------------
06f0 ; SUBPROGRAM
06f0 ; --------------------------------------------------------------------------------------
06f0 06f3       |    |		.CONST	0x06f3								; Address of begin
06f1 0004       |    |		.CONST	0x0004								; Address of exception handler
06f2 0001       |    |		.CONST	0x0001								; Number of locals
06f3			BODY_06f0:
06f3			INIT_06f0:
06f3 00da       |    |		Load_Top	At_Offset_2
06f4 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
06f5 e004       |    |		Load	0x0,0x4
06f6 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06f7 e5fe       |    |		Load	0x2,-0x2
06f8 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
06f9 e004       |    |		Load	0x0,0x4
06fa 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06fb 027c       | |  |		Execute	Discrete,Less
06fc 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06fd 0000 0000  |    |		.XXX[0x3]
06ff 0000       |    |
0700 ; --------------------------------------------------------------------------------------
0700 ; SUBPROGRAM
0700 ; --------------------------------------------------------------------------------------
0700 0703       |    |		.CONST	0x0703								; Address of begin
0701 0004       |    |		.CONST	0x0004								; Address of exception handler
0702 0001       |    |		.CONST	0x0001								; Number of locals
0703			BODY_0700:
0703			INIT_0700:
0703 00da       |    |		Load_Top	At_Offset_2
0704 0217       |    |		Execute	Heap_Access,All_Reference
0705 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0706 e004       |    |		Load	0x0,0x4
0707 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0708 e5fe       |    |		Load	0x2,-0x2
0709 0217       |    |		Execute	Heap_Access,All_Reference
070a 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
070b e004       |    |		Load	0x0,0x4
070c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
070d 027b       | {  |		Execute	Discrete,Greater_Equal
070e 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
070f 0000       |    |		.XXX[0x1]
0710 ; --------------------------------------------------------------------------------------
0710 ; SUBPROGRAM
0710 ; --------------------------------------------------------------------------------------
0710 0713       |    |		.CONST	0x0713								; Address of begin
0711 0004       |    |		.CONST	0x0004								; Address of exception handler
0712 0001       |    |		.CONST	0x0001								; Number of locals
0713			BODY_0710:
0713			INIT_0710:
0713 00da       |    |		Load_Top	At_Offset_2
0714 0217       |    |		Execute	Heap_Access,All_Reference
0715 340d       |4   |		Execute	Record,Field_Reference,Field_Number 0xd
0716 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0717 e004       |    |		Load	0x0,0x4
0718 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0719 e5fe       |    |		Load	0x2,-0x2
071a 0217       |    |		Execute	Heap_Access,All_Reference
071b 340d       |4   |		Execute	Record,Field_Reference,Field_Number 0xd
071c 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
071d e004       |    |		Load	0x0,0x4
071e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
071f 027b       | {  |		Execute	Discrete,Greater_Equal
0720 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0721 0000 0000  |    |		.BLANK	0000[0x7]
0728 ; --------------------------------------------------------------------------------------
0728 ; SUBPROGRAM
0728 ; --------------------------------------------------------------------------------------
0728 072b       | +  |		.CONST	0x072b								; Address of begin
0729 0004       |    |		.CONST	0x0004								; Address of exception handler
072a 0001       |    |		.CONST	0x0001								; Number of locals
072b			BODY_0728:
072b			INIT_0728:
072b 00da       |    |		Load_Top	At_Offset_2
072c e004       |    |		Load	0x0,0x4
072d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
072e e5fe       |    |		Load	0x2,-0x2
072f e004       |    |		Load	0x0,0x4
0730 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0731 027d       | }  |		Execute	Discrete,Greater
0732 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0733 0000 0000  |    |		.BLANK	0000[0x5]
0738 ; --------------------------------------------------------------------------------------
0738 ; SUBPROGRAM
0738 ; --------------------------------------------------------------------------------------
0738 073b       | ;  |		.CONST	0x073b								; Address of begin
0739 0004       |    |		.CONST	0x0004								; Address of exception handler
073a 0001       |    |		.CONST	0x0001								; Number of locals
073b			BODY_0738:
073b			INIT_0738:
073b 00db       |    |		Load_Top	At_Offset_3
073c e015       |    |		Load	0x0,0x15
073d 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
073e 00d9       |    |		Load_Top	At_Offset_1
073f 00d0       |    |		Action	Swap_Control
0740 0260       | `  |		Execute	Discrete,In_Type
0741 7001       |p   |		Jump_Nonzero	0x743
0742 0801       |    |		Execute_Immediate	Raise,0x1
0743 00db       |    |		Load_Top	At_Offset_3
0744 e016       |    |		Load	0x0,0x16
0745 e017       |    |		Load	0x0,0x17
0746 a018       |    |		Store_Unchecked	0x0,0x18
0747 e019       |    |		Load	0x0,0x19
0748 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0749 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
074a 0000 0000  |    |		.BLANK	0000[0x6]
0750 ; --------------------------------------------------------------------------------------
0750 ; SUBPROGRAM
0750 ; --------------------------------------------------------------------------------------
0750 0763       | c  |		.CONST	0x0763								; Address of begin
0751 0004       |    |		.CONST	0x0004								; Address of exception handler
0752 0005       |    |		.CONST	0x0005								; Number of locals
0753			INIT_0750:
0753 00da       |    |		Load_Top	At_Offset_2
0754 0217       |    |		Execute	Heap_Access,All_Reference
0755 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0756 0007       |    |		Action	Break_Optional
0757 e004       |    |		Load	0x0,0x4
0758 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0759 02c7       |    |		Declare_Variable	Any
075a e5ff       |    |		Load	0x2,-0x1
075b 0217       |    |		Execute	Heap_Access,All_Reference
075c 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
075d a403       |    |		Store_Unchecked	0x2,0x3
075e 00d9       |    |		Load_Top	At_Offset_1
075f 0217       |    |		Execute	Heap_Access,All_Reference
0760 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0761 029f 0b2b  |   +|		Declare_Subprogram	INIT_0b28,For_Call
0763			BODY_0750:
0763 e5ff       |    |		Load	0x2,-0x1
0764 0217       |    |		Execute	Heap_Access,All_Reference
0765 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0766 7030       |p0  |		Jump_Nonzero	0x797
0767 e012       |    |		Load	0x0,0x12
0768 6808       |h   |		Jump_Zero	0x771
0769 0092 0b91  |    |		Action	Push_String_Extended,0xb91					; "Deleting link object "
076b 00db       |    |		Load_Top	At_Offset_3
076c e004       |    |		Load	0x0,0x4
076d 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
076e 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
076f 01cc       |    |		Execute	Vector,Catenate
0770 8013       |    |		Call	0x0,0x13
0771 8405       |    |		Call	0x2,0x5
0772 00d9       |    |		Load_Top	At_Offset_1
0773 e5ff       |    |		Load	0x2,-0x1
0774 021f       |    |		Execute	Heap_Access,Equal
0775 6807       |h   |		Jump_Zero	0x77d
0776 e5ff       |    |		Load	0x2,-0x1
0777 0217       |    |		Execute	Heap_Access,All_Reference
0778 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0779 e402       |    |		Load	0x2,0x2
077a 0217       |    |		Execute	Heap_Access,All_Reference
077b 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
077c 7816       |x   |		Jump	0x793
077d 00cf       |    |		Action	Mark_Auxiliary
077e 780b       |x   |		Jump	0x78a
077f 00da       |    |		Load_Top	At_Offset_2
0780 0217       |    |		Execute	Heap_Access,All_Reference
0781 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0782 e5ff       |    |		Load	0x2,-0x1
0783 021f       |    |		Execute	Heap_Access,Equal
0784 7007       |p   |		Jump_Nonzero	0x78c
0785 00da       |    |		Load_Top	At_Offset_2
0786 0217       |    |		Execute	Heap_Access,All_Reference
0787 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0788 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0789 00c9       |    |		Action	Pop_Auxiliary_Loop
078a 00da       |    |		Load_Top	At_Offset_2
078b 77f3       |w   |		Jump_Nonzero	0x77f
078c 00ce       |    |		Action	Pop_Auxiliary
078d e5ff       |    |		Load	0x2,-0x1
078e 0217       |    |		Execute	Heap_Access,All_Reference
078f 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0790 00da       |    |		Load_Top	At_Offset_2
0791 0217       |    |		Execute	Heap_Access,All_Reference
0792 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
0793 e5ff       |    |		Load	0x2,-0x1
0794 e011       |    |		Load	0x0,0x11
0795 1833       | 3  |		Execute	Package,Field_Execute,Field_Number 0x33
0796 c5ff       |    |		Store	0x2,-0x1
0797 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0798 ; --------------------------------------------------------------------------------------
0798 ; SUBPROGRAM
0798 ; --------------------------------------------------------------------------------------
0798 07a5       |    |		.CONST	0x07a5								; Address of begin
0799 0004       |    |		.CONST	0x0004								; Address of exception handler
079a 0004       |    |		.CONST	0x0004								; Number of locals
079b			INIT_0798:
079b 00da       |    |		Load_Top	At_Offset_2
079c e011       |    |		Load	0x0,0x11
079d 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
079e 0216       |    |		Execute	Heap_Access,Convert
079f e011       |    |		Load	0x0,0x11
07a0 1b23       | #  |		Execute	Package,Field_Read,Field_Number 0x23
07a1 e5fd       |    |		Load	0x2,-0x3
07a2 0217       |    |		Execute	Heap_Access,All_Reference
07a3 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
07a4 0007       |    |		Action	Break_Optional
07a5			BODY_0798:
07a5 e012       |    |		Load	0x0,0x12
07a6 6812       |h   |		Jump_Zero	0x7b9
07a7 0092 0b92  |    |		Action	Push_String_Extended,0xb92					; "Adding client "
07a9 e5ff       |    |		Load	0x2,-0x1
07aa 0217       |    |		Execute	Heap_Access,All_Reference
07ab 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
07ac e00e       |    |		Load	0x0,0xe
07ad 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
07ae 01cc       |    |		Execute	Vector,Catenate
07af 0092 0b93  |    |		Action	Push_String_Extended,0xb93					; " to link "
07b1 01cc       |    |		Execute	Vector,Catenate
07b2 e5fd       |    |		Load	0x2,-0x3
07b3 0217       |    |		Execute	Heap_Access,All_Reference
07b4 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
07b5 e00e       |    |		Load	0x0,0xe
07b6 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
07b7 01cc       |    |		Execute	Vector,Catenate
07b8 8013       |    |		Call	0x0,0x13
07b9 00cf       |    |		Action	Mark_Auxiliary
07ba 780d       |x   |		Jump	0x7c8
07bb 00db       |    |		Load_Top	At_Offset_3
07bc 00da       |    |		Load_Top	At_Offset_2
07bd 0217       |    |		Execute	Heap_Access,All_Reference
07be 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
07bf 823e       | >  |		Call	0x1,0x3e
07c0 700d       |p   |		Jump_Nonzero	0x7ce
07c1 00d9       |    |		Load_Top	At_Offset_1
07c2 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
07c3 00d9       |    |		Load_Top	At_Offset_1
07c4 0217       |    |		Execute	Heap_Access,All_Reference
07c5 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
07c6 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
07c7 00c9       |    |		Action	Pop_Auxiliary_Loop
07c8 00d9       |    |		Load_Top	At_Offset_1
07c9 6804       |h   |		Jump_Zero	0x7ce
07ca 00d9       |    |		Load_Top	At_Offset_1
07cb 0217       |    |		Execute	Heap_Access,All_Reference
07cc 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
07cd 77ed       |w   |		Jump_Nonzero	0x7bb
07ce 00ce       |    |		Action	Pop_Auxiliary
07cf 00d8       |    |		Load_Top	At_Offset_0
07d0 6806       |h   |		Jump_Zero	0x7d7
07d1 00d8       |    |		Load_Top	At_Offset_0
07d2 0217       |    |		Execute	Heap_Access,All_Reference
07d3 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
07d4 00db       |    |		Load_Top	At_Offset_3
07d5 021f       |    |		Execute	Heap_Access,Equal
07d6 702c       |p,  |		Jump_Nonzero	0x803
07d7 e5ff       |    |		Load	0x2,-0x1
07d8 e001       |    |		Load	0x0,0x1
07d9 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
07da 185f       | _  |		Execute	Package,Field_Execute,Field_Number 0x5f
07db e011       |    |		Load	0x0,0x11
07dc 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
07dd 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
07de e5ff       |    |		Load	0x2,-0x1
07df e011       |    |		Load	0x0,0x11
07e0 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
07e1 0216       |    |		Execute	Heap_Access,Convert
07e2 00d9       |    |		Load_Top	At_Offset_1
07e3 0217       |    |		Execute	Heap_Access,All_Reference
07e4 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
07e5 00d9       |    |		Load_Top	At_Offset_1
07e6 700b       |p   |		Jump_Nonzero	0x7f2
07e7 e5fd       |    |		Load	0x2,-0x3
07e8 0217       |    |		Execute	Heap_Access,All_Reference
07e9 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
07ea 00d9       |    |		Load_Top	At_Offset_1
07eb 0217       |    |		Execute	Heap_Access,All_Reference
07ec 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
07ed 00d8       |    |		Load_Top	At_Offset_0
07ee e5fd       |    |		Load	0x2,-0x3
07ef 0217       |    |		Execute	Heap_Access,All_Reference
07f0 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
07f1 780a       |x   |		Jump	0x7fc
07f2 00d9       |    |		Load_Top	At_Offset_1
07f3 0217       |    |		Execute	Heap_Access,All_Reference
07f4 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
07f5 00d9       |    |		Load_Top	At_Offset_1
07f6 0217       |    |		Execute	Heap_Access,All_Reference
07f7 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
07f8 00d8       |    |		Load_Top	At_Offset_0
07f9 00da       |    |		Load_Top	At_Offset_2
07fa 0217       |    |		Execute	Heap_Access,All_Reference
07fb 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
07fc e5fd       |    |		Load	0x2,-0x3
07fd 0217       |    |		Execute	Heap_Access,All_Reference
07fe 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
07ff 0a01       |    |		Execute_Immediate	Plus,0x1
0800 e5fd       |    |		Load	0x2,-0x3
0801 0217       |    |		Execute	Heap_Access,All_Reference
0802 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
0803 00cf       |    |		Action	Mark_Auxiliary
0804 4805       |H   |		Short_Literal	0x5
0805 4802       |H   |		Short_Literal	0x2
0806 0007       |    |		Action	Break_Optional
0807 00d8       |    |		Load_Top	At_Offset_0
0808 e5fe       |    |		Load	0x2,-0x2
0809 01d7       |    |		Execute	Vector,Field_Read
080a 680b       |h   |		Jump_Zero	0x816
080b 00d8       |    |		Load_Top	At_Offset_0
080c e5fd       |    |		Load	0x2,-0x3
080d 0217       |    |		Execute	Heap_Access,All_Reference
080e 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
080f 01d7       |    |		Execute	Vector,Field_Read
0810 0a01       |    |		Execute_Immediate	Plus,0x1
0811 00d9       |    |		Load_Top	At_Offset_1
0812 e5fd       |    |		Load	0x2,-0x3
0813 0217       |    |		Execute	Heap_Access,All_Reference
0814 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0815 01d6       |    |		Execute	Vector,Field_Write
0816 00c8       |    |		Action	Pop_Auxiliary_Range
0817 3fef       |?   |		Loop_Increasing	0x807
0818 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0819 0000 0000  |    |		.BLANK	0000[0x7]
0820 ; --------------------------------------------------------------------------------------
0820 ; SUBPROGRAM
0820 ; --------------------------------------------------------------------------------------
0820 0823       | #  |		.CONST	0x0823								; Address of begin
0821 0004       |    |		.CONST	0x0004								; Address of exception handler
0822 0001       |    |		.CONST	0x0001								; Number of locals
0823			BODY_0820:
0823			INIT_0820:
0823 00cf       |    |		Action	Mark_Auxiliary
0824 4805       |H   |		Short_Literal	0x5
0825 4802       |H   |		Short_Literal	0x2
0826 0007       |    |		Action	Break_Optional
0827 00d8       |    |		Load_Top	At_Offset_0
0828 e5ff       |    |		Load	0x2,-0x1
0829 01d7       |    |		Execute	Vector,Field_Read
082a 680b       |h   |		Jump_Zero	0x836
082b 00d8       |    |		Load_Top	At_Offset_0
082c e5fe       |    |		Load	0x2,-0x2
082d 0217       |    |		Execute	Heap_Access,All_Reference
082e 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
082f 01d7       |    |		Execute	Vector,Field_Read
0830 0aff       |    |		Execute_Immediate	Plus,-0x1
0831 00d9       |    |		Load_Top	At_Offset_1
0832 e5fe       |    |		Load	0x2,-0x2
0833 0217       |    |		Execute	Heap_Access,All_Reference
0834 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0835 01d6       |    |		Execute	Vector,Field_Write
0836 00c8       |    |		Action	Pop_Auxiliary_Range
0837 3fef       |?   |		Loop_Increasing	0x827
0838 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0839 0000 0000  |    |		.BLANK	0000[0x7]
0840 ; --------------------------------------------------------------------------------------
0840 ; SUBPROGRAM
0840 ; --------------------------------------------------------------------------------------
0840 084d       | M  |		.CONST	0x084d								; Address of begin
0841 0004       |    |		.CONST	0x0004								; Address of exception handler
0842 0004       |    |		.CONST	0x0004								; Number of locals
0843			INIT_0840:
0843 00da       |    |		Load_Top	At_Offset_2
0844 e011       |    |		Load	0x0,0x11
0845 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
0846 0216       |    |		Execute	Heap_Access,Convert
0847 e011       |    |		Load	0x0,0x11
0848 1b23       | #  |		Execute	Package,Field_Read,Field_Number 0x23
0849 e5fd       |    |		Load	0x2,-0x3
084a 0217       |    |		Execute	Heap_Access,All_Reference
084b 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
084c 0007       |    |		Action	Break_Optional
084d			BODY_0840:
084d e012       |    |		Load	0x0,0x12
084e 6812       |h   |		Jump_Zero	0x861
084f 0092 0b94  |    |		Action	Push_String_Extended,0xb94					; "Deleting client "
0851 e5ff       |    |		Load	0x2,-0x1
0852 0217       |    |		Execute	Heap_Access,All_Reference
0853 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
0854 e00e       |    |		Load	0x0,0xe
0855 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0856 01cc       |    |		Execute	Vector,Catenate
0857 0092 0b95  |    |		Action	Push_String_Extended,0xb95					; " from link "
0859 01cc       |    |		Execute	Vector,Catenate
085a e5fd       |    |		Load	0x2,-0x3
085b 0217       |    |		Execute	Heap_Access,All_Reference
085c 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
085d e00e       |    |		Load	0x0,0xe
085e 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
085f 01cc       |    |		Execute	Vector,Catenate
0860 8013       |    |		Call	0x0,0x13
0861 00cf       |    |		Action	Mark_Auxiliary
0862 7846       |xF  |		Jump	0x8a9
0863 00d9       |    |		Load_Top	At_Offset_1
0864 0217       |    |		Execute	Heap_Access,All_Reference
0865 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0866 e402       |    |		Load	0x2,0x2
0867 021f       |    |		Execute	Heap_Access,Equal
0868 7007       |p   |		Jump_Nonzero	0x870
0869 00d9       |    |		Load_Top	At_Offset_1
086a 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
086b 00d9       |    |		Load_Top	At_Offset_1
086c 0217       |    |		Execute	Heap_Access,All_Reference
086d 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
086e 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
086f 7838       |x8  |		Jump	0x8a8
0870 00da       |    |		Load_Top	At_Offset_2
0871 7007       |p   |		Jump_Nonzero	0x879
0872 00d9       |    |		Load_Top	At_Offset_1
0873 0217       |    |		Execute	Heap_Access,All_Reference
0874 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0875 e5fd       |    |		Load	0x2,-0x3
0876 0217       |    |		Execute	Heap_Access,All_Reference
0877 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
0878 7806       |x   |		Jump	0x87f
0879 00d9       |    |		Load_Top	At_Offset_1
087a 0217       |    |		Execute	Heap_Access,All_Reference
087b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
087c 00db       |    |		Load_Top	At_Offset_3
087d 0217       |    |		Execute	Heap_Access,All_Reference
087e 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
087f 00d9       |    |		Load_Top	At_Offset_1
0880 e011       |    |		Load	0x0,0x11
0881 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0882 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0883 00cf       |    |		Action	Mark_Auxiliary
0884 4805       |H   |		Short_Literal	0x5
0885 4802       |H   |		Short_Literal	0x2
0886 0007       |    |		Action	Break_Optional
0887 00d8       |    |		Load_Top	At_Offset_0
0888 e5fe       |    |		Load	0x2,-0x2
0889 01d7       |    |		Execute	Vector,Field_Read
088a 680b       |h   |		Jump_Zero	0x896
088b 00d8       |    |		Load_Top	At_Offset_0
088c e5fd       |    |		Load	0x2,-0x3
088d 0217       |    |		Execute	Heap_Access,All_Reference
088e 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
088f 01d7       |    |		Execute	Vector,Field_Read
0890 0aff       |    |		Execute_Immediate	Plus,-0x1
0891 00d9       |    |		Load_Top	At_Offset_1
0892 e5fd       |    |		Load	0x2,-0x3
0893 0217       |    |		Execute	Heap_Access,All_Reference
0894 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0895 01d6       |    |		Execute	Vector,Field_Write
0896 00c8       |    |		Action	Pop_Auxiliary_Range
0897 3fef       |?   |		Loop_Increasing	0x887
0898 00ce       |    |		Action	Pop_Auxiliary
0899 e5fd       |    |		Load	0x2,-0x3
089a 0217       |    |		Execute	Heap_Access,All_Reference
089b 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
089c 0aff       |    |		Execute_Immediate	Plus,-0x1
089d e5fd       |    |		Load	0x2,-0x3
089e 0217       |    |		Execute	Heap_Access,All_Reference
089f 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
08a0 e5fd       |    |		Load	0x2,-0x3
08a1 0217       |    |		Execute	Heap_Access,All_Reference
08a2 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
08a3 7003       |p   |		Jump_Nonzero	0x8a7
08a4 e5fd       |    |		Load	0x2,-0x3
08a5 824f       | O  |		Call	0x1,0x4f
08a6 c5fd       |    |		Store	0x2,-0x3
08a7 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
08a8 00c9       |    |		Action	Pop_Auxiliary_Loop
08a9 00d9       |    |		Load_Top	At_Offset_1
08aa 77b8       |w   |		Jump_Nonzero	0x863
08ab 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
08ac 0000 0000  |    |		.BLANK	0000[0x4]
08b0 ; --------------------------------------------------------------------------------------
08b0 ; SUBPROGRAM
08b0 ; --------------------------------------------------------------------------------------
08b0 08b9       |    |		.CONST	0x08b9								; Address of begin
08b1 0004       |    |		.CONST	0x0004								; Address of exception handler
08b2 0002       |    |		.CONST	0x0002								; Number of locals
08b3			INIT_08b0:
08b3 00da       |    |		Load_Top	At_Offset_2
08b4 e001       |    |		Load	0x0,0x1
08b5 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
08b6 185f       | _  |		Execute	Package,Field_Execute,Field_Number 0x5f
08b7 e011       |    |		Load	0x0,0x11
08b8 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
08b9			BODY_08b0:
08b9 e012       |    |		Load	0x0,0x12
08ba 6812       |h   |		Jump_Zero	0x8cd
08bb 0092 0b96  |    |		Action	Push_String_Extended,0xb96					; "Adding supplier "
08bd e5fe       |    |		Load	0x2,-0x2
08be 0217       |    |		Execute	Heap_Access,All_Reference
08bf 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
08c0 e00e       |    |		Load	0x0,0xe
08c1 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
08c2 01cc       |    |		Execute	Vector,Catenate
08c3 0092 0b88  |    |		Action	Push_String_Extended,0xb88					; " for "
08c5 01cc       |    |		Execute	Vector,Catenate
08c6 e5ff       |    |		Load	0x2,-0x1
08c7 0217       |    |		Execute	Heap_Access,All_Reference
08c8 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
08c9 e00e       |    |		Load	0x0,0xe
08ca 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
08cb 01cc       |    |		Execute	Vector,Catenate
08cc 8013       |    |		Call	0x0,0x13
08cd e5fe       |    |		Load	0x2,-0x2
08ce 00d9       |    |		Load_Top	At_Offset_1
08cf 0217       |    |		Execute	Heap_Access,All_Reference
08d0 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
08d1 e5fd       |    |		Load	0x2,-0x3
08d2 00d9       |    |		Load_Top	At_Offset_1
08d3 0217       |    |		Execute	Heap_Access,All_Reference
08d4 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
08d5 e5fc       |    |		Load	0x2,-0x4
08d6 00d9       |    |		Load_Top	At_Offset_1
08d7 0217       |    |		Execute	Heap_Access,All_Reference
08d8 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
08d9 e5fb       |    |		Load	0x2,-0x5
08da 7007       |p   |		Jump_Nonzero	0x8e2
08db 00d8       |    |		Load_Top	At_Offset_0
08dc e5ff       |    |		Load	0x2,-0x1
08dd 0217       |    |		Execute	Heap_Access,All_Reference
08de 3819       |8   |		Execute	Record,Field_Write,Field_Number 0x19
08df 00d8       |    |		Load_Top	At_Offset_0
08e0 a5fb       |    |		Store_Unchecked	0x2,-0x5
08e1 7808       |x   |		Jump	0x8ea
08e2 00d8       |    |		Load_Top	At_Offset_0
08e3 e5fb       |    |		Load	0x2,-0x5
08e4 0217       |    |		Execute	Heap_Access,All_Reference
08e5 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
08e6 e5fb       |    |		Load	0x2,-0x5
08e7 0217       |    |		Execute	Heap_Access,All_Reference
08e8 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
08e9 a5fb       |    |		Store_Unchecked	0x2,-0x5
08ea 00db       |    |		Load_Top	At_Offset_3
08eb 0217       |    |		Execute	Heap_Access,All_Reference
08ec 3c18       |<   |		Execute	Record,Field_Read,Field_Number 0x18
08ed 0a01       |    |		Execute_Immediate	Plus,0x1
08ee e5ff       |    |		Load	0x2,-0x1
08ef 0217       |    |		Execute	Heap_Access,All_Reference
08f0 3818       |8   |		Execute	Record,Field_Write,Field_Number 0x18
08f1 e5fe       |    |		Load	0x2,-0x2
08f2 e5fd       |    |		Load	0x2,-0x3
08f3 e5ff       |    |		Load	0x2,-0x1
08f4 8250       | P  |		Call	0x1,0x50
08f5 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
08f6 0000 0000  |    |		.XXX[0x2]
08f8 ; --------------------------------------------------------------------------------------
08f8 ; SUBPROGRAM
08f8 ; --------------------------------------------------------------------------------------
08f8 091b       |    |		.CONST	0x091b								; Address of begin
08f9 0004       |    |		.CONST	0x0004								; Address of exception handler
08fa 0009       |    |		.CONST	0x0009								; Number of locals
08fb			INIT_08f8:
08fb 00db       |    |		Load_Top	At_Offset_3
08fc e001       |    |		Load	0x0,0x1
08fd 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
08fe 185f       | _  |		Execute	Package,Field_Execute,Field_Number 0x5f
08ff e01a       |    |		Load	0x0,0x1a
0900 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0901 02ff       |    |		Declare_Variable	Variant_Record
0902 4802       |H   |		Short_Literal	0x2
0903 00da       |    |		Load_Top	At_Offset_2
0904 e5ff       |    |		Load	0x2,-0x1
0905 e01a       |    |		Load	0x0,0x1a
0906 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0907 00d9       |    |		Load_Top	At_Offset_1
0908 016d       | m  |		Execute	Variant_Record,Structure_Write
0909 e011       |    |		Load	0x0,0x11
090a 1b31       | 1  |		Execute	Package,Field_Read,Field_Number 0x31
090b e004       |    |		Load	0x0,0x4
090c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
090d 02c7       |    |		Declare_Variable	Any
090e 00d8       |    |		Load_Top	At_Offset_0
090f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0910 e004       |    |		Load	0x0,0x4
0911 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0912 02c7       |    |		Declare_Variable	Any
0913 00d8       |    |		Load_Top	At_Offset_0
0914 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0915 e011       |    |		Load	0x0,0x11
0916 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
0917 e00e       |    |		Load	0x0,0xe
0918 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0919 e004       |    |		Load	0x0,0x4
091a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
091b			BODY_08f8:
091b e403       |    |		Load	0x2,0x3
091c 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
091d 0f02       |    |		Execute_Immediate	Equal,0x2
091e 6804       |h   |		Jump_Zero	0x923
091f e403       |    |		Load	0x2,0x3
0920 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0921 a404       |    |		Store_Unchecked	0x2,0x4
0922 7982       |y   |		Jump	0xaa5
0923 e403       |    |		Load	0x2,0x3
0924 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0925 6192       |a   |		Indirect_Literal	Discrete,0xab8,{0x00000000, 0x0000500b}
0926 027f       |    |		Execute	Discrete,Equal
0927 681a       |h   |		Jump_Zero	0x942
0928 e003       |    |		Load	0x0,0x3
0929 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
092a 4801       |H   |		Short_Literal	0x1
092b 4802       |H   |		Short_Literal	0x2
092c e008       |    |		Load	0x0,0x8
092d 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
092e 035b       | [  |		Declare_Type	Array,Constrained
092f 0337       | 7  |		Declare_Variable	Array
0930 e5ff       |    |		Load	0x2,-0x1
0931 e008       |    |		Load	0x0,0x8
0932 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0933 4801       |H   |		Short_Literal	0x1
0934 00da       |    |		Load_Top	At_Offset_2
0935 01d6       |    |		Execute	Vector,Field_Write
0936 e5fe       |    |		Load	0x2,-0x2
0937 e001       |    |		Load	0x0,0x1
0938 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0939 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
093a 4802       |H   |		Short_Literal	0x2
093b 00da       |    |		Load_Top	At_Offset_2
093c 01d6       |    |		Execute	Vector,Field_Write
093d 6176       |av  |		Indirect_Literal	Discrete,0xab4,{0x00000000, 0x00001804}
093e e003       |    |		Load	0x0,0x3
093f 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0940 c5fc       |    |		Store	0x2,-0x4
0941 7963       |yc  |		Jump	0xaa5
0942 e004       |    |		Load	0x0,0x4
0943 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0944 e405       |    |		Load	0x2,0x5
0945 0120       |    |		Execute	Any,Is_Value
0946 6803       |h   |		Jump_Zero	0x94a
0947 e004       |    |		Load	0x0,0x4
0948 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0949 7801       |x   |		Jump	0x94b
094a e405       |    |		Load	0x2,0x5
094b e5ff       |    |		Load	0x2,-0x1
094c e004       |    |		Load	0x0,0x4
094d 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
094e 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
094f c405       |    |		Store	0x2,0x5
0950 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0951 4801       |H   |		Short_Literal	0x1
0952 4801       |H   |		Short_Literal	0x1
0953 e008       |    |		Load	0x0,0x8
0954 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0955 035b       | [  |		Declare_Type	Array,Constrained
0956 0337       | 7  |		Declare_Variable	Array
0957 e5ff       |    |		Load	0x2,-0x1
0958 e008       |    |		Load	0x0,0x8
0959 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
095a 4801       |H   |		Short_Literal	0x1
095b 00da       |    |		Load_Top	At_Offset_2
095c 01d6       |    |		Execute	Vector,Field_Write
095d 6152       |aR  |		Indirect_Literal	Discrete,0xab0,{0x00000000, 0x00001805}
095e 00da       |    |		Load_Top	At_Offset_2
095f e003       |    |		Load	0x0,0x3
0960 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
0961 e405       |    |		Load	0x2,0x5
0962 801b       |    |		Call	0x0,0x1b
0963 6820       |h   |		Jump_Zero	0x984
0964 e004       |    |		Load	0x0,0x4
0965 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0966 e406       |    |		Load	0x2,0x6
0967 0120       |    |		Execute	Any,Is_Value
0968 6803       |h   |		Jump_Zero	0x96c
0969 e004       |    |		Load	0x0,0x4
096a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
096b 7801       |x   |		Jump	0x96d
096c e406       |    |		Load	0x2,0x6
096d e405       |    |		Load	0x2,0x5
096e e004       |    |		Load	0x0,0x4
096f 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
0970 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0971 c406       |    |		Store	0x2,0x6
0972 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0973 4801       |H   |		Short_Literal	0x1
0974 4801       |H   |		Short_Literal	0x1
0975 e008       |    |		Load	0x0,0x8
0976 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0977 035b       | [  |		Declare_Type	Array,Constrained
0978 0337       | 7  |		Declare_Variable	Array
0979 e405       |    |		Load	0x2,0x5
097a e008       |    |		Load	0x0,0x8
097b 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
097c 4801       |H   |		Short_Literal	0x1
097d 00da       |    |		Load_Top	At_Offset_2
097e 01d6       |    |		Execute	Vector,Field_Write
097f 6130       |a0  |		Indirect_Literal	Discrete,0xab0,{0x00000000, 0x00001805}
0980 00da       |    |		Load_Top	At_Offset_2
0981 e003       |    |		Load	0x0,0x3
0982 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
0983 7802       |x   |		Jump	0x986
0984 e405       |    |		Load	0x2,0x5
0985 c406       |    |		Store	0x2,0x6
0986 e402       |    |		Load	0x2,0x2
0987 e406       |    |		Load	0x2,0x6
0988 e001       |    |		Load	0x0,0x1
0989 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
098a 1885       |    |		Execute	Package,Field_Execute,Field_Number 0x85
098b 680f       |h   |		Jump_Zero	0x99b
098c e5fc       |    |		Load	0x2,-0x4
098d e001       |    |		Load	0x0,0x1
098e 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
098f 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
0990 e402       |    |		Load	0x2,0x2
0991 e406       |    |		Load	0x2,0x6
0992 e001       |    |		Load	0x0,0x1
0993 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0994 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
0995 e011       |    |		Load	0x0,0x11
0996 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
0997 0216       |    |		Execute	Heap_Access,Convert
0998 c407       |    |		Store	0x2,0x7
0999 c5fc       |    |		Store	0x2,-0x4
099a 7853       |xS  |		Jump	0x9ee
099b e402       |    |		Load	0x2,0x2
099c 0217       |    |		Execute	Heap_Access,All_Reference
099d 3c0c       |<   |		Execute	Record,Field_Read,Field_Number 0xc
099e 6830       |h0  |		Jump_Zero	0x9cf
099f e402       |    |		Load	0x2,0x2
09a0 0217       |    |		Execute	Heap_Access,All_Reference
09a1 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
09a2 6816       |h   |		Jump_Zero	0x9b9
09a3 e405       |    |		Load	0x2,0x5
09a4 e004       |    |		Load	0x0,0x4
09a5 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
09a6 e01c       |    |		Load	0x0,0x1c
09a7 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
09a8 027f       |    |		Execute	Discrete,Equal
09a9 7007       |p   |		Jump_Nonzero	0x9b1
09aa e405       |    |		Load	0x2,0x5
09ab e004       |    |		Load	0x0,0x4
09ac 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
09ad e01c       |    |		Load	0x0,0x1c
09ae 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
09af 027f       |    |		Execute	Discrete,Equal
09b0 6808       |h   |		Jump_Zero	0x9b9
09b1 e5fc       |    |		Load	0x2,-0x4
09b2 e402       |    |		Load	0x2,0x2
09b3 e405       |    |		Load	0x2,0x5
09b4 e001       |    |		Load	0x0,0x1
09b5 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
09b6 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
09b7 c5fc       |    |		Store	0x2,-0x4
09b8 7807       |x   |		Jump	0x9c0
09b9 e5fc       |    |		Load	0x2,-0x4
09ba e402       |    |		Load	0x2,0x2
09bb e406       |    |		Load	0x2,0x6
09bc e001       |    |		Load	0x0,0x1
09bd 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
09be 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
09bf c5fc       |    |		Store	0x2,-0x4
09c0 e5fc       |    |		Load	0x2,-0x4
09c1 e001       |    |		Load	0x0,0x1
09c2 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
09c3 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
09c4 e402       |    |		Load	0x2,0x2
09c5 e406       |    |		Load	0x2,0x6
09c6 e001       |    |		Load	0x0,0x1
09c7 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
09c8 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
09c9 e011       |    |		Load	0x0,0x11
09ca 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
09cb 0216       |    |		Execute	Heap_Access,Convert
09cc c407       |    |		Store	0x2,0x7
09cd c5fc       |    |		Store	0x2,-0x4
09ce 781f       |x   |		Jump	0x9ee
09cf e003       |    |		Load	0x0,0x3
09d0 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
09d1 4801       |H   |		Short_Literal	0x1
09d2 4803       |H   |		Short_Literal	0x3
09d3 e008       |    |		Load	0x0,0x8
09d4 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
09d5 035b       | [  |		Declare_Type	Array,Constrained
09d6 0337       | 7  |		Declare_Variable	Array
09d7 e406       |    |		Load	0x2,0x6
09d8 e008       |    |		Load	0x0,0x8
09d9 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
09da 4801       |H   |		Short_Literal	0x1
09db 00da       |    |		Load_Top	At_Offset_2
09dc 01d6       |    |		Execute	Vector,Field_Write
09dd e5ff       |    |		Load	0x2,-0x1
09de e008       |    |		Load	0x0,0x8
09df 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
09e0 4802       |H   |		Short_Literal	0x2
09e1 00da       |    |		Load_Top	At_Offset_2
09e2 01d6       |    |		Execute	Vector,Field_Write
09e3 e402       |    |		Load	0x2,0x2
09e4 e001       |    |		Load	0x0,0x1
09e5 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
09e6 185a       | Z  |		Execute	Package,Field_Execute,Field_Number 0x5a
09e7 4803       |H   |		Short_Literal	0x3
09e8 00da       |    |		Load_Top	At_Offset_2
09e9 01d6       |    |		Execute	Vector,Field_Write
09ea 60c1       |`   |		Indirect_Literal	Discrete,0xaac,{0x00000000, 0x00001808}
09eb e003       |    |		Load	0x0,0x3
09ec 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
09ed c5fc       |    |		Store	0x2,-0x4
09ee 4800       |H   |		Short_Literal	0x0
09ef e5fc       |    |		Load	0x2,-0x4
09f0 e003       |    |		Load	0x0,0x3
09f1 1847       | G  |		Execute	Package,Field_Execute,Field_Number 0x47
09f2 7004       |p   |		Jump_Nonzero	0x9f7
09f3 e011       |    |		Load	0x0,0x11
09f4 1b31       | 1  |		Execute	Package,Field_Read,Field_Number 0x31
09f5 a5fd       |    |		Store_Unchecked	0x2,-0x3
09f6 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
09f7 e402       |    |		Load	0x2,0x2
09f8 0217       |    |		Execute	Heap_Access,All_Reference
09f9 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
09fa 701b       |p   |		Jump_Nonzero	0xa16
09fb e402       |    |		Load	0x2,0x2
09fc e5ff       |    |		Load	0x2,-0x1
09fd e405       |    |		Load	0x2,0x5
09fe e00e       |    |		Load	0x0,0xe
09ff 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0a00 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0a01 00da       |    |		Load_Top	At_Offset_2
0a02 0217       |    |		Execute	Heap_Access,All_Reference
0a03 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0a04 a404       |    |		Store_Unchecked	0x2,0x4
0a05 00cf       |    |		Action	Mark_Auxiliary
0a06 780b       |x   |		Jump	0xa12
0a07 00da       |    |		Load_Top	At_Offset_2
0a08 e404       |    |		Load	0x2,0x4
0a09 0217       |    |		Execute	Heap_Access,All_Reference
0a0a 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0a0b 021f       |    |		Execute	Heap_Access,Equal
0a0c 7007       |p   |		Jump_Nonzero	0xa14
0a0d e404       |    |		Load	0x2,0x4
0a0e 0217       |    |		Execute	Heap_Access,All_Reference
0a0f 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0a10 a404       |    |		Store_Unchecked	0x2,0x4
0a11 00c9       |    |		Action	Pop_Auxiliary_Loop
0a12 e404       |    |		Load	0x2,0x4
0a13 77f3       |w   |		Jump_Nonzero	0xa07
0a14 00ce       |    |		Action	Pop_Auxiliary
0a15 7858       |xX  |		Jump	0xa6e
0a16 00da       |    |		Load_Top	At_Offset_2
0a17 0217       |    |		Execute	Heap_Access,All_Reference
0a18 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0a19 e405       |    |		Load	0x2,0x5
0a1a 012e       | .  |		Execute	Any,Not_Equal
0a1b 682e       |h.  |		Jump_Zero	0xa4a
0a1c e003       |    |		Load	0x0,0x3
0a1d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0a1e 4801       |H   |		Short_Literal	0x1
0a1f 4805       |H   |		Short_Literal	0x5
0a20 e008       |    |		Load	0x0,0x8
0a21 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0a22 035b       | [  |		Declare_Type	Array,Constrained
0a23 0337       | 7  |		Declare_Variable	Array
0a24 e405       |    |		Load	0x2,0x5
0a25 e008       |    |		Load	0x0,0x8
0a26 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0a27 4801       |H   |		Short_Literal	0x1
0a28 00da       |    |		Load_Top	At_Offset_2
0a29 01d6       |    |		Execute	Vector,Field_Write
0a2a e406       |    |		Load	0x2,0x6
0a2b e008       |    |		Load	0x0,0x8
0a2c 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0a2d 4802       |H   |		Short_Literal	0x2
0a2e 00da       |    |		Load_Top	At_Offset_2
0a2f 01d6       |    |		Execute	Vector,Field_Write
0a30 e407       |    |		Load	0x2,0x7
0a31 0217       |    |		Execute	Heap_Access,All_Reference
0a32 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0a33 e008       |    |		Load	0x0,0x8
0a34 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0a35 4803       |H   |		Short_Literal	0x3
0a36 00da       |    |		Load_Top	At_Offset_2
0a37 01d6       |    |		Execute	Vector,Field_Write
0a38 e5ff       |    |		Load	0x2,-0x1
0a39 e008       |    |		Load	0x0,0x8
0a3a 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0a3b 4804       |H   |		Short_Literal	0x4
0a3c 00da       |    |		Load_Top	At_Offset_2
0a3d 01d6       |    |		Execute	Vector,Field_Write
0a3e e5fe       |    |		Load	0x2,-0x2
0a3f e001       |    |		Load	0x0,0x1
0a40 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0a41 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0a42 4805       |H   |		Short_Literal	0x5
0a43 00da       |    |		Load_Top	At_Offset_2
0a44 01d6       |    |		Execute	Vector,Field_Write
0a45 6062       |`b  |		Indirect_Literal	Discrete,0xaa8,{0x00000000, 0x00001807}
0a46 e003       |    |		Load	0x0,0x3
0a47 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0a48 c5fc       |    |		Store	0x2,-0x4
0a49 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0a4a e5fe       |    |		Load	0x2,-0x2
0a4b e001       |    |		Load	0x0,0x1
0a4c 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0a4d 185f       | _  |		Execute	Package,Field_Execute,Field_Number 0x5f
0a4e 0217       |    |		Execute	Heap_Access,All_Reference
0a4f 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0a50 e405       |    |		Load	0x2,0x5
0a51 e001       |    |		Load	0x0,0x1
0a52 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0a53 7014       |p   |		Jump_Nonzero	0xa68
0a54 e405       |    |		Load	0x2,0x5
0a55 e004       |    |		Load	0x0,0x4
0a56 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0a57 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
0a58 0092 0b97  |    |		Action	Push_String_Extended,0xb97					; " has no state file.  "
0a5a 01cc       |    |		Execute	Vector,Catenate
0a5b e5ff       |    |		Load	0x2,-0x1
0a5c e004       |    |		Load	0x0,0x4
0a5d 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0a5e 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
0a5f 01cc       |    |		Execute	Vector,Catenate
0a60 0092 0b98  |    |		Action	Push_String_Extended,0xb98					; " will not be considered during build operations."
0a62 01cc       |    |		Execute	Vector,Catenate
0a63 8013       |    |		Call	0x0,0x13
0a64 e011       |    |		Load	0x0,0x11
0a65 1b31       | 1  |		Execute	Package,Field_Read,Field_Number 0x31
0a66 a5fd       |    |		Store_Unchecked	0x2,-0x3
0a67 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0a68 e402       |    |		Load	0x2,0x2
0a69 e5ff       |    |		Load	0x2,-0x1
0a6a e405       |    |		Load	0x2,0x5
0a6b e00e       |    |		Load	0x0,0xe
0a6c 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0a6d 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0a6e e404       |    |		Load	0x2,0x4
0a6f 7035       |p5  |		Jump_Nonzero	0xaa5
0a70 e402       |    |		Load	0x2,0x2
0a71 e011       |    |		Load	0x0,0x11
0a72 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
0a73 a404       |    |		Store_Unchecked	0x2,0x4
0a74 00da       |    |		Load_Top	At_Offset_2
0a75 e404       |    |		Load	0x2,0x4
0a76 0217       |    |		Execute	Heap_Access,All_Reference
0a77 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0a78 00d9       |    |		Load_Top	At_Offset_1
0a79 e404       |    |		Load	0x2,0x4
0a7a 0217       |    |		Execute	Heap_Access,All_Reference
0a7b 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0a7c e402       |    |		Load	0x2,0x2
0a7d 0217       |    |		Execute	Heap_Access,All_Reference
0a7e 3c0e       |<   |		Execute	Record,Field_Read,Field_Number 0xe
0a7f 00db       |    |		Load_Top	At_Offset_3
0a80 021f       |    |		Execute	Heap_Access,Equal
0a81 e404       |    |		Load	0x2,0x4
0a82 0217       |    |		Execute	Heap_Access,All_Reference
0a83 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0a84 e402       |    |		Load	0x2,0x2
0a85 0217       |    |		Execute	Heap_Access,All_Reference
0a86 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
0a87 7004       |p   |		Jump_Nonzero	0xa8c
0a88 e404       |    |		Load	0x2,0x4
0a89 0217       |    |		Execute	Heap_Access,All_Reference
0a8a 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0a8b 680b       |h   |		Jump_Zero	0xa97
0a8c e5ff       |    |		Load	0x2,-0x1
0a8d e404       |    |		Load	0x2,0x4
0a8e 0217       |    |		Execute	Heap_Access,All_Reference
0a8f 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0a90 4800       |H   |		Short_Literal	0x0
0a91 e402       |    |		Load	0x2,0x2
0a92 e404       |    |		Load	0x2,0x4
0a93 e5ff       |    |		Load	0x2,-0x1
0a94 e01a       |    |		Load	0x0,0x1a
0a95 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0a96 7804       |x   |		Jump	0xa9b
0a97 e5ff       |    |		Load	0x2,-0x1
0a98 e404       |    |		Load	0x2,0x4
0a99 0217       |    |		Execute	Heap_Access,All_Reference
0a9a 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0a9b 00da       |    |		Load_Top	At_Offset_2
0a9c 0217       |    |		Execute	Heap_Access,All_Reference
0a9d 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0a9e e404       |    |		Load	0x2,0x4
0a9f 0217       |    |		Execute	Heap_Access,All_Reference
0aa0 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
0aa1 e404       |    |		Load	0x2,0x4
0aa2 00db       |    |		Load_Top	At_Offset_3
0aa3 0217       |    |		Execute	Heap_Access,All_Reference
0aa4 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0aa5 e404       |    |		Load	0x2,0x4
0aa6 a5fd       |    |		Store_Unchecked	0x2,-0x3
0aa7 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0aa8 0000 0000  |    |		.LITERAL	{0x00000000, 0x00001807}
0aac 0000 0000  |    |		.LITERAL	{0x00000000, 0x00001808}
0ab0 0000 0000  |    |		.LITERAL	{0x00000000, 0x00001805}
0ab4 0000 0000  |    |		.LITERAL	{0x00000000, 0x00001804}
0ab8 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000500b}
0abc 0000 0000  |    |		.BLANK	0000[0x4]
0ac0 ; --------------------------------------------------------------------------------------
0ac0 ; SUBPROGRAM
0ac0 ; --------------------------------------------------------------------------------------
0ac0 0ac3       |    |		.CONST	0x0ac3								; Address of begin
0ac1 0004       |    |		.CONST	0x0004								; Address of exception handler
0ac2 0001       |    |		.CONST	0x0001								; Number of locals
0ac3			BODY_0ac0:
0ac3			INIT_0ac0:
0ac3 00db       |    |		Load_Top	At_Offset_3
0ac4 7007       |p   |		Jump_Nonzero	0xacc
0ac5 e5fd       |    |		Load	0x2,-0x3
0ac6 0217       |    |		Execute	Heap_Access,All_Reference
0ac7 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0ac8 00db       |    |		Load_Top	At_Offset_3
0ac9 0217       |    |		Execute	Heap_Access,All_Reference
0aca 3819       |8   |		Execute	Record,Field_Write,Field_Number 0x19
0acb 7806       |x   |		Jump	0xad2
0acc e5fd       |    |		Load	0x2,-0x3
0acd 0217       |    |		Execute	Heap_Access,All_Reference
0ace 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0acf e5fe       |    |		Load	0x2,-0x2
0ad0 0217       |    |		Execute	Heap_Access,All_Reference
0ad1 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0ad2 e5fd       |    |		Load	0x2,-0x3
0ad3 0219       |    |		Execute	Heap_Access,All_Read
0ad4 00d8       |    |		Load_Top	At_Offset_0
0ad5 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0ad6 e5fd       |    |		Load	0x2,-0x3
0ad7 0217       |    |		Execute	Heap_Access,All_Reference
0ad8 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0ad9 e5ff       |    |		Load	0x2,-0x1
0ada 8252       | R  |		Call	0x1,0x52
0adb 00d9       |    |		Load_Top	At_Offset_1
0adc 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0add 00d1       |    |		Pop_Control	Pop_Count_1
0ade e5fd       |    |		Load	0x2,-0x3
0adf e011       |    |		Load	0x0,0x11
0ae0 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
0ae1 c5fd       |    |		Store	0x2,-0x3
0ae2 00da       |    |		Load_Top	At_Offset_2
0ae3 0217       |    |		Execute	Heap_Access,All_Reference
0ae4 3c18       |<   |		Execute	Record,Field_Read,Field_Number 0x18
0ae5 0aff       |    |		Execute_Immediate	Plus,-0x1
0ae6 00db       |    |		Load_Top	At_Offset_3
0ae7 0217       |    |		Execute	Heap_Access,All_Reference
0ae8 3818       |8   |		Execute	Record,Field_Write,Field_Number 0x18
0ae9 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0aea 0000 0000  |    |		.BLANK	0000[0x6]
0af0 ; --------------------------------------------------------------------------------------
0af0 ; SUBPROGRAM
0af0 ; --------------------------------------------------------------------------------------
0af0 0af3       |    |		.CONST	0x0af3								; Address of begin
0af1 0b0e       |    |		.CONST	0x0b0e								; Address of exception handler
0af2 0001       |    |		.CONST	0x0001								; Number of locals
0af3			BODY_0af0:
0af3			INIT_0af0:
0af3 e402       |    |		Load	0x2,0x2
0af4 0217       |    |		Execute	Heap_Access,All_Reference
0af5 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0af6 a403       |    |		Store_Unchecked	0x2,0x3
0af7 e402       |    |		Load	0x2,0x2
0af8 0217       |    |		Execute	Heap_Access,All_Reference
0af9 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0afa 0217       |    |		Execute	Heap_Access,All_Reference
0afb 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0afc e40c       |    |		Load	0x2,0xc
0afd e408       |    |		Load	0x2,0x8
0afe 01d5       |    |		Execute	Vector,Field_Reference
0aff 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0b00 823f       | ?  |		Call	0x1,0x3f
0b01 7003       |p   |		Jump_Nonzero	0xb05
0b02 00cc       |    |		Action	Pop_Block
0b03 00a7 059b  |    |		Action	Jump_Extended,0x59b
0b05 e402       |    |		Load	0x2,0x2
0b06 e404       |    |		Load	0x2,0x4
0b07 e5fe       |    |		Load	0x2,-0x2
0b08 8255       | U  |		Call	0x1,0x55
0b09 c404       |    |		Store	0x2,0x4
0b0a c402       |    |		Store	0x2,0x2
0b0b e403       |    |		Load	0x2,0x3
0b0c a402       |    |		Store_Unchecked	0x2,0x2
0b0d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0b0e			TRAP_0af0:
0b0e 4884       |H   |		Short_Literal	0x84
0b0f 010f       |    |		Execute	Exception,Equal
0b10 6810       |h   |		Jump_Zero	0xb21
0b11 e004       |    |		Load	0x0,0x4
0b12 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0b13 e402       |    |		Load	0x2,0x2
0b14 0217       |    |		Execute	Heap_Access,All_Reference
0b15 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0b16 0217       |    |		Execute	Heap_Access,All_Reference
0b17 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0b18 e402       |    |		Load	0x2,0x2
0b19 e404       |    |		Load	0x2,0x4
0b1a e5fe       |    |		Load	0x2,-0x2
0b1b 8255       | U  |		Call	0x1,0x55
0b1c c404       |    |		Store	0x2,0x4
0b1d c402       |    |		Store	0x2,0x2
0b1e e403       |    |		Load	0x2,0x3
0b1f a402       |    |		Store_Unchecked	0x2,0x2
0b20 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0b21 0100       |    |		Execute	Exception,Raise
0b22 0000 0000  |    |		.BLANK	0000[0x6]
0b28 ; --------------------------------------------------------------------------------------
0b28 ; SUBPROGRAM
0b28 ; --------------------------------------------------------------------------------------
0b28 0b2b       | +  |		.CONST	0x0b2b								; Address of begin
0b29 0b34       | 4  |		.CONST	0x0b34								; Address of exception handler
0b2a 0001       |    |		.CONST	0x0001								; Number of locals
0b2b			BODY_0b28:
0b2b			INIT_0b28:
0b2b e5ff       |    |		Load	0x2,-0x1
0b2c e009       |    |		Load	0x0,0x9
0b2d 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0b2e e011       |    |		Load	0x0,0x11
0b2f 1841       | A  |		Execute	Package,Field_Execute,Field_Number 0x41
0b30 e403       |    |		Load	0x2,0x3
0b31 e01a       |    |		Load	0x0,0x1a
0b32 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0b33 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0b34			TRAP_0b28:
0b34 0007       |    |		Action	Break_Optional
0b35 0092 0b99  |    |		Action	Push_String_Extended,0xb99					; "Link object being Deleted "
0b37 e403       |    |		Load	0x2,0x3
0b38 e004       |    |		Load	0x0,0x4
0b39 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0b3a 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
0b3b 01cc       |    |		Execute	Vector,Catenate
0b3c 0092 0b9a  |    |		Action	Push_String_Extended,0xb9a					; " is not in the map."
0b3e 01cc       |    |		Execute	Vector,Catenate
0b3f 8013       |    |		Call	0x0,0x13
0b40 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0b41 0000 0000  |    |		.BLANK	0000[0x7]
0b48 ; --------------------------------------------------------------------------------------
0b48 ; SUBPROGRAM
0b48 ; --------------------------------------------------------------------------------------
0b48 0b4b       | K  |		.CONST	0x0b4b								; Address of begin
0b49 0004       |    |		.CONST	0x0004								; Address of exception handler
0b4a 0001       |    |		.CONST	0x0001								; Number of locals
0b4b			BODY_0b48:
0b4b			INIT_0b48:
0b4b 4608       |F   |		Jump_Case	0x9
0b4c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
0b4d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
0b4e 7819       |x   |		Jump	0xb68								; case 0x2
0b4f 7818       |x   |		Jump	0xb68								; case 0x3
0b50 7817       |x   |		Jump	0xb68								; case 0x4
0b51 7816       |x   |		Jump	0xb68								; case 0x5
0b52 7815       |x   |		Jump	0xb68								; case 0x6
0b53 7801       |x   |		Jump	0xb55								; case 0x7
0b54 7809       |x   |		Jump	0xb5e								; case 0x8
0b55 00db       |    |		Load_Top	At_Offset_3
0b56 4801       |H   |		Short_Literal	0x1
0b57 e5fe       |    |		Load	0x2,-0x2
0b58 e21e       |    |		Load	0x1,0x1e
0b59 035b       | [  |		Declare_Type	Array,Constrained
0b5a 4801       |H   |		Short_Literal	0x1
0b5b e5ff       |    |		Load	0x2,-0x1
0b5c 031b       |    |		Declare_Type	Variant_Record,Constrained
0b5d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0b5e 00db       |    |		Load_Top	At_Offset_3
0b5f 00db       |    |		Load_Top	At_Offset_3
0b60 02fc       |    |		Declare_Variable	Variant_Record,With_Constraint
0b61 4801       |H   |		Short_Literal	0x1
0b62 e5fe       |    |		Load	0x2,-0x2
0b63 e21e       |    |		Load	0x1,0x1e
0b64 0334       | 4  |		Declare_Variable	Array,With_Constraint
0b65 2d03       |-   |		Execute	Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3
0b66 016a       | j  |		QQ_execute	Variant_Record,XXX
0b67 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0b68 0869       | i  |		Execute_Immediate	Raise,0x69
0b69 0000 0000  |    |		.BLANK	0000[0x7]
0b70 ; --------------------------------------------------------------------------------------
0b70 ; SUBPROGRAM
0b70 ; --------------------------------------------------------------------------------------
0b70 0b73       | s  |		.CONST	0x0b73								; Address of begin
0b71 0004       |    |		.CONST	0x0004								; Address of exception handler
0b72 0001       |    |		.CONST	0x0001								; Number of locals
0b73			BODY_0b70:
0b73			INIT_0b70:
0b73 4608       |F   |		Jump_Case	0x9
0b74 7808       |x   |		Jump	0xb7d								; case 0x0
0b75 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
0b76 780d       |x   |		Jump	0xb84								; case 0x2
0b77 780c       |x   |		Jump	0xb84								; case 0x3
0b78 780b       |x   |		Jump	0xb84								; case 0x4
0b79 780a       |x   |		Jump	0xb84								; case 0x5
0b7a 7809       |x   |		Jump	0xb84								; case 0x6
0b7b 7808       |x   |		Jump	0xb84								; case 0x7
0b7c 7807       |x   |		Jump	0xb84								; case 0x8
0b7d 00da       |    |		Load_Top	At_Offset_2
0b7e 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0b7f 0125       | %  |		Execute	Any,Set_Constraint
0b80 00da       |    |		Load_Top	At_Offset_2
0b81 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0b82 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0b83 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0b84 0869       | i  |		Execute_Immediate	Raise,0x69
0b85 ; --------------------------------------------------------------------------------------
0b85 ; STRING TABLE
0b85 ; --------------------------------------------------------------------------------------
0b85 002e       | .  |		.STRTAB	0x002e->0x0b9c							; "'Load_View."
0b86 0037       | 7  |		.STRTAB	0x0037->0x0ba1							; "Initializing supplier list for "
0b87 0054       | T  |		.STRTAB	0x0054->0x0bb1							; "Deleting supplier "
0b88 0064       | d  |		.STRTAB	0x0064->0x0bba							; " for "
0b89 0067       | g  |		.STRTAB	0x0067->0x0bbc							; "Replacing"
0b8a 006e       | n  |		.STRTAB	0x006e->0x0bc1							; " suppliers with"
0b8b 007b       | {  |		.STRTAB	0x007b->0x0bc8							; " objects for "
0b8c 0086       |    |		.STRTAB	0x0086->0x0bcf							; "New object ("
0b8d 0090       |    |		.STRTAB	0x0090->0x0bd5							; ") is "
0b8e 0093       |    |		.STRTAB	0x0093->0x0bd7							; "Unique ("
0b8f 0099       |    |		.STRTAB	0x0099->0x0bdb							; ") ="
0b90 009a       |    |		.STRTAB	0x009a->0x0bdd							; "Changing kinds."
0b91 00a7       |    |		.STRTAB	0x00a7->0x0be4							; "Deleting link object "
0b92 00ba       |    |		.STRTAB	0x00ba->0x0bef							; "Adding client "
0b93 00c6       |    |		.STRTAB	0x00c6->0x0bf6							; " to link "
0b94 00cd       |    |		.STRTAB	0x00cd->0x0bfa							; "Deleting client "
0b95 00db       |    |		.STRTAB	0x00db->0x0c02							; " from link "
0b96 00e4       |    |		.STRTAB	0x00e4->0x0c08							; "Adding supplier "
0b97 00f2       |    |		.STRTAB	0x00f2->0x0c10							; " has no state file.  "
0b98 0105       |    |		.STRTAB	0x0105->0x0c1a							; " will not be considered during build operations."
0b99 0133       | 3  |		.STRTAB	0x0133->0x0c32							; "Link object being Deleted "
0b9a 014b       | K  |		.STRTAB	0x014b->0x0c3f							; " is not in the map."
0b9b 015c       | \  |		.STREND 0x015c->0x0c49
0b9c 274c 6f61  |'Loa|		.STRTAB_STRINGS
0c49 0000 0000  |    |		.BLANK	0000[0x7]
0c50 ; --------------------------------------------------------------------------------------
0c50 ; Debug Table
0c50 ; --------------------------------------------------------------------------------------
0c50 0004 000d  |    |		.DEBUG4	0x0004,0x000d,0xd92c,0x0000,0x0001,0x0000
0c56 e602 020e  |    |		.XXX[0xf]
0c58 e602 020f  |    |
0c5a 7808 6010  |x ` |
0c5c 600b e002  |`   |
0c5e e001 1835  |   5|
0c60 180d 00a7  |    |
0c62 0028 8603  | (  |
0c64 4501       |E   |
0c65 0000 0000  |    |		.BLANK	0000[0x5]
0c6a 0019 0c04  |    |		.XXX[0x196]
0c6c 0000 0000  |    |
0c6e 0000 1f40  |   @|
0c70 0000 0000  |    |
0c72 000c a804  |    |
0c74 002e 950a  | .  |
0c76 0000 00b0  |    |
0c78 0000 0000  |    |
0c7a 003d 4c04  | =L |
0c7c 0000 0000  |    |
0c7e 001f 5804  |  X |
0c80 0000 0001  |    |
0c82 000c c0f0  |    |
0c84 002e 790a  | .y |
0c86 0000 00b0  |    |
0c88 0000 0000  |    |
0c8a 003b 7004  | ;p |
0c8c 0000 0001  |    |
0c8e 0007 c911  |    |
0c90 002e a90a  | .  |
0c92 0000 00b0  |    |
0c94 002e 4d0a  | .M |
0c96 0000 00b0  |    |
0c98 0000 0000  |    |
0c9a 003b d004  | ;  |
0c9c 0000 0001  |    |
0c9e 000d 9885  |    |
0ca0 0000 0000  |    |
0ca2 0022 b404  | "  |
0ca4 002e 7d0a  | .} |
0ca6 0000 00b0  |    |
0ca8 0000 0000  |    |
0caa 000c 9004  |    |
0cac 002e a50a  | .  |
0cae 0000 00b0  |    |
0cb0 002e 9d0a  | .  |
0cb2 0000 00b0  |    |
0cb4 0000 0001  |    |
0cb6 000d 72ab  |  r |
0cb8 0000 0001  |    |
0cba 000c c0eb  |    |
0cbc 0000 0000  |    |
0cbe 003c 3404  | <4 |
0cc0 002e 890a  | .  |
0cc2 0000 00b0  |    |
0cc4 0000 0000  |    |
0cc6 000c a004  |    |
0cc8 002e 8d0a  | .  |
0cca 0000 00b0  |    |
0ccc 002e 810a  | .  |
0cce 0000 00b0  |    |
0cd0 0000 0001  |    |
0cd2 000c c109  |    |
0cd4 0000 0000  |    |
0cd6 003c 2404  | <$ |
0cd8 002e 3d0a  | .= |
0cda 0000 00b0  |    |
0cdc 002d 190a  | -  |
0cde 0000 00b0  |    |
0ce0 0000 0001  |    |
0ce2 000d 58ad  |  X |
0ce4 002d 690a  | -i |
0ce6 0000 00b0  |    |
0ce8 0000 0000  |    |
0cea 0006 d804  |    |
0cec 0000 0000  |    |
0cee 0001 a004  |    |
0cf0 002e 710a  | .q |
0cf2 0000 00b0  |    |
0cf4 002e 750a  | .u |
0cf6 0000 00b0  |    |
0cf8 0000 0000  |    |
0cfa 000f c404  |    |
0cfc 0000 0000  |    |
0cfe 0036 d804  | 6  |
0d00 0000 0000  |    |
0d02 000e 7c04  |  | |
0d04 002e 850a  | .  |
0d06 0000 00b0  |    |
0d08 0000 0000  |    |
0d0a 0022 9c04  | "  |
0d0c 002e 6d0a  | .m |
0d0e 0000 00b0  |    |
0d10 0000 0001  |    |
0d12 000c c108  |    |
0d14 002e ad0a  | .  |
0d16 0000 00b0  |    |
0d18 002e a10a  | .  |
0d1a 0000 00b0  |    |
0d1c 0000 0000  |    |
0d1e 003d 6804  | =h |
0d20 0000 0000  |    |
0d22 0032 4804  | 2H |
0d24 0000 0000  |    |
0d26 0020 e804  |    |
0d28 002d cd0a  | -  |
0d2a 0000 00b0  |    |
0d2c 0000 0001  |    |
0d2e 0006 28ce  |  ( |
0d30 0000 0000  |    |
0d32 0032 4404  | 2D |
0d34 0000 32a1  |  2 |
0d36 d501 0081  |    |
0d38 002d f90a  | -  |
0d3a 0000 00b0  |    |
0d3c 0000 0000  |    |
0d3e 003d 9004  | =  |
0d40 002e 010a  | .  |
0d42 0000 00b0  |    |
0d44 002d e10a  | -  |
0d46 0000 00b0  |    |
0d48 002d e50a  | -  |
0d4a 0000 00b0  |    |
0d4c 002d ed0a  | -  |
0d4e 0000 00b0  |    |
0d50 002d f50a  | -  |
0d52 0000 00b0  |    |
0d54 002e 610a  | .a |
0d56 0000 00b0  |    |
0d58 002e 5d0a  | .] |
0d5a 0000 00b0  |    |
0d5c 002e 550a  | .U |
0d5e 0000 00b0  |    |
0d60 002d 5d0a  | -] |
0d62 0000 00b0  |    |
0d64 002e 510a  | .Q |
0d66 0000 00b0  |    |
0d68 002e 490a  | .I |
0d6a 0000 00b0  |    |
0d6c 0000 0000  |    |
0d6e 003b dc04  | ;  |
0d70 002d 850a  | -  |
0d72 0000 00b0  |    |
0d74 0000 0001  |    |
0d76 0006 27b1  |  ' |
0d78 002d d90a  | -  |
0d7a 0000 00b0  |    |
0d7c 002e 2d0a  | .- |
0d7e 0000 00b0  |    |
0d80 002d fd0a  | -  |
0d82 0000 00b0  |    |
0d84 0000 0000  |    |
0d86 003c 3804  | <8 |
0d88 0000 0001  |    |
0d8a 000d 53a8  |  S |
0d8c 0000 0000  |    |
0d8e 003c 1c04  | <  |
0d90 002d 990a  | -  |
0d92 0000 00b0  |    |
0d94 0000 0001  |    |
0d96 0010 5f81  |  _ |
0d98 0000 0000  |    |
0d9a 001a a004  |    |
0d9c 0000 0000  |    |
0d9e 0032 4c04  | 2L |
0da0 0000 0000  |    |
0da2 001a a804  |    |
0da4 0000 0000  |    |
0da6 0037 4c04  | 7L |
0da8 0000 0000  |    |
0daa 003e 3004  | >0 |
0dac 0000 0000  |    |
0dae 001a b804  |    |
0db0 0000 0001  |    |
0db2 000c c115  |    |
0db4 002e 050a  | .  |
0db6 0000 00b0  |    |
0db8 0000 0000  |    |
0dba 003c 2804  | <( |
0dbc 0000 0000  |    |
0dbe 001a b404  |    |
0dc0 0000 0000  |    |
0dc2 000e 4804  |  H |
0dc4 0000 0000  |    |
0dc6 000c a404  |    |
0dc8 0000 0000  |    |
0dca 0022 bc04  | "  |
0dcc 0000 0000  |    |
0dce 001d c004  |    |
0dd0 002e 690a  | .i |
0dd2 0000 00b0  |    |
0dd4 0000 0000  |    |
0dd6 000e 3c04  |  < |
0dd8 002e 590a  | .Y |
0dda 0000 00b0  |    |
0ddc 002d 550a  | -U |
0dde 0000 00b0  |    |
0de0 0000 0001  |    |
0de2 000c c0ff  |    |
0de4 002d 310a  | -1 |
0de6 0000 00b0  |    |
0de8 0000 0000  |    |
0dea 003c 5404  | <T |
0dec 002e 650a  | .e |
0dee 0000 00b0  |    |
0df0 0000 0001  |    |
0df2 000c c0e4  |    |
0df4 002d 150a  | -  |
0df6 0000 00b0  |    |
0df8 0000 0000  |    |
0dfa 003c 4404  | <D |
0dfc 0000 0001  |    |
0dfe 000c c0e7  |    |