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

⟦cbfebdc67⟧

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

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 0c38       | 8  |		.CONST	0x0c38								; 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 0b33  |   3|		Declare_Subprogram	INIT_0b30,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 0b5b  |   [|		Declare_Subprogram	INIT_0b58,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 048b  |    |		Declare_Subprogram	INIT_0488,For_Outer_Call,Visible,Unelaborated
00b5 c227       | '  |		Store	0x1,0x27
00b6 029a 04ab  |    |		Declare_Subprogram	INIT_04a8,For_Outer_Call,Visible,Unelaborated
00b8 c228       | (  |		Store	0x1,0x28
00b9 029a 050b  |    |		Declare_Subprogram	INIT_0508,For_Outer_Call,Visible,Unelaborated
00bb c229       | )  |		Store	0x1,0x29
00bc 029a 061b  |    |		Declare_Subprogram	INIT_0618,For_Outer_Call,Visible,Unelaborated
00be c22a       | *  |		Store	0x1,0x2a
00bf 029a 062b  |   +|		Declare_Subprogram	INIT_0628,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 0633  |   3|		Declare_Subprogram	INIT_0630,For_Outer_Call,Visible,Unelaborated
0112 c230       | 0  |		Store	0x1,0x30
0113 029a 066b  |   k|		Declare_Subprogram	INIT_0668,For_Outer_Call,Visible,Unelaborated
0115 c231       | 1  |		Store	0x1,0x31
0116 029a 06c3  |    |		Declare_Subprogram	INIT_06c0,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 06e3  |    |		Declare_Subprogram	INIT_06e0,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 06f3  |    |		Declare_Subprogram	INIT_06f0,For_Outer_Call
0136 029d 0703  |    |		Declare_Subprogram	INIT_0700,For_Outer_Call
0138 029d 071b  |    |		Declare_Subprogram	INIT_0718,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 072b  |   +|		Declare_Subprogram	INIT_0728,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 0743  |   C|		Declare_Subprogram	INIT_0740,For_Outer_Call
0173 029d 078b  |    |		Declare_Subprogram	INIT_0788,For_Outer_Call
0175 029d 0813  |    |		Declare_Subprogram	INIT_0810,For_Outer_Call
0177 029d 0833  |   3|		Declare_Subprogram	INIT_0830,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 08a3  |    |		Declare_Subprogram	INIT_08a0,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 08eb  |    |		Declare_Subprogram	INIT_08e8,For_Outer_Call
0185 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27
0186 00c7       |    |		Action	Elaborate_Subprogram
0187 029d 0aab  |    |		Declare_Subprogram	INIT_0aa8,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 0b6d  |   m|		Action	Push_String_Extended,0xb6d					; "'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 7010       |p   |		Jump_Nonzero	0x28e
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 0334       | 4  |		Declare_Variable	Array,With_Constraint
0285 e5ff       |    |		Load	0x2,-0x1
0286 821b       |    |		Call	0x1,0x1b
0287 4801       |H   |		Short_Literal	0x1
0288 00da       |    |		Load_Top	At_Offset_2
0289 01d6       |    |		Execute	Vector,Field_Write
028a 6005       |`   |		Indirect_Literal	Discrete,0x290,{0x00000000, 0x00001803}
028b e003       |    |		Load	0x0,0x3
028c 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
028d c5fd       |    |		Store	0x2,-0x3
028e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
028f 0000       |    |		.XXX[0x1]
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 0b6e  |   n|		Action	Push_String_Extended,0xb6e					; "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 609c       |`   |		Indirect_Literal	Discrete,0x484,{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 681a       |h   |		Jump_Zero	0x417
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 0334       | 4  |		Declare_Variable	Array,With_Constraint
0404 e5ff       |    |		Load	0x2,-0x1
0405 e403       |    |		Load	0x2,0x3
0406 e008       |    |		Load	0x0,0x8
0407 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0408 4801       |H   |		Short_Literal	0x1
0409 00da       |    |		Load_Top	At_Offset_2
040a 01d6       |    |		Execute	Vector,Field_Write
040b e5fe       |    |		Load	0x2,-0x2
040c e001       |    |		Load	0x0,0x1
040d 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
040e 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
040f 4802       |H   |		Short_Literal	0x2
0410 00da       |    |		Load_Top	At_Offset_2
0411 01d6       |    |		Execute	Vector,Field_Write
0412 606d       |`m  |		Indirect_Literal	Discrete,0x480,{0x00000000, 0x00001801}
0413 e003       |    |		Load	0x0,0x3
0414 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0415 c5fc       |    |		Store	0x2,-0x4
0416 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0417 00db       |    |		Load_Top	At_Offset_3
0418 e004       |    |		Load	0x0,0x4
0419 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
041a 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
041b 6819       |h   |		Jump_Zero	0x435
041c e003       |    |		Load	0x0,0x3
041d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
041e 4801       |H   |		Short_Literal	0x1
041f 4802       |H   |		Short_Literal	0x2
0420 e008       |    |		Load	0x0,0x8
0421 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0422 0334       | 4  |		Declare_Variable	Array,With_Constraint
0423 e5ff       |    |		Load	0x2,-0x1
0424 e008       |    |		Load	0x0,0x8
0425 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0426 4801       |H   |		Short_Literal	0x1
0427 00da       |    |		Load_Top	At_Offset_2
0428 01d6       |    |		Execute	Vector,Field_Write
0429 e5fe       |    |		Load	0x2,-0x2
042a e001       |    |		Load	0x0,0x1
042b 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
042c 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
042d 4802       |H   |		Short_Literal	0x2
042e 00da       |    |		Load_Top	At_Offset_2
042f 01d6       |    |		Execute	Vector,Field_Write
0430 604b       |`K  |		Indirect_Literal	Discrete,0x47c,{0x00000000, 0x00001806}
0431 e003       |    |		Load	0x0,0x3
0432 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0433 c5fc       |    |		Store	0x2,-0x4
0434 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0435 00cf       |    |		Action	Mark_Auxiliary
0436 7839       |x9  |		Jump	0x470
0437 e004       |    |		Load	0x0,0x4
0438 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0439 00db       |    |		Load_Top	At_Offset_3
043a 0120       |    |		Execute	Any,Is_Value
043b 6803       |h   |		Jump_Zero	0x43f
043c e004       |    |		Load	0x0,0x4
043d 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
043e 7801       |x   |		Jump	0x440
043f 00db       |    |		Load_Top	At_Offset_3
0440 e402       |    |		Load	0x2,0x2
0441 e004       |    |		Load	0x0,0x4
0442 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0443 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0444 c404       |    |		Store	0x2,0x4
0445 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0446 00d9       |    |		Load_Top	At_Offset_1
0447 7007       |p   |		Jump_Nonzero	0x44f
0448 e5fc       |    |		Load	0x2,-0x4
0449 e5fd       |    |		Load	0x2,-0x3
044a e5fe       |    |		Load	0x2,-0x2
044b e404       |    |		Load	0x2,0x4
044c 8227       | '  |		Call	0x1,0x27
044d c5fc       |    |		Store	0x2,-0x4
044e 781b       |x   |		Jump	0x46a
044f e003       |    |		Load	0x0,0x3
0450 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0451 4801       |H   |		Short_Literal	0x1
0452 4802       |H   |		Short_Literal	0x2
0453 e008       |    |		Load	0x0,0x8
0454 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0455 0334       | 4  |		Declare_Variable	Array,With_Constraint
0456 e402       |    |		Load	0x2,0x2
0457 e004       |    |		Load	0x0,0x4
0458 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0459 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
045a e008       |    |		Load	0x0,0x8
045b 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
045c 4801       |H   |		Short_Literal	0x1
045d 00da       |    |		Load_Top	At_Offset_2
045e 01d6       |    |		Execute	Vector,Field_Write
045f e5fe       |    |		Load	0x2,-0x2
0460 e001       |    |		Load	0x0,0x1
0461 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0462 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0463 4802       |H   |		Short_Literal	0x2
0464 00da       |    |		Load_Top	At_Offset_2
0465 01d6       |    |		Execute	Vector,Field_Write
0466 6011       |`   |		Indirect_Literal	Discrete,0x478,{0x00000000, 0x00001802}
0467 e003       |    |		Load	0x0,0x3
0468 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0469 c5fc       |    |		Store	0x2,-0x4
046a e402       |    |		Load	0x2,0x2
046b e004       |    |		Load	0x0,0x4
046c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
046d 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
046e c402       |    |		Store	0x2,0x2
046f 00c9       |    |		Action	Pop_Auxiliary_Loop
0470 e402       |    |		Load	0x2,0x2
0471 e004       |    |		Load	0x0,0x4
0472 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0473 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0474 6fc2       |o   |		Jump_Zero	0x437
0475 00ce       |    |		Action	Pop_Auxiliary
0476 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0477 0000       |    |		.XXX[0x1]
0478 0000 0000  |    |		.LITERAL	{0x00000000, 0x00001802}
047c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00001806}
0480 0000 0000  |    |		.LITERAL	{0x00000000, 0x00001801}
0484 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0488 ; --------------------------------------------------------------------------------------
0488 ; SUBPROGRAM
0488 ; --------------------------------------------------------------------------------------
0488 048d       |    |		.CONST	0x048d								; Address of begin
0489 049e       |    |		.CONST	0x049e								; Address of exception handler
048a 0002       |    |		.CONST	0x0002								; Number of locals
048b			INIT_0488:
048b e011       |    |		Load	0x0,0x11
048c 1b31       | 1  |		Execute	Package,Field_Read,Field_Number 0x31
048d			BODY_0488:
048d e5fc       |    |		Load	0x2,-0x4
048e e011       |    |		Load	0x0,0x11
048f 1b31       | 1  |		Execute	Package,Field_Read,Field_Number 0x31
0490 e5fe       |    |		Load	0x2,-0x2
0491 e5ff       |    |		Load	0x2,-0x1
0492 8254       | T  |		Call	0x1,0x54
0493 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0494 c5fc       |    |		Store	0x2,-0x4
0495 e5fc       |    |		Load	0x2,-0x4
0496 7006       |p   |		Jump_Nonzero	0x49d
0497 e5fc       |    |		Load	0x2,-0x4
0498 e5fd       |    |		Load	0x2,-0x3
0499 e5fe       |    |		Load	0x2,-0x2
049a 00db       |    |		Load_Top	At_Offset_3
049b 8225       | %  |		Call	0x1,0x25
049c c5fc       |    |		Store	0x2,-0x4
049d 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
049e			TRAP_0488:
049e e003       |    |		Load	0x0,0x3
049f 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
04a0 010f       |    |		Execute	Exception,Equal
04a1 6804       |h   |		Jump_Zero	0x4a6
04a2 e003       |    |		Load	0x0,0x3
04a3 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
04a4 a5fc       |    |		Store_Unchecked	0x2,-0x4
04a5 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
04a6 0100       |    |		Execute	Exception,Raise
04a7 0000       |    |		.XXX[0x1]
04a8 ; --------------------------------------------------------------------------------------
04a8 ; SUBPROGRAM
04a8 ; --------------------------------------------------------------------------------------
04a8 04b8       |    |		.CONST	0x04b8								; Address of begin
04a9 0004       |    |		.CONST	0x0004								; Address of exception handler
04aa 0005       |    |		.CONST	0x0005								; Number of locals
04ab			INIT_04a8:
04ab 00da       |    |		Load_Top	At_Offset_2
04ac 0007       |    |		Action	Break_Optional
04ad e5fe       |    |		Load	0x2,-0x2
04ae 0217       |    |		Execute	Heap_Access,All_Reference
04af 3c19       |<   |		Execute	Record,Field_Read,Field_Number 0x19
04b0 0007       |    |		Action	Break_Optional
04b1 e011       |    |		Load	0x0,0x11
04b2 1b2e       | .  |		Execute	Package,Field_Read,Field_Number 0x2e
04b3 e217       |    |		Load	0x1,0x17
04b4 0337       | 7  |		Declare_Variable	Array
04b5 e234       | 4  |		Load	0x1,0x34
04b6 00d9       |    |		Load_Top	At_Offset_1
04b7 01d4       |    |		Execute	Vector,Structure_Write
04b8			BODY_04a8:
04b8 e012       |    |		Load	0x0,0x12
04b9 6812       |h   |		Jump_Zero	0x4cc
04ba 0092 0b6f  |   o|		Action	Push_String_Extended,0xb6f					; "Deleting supplier "
04bc e5ff       |    |		Load	0x2,-0x1
04bd 0217       |    |		Execute	Heap_Access,All_Reference
04be 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
04bf e00e       |    |		Load	0x0,0xe
04c0 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
04c1 01cc       |    |		Execute	Vector,Catenate
04c2 0092 0b70  |   p|		Action	Push_String_Extended,0xb70					; " for "
04c4 01cc       |    |		Execute	Vector,Catenate
04c5 e5fe       |    |		Load	0x2,-0x2
04c6 0217       |    |		Execute	Heap_Access,All_Reference
04c7 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
04c8 e00e       |    |		Load	0x0,0xe
04c9 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
04ca 01cc       |    |		Execute	Vector,Catenate
04cb 8013       |    |		Call	0x0,0x13
04cc 00cf       |    |		Action	Mark_Auxiliary
04cd 7830       |x0  |		Jump	0x4fe
04ce 00db       |    |		Load_Top	At_Offset_3
04cf 0217       |    |		Execute	Heap_Access,All_Reference
04d0 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
04d1 e402       |    |		Load	0x2,0x2
04d2 021f       |    |		Execute	Heap_Access,Equal
04d3 6825       |h%  |		Jump_Zero	0x4f9
04d4 00db       |    |		Load_Top	At_Offset_3
04d5 0217       |    |		Execute	Heap_Access,All_Reference
04d6 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
04d7 e5fd       |    |		Load	0x2,-0x3
04d8 01d3       |    |		Execute	Vector,And
04d9 00da       |    |		Load_Top	At_Offset_2
04da 01d4       |    |		Execute	Vector,Structure_Write
04db 00db       |    |		Load_Top	At_Offset_3
04dc 0217       |    |		Execute	Heap_Access,All_Reference
04dd 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
04de 00da       |    |		Load_Top	At_Offset_2
04df 01df       |    |		Execute	Vector,Equal
04e0 6807       |h   |		Jump_Zero	0x4e8
04e1 00db       |    |		Load_Top	At_Offset_3
04e2 00db       |    |		Load_Top	At_Offset_3
04e3 e5fe       |    |		Load	0x2,-0x2
04e4 8255       | U  |		Call	0x1,0x55
04e5 c404       |    |		Store	0x2,0x4
04e6 c403       |    |		Store	0x2,0x3
04e7 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
04e8 00d9       |    |		Load_Top	At_Offset_1
04e9 e234       | 4  |		Load	0x1,0x34
04ea 01de       |    |		Execute	Vector,Not_Equal
04eb 680c       |h   |		Jump_Zero	0x4f8
04ec 00db       |    |		Load_Top	At_Offset_3
04ed 0217       |    |		Execute	Heap_Access,All_Reference
04ee 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
04ef e5fd       |    |		Load	0x2,-0x3
04f0 01d0       |    |		Execute	Vector,Complement
04f1 01d3       |    |		Execute	Vector,And
04f2 e403       |    |		Load	0x2,0x3
04f3 0217       |    |		Execute	Heap_Access,All_Reference
04f4 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
04f5 e402       |    |		Load	0x2,0x2
04f6 00da       |    |		Load_Top	At_Offset_2
04f7 8251       | Q  |		Call	0x1,0x51
04f8 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
04f9 00db       |    |		Load_Top	At_Offset_3
04fa 0217       |    |		Execute	Heap_Access,All_Reference
04fb 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
04fc a403       |    |		Store_Unchecked	0x2,0x3
04fd 00c9       |    |		Action	Pop_Auxiliary_Loop
04fe 00db       |    |		Load_Top	At_Offset_3
04ff 77ce       |w   |		Jump_Nonzero	0x4ce
0500 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0501 0000 0000  |    |		.BLANK	0000[0x7]
0508 ; --------------------------------------------------------------------------------------
0508 ; SUBPROGRAM
0508 ; --------------------------------------------------------------------------------------
0508 0523       | #  |		.CONST	0x0523								; Address of begin
0509 0004       |    |		.CONST	0x0004								; Address of exception handler
050a 0009       |    |		.CONST	0x0009								; Number of locals
050b			INIT_0508:
050b 00db       |    |		Load_Top	At_Offset_3
050c 0217       |    |		Execute	Heap_Access,All_Reference
050d 3c19       |<   |		Execute	Record,Field_Read,Field_Number 0x19
050e 0007       |    |		Action	Break_Optional
050f e011       |    |		Load	0x0,0x11
0510 1b2e       | .  |		Execute	Package,Field_Read,Field_Number 0x2e
0511 e011       |    |		Load	0x0,0x11
0512 1b2e       | .  |		Execute	Package,Field_Read,Field_Number 0x2e
0513 e011       |    |		Load	0x0,0x11
0514 1b31       | 1  |		Execute	Package,Field_Read,Field_Number 0x31
0515 e217       |    |		Load	0x1,0x17
0516 0337       | 7  |		Declare_Variable	Array
0517 e217       |    |		Load	0x1,0x17
0518 0337       | 7  |		Declare_Variable	Array
0519 e5ff       |    |		Load	0x2,-0x1
051a 01da       |    |		Execute	Vector,Bounds
051b e221       | !  |		Load	0x1,0x21
051c 035b       | [  |		Declare_Type	Array,Constrained
051d 0337       | 7  |		Declare_Variable	Array
051e e5ff       |    |		Load	0x2,-0x1
051f 00d9       |    |		Load_Top	At_Offset_1
0520 01d4       |    |		Execute	Vector,Structure_Write
0521 029f 0adb  |    |		Declare_Subprogram	INIT_0ad8,For_Call
0523			BODY_0508:
0523 e012       |    |		Load	0x0,0x12
0524 681f       |h   |		Jump_Zero	0x544
0525 0092 0b71  |   q|		Action	Push_String_Extended,0xb71					; "Replacing"
0527 e5fd       |    |		Load	0x2,-0x3
0528 e5fe       |    |		Load	0x2,-0x2
0529 8230       | 0  |		Call	0x1,0x30
052a 00e0       |    |		Load_Encached	Standard_Cache
052b 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
052c 01cc       |    |		Execute	Vector,Catenate
052d 0092 0b72  |   r|		Action	Push_String_Extended,0xb72					; " suppliers with"
052f 01cc       |    |		Execute	Vector,Catenate
0530 e5ff       |    |		Load	0x2,-0x1
0531 01db       |    |		Execute	Vector,Length
0532 00d8       |    |		Load_Top	At_Offset_0
0533 00e2       |    |		Load_Encached	Integer_Cache
0534 0260       | `  |		Execute	Discrete,In_Type
0535 7001       |p   |		Jump_Nonzero	0x537
0536 0801       |    |		Execute_Immediate	Raise,0x1
0537 00e0       |    |		Load_Encached	Standard_Cache
0538 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0539 01cc       |    |		Execute	Vector,Catenate
053a 0092 0b73  |   s|		Action	Push_String_Extended,0xb73					; " objects for "
053c 01cc       |    |		Execute	Vector,Catenate
053d e5fe       |    |		Load	0x2,-0x2
053e 0217       |    |		Execute	Heap_Access,All_Reference
053f 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
0540 e00e       |    |		Load	0x0,0xe
0541 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0542 01cc       |    |		Execute	Vector,Catenate
0543 8013       |    |		Call	0x0,0x13
0544 00d9       |    |		Load_Top	At_Offset_1
0545 e236       | 6  |		Load	0x1,0x36
0546 e237       | 7  |		Load	0x1,0x37
0547 e238       | 8  |		Load	0x1,0x38
0548 1d39       | 9  |		Execute_Immediate	Reference_Lex_1,0x39
0549 1d3a       | :  |		Execute_Immediate	Reference_Lex_1,0x3a
054a 8005       |    |		Call	0x0,0x5
054b 00d1       |    |		Pop_Control	Pop_Count_1
054c 00cf       |    |		Action	Mark_Auxiliary
054d 00da       |    |		Load_Top	At_Offset_2
054e 01d9       |    |		Execute	Vector,Reverse_Bounds
054f 0263       | c  |		Execute	Discrete,Above_Bound
0550 70ae       |p   |		Jump_Nonzero	0x5ff
0551 e012       |    |		Load	0x0,0x12
0552 6832       |h2  |		Jump_Zero	0x585
0553 0092 0b74  |   t|		Action	Push_String_Extended,0xb74					; "New object ("
0555 00d9       |    |		Load_Top	At_Offset_1
0556 e408       |    |		Load	0x2,0x8
0557 01d5       |    |		Execute	Vector,Field_Reference
0558 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0559 e004       |    |		Load	0x0,0x4
055a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
055b 00e0       |    |		Load_Encached	Standard_Cache
055c 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
055d 01cc       |    |		Execute	Vector,Catenate
055e 0092 0b75  |   u|		Action	Push_String_Extended,0xb75					; ") is "
0560 01cc       |    |		Execute	Vector,Catenate
0561 00d9       |    |		Load_Top	At_Offset_1
0562 e408       |    |		Load	0x2,0x8
0563 01d5       |    |		Execute	Vector,Field_Reference
0564 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0565 e004       |    |		Load	0x0,0x4
0566 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0567 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
0568 01cc       |    |		Execute	Vector,Catenate
0569 8013       |    |		Call	0x0,0x13
056a e402       |    |		Load	0x2,0x2
056b 6819       |h   |		Jump_Zero	0x585
056c 0092 0b76  |   v|		Action	Push_String_Extended,0xb76					; "Unique ("
056e e402       |    |		Load	0x2,0x2
056f 0217       |    |		Execute	Heap_Access,All_Reference
0570 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0571 0217       |    |		Execute	Heap_Access,All_Reference
0572 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0573 e004       |    |		Load	0x0,0x4
0574 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0575 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
0576 01cc       |    |		Execute	Vector,Catenate
0577 0092 0b77  |   w|		Action	Push_String_Extended,0xb77					; ") ="
0579 01cc       |    |		Execute	Vector,Catenate
057a e402       |    |		Load	0x2,0x2
057b 0217       |    |		Execute	Heap_Access,All_Reference
057c 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
057d 0217       |    |		Execute	Heap_Access,All_Reference
057e 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
057f e004       |    |		Load	0x0,0x4
0580 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0581 00e0       |    |		Load_Encached	Standard_Cache
0582 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0583 01cc       |    |		Execute	Vector,Catenate
0584 8013       |    |		Call	0x0,0x13
0585 00cf       |    |		Action	Mark_Auxiliary
0586 7802       |x   |		Jump	0x589
0587 8409       |    |		Call	0x2,0x9
0588 00c9       |    |		Action	Pop_Auxiliary_Loop
0589 e402       |    |		Load	0x2,0x2
058a 77fc       |w   |		Jump_Nonzero	0x587
058b 00ce       |    |		Action	Pop_Auxiliary
058c e402       |    |		Load	0x2,0x2
058d 680b       |h   |		Jump_Zero	0x599
058e 00d8       |    |		Load_Top	At_Offset_0
058f e408       |    |		Load	0x2,0x8
0590 01d5       |    |		Execute	Vector,Field_Reference
0591 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0592 e402       |    |		Load	0x2,0x2
0593 0217       |    |		Execute	Heap_Access,All_Reference
0594 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0595 0217       |    |		Execute	Heap_Access,All_Reference
0596 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0597 012f       | /  |		Execute	Any,Equal
0598 7018       |p   |		Jump_Nonzero	0x5b1
0599 e5fc       |    |		Load	0x2,-0x4
059a e011       |    |		Load	0x0,0x11
059b 1b31       | 1  |		Execute	Package,Field_Read,Field_Number 0x31
059c e5fe       |    |		Load	0x2,-0x2
059d 00db       |    |		Load_Top	At_Offset_3
059e e408       |    |		Load	0x2,0x8
059f 01d5       |    |		Execute	Vector,Field_Reference
05a0 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
05a1 8254       | T  |		Call	0x1,0x54
05a2 c405       |    |		Store	0x2,0x5
05a3 c5fc       |    |		Store	0x2,-0x4
05a4 e405       |    |		Load	0x2,0x5
05a5 6857       |hW  |		Jump_Zero	0x5fd
05a6 e404       |    |		Load	0x2,0x4
05a7 e402       |    |		Load	0x2,0x2
05a8 00da       |    |		Load_Top	At_Offset_2
05a9 e408       |    |		Load	0x2,0x8
05aa 01d5       |    |		Execute	Vector,Field_Reference
05ab 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
05ac e405       |    |		Load	0x2,0x5
05ad e5fe       |    |		Load	0x2,-0x2
05ae 8253       | S  |		Call	0x1,0x53
05af c404       |    |		Store	0x2,0x4
05b0 784c       |xL  |		Jump	0x5fd
05b1 e012       |    |		Load	0x0,0x12
05b2 6803       |h   |		Jump_Zero	0x5b6
05b3 0092 0b78  |   x|		Action	Push_String_Extended,0xb78					; "Changing kinds."
05b5 8013       |    |		Call	0x0,0x13
05b6 e402       |    |		Load	0x2,0x2
05b7 0217       |    |		Execute	Heap_Access,All_Reference
05b8 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
05b9 e406       |    |		Load	0x2,0x6
05ba 01d4       |    |		Execute	Vector,Structure_Write
05bb 00d8       |    |		Load_Top	At_Offset_0
05bc e408       |    |		Load	0x2,0x8
05bd 01d5       |    |		Execute	Vector,Field_Reference
05be 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
05bf e407       |    |		Load	0x2,0x7
05c0 01d4       |    |		Execute	Vector,Structure_Write
05c1 e406       |    |		Load	0x2,0x6
05c2 e407       |    |		Load	0x2,0x7
05c3 01de       |    |		Execute	Vector,Not_Equal
05c4 6832       |h2  |		Jump_Zero	0x5f7
05c5 00cf       |    |		Action	Mark_Auxiliary
05c6 4805       |H   |		Short_Literal	0x5
05c7 4802       |H   |		Short_Literal	0x2
05c8 0007       |    |		Action	Break_Optional
05c9 00d8       |    |		Load_Top	At_Offset_0
05ca e406       |    |		Load	0x2,0x6
05cb 01d7       |    |		Execute	Vector,Field_Read
05cc 6810       |h   |		Jump_Zero	0x5dd
05cd 00d8       |    |		Load_Top	At_Offset_0
05ce e407       |    |		Load	0x2,0x7
05cf 01d7       |    |		Execute	Vector,Field_Read
05d0 700c       |p   |		Jump_Nonzero	0x5dd
05d1 00d8       |    |		Load_Top	At_Offset_0
05d2 e405       |    |		Load	0x2,0x5
05d3 0217       |    |		Execute	Heap_Access,All_Reference
05d4 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
05d5 01d7       |    |		Execute	Vector,Field_Read
05d6 0aff       |    |		Execute_Immediate	Plus,-0x1
05d7 00d9       |    |		Load_Top	At_Offset_1
05d8 e405       |    |		Load	0x2,0x5
05d9 0217       |    |		Execute	Heap_Access,All_Reference
05da 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
05db 01d6       |    |		Execute	Vector,Field_Write
05dc 7813       |x   |		Jump	0x5f0
05dd 00d8       |    |		Load_Top	At_Offset_0
05de e407       |    |		Load	0x2,0x7
05df 01d7       |    |		Execute	Vector,Field_Read
05e0 680f       |h   |		Jump_Zero	0x5f0
05e1 00d8       |    |		Load_Top	At_Offset_0
05e2 e406       |    |		Load	0x2,0x6
05e3 01d7       |    |		Execute	Vector,Field_Read
05e4 700b       |p   |		Jump_Nonzero	0x5f0
05e5 00d8       |    |		Load_Top	At_Offset_0
05e6 e405       |    |		Load	0x2,0x5
05e7 0217       |    |		Execute	Heap_Access,All_Reference
05e8 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
05e9 01d7       |    |		Execute	Vector,Field_Read
05ea 0a01       |    |		Execute_Immediate	Plus,0x1
05eb 00d9       |    |		Load_Top	At_Offset_1
05ec e405       |    |		Load	0x2,0x5
05ed 0217       |    |		Execute	Heap_Access,All_Reference
05ee 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
05ef 01d6       |    |		Execute	Vector,Field_Write
05f0 00c8       |    |		Action	Pop_Auxiliary_Range
05f1 3fd7       |?   |		Loop_Increasing	0x5c9
05f2 00ce       |    |		Action	Pop_Auxiliary
05f3 e407       |    |		Load	0x2,0x7
05f4 e402       |    |		Load	0x2,0x2
05f5 0217       |    |		Execute	Heap_Access,All_Reference
05f6 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
05f7 e402       |    |		Load	0x2,0x2
05f8 a404       |    |		Store_Unchecked	0x2,0x4
05f9 e402       |    |		Load	0x2,0x2
05fa 0217       |    |		Execute	Heap_Access,All_Reference
05fb 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
05fc a402       |    |		Store_Unchecked	0x2,0x2
05fd 00c8       |    |		Action	Pop_Auxiliary_Range
05fe 3f52       |?R  |		Loop_Increasing	0x551
05ff 00c9       |    |		Action	Pop_Auxiliary_Loop
0600 780d       |x   |		Jump	0x60e
0601 e402       |    |		Load	0x2,0x2
0602 0217       |    |		Execute	Heap_Access,All_Reference
0603 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0604 a403       |    |		Store_Unchecked	0x2,0x3
0605 e402       |    |		Load	0x2,0x2
0606 e404       |    |		Load	0x2,0x4
0607 e5fe       |    |		Load	0x2,-0x2
0608 8255       | U  |		Call	0x1,0x55
0609 c404       |    |		Store	0x2,0x4
060a c402       |    |		Store	0x2,0x2
060b e403       |    |		Load	0x2,0x3
060c a402       |    |		Store_Unchecked	0x2,0x2
060d 00c9       |    |		Action	Pop_Auxiliary_Loop
060e e402       |    |		Load	0x2,0x2
060f 77f1       |w   |		Jump_Nonzero	0x601
0610 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0611 0000 0000  |    |		.BLANK	0000[0x7]
0618 ; --------------------------------------------------------------------------------------
0618 ; SUBPROGRAM
0618 ; --------------------------------------------------------------------------------------
0618 061b       |    |		.CONST	0x061b								; Address of begin
0619 0004       |    |		.CONST	0x0004								; Address of exception handler
061a 0001       |    |		.CONST	0x0001								; Number of locals
061b			BODY_0618:
061b			INIT_0618:
061b 00da       |    |		Load_Top	At_Offset_2
061c 0217       |    |		Execute	Heap_Access,All_Reference
061d 341a       |4   |		Execute	Record,Field_Reference,Field_Number 0x1a
061e 0335       | 5  |		Declare_Variable	Array,Duplicate
061f 00cd       |    |		Action	Spare6_Action
0620 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
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 00db       |    |		Load_Top	At_Offset_3
062c 00db       |    |		Load_Top	At_Offset_3
062d 0217       |    |		Execute	Heap_Access,All_Reference
062e 381a       |8   |		Execute	Record,Field_Write,Field_Number 0x1a
062f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0630 ; --------------------------------------------------------------------------------------
0630 ; SUBPROGRAM
0630 ; --------------------------------------------------------------------------------------
0630 063e       | >  |		.CONST	0x063e								; Address of begin
0631 0004       |    |		.CONST	0x0004								; Address of exception handler
0632 0004       |    |		.CONST	0x0004								; Number of locals
0633			INIT_0630:
0633 e217       |    |		Load	0x1,0x17
0634 0337       | 7  |		Declare_Variable	Array
0635 e5fe       |    |		Load	0x2,-0x2
0636 00d9       |    |		Load_Top	At_Offset_1
0637 01d4       |    |		Execute	Vector,Structure_Write
0638 00db       |    |		Load_Top	At_Offset_3
0639 0217       |    |		Execute	Heap_Access,All_Reference
063a 3c19       |<   |		Execute	Record,Field_Read,Field_Number 0x19
063b 0007       |    |		Action	Break_Optional
063c 00e3       |    |		Load_Encached	Natural_Cache
063d 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
063e			BODY_0630:
063e e5fe       |    |		Load	0x2,-0x2
063f e22f       | /  |		Load	0x1,0x2f
0640 01df       |    |		Execute	Vector,Equal
0641 6805       |h   |		Jump_Zero	0x647
0642 e5ff       |    |		Load	0x2,-0x1
0643 0217       |    |		Execute	Heap_Access,All_Reference
0644 341a       |4   |		Execute	Record,Field_Reference,Field_Number 0x1a
0645 00db       |    |		Load_Top	At_Offset_3
0646 01d4       |    |		Execute	Vector,Structure_Write
0647 e5fe       |    |		Load	0x2,-0x2
0648 e218       |    |		Load	0x1,0x18
0649 01df       |    |		Execute	Vector,Equal
064a 6804       |h   |		Jump_Zero	0x64f
064b e5ff       |    |		Load	0x2,-0x1
064c 0217       |    |		Execute	Heap_Access,All_Reference
064d 3c18       |<   |		Execute	Record,Field_Read,Field_Number 0x18
064e 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
064f 00cf       |    |		Action	Mark_Auxiliary
0650 7810       |x   |		Jump	0x661
0651 00da       |    |		Load_Top	At_Offset_2
0652 0217       |    |		Execute	Heap_Access,All_Reference
0653 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0654 e402       |    |		Load	0x2,0x2
0655 01d3       |    |		Execute	Vector,And
0656 e234       | 4  |		Load	0x1,0x34
0657 01de       |    |		Execute	Vector,Not_Equal
0658 6803       |h   |		Jump_Zero	0x65c
0659 00d9       |    |		Load_Top	At_Offset_1
065a 0a01       |    |		Execute_Immediate	Plus,0x1
065b 005a       | Z  |		Store_Top	Discrete,At_Offset_2
065c 00da       |    |		Load_Top	At_Offset_2
065d 0217       |    |		Execute	Heap_Access,All_Reference
065e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
065f 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0660 00c9       |    |		Action	Pop_Auxiliary_Loop
0661 00da       |    |		Load_Top	At_Offset_2
0662 77ee       |w   |		Jump_Nonzero	0x651
0663 00ce       |    |		Action	Pop_Auxiliary
0664 00d8       |    |		Load_Top	At_Offset_0
0665 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0666 0000 0000  |    |		.XXX[0x2]
0668 ; --------------------------------------------------------------------------------------
0668 ; SUBPROGRAM
0668 ; --------------------------------------------------------------------------------------
0668 067d       | }  |		.CONST	0x067d								; Address of begin
0669 0004       |    |		.CONST	0x0004								; Address of exception handler
066a 0005       |    |		.CONST	0x0005								; Number of locals
066b			INIT_0668:
066b e217       |    |		Load	0x1,0x17
066c 0337       | 7  |		Declare_Variable	Array
066d e5fe       |    |		Load	0x2,-0x2
066e 00d9       |    |		Load_Top	At_Offset_1
066f 01d4       |    |		Execute	Vector,Structure_Write
0670 00db       |    |		Load_Top	At_Offset_3
0671 0217       |    |		Execute	Heap_Access,All_Reference
0672 3c19       |<   |		Execute	Record,Field_Read,Field_Number 0x19
0673 0007       |    |		Action	Break_Optional
0674 00e3       |    |		Load_Encached	Natural_Cache
0675 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0676 4801       |H   |		Short_Literal	0x1
0677 e5ff       |    |		Load	0x2,-0x1
0678 0217       |    |		Execute	Heap_Access,All_Reference
0679 3c18       |<   |		Execute	Record,Field_Read,Field_Number 0x18
067a e21e       |    |		Load	0x1,0x1e
067b 035b       | [  |		Declare_Type	Array,Constrained
067c 0337       | 7  |		Declare_Variable	Array
067d			BODY_0668:
067d e5fe       |    |		Load	0x2,-0x2
067e e22f       | /  |		Load	0x1,0x2f
067f 01df       |    |		Execute	Vector,Equal
0680 6805       |h   |		Jump_Zero	0x686
0681 e5ff       |    |		Load	0x2,-0x1
0682 0217       |    |		Execute	Heap_Access,All_Reference
0683 341a       |4   |		Execute	Record,Field_Reference,Field_Number 0x1a
0684 e402       |    |		Load	0x2,0x2
0685 01d4       |    |		Execute	Vector,Structure_Write
0686 00cf       |    |		Action	Mark_Auxiliary
0687 7816       |x   |		Jump	0x69e
0688 00db       |    |		Load_Top	At_Offset_3
0689 0217       |    |		Execute	Heap_Access,All_Reference
068a 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
068b e402       |    |		Load	0x2,0x2
068c 01d3       |    |		Execute	Vector,And
068d e234       | 4  |		Load	0x1,0x34
068e 01de       |    |		Execute	Vector,Not_Equal
068f 6809       |h   |		Jump_Zero	0x699
0690 00da       |    |		Load_Top	At_Offset_2
0691 0a01       |    |		Execute_Immediate	Plus,0x1
0692 005b       | [  |		Store_Top	Discrete,At_Offset_3
0693 00db       |    |		Load_Top	At_Offset_3
0694 0217       |    |		Execute	Heap_Access,All_Reference
0695 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0696 00db       |    |		Load_Top	At_Offset_3
0697 00db       |    |		Load_Top	At_Offset_3
0698 01d6       |    |		Execute	Vector,Field_Write
0699 00db       |    |		Load_Top	At_Offset_3
069a 0217       |    |		Execute	Heap_Access,All_Reference
069b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
069c a403       |    |		Store_Unchecked	0x2,0x3
069d 00c9       |    |		Action	Pop_Auxiliary_Loop
069e 00db       |    |		Load_Top	At_Offset_3
069f 77e8       |w   |		Jump_Nonzero	0x688
06a0 00ce       |    |		Action	Pop_Auxiliary
06a1 00d9       |    |		Load_Top	At_Offset_1
06a2 e21f       |    |		Load	0x1,0x1f
06a3 1c08       |    |		Execute_Immediate	Run_Utility,0x8
06a4 4800       |H   |		Short_Literal	0x0
06a5 00d9       |    |		Load_Top	At_Offset_1
06a6 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
06a7 4801       |H   |		Short_Literal	0x1
06a8 00db       |    |		Load_Top	At_Offset_3
06a9 00db       |    |		Load_Top	At_Offset_3
06aa 01cf       |    |		Execute	Vector,Slice_Read
06ab 00d9       |    |		Load_Top	At_Offset_1
06ac 00d8       |    |		Load_Top	At_Offset_0
06ad 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06ae 00da       |    |		Load_Top	At_Offset_2
06af 01da       |    |		Execute	Vector,Bounds
06b0 00da       |    |		Load_Top	At_Offset_2
06b1 01da       |    |		Execute	Vector,Bounds
06b2 00da       |    |		Load_Top	At_Offset_2
06b3 027f       |    |		Execute	Discrete,Equal
06b4 7001       |p   |		Jump_Nonzero	0x6b6
06b5 08e0       |    |		Execute_Immediate	Raise,0xe0
06b6 00cd       |    |		Action	Spare6_Action
06b7 027f       |    |		Execute	Discrete,Equal
06b8 7001       |p   |		Jump_Nonzero	0x6ba
06b9 08e0       |    |		Execute_Immediate	Raise,0xe0
06ba 00d2       |    |		Pop_Control	Pop_Count_2
06bb 00d9       |    |		Load_Top	At_Offset_1
06bc 2903       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
06bd 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06be 0000 0000  |    |		.XXX[0x2]
06c0 ; --------------------------------------------------------------------------------------
06c0 ; SUBPROGRAM
06c0 ; --------------------------------------------------------------------------------------
06c0 06c6       |    |		.CONST	0x06c6								; Address of begin
06c1 0004       |    |		.CONST	0x0004								; Address of exception handler
06c2 0002       |    |		.CONST	0x0002								; Number of locals
06c3			INIT_06c0:
06c3 00db       |    |		Load_Top	At_Offset_3
06c4 0217       |    |		Execute	Heap_Access,All_Reference
06c5 3c19       |<   |		Execute	Record,Field_Read,Field_Number 0x19
06c6			BODY_06c0:
06c6 00cf       |    |		Action	Mark_Auxiliary
06c7 7811       |x   |		Jump	0x6d9
06c8 00d9       |    |		Load_Top	At_Offset_1
06c9 0217       |    |		Execute	Heap_Access,All_Reference
06ca 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
06cb e5ff       |    |		Load	0x2,-0x1
06cc 021f       |    |		Execute	Heap_Access,Equal
06cd 6806       |h   |		Jump_Zero	0x6d4
06ce 00d9       |    |		Load_Top	At_Offset_1
06cf 0217       |    |		Execute	Heap_Access,All_Reference
06d0 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
06d1 0335       | 5  |		Declare_Variable	Array,Duplicate
06d2 00cd       |    |		Action	Spare6_Action
06d3 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06d4 00d9       |    |		Load_Top	At_Offset_1
06d5 0217       |    |		Execute	Heap_Access,All_Reference
06d6 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
06d7 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
06d8 00c9       |    |		Action	Pop_Auxiliary_Loop
06d9 00d9       |    |		Load_Top	At_Offset_1
06da 77ed       |w   |		Jump_Nonzero	0x6c8
06db 00ce       |    |		Action	Pop_Auxiliary
06dc e234       | 4  |		Load	0x1,0x34
06dd 0335       | 5  |		Declare_Variable	Array,Duplicate
06de 00cd       |    |		Action	Spare6_Action
06df 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06e0 ; --------------------------------------------------------------------------------------
06e0 ; SUBPROGRAM
06e0 ; --------------------------------------------------------------------------------------
06e0 06e3       |    |		.CONST	0x06e3								; Address of begin
06e1 0004       |    |		.CONST	0x0004								; Address of exception handler
06e2 0001       |    |		.CONST	0x0001								; Number of locals
06e3			BODY_06e0:
06e3			INIT_06e0:
06e3 00da       |    |		Load_Top	At_Offset_2
06e4 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
06e5 e004       |    |		Load	0x0,0x4
06e6 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06e7 e5fe       |    |		Load	0x2,-0x2
06e8 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
06e9 e004       |    |		Load	0x0,0x4
06ea 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06eb 027c       | |  |		Execute	Discrete,Less
06ec 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06ed 0000 0000  |    |		.XXX[0x3]
06ef 0000       |    |
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 0217       |    |		Execute	Heap_Access,All_Reference
06f5 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
06f6 e004       |    |		Load	0x0,0x4
06f7 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06f8 e5fe       |    |		Load	0x2,-0x2
06f9 0217       |    |		Execute	Heap_Access,All_Reference
06fa 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
06fb e004       |    |		Load	0x0,0x4
06fc 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06fd 027b       | {  |		Execute	Discrete,Greater_Equal
06fe 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06ff 0000       |    |		.XXX[0x1]
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 340d       |4   |		Execute	Record,Field_Reference,Field_Number 0xd
0706 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0707 e004       |    |		Load	0x0,0x4
0708 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0709 e5fe       |    |		Load	0x2,-0x2
070a 0217       |    |		Execute	Heap_Access,All_Reference
070b 340d       |4   |		Execute	Record,Field_Reference,Field_Number 0xd
070c 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
070d e004       |    |		Load	0x0,0x4
070e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
070f 027b       | {  |		Execute	Discrete,Greater_Equal
0710 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0711 0000 0000  |    |		.BLANK	0000[0x7]
0718 ; --------------------------------------------------------------------------------------
0718 ; SUBPROGRAM
0718 ; --------------------------------------------------------------------------------------
0718 071b       |    |		.CONST	0x071b								; Address of begin
0719 0004       |    |		.CONST	0x0004								; Address of exception handler
071a 0001       |    |		.CONST	0x0001								; Number of locals
071b			BODY_0718:
071b			INIT_0718:
071b 00da       |    |		Load_Top	At_Offset_2
071c e004       |    |		Load	0x0,0x4
071d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
071e e5fe       |    |		Load	0x2,-0x2
071f e004       |    |		Load	0x0,0x4
0720 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0721 027d       | }  |		Execute	Discrete,Greater
0722 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0723 0000 0000  |    |		.BLANK	0000[0x5]
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 00db       |    |		Load_Top	At_Offset_3
072c e015       |    |		Load	0x0,0x15
072d 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
072e 00d9       |    |		Load_Top	At_Offset_1
072f 00d0       |    |		Action	Swap_Control
0730 0260       | `  |		Execute	Discrete,In_Type
0731 7001       |p   |		Jump_Nonzero	0x733
0732 0801       |    |		Execute_Immediate	Raise,0x1
0733 00db       |    |		Load_Top	At_Offset_3
0734 e016       |    |		Load	0x0,0x16
0735 e017       |    |		Load	0x0,0x17
0736 a018       |    |		Store_Unchecked	0x0,0x18
0737 e019       |    |		Load	0x0,0x19
0738 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0739 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
073a 0000 0000  |    |		.BLANK	0000[0x6]
0740 ; --------------------------------------------------------------------------------------
0740 ; SUBPROGRAM
0740 ; --------------------------------------------------------------------------------------
0740 0753       | S  |		.CONST	0x0753								; Address of begin
0741 0004       |    |		.CONST	0x0004								; Address of exception handler
0742 0005       |    |		.CONST	0x0005								; Number of locals
0743			INIT_0740:
0743 00da       |    |		Load_Top	At_Offset_2
0744 0217       |    |		Execute	Heap_Access,All_Reference
0745 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0746 0007       |    |		Action	Break_Optional
0747 e004       |    |		Load	0x0,0x4
0748 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0749 02c7       |    |		Declare_Variable	Any
074a e5ff       |    |		Load	0x2,-0x1
074b 0217       |    |		Execute	Heap_Access,All_Reference
074c 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
074d a403       |    |		Store_Unchecked	0x2,0x3
074e 00d9       |    |		Load_Top	At_Offset_1
074f 0217       |    |		Execute	Heap_Access,All_Reference
0750 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0751 029f 0b13  |    |		Declare_Subprogram	INIT_0b10,For_Call
0753			BODY_0740:
0753 e5ff       |    |		Load	0x2,-0x1
0754 0217       |    |		Execute	Heap_Access,All_Reference
0755 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0756 7030       |p0  |		Jump_Nonzero	0x787
0757 e012       |    |		Load	0x0,0x12
0758 6808       |h   |		Jump_Zero	0x761
0759 0092 0b79  |   y|		Action	Push_String_Extended,0xb79					; "Deleting link object "
075b 00db       |    |		Load_Top	At_Offset_3
075c e004       |    |		Load	0x0,0x4
075d 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
075e 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
075f 01cc       |    |		Execute	Vector,Catenate
0760 8013       |    |		Call	0x0,0x13
0761 8405       |    |		Call	0x2,0x5
0762 00d9       |    |		Load_Top	At_Offset_1
0763 e5ff       |    |		Load	0x2,-0x1
0764 021f       |    |		Execute	Heap_Access,Equal
0765 6807       |h   |		Jump_Zero	0x76d
0766 e5ff       |    |		Load	0x2,-0x1
0767 0217       |    |		Execute	Heap_Access,All_Reference
0768 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0769 e402       |    |		Load	0x2,0x2
076a 0217       |    |		Execute	Heap_Access,All_Reference
076b 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
076c 7816       |x   |		Jump	0x783
076d 00cf       |    |		Action	Mark_Auxiliary
076e 780b       |x   |		Jump	0x77a
076f 00da       |    |		Load_Top	At_Offset_2
0770 0217       |    |		Execute	Heap_Access,All_Reference
0771 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0772 e5ff       |    |		Load	0x2,-0x1
0773 021f       |    |		Execute	Heap_Access,Equal
0774 7007       |p   |		Jump_Nonzero	0x77c
0775 00da       |    |		Load_Top	At_Offset_2
0776 0217       |    |		Execute	Heap_Access,All_Reference
0777 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0778 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0779 00c9       |    |		Action	Pop_Auxiliary_Loop
077a 00da       |    |		Load_Top	At_Offset_2
077b 77f3       |w   |		Jump_Nonzero	0x76f
077c 00ce       |    |		Action	Pop_Auxiliary
077d e5ff       |    |		Load	0x2,-0x1
077e 0217       |    |		Execute	Heap_Access,All_Reference
077f 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0780 00da       |    |		Load_Top	At_Offset_2
0781 0217       |    |		Execute	Heap_Access,All_Reference
0782 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
0783 e5ff       |    |		Load	0x2,-0x1
0784 e011       |    |		Load	0x0,0x11
0785 1833       | 3  |		Execute	Package,Field_Execute,Field_Number 0x33
0786 c5ff       |    |		Store	0x2,-0x1
0787 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0788 ; --------------------------------------------------------------------------------------
0788 ; SUBPROGRAM
0788 ; --------------------------------------------------------------------------------------
0788 0795       |    |		.CONST	0x0795								; Address of begin
0789 0004       |    |		.CONST	0x0004								; Address of exception handler
078a 0004       |    |		.CONST	0x0004								; Number of locals
078b			INIT_0788:
078b 00da       |    |		Load_Top	At_Offset_2
078c e011       |    |		Load	0x0,0x11
078d 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
078e 0216       |    |		Execute	Heap_Access,Convert
078f e011       |    |		Load	0x0,0x11
0790 1b23       | #  |		Execute	Package,Field_Read,Field_Number 0x23
0791 e5fd       |    |		Load	0x2,-0x3
0792 0217       |    |		Execute	Heap_Access,All_Reference
0793 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0794 0007       |    |		Action	Break_Optional
0795			BODY_0788:
0795 e012       |    |		Load	0x0,0x12
0796 6812       |h   |		Jump_Zero	0x7a9
0797 0092 0b7a  |   z|		Action	Push_String_Extended,0xb7a					; "Adding client "
0799 e5ff       |    |		Load	0x2,-0x1
079a 0217       |    |		Execute	Heap_Access,All_Reference
079b 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
079c e00e       |    |		Load	0x0,0xe
079d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
079e 01cc       |    |		Execute	Vector,Catenate
079f 0092 0b7b  |   {|		Action	Push_String_Extended,0xb7b					; " to link "
07a1 01cc       |    |		Execute	Vector,Catenate
07a2 e5fd       |    |		Load	0x2,-0x3
07a3 0217       |    |		Execute	Heap_Access,All_Reference
07a4 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
07a5 e00e       |    |		Load	0x0,0xe
07a6 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
07a7 01cc       |    |		Execute	Vector,Catenate
07a8 8013       |    |		Call	0x0,0x13
07a9 00cf       |    |		Action	Mark_Auxiliary
07aa 780d       |x   |		Jump	0x7b8
07ab 00db       |    |		Load_Top	At_Offset_3
07ac 00da       |    |		Load_Top	At_Offset_2
07ad 0217       |    |		Execute	Heap_Access,All_Reference
07ae 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
07af 823e       | >  |		Call	0x1,0x3e
07b0 700d       |p   |		Jump_Nonzero	0x7be
07b1 00d9       |    |		Load_Top	At_Offset_1
07b2 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
07b3 00d9       |    |		Load_Top	At_Offset_1
07b4 0217       |    |		Execute	Heap_Access,All_Reference
07b5 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
07b6 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
07b7 00c9       |    |		Action	Pop_Auxiliary_Loop
07b8 00d9       |    |		Load_Top	At_Offset_1
07b9 6804       |h   |		Jump_Zero	0x7be
07ba 00d9       |    |		Load_Top	At_Offset_1
07bb 0217       |    |		Execute	Heap_Access,All_Reference
07bc 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
07bd 77ed       |w   |		Jump_Nonzero	0x7ab
07be 00ce       |    |		Action	Pop_Auxiliary
07bf 00d8       |    |		Load_Top	At_Offset_0
07c0 6806       |h   |		Jump_Zero	0x7c7
07c1 00d8       |    |		Load_Top	At_Offset_0
07c2 0217       |    |		Execute	Heap_Access,All_Reference
07c3 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
07c4 00db       |    |		Load_Top	At_Offset_3
07c5 021f       |    |		Execute	Heap_Access,Equal
07c6 702c       |p,  |		Jump_Nonzero	0x7f3
07c7 e5ff       |    |		Load	0x2,-0x1
07c8 e001       |    |		Load	0x0,0x1
07c9 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
07ca 185f       | _  |		Execute	Package,Field_Execute,Field_Number 0x5f
07cb e011       |    |		Load	0x0,0x11
07cc 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
07cd 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
07ce e5ff       |    |		Load	0x2,-0x1
07cf e011       |    |		Load	0x0,0x11
07d0 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
07d1 0216       |    |		Execute	Heap_Access,Convert
07d2 00d9       |    |		Load_Top	At_Offset_1
07d3 0217       |    |		Execute	Heap_Access,All_Reference
07d4 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
07d5 00d9       |    |		Load_Top	At_Offset_1
07d6 700b       |p   |		Jump_Nonzero	0x7e2
07d7 e5fd       |    |		Load	0x2,-0x3
07d8 0217       |    |		Execute	Heap_Access,All_Reference
07d9 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
07da 00d9       |    |		Load_Top	At_Offset_1
07db 0217       |    |		Execute	Heap_Access,All_Reference
07dc 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
07dd 00d8       |    |		Load_Top	At_Offset_0
07de e5fd       |    |		Load	0x2,-0x3
07df 0217       |    |		Execute	Heap_Access,All_Reference
07e0 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
07e1 780a       |x   |		Jump	0x7ec
07e2 00d9       |    |		Load_Top	At_Offset_1
07e3 0217       |    |		Execute	Heap_Access,All_Reference
07e4 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
07e5 00d9       |    |		Load_Top	At_Offset_1
07e6 0217       |    |		Execute	Heap_Access,All_Reference
07e7 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
07e8 00d8       |    |		Load_Top	At_Offset_0
07e9 00da       |    |		Load_Top	At_Offset_2
07ea 0217       |    |		Execute	Heap_Access,All_Reference
07eb 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
07ec e5fd       |    |		Load	0x2,-0x3
07ed 0217       |    |		Execute	Heap_Access,All_Reference
07ee 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
07ef 0a01       |    |		Execute_Immediate	Plus,0x1
07f0 e5fd       |    |		Load	0x2,-0x3
07f1 0217       |    |		Execute	Heap_Access,All_Reference
07f2 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
07f3 00cf       |    |		Action	Mark_Auxiliary
07f4 4805       |H   |		Short_Literal	0x5
07f5 4802       |H   |		Short_Literal	0x2
07f6 0007       |    |		Action	Break_Optional
07f7 00d8       |    |		Load_Top	At_Offset_0
07f8 e5fe       |    |		Load	0x2,-0x2
07f9 01d7       |    |		Execute	Vector,Field_Read
07fa 680b       |h   |		Jump_Zero	0x806
07fb 00d8       |    |		Load_Top	At_Offset_0
07fc e5fd       |    |		Load	0x2,-0x3
07fd 0217       |    |		Execute	Heap_Access,All_Reference
07fe 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
07ff 01d7       |    |		Execute	Vector,Field_Read
0800 0a01       |    |		Execute_Immediate	Plus,0x1
0801 00d9       |    |		Load_Top	At_Offset_1
0802 e5fd       |    |		Load	0x2,-0x3
0803 0217       |    |		Execute	Heap_Access,All_Reference
0804 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0805 01d6       |    |		Execute	Vector,Field_Write
0806 00c8       |    |		Action	Pop_Auxiliary_Range
0807 3fef       |?   |		Loop_Increasing	0x7f7
0808 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0809 0000 0000  |    |		.BLANK	0000[0x7]
0810 ; --------------------------------------------------------------------------------------
0810 ; SUBPROGRAM
0810 ; --------------------------------------------------------------------------------------
0810 0813       |    |		.CONST	0x0813								; Address of begin
0811 0004       |    |		.CONST	0x0004								; Address of exception handler
0812 0001       |    |		.CONST	0x0001								; Number of locals
0813			BODY_0810:
0813			INIT_0810:
0813 00cf       |    |		Action	Mark_Auxiliary
0814 4805       |H   |		Short_Literal	0x5
0815 4802       |H   |		Short_Literal	0x2
0816 0007       |    |		Action	Break_Optional
0817 00d8       |    |		Load_Top	At_Offset_0
0818 e5ff       |    |		Load	0x2,-0x1
0819 01d7       |    |		Execute	Vector,Field_Read
081a 680b       |h   |		Jump_Zero	0x826
081b 00d8       |    |		Load_Top	At_Offset_0
081c e5fe       |    |		Load	0x2,-0x2
081d 0217       |    |		Execute	Heap_Access,All_Reference
081e 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
081f 01d7       |    |		Execute	Vector,Field_Read
0820 0aff       |    |		Execute_Immediate	Plus,-0x1
0821 00d9       |    |		Load_Top	At_Offset_1
0822 e5fe       |    |		Load	0x2,-0x2
0823 0217       |    |		Execute	Heap_Access,All_Reference
0824 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0825 01d6       |    |		Execute	Vector,Field_Write
0826 00c8       |    |		Action	Pop_Auxiliary_Range
0827 3fef       |?   |		Loop_Increasing	0x817
0828 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0829 0000 0000  |    |		.BLANK	0000[0x7]
0830 ; --------------------------------------------------------------------------------------
0830 ; SUBPROGRAM
0830 ; --------------------------------------------------------------------------------------
0830 083d       | =  |		.CONST	0x083d								; Address of begin
0831 0004       |    |		.CONST	0x0004								; Address of exception handler
0832 0004       |    |		.CONST	0x0004								; Number of locals
0833			INIT_0830:
0833 00da       |    |		Load_Top	At_Offset_2
0834 e011       |    |		Load	0x0,0x11
0835 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
0836 0216       |    |		Execute	Heap_Access,Convert
0837 e011       |    |		Load	0x0,0x11
0838 1b23       | #  |		Execute	Package,Field_Read,Field_Number 0x23
0839 e5fd       |    |		Load	0x2,-0x3
083a 0217       |    |		Execute	Heap_Access,All_Reference
083b 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
083c 0007       |    |		Action	Break_Optional
083d			BODY_0830:
083d e012       |    |		Load	0x0,0x12
083e 6812       |h   |		Jump_Zero	0x851
083f 0092 0b7c  |   ||		Action	Push_String_Extended,0xb7c					; "Deleting client "
0841 e5ff       |    |		Load	0x2,-0x1
0842 0217       |    |		Execute	Heap_Access,All_Reference
0843 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
0844 e00e       |    |		Load	0x0,0xe
0845 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0846 01cc       |    |		Execute	Vector,Catenate
0847 0092 0b7d  |   }|		Action	Push_String_Extended,0xb7d					; " from link "
0849 01cc       |    |		Execute	Vector,Catenate
084a e5fd       |    |		Load	0x2,-0x3
084b 0217       |    |		Execute	Heap_Access,All_Reference
084c 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
084d e00e       |    |		Load	0x0,0xe
084e 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
084f 01cc       |    |		Execute	Vector,Catenate
0850 8013       |    |		Call	0x0,0x13
0851 00cf       |    |		Action	Mark_Auxiliary
0852 7846       |xF  |		Jump	0x899
0853 00d9       |    |		Load_Top	At_Offset_1
0854 0217       |    |		Execute	Heap_Access,All_Reference
0855 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0856 e402       |    |		Load	0x2,0x2
0857 021f       |    |		Execute	Heap_Access,Equal
0858 7007       |p   |		Jump_Nonzero	0x860
0859 00d9       |    |		Load_Top	At_Offset_1
085a 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
085b 00d9       |    |		Load_Top	At_Offset_1
085c 0217       |    |		Execute	Heap_Access,All_Reference
085d 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
085e 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
085f 7838       |x8  |		Jump	0x898
0860 00da       |    |		Load_Top	At_Offset_2
0861 7007       |p   |		Jump_Nonzero	0x869
0862 00d9       |    |		Load_Top	At_Offset_1
0863 0217       |    |		Execute	Heap_Access,All_Reference
0864 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0865 e5fd       |    |		Load	0x2,-0x3
0866 0217       |    |		Execute	Heap_Access,All_Reference
0867 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
0868 7806       |x   |		Jump	0x86f
0869 00d9       |    |		Load_Top	At_Offset_1
086a 0217       |    |		Execute	Heap_Access,All_Reference
086b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
086c 00db       |    |		Load_Top	At_Offset_3
086d 0217       |    |		Execute	Heap_Access,All_Reference
086e 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
086f 00d9       |    |		Load_Top	At_Offset_1
0870 e011       |    |		Load	0x0,0x11
0871 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0872 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0873 00cf       |    |		Action	Mark_Auxiliary
0874 4805       |H   |		Short_Literal	0x5
0875 4802       |H   |		Short_Literal	0x2
0876 0007       |    |		Action	Break_Optional
0877 00d8       |    |		Load_Top	At_Offset_0
0878 e5fe       |    |		Load	0x2,-0x2
0879 01d7       |    |		Execute	Vector,Field_Read
087a 680b       |h   |		Jump_Zero	0x886
087b 00d8       |    |		Load_Top	At_Offset_0
087c e5fd       |    |		Load	0x2,-0x3
087d 0217       |    |		Execute	Heap_Access,All_Reference
087e 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
087f 01d7       |    |		Execute	Vector,Field_Read
0880 0aff       |    |		Execute_Immediate	Plus,-0x1
0881 00d9       |    |		Load_Top	At_Offset_1
0882 e5fd       |    |		Load	0x2,-0x3
0883 0217       |    |		Execute	Heap_Access,All_Reference
0884 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0885 01d6       |    |		Execute	Vector,Field_Write
0886 00c8       |    |		Action	Pop_Auxiliary_Range
0887 3fef       |?   |		Loop_Increasing	0x877
0888 00ce       |    |		Action	Pop_Auxiliary
0889 e5fd       |    |		Load	0x2,-0x3
088a 0217       |    |		Execute	Heap_Access,All_Reference
088b 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
088c 0aff       |    |		Execute_Immediate	Plus,-0x1
088d e5fd       |    |		Load	0x2,-0x3
088e 0217       |    |		Execute	Heap_Access,All_Reference
088f 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
0890 e5fd       |    |		Load	0x2,-0x3
0891 0217       |    |		Execute	Heap_Access,All_Reference
0892 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0893 7003       |p   |		Jump_Nonzero	0x897
0894 e5fd       |    |		Load	0x2,-0x3
0895 824f       | O  |		Call	0x1,0x4f
0896 c5fd       |    |		Store	0x2,-0x3
0897 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0898 00c9       |    |		Action	Pop_Auxiliary_Loop
0899 00d9       |    |		Load_Top	At_Offset_1
089a 77b8       |w   |		Jump_Nonzero	0x853
089b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
089c 0000 0000  |    |		.BLANK	0000[0x4]
08a0 ; --------------------------------------------------------------------------------------
08a0 ; SUBPROGRAM
08a0 ; --------------------------------------------------------------------------------------
08a0 08a9       |    |		.CONST	0x08a9								; Address of begin
08a1 0004       |    |		.CONST	0x0004								; Address of exception handler
08a2 0002       |    |		.CONST	0x0002								; Number of locals
08a3			INIT_08a0:
08a3 00da       |    |		Load_Top	At_Offset_2
08a4 e001       |    |		Load	0x0,0x1
08a5 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
08a6 185f       | _  |		Execute	Package,Field_Execute,Field_Number 0x5f
08a7 e011       |    |		Load	0x0,0x11
08a8 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
08a9			BODY_08a0:
08a9 e012       |    |		Load	0x0,0x12
08aa 6812       |h   |		Jump_Zero	0x8bd
08ab 0092 0b7e  |   ~|		Action	Push_String_Extended,0xb7e					; "Adding supplier "
08ad e5fe       |    |		Load	0x2,-0x2
08ae 0217       |    |		Execute	Heap_Access,All_Reference
08af 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
08b0 e00e       |    |		Load	0x0,0xe
08b1 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
08b2 01cc       |    |		Execute	Vector,Catenate
08b3 0092 0b70  |   p|		Action	Push_String_Extended,0xb70					; " for "
08b5 01cc       |    |		Execute	Vector,Catenate
08b6 e5ff       |    |		Load	0x2,-0x1
08b7 0217       |    |		Execute	Heap_Access,All_Reference
08b8 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
08b9 e00e       |    |		Load	0x0,0xe
08ba 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
08bb 01cc       |    |		Execute	Vector,Catenate
08bc 8013       |    |		Call	0x0,0x13
08bd e5fe       |    |		Load	0x2,-0x2
08be 00d9       |    |		Load_Top	At_Offset_1
08bf 0217       |    |		Execute	Heap_Access,All_Reference
08c0 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
08c1 e5fd       |    |		Load	0x2,-0x3
08c2 00d9       |    |		Load_Top	At_Offset_1
08c3 0217       |    |		Execute	Heap_Access,All_Reference
08c4 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
08c5 e5fc       |    |		Load	0x2,-0x4
08c6 00d9       |    |		Load_Top	At_Offset_1
08c7 0217       |    |		Execute	Heap_Access,All_Reference
08c8 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
08c9 e5fb       |    |		Load	0x2,-0x5
08ca 7007       |p   |		Jump_Nonzero	0x8d2
08cb 00d8       |    |		Load_Top	At_Offset_0
08cc e5ff       |    |		Load	0x2,-0x1
08cd 0217       |    |		Execute	Heap_Access,All_Reference
08ce 3819       |8   |		Execute	Record,Field_Write,Field_Number 0x19
08cf 00d8       |    |		Load_Top	At_Offset_0
08d0 a5fb       |    |		Store_Unchecked	0x2,-0x5
08d1 7808       |x   |		Jump	0x8da
08d2 00d8       |    |		Load_Top	At_Offset_0
08d3 e5fb       |    |		Load	0x2,-0x5
08d4 0217       |    |		Execute	Heap_Access,All_Reference
08d5 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
08d6 e5fb       |    |		Load	0x2,-0x5
08d7 0217       |    |		Execute	Heap_Access,All_Reference
08d8 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
08d9 a5fb       |    |		Store_Unchecked	0x2,-0x5
08da 00db       |    |		Load_Top	At_Offset_3
08db 0217       |    |		Execute	Heap_Access,All_Reference
08dc 3c18       |<   |		Execute	Record,Field_Read,Field_Number 0x18
08dd 0a01       |    |		Execute_Immediate	Plus,0x1
08de e5ff       |    |		Load	0x2,-0x1
08df 0217       |    |		Execute	Heap_Access,All_Reference
08e0 3818       |8   |		Execute	Record,Field_Write,Field_Number 0x18
08e1 e5fe       |    |		Load	0x2,-0x2
08e2 e5fd       |    |		Load	0x2,-0x3
08e3 e5ff       |    |		Load	0x2,-0x1
08e4 8250       | P  |		Call	0x1,0x50
08e5 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
08e6 0000 0000  |    |		.XXX[0x2]
08e8 ; --------------------------------------------------------------------------------------
08e8 ; SUBPROGRAM
08e8 ; --------------------------------------------------------------------------------------
08e8 090b       |    |		.CONST	0x090b								; Address of begin
08e9 0004       |    |		.CONST	0x0004								; Address of exception handler
08ea 0009       |    |		.CONST	0x0009								; Number of locals
08eb			INIT_08e8:
08eb 00db       |    |		Load_Top	At_Offset_3
08ec e001       |    |		Load	0x0,0x1
08ed 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
08ee 185f       | _  |		Execute	Package,Field_Execute,Field_Number 0x5f
08ef e01a       |    |		Load	0x0,0x1a
08f0 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
08f1 02ff       |    |		Declare_Variable	Variant_Record
08f2 4802       |H   |		Short_Literal	0x2
08f3 00da       |    |		Load_Top	At_Offset_2
08f4 e5ff       |    |		Load	0x2,-0x1
08f5 e01a       |    |		Load	0x0,0x1a
08f6 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
08f7 00d9       |    |		Load_Top	At_Offset_1
08f8 016d       | m  |		Execute	Variant_Record,Structure_Write
08f9 e011       |    |		Load	0x0,0x11
08fa 1b31       | 1  |		Execute	Package,Field_Read,Field_Number 0x31
08fb e004       |    |		Load	0x0,0x4
08fc 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
08fd 02c7       |    |		Declare_Variable	Any
08fe 00d8       |    |		Load_Top	At_Offset_0
08ff 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0900 e004       |    |		Load	0x0,0x4
0901 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0902 02c7       |    |		Declare_Variable	Any
0903 00d8       |    |		Load_Top	At_Offset_0
0904 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0905 e011       |    |		Load	0x0,0x11
0906 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
0907 e00e       |    |		Load	0x0,0xe
0908 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0909 e004       |    |		Load	0x0,0x4
090a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
090b			BODY_08e8:
090b e403       |    |		Load	0x2,0x3
090c 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
090d 0f02       |    |		Execute_Immediate	Equal,0x2
090e 6804       |h   |		Jump_Zero	0x913
090f e403       |    |		Load	0x2,0x3
0910 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0911 a404       |    |		Store_Unchecked	0x2,0x4
0912 797a       |yz  |		Jump	0xa8d
0913 e403       |    |		Load	0x2,0x3
0914 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0915 618a       |a   |		Indirect_Literal	Discrete,0xaa0,{0x00000000, 0x0000500b}
0916 027f       |    |		Execute	Discrete,Equal
0917 6819       |h   |		Jump_Zero	0x931
0918 e003       |    |		Load	0x0,0x3
0919 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
091a 4801       |H   |		Short_Literal	0x1
091b 4802       |H   |		Short_Literal	0x2
091c e008       |    |		Load	0x0,0x8
091d 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
091e 0334       | 4  |		Declare_Variable	Array,With_Constraint
091f e5ff       |    |		Load	0x2,-0x1
0920 e008       |    |		Load	0x0,0x8
0921 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0922 4801       |H   |		Short_Literal	0x1
0923 00da       |    |		Load_Top	At_Offset_2
0924 01d6       |    |		Execute	Vector,Field_Write
0925 e5fe       |    |		Load	0x2,-0x2
0926 e001       |    |		Load	0x0,0x1
0927 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0928 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0929 4802       |H   |		Short_Literal	0x2
092a 00da       |    |		Load_Top	At_Offset_2
092b 01d6       |    |		Execute	Vector,Field_Write
092c 616f       |ao  |		Indirect_Literal	Discrete,0xa9c,{0x00000000, 0x00001804}
092d e003       |    |		Load	0x0,0x3
092e 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
092f c5fc       |    |		Store	0x2,-0x4
0930 795c       |y\  |		Jump	0xa8d
0931 e004       |    |		Load	0x0,0x4
0932 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0933 e405       |    |		Load	0x2,0x5
0934 0120       |    |		Execute	Any,Is_Value
0935 6803       |h   |		Jump_Zero	0x939
0936 e004       |    |		Load	0x0,0x4
0937 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0938 7801       |x   |		Jump	0x93a
0939 e405       |    |		Load	0x2,0x5
093a e5ff       |    |		Load	0x2,-0x1
093b e004       |    |		Load	0x0,0x4
093c 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
093d 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
093e c405       |    |		Store	0x2,0x5
093f 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0940 4801       |H   |		Short_Literal	0x1
0941 4801       |H   |		Short_Literal	0x1
0942 e008       |    |		Load	0x0,0x8
0943 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0944 0334       | 4  |		Declare_Variable	Array,With_Constraint
0945 e5ff       |    |		Load	0x2,-0x1
0946 e008       |    |		Load	0x0,0x8
0947 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0948 4801       |H   |		Short_Literal	0x1
0949 00da       |    |		Load_Top	At_Offset_2
094a 01d6       |    |		Execute	Vector,Field_Write
094b 614c       |aL  |		Indirect_Literal	Discrete,0xa98,{0x00000000, 0x00001805}
094c 00da       |    |		Load_Top	At_Offset_2
094d e003       |    |		Load	0x0,0x3
094e 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
094f e405       |    |		Load	0x2,0x5
0950 801b       |    |		Call	0x0,0x1b
0951 681f       |h   |		Jump_Zero	0x971
0952 e004       |    |		Load	0x0,0x4
0953 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0954 e406       |    |		Load	0x2,0x6
0955 0120       |    |		Execute	Any,Is_Value
0956 6803       |h   |		Jump_Zero	0x95a
0957 e004       |    |		Load	0x0,0x4
0958 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0959 7801       |x   |		Jump	0x95b
095a e406       |    |		Load	0x2,0x6
095b e405       |    |		Load	0x2,0x5
095c e004       |    |		Load	0x0,0x4
095d 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
095e 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
095f c406       |    |		Store	0x2,0x6
0960 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0961 4801       |H   |		Short_Literal	0x1
0962 4801       |H   |		Short_Literal	0x1
0963 e008       |    |		Load	0x0,0x8
0964 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0965 0334       | 4  |		Declare_Variable	Array,With_Constraint
0966 e405       |    |		Load	0x2,0x5
0967 e008       |    |		Load	0x0,0x8
0968 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0969 4801       |H   |		Short_Literal	0x1
096a 00da       |    |		Load_Top	At_Offset_2
096b 01d6       |    |		Execute	Vector,Field_Write
096c 612b       |a+  |		Indirect_Literal	Discrete,0xa98,{0x00000000, 0x00001805}
096d 00da       |    |		Load_Top	At_Offset_2
096e e003       |    |		Load	0x0,0x3
096f 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
0970 7802       |x   |		Jump	0x973
0971 e405       |    |		Load	0x2,0x5
0972 c406       |    |		Store	0x2,0x6
0973 e402       |    |		Load	0x2,0x2
0974 e406       |    |		Load	0x2,0x6
0975 e001       |    |		Load	0x0,0x1
0976 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0977 1885       |    |		Execute	Package,Field_Execute,Field_Number 0x85
0978 680f       |h   |		Jump_Zero	0x988
0979 e5fc       |    |		Load	0x2,-0x4
097a e001       |    |		Load	0x0,0x1
097b 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
097c 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
097d e402       |    |		Load	0x2,0x2
097e e406       |    |		Load	0x2,0x6
097f e001       |    |		Load	0x0,0x1
0980 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0981 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
0982 e011       |    |		Load	0x0,0x11
0983 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
0984 0216       |    |		Execute	Heap_Access,Convert
0985 c407       |    |		Store	0x2,0x7
0986 c5fc       |    |		Store	0x2,-0x4
0987 7852       |xR  |		Jump	0x9da
0988 e402       |    |		Load	0x2,0x2
0989 0217       |    |		Execute	Heap_Access,All_Reference
098a 3c0c       |<   |		Execute	Record,Field_Read,Field_Number 0xc
098b 6830       |h0  |		Jump_Zero	0x9bc
098c e402       |    |		Load	0x2,0x2
098d 0217       |    |		Execute	Heap_Access,All_Reference
098e 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
098f 6816       |h   |		Jump_Zero	0x9a6
0990 e405       |    |		Load	0x2,0x5
0991 e004       |    |		Load	0x0,0x4
0992 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0993 e01c       |    |		Load	0x0,0x1c
0994 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0995 027f       |    |		Execute	Discrete,Equal
0996 7007       |p   |		Jump_Nonzero	0x99e
0997 e405       |    |		Load	0x2,0x5
0998 e004       |    |		Load	0x0,0x4
0999 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
099a e01c       |    |		Load	0x0,0x1c
099b 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
099c 027f       |    |		Execute	Discrete,Equal
099d 6808       |h   |		Jump_Zero	0x9a6
099e e5fc       |    |		Load	0x2,-0x4
099f e402       |    |		Load	0x2,0x2
09a0 e405       |    |		Load	0x2,0x5
09a1 e001       |    |		Load	0x0,0x1
09a2 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
09a3 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
09a4 c5fc       |    |		Store	0x2,-0x4
09a5 7807       |x   |		Jump	0x9ad
09a6 e5fc       |    |		Load	0x2,-0x4
09a7 e402       |    |		Load	0x2,0x2
09a8 e406       |    |		Load	0x2,0x6
09a9 e001       |    |		Load	0x0,0x1
09aa 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
09ab 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
09ac c5fc       |    |		Store	0x2,-0x4
09ad e5fc       |    |		Load	0x2,-0x4
09ae e001       |    |		Load	0x0,0x1
09af 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
09b0 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
09b1 e402       |    |		Load	0x2,0x2
09b2 e406       |    |		Load	0x2,0x6
09b3 e001       |    |		Load	0x0,0x1
09b4 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
09b5 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
09b6 e011       |    |		Load	0x0,0x11
09b7 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
09b8 0216       |    |		Execute	Heap_Access,Convert
09b9 c407       |    |		Store	0x2,0x7
09ba c5fc       |    |		Store	0x2,-0x4
09bb 781e       |x   |		Jump	0x9da
09bc e003       |    |		Load	0x0,0x3
09bd 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
09be 4801       |H   |		Short_Literal	0x1
09bf 4803       |H   |		Short_Literal	0x3
09c0 e008       |    |		Load	0x0,0x8
09c1 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
09c2 0334       | 4  |		Declare_Variable	Array,With_Constraint
09c3 e406       |    |		Load	0x2,0x6
09c4 e008       |    |		Load	0x0,0x8
09c5 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
09c6 4801       |H   |		Short_Literal	0x1
09c7 00da       |    |		Load_Top	At_Offset_2
09c8 01d6       |    |		Execute	Vector,Field_Write
09c9 e5ff       |    |		Load	0x2,-0x1
09ca e008       |    |		Load	0x0,0x8
09cb 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
09cc 4802       |H   |		Short_Literal	0x2
09cd 00da       |    |		Load_Top	At_Offset_2
09ce 01d6       |    |		Execute	Vector,Field_Write
09cf e402       |    |		Load	0x2,0x2
09d0 e001       |    |		Load	0x0,0x1
09d1 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
09d2 185a       | Z  |		Execute	Package,Field_Execute,Field_Number 0x5a
09d3 4803       |H   |		Short_Literal	0x3
09d4 00da       |    |		Load_Top	At_Offset_2
09d5 01d6       |    |		Execute	Vector,Field_Write
09d6 60bd       |`   |		Indirect_Literal	Discrete,0xa94,{0x00000000, 0x00001808}
09d7 e003       |    |		Load	0x0,0x3
09d8 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
09d9 c5fc       |    |		Store	0x2,-0x4
09da e5fc       |    |		Load	0x2,-0x4
09db 6804       |h   |		Jump_Zero	0x9e0
09dc e011       |    |		Load	0x0,0x11
09dd 1b31       | 1  |		Execute	Package,Field_Read,Field_Number 0x31
09de a5fd       |    |		Store_Unchecked	0x2,-0x3
09df 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
09e0 e402       |    |		Load	0x2,0x2
09e1 0217       |    |		Execute	Heap_Access,All_Reference
09e2 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
09e3 701b       |p   |		Jump_Nonzero	0x9ff
09e4 e402       |    |		Load	0x2,0x2
09e5 e5ff       |    |		Load	0x2,-0x1
09e6 e405       |    |		Load	0x2,0x5
09e7 e00e       |    |		Load	0x0,0xe
09e8 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
09e9 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
09ea 00da       |    |		Load_Top	At_Offset_2
09eb 0217       |    |		Execute	Heap_Access,All_Reference
09ec 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
09ed a404       |    |		Store_Unchecked	0x2,0x4
09ee 00cf       |    |		Action	Mark_Auxiliary
09ef 780b       |x   |		Jump	0x9fb
09f0 00da       |    |		Load_Top	At_Offset_2
09f1 e404       |    |		Load	0x2,0x4
09f2 0217       |    |		Execute	Heap_Access,All_Reference
09f3 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
09f4 021f       |    |		Execute	Heap_Access,Equal
09f5 7007       |p   |		Jump_Nonzero	0x9fd
09f6 e404       |    |		Load	0x2,0x4
09f7 0217       |    |		Execute	Heap_Access,All_Reference
09f8 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
09f9 a404       |    |		Store_Unchecked	0x2,0x4
09fa 00c9       |    |		Action	Pop_Auxiliary_Loop
09fb e404       |    |		Load	0x2,0x4
09fc 77f3       |w   |		Jump_Nonzero	0x9f0
09fd 00ce       |    |		Action	Pop_Auxiliary
09fe 7857       |xW  |		Jump	0xa56
09ff 00da       |    |		Load_Top	At_Offset_2
0a00 0217       |    |		Execute	Heap_Access,All_Reference
0a01 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0a02 e405       |    |		Load	0x2,0x5
0a03 012e       | .  |		Execute	Any,Not_Equal
0a04 682d       |h-  |		Jump_Zero	0xa32
0a05 e003       |    |		Load	0x0,0x3
0a06 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0a07 4801       |H   |		Short_Literal	0x1
0a08 4805       |H   |		Short_Literal	0x5
0a09 e008       |    |		Load	0x0,0x8
0a0a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0a0b 0334       | 4  |		Declare_Variable	Array,With_Constraint
0a0c e405       |    |		Load	0x2,0x5
0a0d e008       |    |		Load	0x0,0x8
0a0e 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0a0f 4801       |H   |		Short_Literal	0x1
0a10 00da       |    |		Load_Top	At_Offset_2
0a11 01d6       |    |		Execute	Vector,Field_Write
0a12 e406       |    |		Load	0x2,0x6
0a13 e008       |    |		Load	0x0,0x8
0a14 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0a15 4802       |H   |		Short_Literal	0x2
0a16 00da       |    |		Load_Top	At_Offset_2
0a17 01d6       |    |		Execute	Vector,Field_Write
0a18 e407       |    |		Load	0x2,0x7
0a19 0217       |    |		Execute	Heap_Access,All_Reference
0a1a 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0a1b e008       |    |		Load	0x0,0x8
0a1c 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0a1d 4803       |H   |		Short_Literal	0x3
0a1e 00da       |    |		Load_Top	At_Offset_2
0a1f 01d6       |    |		Execute	Vector,Field_Write
0a20 e5ff       |    |		Load	0x2,-0x1
0a21 e008       |    |		Load	0x0,0x8
0a22 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0a23 4804       |H   |		Short_Literal	0x4
0a24 00da       |    |		Load_Top	At_Offset_2
0a25 01d6       |    |		Execute	Vector,Field_Write
0a26 e5fe       |    |		Load	0x2,-0x2
0a27 e001       |    |		Load	0x0,0x1
0a28 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0a29 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0a2a 4805       |H   |		Short_Literal	0x5
0a2b 00da       |    |		Load_Top	At_Offset_2
0a2c 01d6       |    |		Execute	Vector,Field_Write
0a2d 6062       |`b  |		Indirect_Literal	Discrete,0xa90,{0x00000000, 0x00001807}
0a2e e003       |    |		Load	0x0,0x3
0a2f 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0a30 c5fc       |    |		Store	0x2,-0x4
0a31 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0a32 e5fe       |    |		Load	0x2,-0x2
0a33 e001       |    |		Load	0x0,0x1
0a34 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0a35 185f       | _  |		Execute	Package,Field_Execute,Field_Number 0x5f
0a36 0217       |    |		Execute	Heap_Access,All_Reference
0a37 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0a38 e405       |    |		Load	0x2,0x5
0a39 e001       |    |		Load	0x0,0x1
0a3a 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0a3b 7014       |p   |		Jump_Nonzero	0xa50
0a3c e405       |    |		Load	0x2,0x5
0a3d e004       |    |		Load	0x0,0x4
0a3e 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0a3f 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
0a40 0092 0b7f  |    |		Action	Push_String_Extended,0xb7f					; " has no state file.  "
0a42 01cc       |    |		Execute	Vector,Catenate
0a43 e5ff       |    |		Load	0x2,-0x1
0a44 e004       |    |		Load	0x0,0x4
0a45 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0a46 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
0a47 01cc       |    |		Execute	Vector,Catenate
0a48 0092 0b80  |    |		Action	Push_String_Extended,0xb80					; " will not be considered during build operations."
0a4a 01cc       |    |		Execute	Vector,Catenate
0a4b 8013       |    |		Call	0x0,0x13
0a4c e011       |    |		Load	0x0,0x11
0a4d 1b31       | 1  |		Execute	Package,Field_Read,Field_Number 0x31
0a4e a5fd       |    |		Store_Unchecked	0x2,-0x3
0a4f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0a50 e402       |    |		Load	0x2,0x2
0a51 e5ff       |    |		Load	0x2,-0x1
0a52 e405       |    |		Load	0x2,0x5
0a53 e00e       |    |		Load	0x0,0xe
0a54 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0a55 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0a56 e404       |    |		Load	0x2,0x4
0a57 7035       |p5  |		Jump_Nonzero	0xa8d
0a58 e402       |    |		Load	0x2,0x2
0a59 e011       |    |		Load	0x0,0x11
0a5a 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
0a5b a404       |    |		Store_Unchecked	0x2,0x4
0a5c 00da       |    |		Load_Top	At_Offset_2
0a5d e404       |    |		Load	0x2,0x4
0a5e 0217       |    |		Execute	Heap_Access,All_Reference
0a5f 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0a60 00d9       |    |		Load_Top	At_Offset_1
0a61 e404       |    |		Load	0x2,0x4
0a62 0217       |    |		Execute	Heap_Access,All_Reference
0a63 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0a64 e402       |    |		Load	0x2,0x2
0a65 0217       |    |		Execute	Heap_Access,All_Reference
0a66 3c0e       |<   |		Execute	Record,Field_Read,Field_Number 0xe
0a67 00db       |    |		Load_Top	At_Offset_3
0a68 021f       |    |		Execute	Heap_Access,Equal
0a69 e404       |    |		Load	0x2,0x4
0a6a 0217       |    |		Execute	Heap_Access,All_Reference
0a6b 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0a6c e402       |    |		Load	0x2,0x2
0a6d 0217       |    |		Execute	Heap_Access,All_Reference
0a6e 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
0a6f 7004       |p   |		Jump_Nonzero	0xa74
0a70 e404       |    |		Load	0x2,0x4
0a71 0217       |    |		Execute	Heap_Access,All_Reference
0a72 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0a73 680b       |h   |		Jump_Zero	0xa7f
0a74 e5ff       |    |		Load	0x2,-0x1
0a75 e404       |    |		Load	0x2,0x4
0a76 0217       |    |		Execute	Heap_Access,All_Reference
0a77 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0a78 4800       |H   |		Short_Literal	0x0
0a79 e402       |    |		Load	0x2,0x2
0a7a e404       |    |		Load	0x2,0x4
0a7b e5ff       |    |		Load	0x2,-0x1
0a7c e01a       |    |		Load	0x0,0x1a
0a7d 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0a7e 7804       |x   |		Jump	0xa83
0a7f e5ff       |    |		Load	0x2,-0x1
0a80 e404       |    |		Load	0x2,0x4
0a81 0217       |    |		Execute	Heap_Access,All_Reference
0a82 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0a83 00da       |    |		Load_Top	At_Offset_2
0a84 0217       |    |		Execute	Heap_Access,All_Reference
0a85 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0a86 e404       |    |		Load	0x2,0x4
0a87 0217       |    |		Execute	Heap_Access,All_Reference
0a88 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
0a89 e404       |    |		Load	0x2,0x4
0a8a 00db       |    |		Load_Top	At_Offset_3
0a8b 0217       |    |		Execute	Heap_Access,All_Reference
0a8c 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0a8d e404       |    |		Load	0x2,0x4
0a8e a5fd       |    |		Store_Unchecked	0x2,-0x3
0a8f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0a90 0000 0000  |    |		.LITERAL	{0x00000000, 0x00001807}
0a94 0000 0000  |    |		.LITERAL	{0x00000000, 0x00001808}
0a98 0000 0000  |    |		.LITERAL	{0x00000000, 0x00001805}
0a9c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00001804}
0aa0 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000500b}
0aa4 0000 0000  |    |		.BLANK	0000[0x4]
0aa8 ; --------------------------------------------------------------------------------------
0aa8 ; SUBPROGRAM
0aa8 ; --------------------------------------------------------------------------------------
0aa8 0aab       |    |		.CONST	0x0aab								; Address of begin
0aa9 0004       |    |		.CONST	0x0004								; Address of exception handler
0aaa 0001       |    |		.CONST	0x0001								; Number of locals
0aab			BODY_0aa8:
0aab			INIT_0aa8:
0aab 00db       |    |		Load_Top	At_Offset_3
0aac 7007       |p   |		Jump_Nonzero	0xab4
0aad e5fd       |    |		Load	0x2,-0x3
0aae 0217       |    |		Execute	Heap_Access,All_Reference
0aaf 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0ab0 00db       |    |		Load_Top	At_Offset_3
0ab1 0217       |    |		Execute	Heap_Access,All_Reference
0ab2 3819       |8   |		Execute	Record,Field_Write,Field_Number 0x19
0ab3 7806       |x   |		Jump	0xaba
0ab4 e5fd       |    |		Load	0x2,-0x3
0ab5 0217       |    |		Execute	Heap_Access,All_Reference
0ab6 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0ab7 e5fe       |    |		Load	0x2,-0x2
0ab8 0217       |    |		Execute	Heap_Access,All_Reference
0ab9 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0aba e5fd       |    |		Load	0x2,-0x3
0abb 0219       |    |		Execute	Heap_Access,All_Read
0abc 00d8       |    |		Load_Top	At_Offset_0
0abd 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0abe e5fd       |    |		Load	0x2,-0x3
0abf 0217       |    |		Execute	Heap_Access,All_Reference
0ac0 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0ac1 e5ff       |    |		Load	0x2,-0x1
0ac2 8252       | R  |		Call	0x1,0x52
0ac3 00d9       |    |		Load_Top	At_Offset_1
0ac4 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0ac5 00d1       |    |		Pop_Control	Pop_Count_1
0ac6 e5fd       |    |		Load	0x2,-0x3
0ac7 e011       |    |		Load	0x0,0x11
0ac8 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
0ac9 c5fd       |    |		Store	0x2,-0x3
0aca 00da       |    |		Load_Top	At_Offset_2
0acb 0217       |    |		Execute	Heap_Access,All_Reference
0acc 3c18       |<   |		Execute	Record,Field_Read,Field_Number 0x18
0acd 0aff       |    |		Execute_Immediate	Plus,-0x1
0ace 00db       |    |		Load_Top	At_Offset_3
0acf 0217       |    |		Execute	Heap_Access,All_Reference
0ad0 3818       |8   |		Execute	Record,Field_Write,Field_Number 0x18
0ad1 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0ad2 0000 0000  |    |		.BLANK	0000[0x6]
0ad8 ; --------------------------------------------------------------------------------------
0ad8 ; SUBPROGRAM
0ad8 ; --------------------------------------------------------------------------------------
0ad8 0adb       |    |		.CONST	0x0adb								; Address of begin
0ad9 0af6       |    |		.CONST	0x0af6								; Address of exception handler
0ada 0001       |    |		.CONST	0x0001								; Number of locals
0adb			BODY_0ad8:
0adb			INIT_0ad8:
0adb e402       |    |		Load	0x2,0x2
0adc 0217       |    |		Execute	Heap_Access,All_Reference
0add 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0ade a403       |    |		Store_Unchecked	0x2,0x3
0adf e402       |    |		Load	0x2,0x2
0ae0 0217       |    |		Execute	Heap_Access,All_Reference
0ae1 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0ae2 0217       |    |		Execute	Heap_Access,All_Reference
0ae3 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0ae4 e40c       |    |		Load	0x2,0xc
0ae5 e408       |    |		Load	0x2,0x8
0ae6 01d5       |    |		Execute	Vector,Field_Reference
0ae7 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0ae8 823f       | ?  |		Call	0x1,0x3f
0ae9 7003       |p   |		Jump_Nonzero	0xaed
0aea 00cc       |    |		Action	Pop_Block
0aeb 00a7 058b  |    |		Action	Jump_Extended,0x58b
0aed e402       |    |		Load	0x2,0x2
0aee e404       |    |		Load	0x2,0x4
0aef e5fe       |    |		Load	0x2,-0x2
0af0 8255       | U  |		Call	0x1,0x55
0af1 c404       |    |		Store	0x2,0x4
0af2 c402       |    |		Store	0x2,0x2
0af3 e403       |    |		Load	0x2,0x3
0af4 a402       |    |		Store_Unchecked	0x2,0x2
0af5 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0af6			TRAP_0ad8:
0af6 4884       |H   |		Short_Literal	0x84
0af7 010f       |    |		Execute	Exception,Equal
0af8 6810       |h   |		Jump_Zero	0xb09
0af9 e004       |    |		Load	0x0,0x4
0afa 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0afb e402       |    |		Load	0x2,0x2
0afc 0217       |    |		Execute	Heap_Access,All_Reference
0afd 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0afe 0217       |    |		Execute	Heap_Access,All_Reference
0aff 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0b00 e402       |    |		Load	0x2,0x2
0b01 e404       |    |		Load	0x2,0x4
0b02 e5fe       |    |		Load	0x2,-0x2
0b03 8255       | U  |		Call	0x1,0x55
0b04 c404       |    |		Store	0x2,0x4
0b05 c402       |    |		Store	0x2,0x2
0b06 e403       |    |		Load	0x2,0x3
0b07 a402       |    |		Store_Unchecked	0x2,0x2
0b08 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0b09 0100       |    |		Execute	Exception,Raise
0b0a 0000 0000  |    |		.BLANK	0000[0x6]
0b10 ; --------------------------------------------------------------------------------------
0b10 ; SUBPROGRAM
0b10 ; --------------------------------------------------------------------------------------
0b10 0b13       |    |		.CONST	0x0b13								; Address of begin
0b11 0b1c       |    |		.CONST	0x0b1c								; Address of exception handler
0b12 0001       |    |		.CONST	0x0001								; Number of locals
0b13			BODY_0b10:
0b13			INIT_0b10:
0b13 e5ff       |    |		Load	0x2,-0x1
0b14 e009       |    |		Load	0x0,0x9
0b15 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0b16 e011       |    |		Load	0x0,0x11
0b17 1841       | A  |		Execute	Package,Field_Execute,Field_Number 0x41
0b18 e403       |    |		Load	0x2,0x3
0b19 e01a       |    |		Load	0x0,0x1a
0b1a 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0b1b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0b1c			TRAP_0b10:
0b1c 0007       |    |		Action	Break_Optional
0b1d 0092 0b81  |    |		Action	Push_String_Extended,0xb81					; "Link object being Deleted "
0b1f e403       |    |		Load	0x2,0x3
0b20 e004       |    |		Load	0x0,0x4
0b21 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0b22 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
0b23 01cc       |    |		Execute	Vector,Catenate
0b24 0092 0b82  |    |		Action	Push_String_Extended,0xb82					; " is not in the map."
0b26 01cc       |    |		Execute	Vector,Catenate
0b27 8013       |    |		Call	0x0,0x13
0b28 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0b29 0000 0000  |    |		.BLANK	0000[0x7]
0b30 ; --------------------------------------------------------------------------------------
0b30 ; SUBPROGRAM
0b30 ; --------------------------------------------------------------------------------------
0b30 0b33       | 3  |		.CONST	0x0b33								; Address of begin
0b31 0004       |    |		.CONST	0x0004								; Address of exception handler
0b32 0001       |    |		.CONST	0x0001								; Number of locals
0b33			BODY_0b30:
0b33			INIT_0b30:
0b33 4608       |F   |		Jump_Case	0x9
0b34 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
0b35 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
0b36 7819       |x   |		Jump	0xb50								; case 0x2
0b37 7818       |x   |		Jump	0xb50								; case 0x3
0b38 7817       |x   |		Jump	0xb50								; case 0x4
0b39 7816       |x   |		Jump	0xb50								; case 0x5
0b3a 7815       |x   |		Jump	0xb50								; case 0x6
0b3b 7801       |x   |		Jump	0xb3d								; case 0x7
0b3c 7809       |x   |		Jump	0xb46								; case 0x8
0b3d 00db       |    |		Load_Top	At_Offset_3
0b3e 4801       |H   |		Short_Literal	0x1
0b3f e5fe       |    |		Load	0x2,-0x2
0b40 e21e       |    |		Load	0x1,0x1e
0b41 035b       | [  |		Declare_Type	Array,Constrained
0b42 4801       |H   |		Short_Literal	0x1
0b43 e5ff       |    |		Load	0x2,-0x1
0b44 031b       |    |		Declare_Type	Variant_Record,Constrained
0b45 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0b46 00db       |    |		Load_Top	At_Offset_3
0b47 00db       |    |		Load_Top	At_Offset_3
0b48 02fc       |    |		Declare_Variable	Variant_Record,With_Constraint
0b49 4801       |H   |		Short_Literal	0x1
0b4a e5fe       |    |		Load	0x2,-0x2
0b4b e21e       |    |		Load	0x1,0x1e
0b4c 0334       | 4  |		Declare_Variable	Array,With_Constraint
0b4d 2d03       |-   |		Execute	Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3
0b4e 016a       | j  |		QQ_execute	Variant_Record,XXX
0b4f 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0b50 0869       | i  |		Execute_Immediate	Raise,0x69
0b51 0000 0000  |    |		.BLANK	0000[0x7]
0b58 ; --------------------------------------------------------------------------------------
0b58 ; SUBPROGRAM
0b58 ; --------------------------------------------------------------------------------------
0b58 0b5b       | [  |		.CONST	0x0b5b								; Address of begin
0b59 0004       |    |		.CONST	0x0004								; Address of exception handler
0b5a 0001       |    |		.CONST	0x0001								; Number of locals
0b5b			BODY_0b58:
0b5b			INIT_0b58:
0b5b 4608       |F   |		Jump_Case	0x9
0b5c 7808       |x   |		Jump	0xb65								; case 0x0
0b5d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
0b5e 780d       |x   |		Jump	0xb6c								; case 0x2
0b5f 780c       |x   |		Jump	0xb6c								; case 0x3
0b60 780b       |x   |		Jump	0xb6c								; case 0x4
0b61 780a       |x   |		Jump	0xb6c								; case 0x5
0b62 7809       |x   |		Jump	0xb6c								; case 0x6
0b63 7808       |x   |		Jump	0xb6c								; case 0x7
0b64 7807       |x   |		Jump	0xb6c								; case 0x8
0b65 00da       |    |		Load_Top	At_Offset_2
0b66 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0b67 0125       | %  |		Execute	Any,Set_Constraint
0b68 00da       |    |		Load_Top	At_Offset_2
0b69 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0b6a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0b6b 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0b6c 0869       | i  |		Execute_Immediate	Raise,0x69
0b6d ; --------------------------------------------------------------------------------------
0b6d ; STRING TABLE
0b6d ; --------------------------------------------------------------------------------------
0b6d 002e       | .  |		.STRTAB	0x002e->0x0b84							; "'Load_View."
0b6e 0037       | 7  |		.STRTAB	0x0037->0x0b89							; "Initializing supplier list for "
0b6f 0054       | T  |		.STRTAB	0x0054->0x0b99							; "Deleting supplier "
0b70 0064       | d  |		.STRTAB	0x0064->0x0ba2							; " for "
0b71 0067       | g  |		.STRTAB	0x0067->0x0ba4							; "Replacing"
0b72 006e       | n  |		.STRTAB	0x006e->0x0ba9							; " suppliers with"
0b73 007b       | {  |		.STRTAB	0x007b->0x0bb0							; " objects for "
0b74 0086       |    |		.STRTAB	0x0086->0x0bb7							; "New object ("
0b75 0090       |    |		.STRTAB	0x0090->0x0bbd							; ") is "
0b76 0093       |    |		.STRTAB	0x0093->0x0bbf							; "Unique ("
0b77 0099       |    |		.STRTAB	0x0099->0x0bc3							; ") ="
0b78 009a       |    |		.STRTAB	0x009a->0x0bc5							; "Changing kinds."
0b79 00a7       |    |		.STRTAB	0x00a7->0x0bcc							; "Deleting link object "
0b7a 00ba       |    |		.STRTAB	0x00ba->0x0bd7							; "Adding client "
0b7b 00c6       |    |		.STRTAB	0x00c6->0x0bde							; " to link "
0b7c 00cd       |    |		.STRTAB	0x00cd->0x0be2							; "Deleting client "
0b7d 00db       |    |		.STRTAB	0x00db->0x0bea							; " from link "
0b7e 00e4       |    |		.STRTAB	0x00e4->0x0bf0							; "Adding supplier "
0b7f 00f2       |    |		.STRTAB	0x00f2->0x0bf8							; " has no state file.  "
0b80 0105       |    |		.STRTAB	0x0105->0x0c02							; " will not be considered during build operations."
0b81 0133       | 3  |		.STRTAB	0x0133->0x0c1a							; "Link object being Deleted "
0b82 014b       | K  |		.STRTAB	0x014b->0x0c27							; " is not in the map."
0b83 015c       | \  |		.STREND 0x015c->0x0c31
0b84 274c 6f61  |'Loa|		.STRTAB_STRINGS
0c31 0000 0000  |    |		.BLANK	0000[0x7]
0c38 ; --------------------------------------------------------------------------------------
0c38 ; Debug Table
0c38 ; --------------------------------------------------------------------------------------
0c38 0004 000a  |    |		.DEBUG4	0x0004,0x000a,0xe37d,0x0000,0x0001,0x0000
0c3e 0000 0000  |    |		.XXX[0x7]
0c40 0d3f 3004  | ?0 |
0c42 0000 3fc1  |  ? |
0c44 ffff       |    |
0c45 0000 0000  |    |		.BLANK	0000[0x6]
0c4b 1fbf       |    |		.XXX[0x1]
0c4c 0000 0000  |    |		.BLANK	0000[0x7]
0c53 0049 0000  | I  |		.XXX[0x9]
0c55 0000 806e  |   n|
0c57 000e 0000  |    |
0c59 0000 0000  |    |
0c5b 0076       | v  |
0c5c 0000 0000  |    |		.BLANK	0000[0x7]
0c63 0009       |    |		.XXX[0x1]
0c64 0000 0000  |    |		.BLANK	0000[0x6]
0c6a 8000 0000  |    |		.XXX[0x9]
0c6c 0000 0000  |    |
0c6e 004e e8c5  | N  |
0c70 0000 0000  |    |
0c72 8000       |    |
0c73 0000 0000  |    |		.BLANK	0000[0x4]
0c77 0080 0000  |    |		.XXX[0x4]
0c79 0000 8000  |    |
0c7b 0000 0000  |    |		.BLANK	0000[0x4]
0c7f 0800 0080  |    |		.XXX[0x5]
0c81 d4da 8000  |    |
0c83 014c       | L  |
0c84 0000 0000  |    |		.BLANK	0000[0x4]
0c88 0080 d4da  |    |		.XXX[0x24]
0c8a 8800 0480  |    |
0c8c 8000 0000  |    |
0c8e 0000 0000  |    |
0c90 0080 d4da  |    |
0c92 8800 0600  |    |
0c94 8000 0000  |    |
0c96 0000 0000  |    |
0c98 0080 d4da  |    |
0c9a 8800 0600  |    |
0c9c 8000 0000  |    |
0c9e 0000 0000  |    |
0ca0 0001 0804  |    |
0ca2 8800 0400  |    |
0ca4 8000 0000  |    |
0ca6 0000 0000  |    |
0ca8 0001 0804  |    |
0caa 8800 05ec  |    |
0cac 0000 0000  |    |		.BLANK	0000[0x4]
0cb0 0080 d4da  |    |		.XXX[0xcc]
0cb2 0000 0036  |   6|
0cb4 00b9 d014  |    |
0cb6 0000 0f32  |   2|
0cb8 0080 d4da  |    |
0cba 0000 0036  |   6|
0cbc 00b9 d014  |    |
0cbe 0000 1032  |   2|
0cc0 0080 d4da  |    |
0cc2 0000 0036  |   6|
0cc4 00b9 d014  |    |
0cc6 0000 12b2  |    |
0cc8 0080 d4da  |    |
0cca 0000 0036  |   6|
0ccc 00b9 d014  |    |
0cce 0000 1432  |   2|
0cd0 0080 d4da  |    |
0cd2 0000 0036  |   6|
0cd4 00b9 d014  |    |
0cd6 0000 16b2  |    |
0cd8 0080 d4da  |    |
0cda 0000 0036  |   6|
0cdc 00b9 d014  |    |
0cde 0000 17b2  |    |
0ce0 0080 d4da  |    |
0ce2 0000 0036  |   6|
0ce4 00b9 d014  |    |
0ce6 0000 18b2  |    |
0ce8 0080 d4da  |    |
0cea 0000 0036  |   6|
0cec 00b9 d014  |    |
0cee 0000 19b2  |    |
0cf0 0080 d4da  |    |
0cf2 0000 0036  |   6|
0cf4 00b9 d014  |    |
0cf6 0000 1a32  |   2|
0cf8 0080 d4da  |    |
0cfa 0000 0036  |   6|
0cfc 00b9 d014  |    |
0cfe 0000 1b32  |   2|
0d00 0080 d4da  |    |
0d02 0000 0036  |   6|
0d04 00b9 d014  |    |
0d06 0000 1c32  |   2|
0d08 0080 d4da  |    |
0d0a 0000 0036  |   6|
0d0c 00b9 d014  |    |
0d0e 0000 1d32  |   2|
0d10 0080 d4da  |    |
0d12 0000 0036  |   6|
0d14 00b9 d014  |    |
0d16 0000 1e32  |   2|
0d18 0080 d4da  |    |
0d1a 0000 0036  |   6|
0d1c 00b9 d014  |    |
0d1e 0000 1f32  |   2|
0d20 0080 d4da  |    |
0d22 0000 0036  |   6|
0d24 00b9 d014  |    |
0d26 0000 20b2  |    |
0d28 0080 d4da  |    |
0d2a 0000 0036  |   6|
0d2c 00b9 d014  |    |
0d2e 0000 2232  |  "2|
0d30 0080 d4da  |    |
0d32 0000 0036  |   6|
0d34 00b9 d014  |    |
0d36 0000 23b2  |  # |
0d38 0080 d4da  |    |
0d3a 0000 0036  |   6|
0d3c 00b9 d014  |    |
0d3e 0000 2532  |  %2|
0d40 0080 d4da  |    |
0d42 0000 0036  |   6|
0d44 00b9 d014  |    |
0d46 0000 2732  |  '2|
0d48 0080 d4da  |    |
0d4a 0000 0036  |   6|
0d4c 00b9 d014  |    |
0d4e 0000 28b2  |  ( |
0d50 0080 d4da  |    |
0d52 0000 0036  |   6|
0d54 00b9 d014  |    |
0d56 0000 2ab2  |  * |
0d58 0080 d4da  |    |
0d5a 0000 0036  |   6|
0d5c 00b9 d014  |    |
0d5e 0000 2d32  |  -2|
0d60 0080 d4da  |    |
0d62 0000 07d8  |    |
0d64 0080 dcda  |    |
0d66 0000 0000  |    |
0d68 0006 f804  |    |
0d6a 0000 0032  |   2|
0d6c 0006 f804  |    |
0d6e 0000 0720  |    |
0d70 0006 f804  |    |
0d72 0000 0032  |   2|
0d74 0006 f804  |    |
0d76 0000 06a0  |    |
0d78 0001 0404  |    |
0d7a 0800 0888  |    |
0d7c 0000 0000  |    |		.BLANK	0000[0xa]
0d86 004e e8b5  | N  |		.XXX[0x2]
0d88 0000 0000  |    |		.BLANK	0000[0x7]
0d8f 0048       | H  |		.XXX[0x1]
0d90 0000 0000  |    |		.BLANK	0000[0x8]
0d98 0080 d4da  |    |		.XXX[0x5]
0d9a 0800 0480  |    |
0d9c 8000       |    |
0d9d 0000 0000  |    |		.BLANK	0000[0x9]
0da6 004e e8b5  | N  |		.XXX[0x2]
0da8 0000 0000  |    |		.BLANK	0000[0x7]
0daf 0054       | T  |		.XXX[0x1]
0db0 0000 0000  |    |		.BLANK	0000[0x8]
0db8 0080 d4da  |    |		.XXX[0x5]
0dba 0800 0600  |    |
0dbc 8000       |    |
0dbd 0000 0000  |    |		.BLANK	0000[0x9]
0dc6 004e e8b5  | N  |		.XXX[0x2]
0dc8 0000 0000  |    |		.BLANK	0000[0x7]
0dcf 0060       | `  |		.XXX[0x1]
0dd0 0000 0000  |    |		.BLANK	0000[0x8]
0dd8 0001 0404  |    |		.XXX[0x5]
0dda 0000 0280  |    |
0ddc 8000       |    |
0ddd 0000 0000  |    |		.BLANK	0000[0x9]
0de6 004e e8b5  | N  |		.XXX[0x2]
0de8 0000 0000  |    |		.BLANK	0000[0x7]
0def 006c       | l  |		.XXX[0x1]
0df0 0000 0000  |    |		.BLANK	0000[0x8]
0df8 0001 0404  |    |		.XXX[0x8]
0dfa 0000 0700  |    |
0dfc 8000 0000  |    |
0dfe 0000 0000  |    |