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

⟦e9268d98a⟧

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

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 5900       |Y   |		.CONST	0x5900								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0900       |    |		.CONST	0x0900								; 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 0006       |    |		.CONST	0x0006								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 01ca       |    |		.CONST	0x01ca								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 004e       | N  |		.CONST	0x004e								; Number of locals
000b			INIT_0008:
000b 4800       |H   |		Short_Literal	0x0
000c 4805       |H   |		Short_Literal	0x5
000d 029f 01d3  |    |		Declare_Subprogram	INIT_01d0,For_Call
000f 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0010 029a 0213  |    |		Declare_Subprogram	INIT_0210,For_Outer_Call,Visible,Unelaborated
0012 029a 025b  |   [|		Declare_Subprogram	INIT_0258,For_Outer_Call,Visible,Unelaborated
0014 029a 02b3  |    |		Declare_Subprogram	INIT_02b0,For_Outer_Call,Visible,Unelaborated
0016 029a 02db  |    |		Declare_Subprogram	INIT_02d8,For_Outer_Call,Visible,Unelaborated
0018 029a 0303  |    |		Declare_Subprogram	INIT_0300,For_Outer_Call,Visible,Unelaborated
001a 029a 0323  |   #|		Declare_Subprogram	INIT_0320,For_Outer_Call,Visible,Unelaborated
001c 029a 0343  |   C|		Declare_Subprogram	INIT_0340,For_Outer_Call,Visible,Unelaborated
001e 029a 0363  |   c|		Declare_Subprogram	INIT_0360,For_Outer_Call,Visible,Unelaborated
0020 029a 0383  |    |		Declare_Subprogram	INIT_0380,For_Outer_Call,Visible,Unelaborated
0022 029a 03a3  |    |		Declare_Subprogram	INIT_03a0,For_Outer_Call,Visible,Unelaborated
0024 029a 03cb  |    |		Declare_Subprogram	INIT_03c8,For_Outer_Call,Visible,Unelaborated
0026 029a 042b  |   +|		Declare_Subprogram	INIT_0428,For_Outer_Call,Visible,Unelaborated
0028 029a 045b  |   [|		Declare_Subprogram	INIT_0458,For_Outer_Call,Visible,Unelaborated
002a 029a 0483  |    |		Declare_Subprogram	INIT_0480,For_Outer_Call,Visible,Unelaborated
002c 029a 049b  |    |		Declare_Subprogram	INIT_0498,For_Outer_Call,Visible,Unelaborated
002e 029a 04ab  |    |		Declare_Subprogram	INIT_04a8,For_Outer_Call,Visible,Unelaborated
0030 029a 04cb  |    |		Declare_Subprogram	INIT_04c8,For_Outer_Call,Visible,Unelaborated
0032 029a 04eb  |    |		Declare_Subprogram	INIT_04e8,For_Outer_Call,Visible,Unelaborated
0034 029a 050b  |    |		Declare_Subprogram	INIT_0508,For_Outer_Call,Visible,Unelaborated
0036 029a 052b  |   +|		Declare_Subprogram	INIT_0528,For_Outer_Call,Visible,Unelaborated
0038 029a 05ab  |    |		Declare_Subprogram	INIT_05a8,For_Outer_Call,Visible,Unelaborated
003a 029a 05c3  |    |		Declare_Subprogram	INIT_05c0,For_Outer_Call,Visible,Unelaborated
003c 029a 05d3  |    |		Declare_Subprogram	INIT_05d0,For_Outer_Call,Visible,Unelaborated
003e 029a 05e3  |    |		Declare_Subprogram	INIT_05e0,For_Outer_Call,Visible,Unelaborated
0040 029a 05f3  |    |		Declare_Subprogram	INIT_05f0,For_Outer_Call,Visible,Unelaborated
0042 029a 0613  |    |		Declare_Subprogram	INIT_0610,For_Outer_Call,Visible,Unelaborated
0044 029a 0623  |   #|		Declare_Subprogram	INIT_0620,For_Outer_Call,Visible,Unelaborated
0046 029a 0633  |   3|		Declare_Subprogram	INIT_0630,For_Outer_Call,Visible,Unelaborated
0048 029a 0643  |   C|		Declare_Subprogram	INIT_0640,For_Outer_Call,Visible,Unelaborated
004a 029a 0653  |   S|		Declare_Subprogram	INIT_0650,For_Outer_Call,Visible,Unelaborated
004c 029a 066b  |   k|		Declare_Subprogram	INIT_0668,For_Outer_Call,Visible,Unelaborated
004e 029a 0683  |    |		Declare_Subprogram	INIT_0680,For_Outer_Call,Visible,Unelaborated
0050 029a 069b  |    |		Declare_Subprogram	INIT_0698,For_Outer_Call,Visible,Unelaborated
0052 029a 06bb  |    |		Declare_Subprogram	INIT_06b8,For_Outer_Call,Visible,Unelaborated
0054 029a 06cb  |    |		Declare_Subprogram	INIT_06c8,For_Outer_Call,Visible,Unelaborated
0056 029a 06d3  |    |		Declare_Subprogram	INIT_06d0,For_Outer_Call,Visible,Unelaborated
0058 029a 06db  |    |		Declare_Subprogram	INIT_06d8,For_Outer_Call,Visible,Unelaborated
005a 029a 06e3  |    |		Declare_Subprogram	INIT_06e0,For_Outer_Call,Visible,Unelaborated
005c 029a 06eb  |    |		Declare_Subprogram	INIT_06e8,For_Outer_Call,Visible,Unelaborated
005e 029a 06f3  |    |		Declare_Subprogram	INIT_06f0,For_Outer_Call,Visible,Unelaborated
0060 029a 071b  |    |		Declare_Subprogram	INIT_0718,For_Outer_Call,Visible,Unelaborated
0062 029a 0733  |   3|		Declare_Subprogram	INIT_0730,For_Outer_Call,Visible,Unelaborated
0064 029a 074b  |   K|		Declare_Subprogram	INIT_0748,For_Outer_Call,Visible,Unelaborated
0066 029a 0763  |   c|		Declare_Subprogram	INIT_0760,For_Outer_Call,Visible,Unelaborated
0068 029a 077b  |   {|		Declare_Subprogram	INIT_0778,For_Outer_Call,Visible,Unelaborated
006a 00c4       |    |		Action	Make_Default
006b 00c4       |    |		Action	Make_Default
006c 00c4       |    |		Action	Make_Default
006d 00c4       |    |		Action	Make_Default
006e 029c 0793  |    |		Declare_Subprogram	INIT_0790,For_Outer_Call,Visible
0070 0093 0000  |    |		push_full_address	0x0
0072 6195       |a   |		Indirect_Literal	Discrete,0x208,{0x80000000, 0x00060000}
0073 0273       | s  |		Execute	Discrete,Plus
0074 e004       |    |		Load	0x0,0x4
0075 0273       | s  |		Execute	Discrete,Plus
0076 e005       |    |		Load	0x0,0x5
0077 0273       | s  |		Execute	Discrete,Plus
0078 1d3f       | ?  |		Execute_Immediate	Reference_Lex_1,0x3f
0079 e006       |    |		Load	0x0,0x6
007a 0386       |    |		Declare_Variable	Package,Visible
007b 00d8       |    |		Load_Top	At_Offset_0
007c 020f       |    |		Execute	Module,Activate
007d 029c 07a3  |    |		Declare_Subprogram	INIT_07a0,For_Outer_Call,Visible
007f 0093 0000  |    |		push_full_address	0x0
0081 6182       |a   |		Indirect_Literal	Discrete,0x204,{0x80000000, 0x00050000}
0082 0273       | s  |		Execute	Discrete,Plus
0083 e004       |    |		Load	0x0,0x4
0084 0273       | s  |		Execute	Discrete,Plus
0085 e007       |    |		Load	0x0,0x7
0086 0273       | s  |		Execute	Discrete,Plus
0087 1d41       | A  |		Execute_Immediate	Reference_Lex_1,0x41
0088 e006       |    |		Load	0x0,0x6
0089 0386       |    |		Declare_Variable	Package,Visible
008a 00d8       |    |		Load_Top	At_Offset_0
008b 020f       |    |		Execute	Module,Activate
008c 0093 0000  |    |		push_full_address	0x0
008e 6171       |aq  |		Indirect_Literal	Discrete,0x200,{0x80000000, 0x00040000}
008f 0273       | s  |		Execute	Discrete,Plus
0090 e004       |    |		Load	0x0,0x4
0091 0273       | s  |		Execute	Discrete,Plus
0092 e008       |    |		Load	0x0,0x8
0093 0273       | s  |		Execute	Discrete,Plus
0094 e009       |    |		Load	0x0,0x9
0095 e240       | @  |		Load	0x1,0x40
0096 0098       |    |		Execute	Package,Field_Read_Dynamic
0097 e00a       |    |		Load	0x0,0xa
0098 e240       | @  |		Load	0x1,0x40
0099 0098       |    |		Execute	Package,Field_Read_Dynamic
009a e00b       |    |		Load	0x0,0xb
009b e240       | @  |		Load	0x1,0x40
009c 0095       |    |		Execute	Package,Field_Reference_Dynamic
009d e00c       |    |		Load	0x0,0xc
009e e240       | @  |		Load	0x1,0x40
009f 0095       |    |		Execute	Package,Field_Reference_Dynamic
00a0 e00d       |    |		Load	0x0,0xd
00a1 0386       |    |		Declare_Variable	Package,Visible
00a2 00d8       |    |		Load_Top	At_Offset_0
00a3 020f       |    |		Execute	Module,Activate
00a4 0093 0000  |    |		push_full_address	0x0
00a6 6155       |aU  |		Indirect_Literal	Discrete,0x1fc,{0x80000000, 0x00030000}
00a7 0273       | s  |		Execute	Discrete,Plus
00a8 e004       |    |		Load	0x0,0x4
00a9 0273       | s  |		Execute	Discrete,Plus
00aa e00e       |    |		Load	0x0,0xe
00ab 0273       | s  |		Execute	Discrete,Plus
00ac e00f       |    |		Load	0x0,0xf
00ad e010       |    |		Load	0x0,0x10
00ae a011       |    |		Store_Unchecked	0x0,0x11
00af a012       |    |		Store_Unchecked	0x0,0x12
00b0 e00d       |    |		Load	0x0,0xd
00b1 0386       |    |		Declare_Variable	Package,Visible
00b2 00d8       |    |		Load_Top	At_Offset_0
00b3 020f       |    |		Execute	Module,Activate
00b4 e013       |    |		Load	0x0,0x13
00b5 e014       |    |		Load	0x0,0x14
00b6 e009       |    |		Load	0x0,0x9
00b7 e242       | B  |		Load	0x1,0x42
00b8 0098       |    |		Execute	Package,Field_Read_Dynamic
00b9 e015       |    |		Load	0x0,0x15
00ba 0386       |    |		Declare_Variable	Package,Visible
00bb 00d8       |    |		Load_Top	At_Offset_0
00bc 020f       |    |		Execute	Module,Activate
00bd 0093 0000  |    |		push_full_address	0x0
00bf 6138       |a8  |		Indirect_Literal	Discrete,0x1f8,{0x80000000, 0x00010000}
00c0 0273       | s  |		Execute	Discrete,Plus
00c1 e004       |    |		Load	0x0,0x4
00c2 0273       | s  |		Execute	Discrete,Plus
00c3 e016       |    |		Load	0x0,0x16
00c4 0273       | s  |		Execute	Discrete,Plus
00c5 e017       |    |		Load	0x0,0x17
00c6 e018       |    |		Load	0x0,0x18
00c7 a019       |    |		Store_Unchecked	0x0,0x19
00c8 a01a       |    |		Store_Unchecked	0x0,0x1a
00c9 e00d       |    |		Load	0x0,0xd
00ca 0386       |    |		Declare_Variable	Package,Visible
00cb 00d8       |    |		Load_Top	At_Offset_0
00cc 020f       |    |		Execute	Module,Activate
00cd 00d9       |    |		Load_Top	At_Offset_1
00ce 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
00cf 0129       | )  |		Execute	Any,Make_Visible
00d0 e01b       |    |		Load	0x0,0x1b
00d1 00da       |    |		Load_Top	At_Offset_2
00d2 0098       |    |		Execute	Package,Field_Read_Dynamic
00d3 0321       | !  |		Declare_Variable	Record,Visible
00d4 e01b       |    |		Load	0x0,0x1b
00d5 e243       | C  |		Load	0x1,0x43
00d6 0098       |    |		Execute	Package,Field_Read_Dynamic
00d7 0321       | !  |		Declare_Variable	Record,Visible
00d8 e20d       |    |		Load	0x1,0xd
00d9 e01c       |    |		Load	0x0,0x1c
00da e243       | C  |		Load	0x1,0x43
00db 0098       |    |		Execute	Package,Field_Read_Dynamic
00dc e01b       |    |		Load	0x0,0x1b
00dd e243       | C  |		Load	0x1,0x43
00de 0098       |    |		Execute	Package,Field_Read_Dynamic
00df 4805       |H   |		Short_Literal	0x5
00e0 e01d       |    |		Load	0x0,0x1d
00e1 e01c       |    |		Load	0x0,0x1c
00e2 e244       | D  |		Load	0x1,0x44
00e3 0098       |    |		Execute	Package,Field_Read_Dynamic
00e4 00e3       |    |		Load_Encached	Natural_Cache
00e5 e245       | E  |		Load	0x1,0x45
00e6 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
00e7 e245       | E  |		Load	0x1,0x45
00e8 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
00e9 4804       |H   |		Short_Literal	0x4
00ea e01d       |    |		Load	0x0,0x1d
00eb e01c       |    |		Load	0x0,0x1c
00ec e244       | D  |		Load	0x1,0x44
00ed 0098       |    |		Execute	Package,Field_Read_Dynamic
00ee e01c       |    |		Load	0x0,0x1c
00ef e246       | F  |		Load	0x1,0x46
00f0 0098       |    |		Execute	Package,Field_Read_Dynamic
00f1 e01b       |    |		Load	0x0,0x1b
00f2 e246       | F  |		Load	0x1,0x46
00f3 0098       |    |		Execute	Package,Field_Read_Dynamic
00f4 4803       |H   |		Short_Literal	0x3
00f5 e01d       |    |		Load	0x0,0x1d
00f6 e01c       |    |		Load	0x0,0x1c
00f7 e244       | D  |		Load	0x1,0x44
00f8 0098       |    |		Execute	Package,Field_Read_Dynamic
00f9 00e3       |    |		Load_Encached	Natural_Cache
00fa 4801       |H   |		Short_Literal	0x1
00fb e01d       |    |		Load	0x0,0x1d
00fc 4801       |H   |		Short_Literal	0x1
00fd e01d       |    |		Load	0x0,0x1d
00fe 029f 082b  |   +|		Declare_Subprogram	INIT_0828,For_Call
0100 480e       |H   |		Short_Literal	0xe
0101 4802       |H   |		Short_Literal	0x2
0102 4805       |H   |		Short_Literal	0x5
0103 4800       |H   |		Short_Literal	0x0
0104 4801       |H   |		Short_Literal	0x1
0105 031e       |    |		Declare_Type	Variant_Record,Defined,Visible
0106 4805       |H   |		Short_Literal	0x5
0107 00d9       |    |		Load_Top	At_Offset_1
0108 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0109 e002       |    |		Load	0x0,0x2
010a e243       | C  |		Load	0x1,0x43
010b 0098       |    |		Execute	Package,Field_Read_Dynamic
010c 00d9       |    |		Load_Top	At_Offset_1
010d 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
010e 00da       |    |		Load_Top	At_Offset_2
010f 00d9       |    |		Load_Top	At_Offset_1
0110 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
0111 0129       | )  |		Execute	Any,Make_Visible
0112 c23b       | ;  |		Store	0x1,0x3b
0113 4800       |H   |		Short_Literal	0x0
0114 00d9       |    |		Load_Top	At_Offset_1
0115 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0116 e002       |    |		Load	0x0,0x2
0117 e243       | C  |		Load	0x1,0x43
0118 0098       |    |		Execute	Package,Field_Read_Dynamic
0119 00d9       |    |		Load_Top	At_Offset_1
011a 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
011b 00da       |    |		Load_Top	At_Offset_2
011c 00d9       |    |		Load_Top	At_Offset_1
011d 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
011e e003       |    |		Load	0x0,0x3
011f 00d9       |    |		Load_Top	At_Offset_1
0120 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0121 e002       |    |		Load	0x0,0x2
0122 e244       | D  |		Load	0x1,0x44
0123 0098       |    |		Execute	Package,Field_Read_Dynamic
0124 00d9       |    |		Load_Top	At_Offset_1
0125 2a05       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5
0126 4800       |H   |		Short_Literal	0x0
0127 00d9       |    |		Load_Top	At_Offset_1
0128 2a06       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6
0129 e245       | E  |		Load	0x1,0x45
012a 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
012b 00d9       |    |		Load_Top	At_Offset_1
012c 2a07       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7
012d e247       | G  |		Load	0x1,0x47
012e 00d9       |    |		Load_Top	At_Offset_1
012f 2a08       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8
0130 0129       | )  |		Execute	Any,Make_Visible
0131 c23c       | <  |		Store	0x1,0x3c
0132 4801       |H   |		Short_Literal	0x1
0133 00d9       |    |		Load_Top	At_Offset_1
0134 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0135 e002       |    |		Load	0x0,0x2
0136 e243       | C  |		Load	0x1,0x43
0137 0098       |    |		Execute	Package,Field_Read_Dynamic
0138 00d9       |    |		Load_Top	At_Offset_1
0139 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
013a 00da       |    |		Load_Top	At_Offset_2
013b 00d9       |    |		Load_Top	At_Offset_1
013c 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
013d e003       |    |		Load	0x0,0x3
013e 00d9       |    |		Load_Top	At_Offset_1
013f 2a09       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x9
0140 e002       |    |		Load	0x0,0x2
0141 e244       | D  |		Load	0x1,0x44
0142 0098       |    |		Execute	Package,Field_Read_Dynamic
0143 00d9       |    |		Load_Top	At_Offset_1
0144 2a0a       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xa
0145 e002       |    |		Load	0x0,0x2
0146 e246       | F  |		Load	0x1,0x46
0147 0098       |    |		Execute	Package,Field_Read_Dynamic
0148 00d9       |    |		Load_Top	At_Offset_1
0149 2a0b       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xb
014a 00db       |    |		Load_Top	At_Offset_3
014b 00d9       |    |		Load_Top	At_Offset_1
014c 2a0c       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xc
014d 0129       | )  |		Execute	Any,Make_Visible
014e c23d       | =  |		Store	0x1,0x3d
014f 4802       |H   |		Short_Literal	0x2
0150 00d9       |    |		Load_Top	At_Offset_1
0151 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0152 e002       |    |		Load	0x0,0x2
0153 e243       | C  |		Load	0x1,0x43
0154 0098       |    |		Execute	Package,Field_Read_Dynamic
0155 00d9       |    |		Load_Top	At_Offset_1
0156 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0157 00da       |    |		Load_Top	At_Offset_2
0158 00d9       |    |		Load_Top	At_Offset_1
0159 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
015a e003       |    |		Load	0x0,0x3
015b 00d9       |    |		Load_Top	At_Offset_1
015c 2a0d       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xd
015d e002       |    |		Load	0x0,0x2
015e e244       | D  |		Load	0x1,0x44
015f 0098       |    |		Execute	Package,Field_Read_Dynamic
0160 00d9       |    |		Load_Top	At_Offset_1
0161 2a0e       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xe
0162 4800       |H   |		Short_Literal	0x0
0163 00d9       |    |		Load_Top	At_Offset_1
0164 2a0f       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xf
0165 0129       | )  |		Execute	Any,Make_Visible
0166 c23e       | >  |		Store	0x1,0x3e
0167 00bf       |    |		Action	Accept_Activation
0168 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0169 00c7       |    |		Action	Elaborate_Subprogram
016a 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
016b 00c7       |    |		Action	Elaborate_Subprogram
016c 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
016d 00c7       |    |		Action	Elaborate_Subprogram
016e 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
016f 00c7       |    |		Action	Elaborate_Subprogram
0170 029d 07b3  |    |		Declare_Subprogram	INIT_07b0,For_Outer_Call
0172 029d 07d3  |    |		Declare_Subprogram	INIT_07d0,For_Outer_Call
0174 029d 07f3  |    |		Declare_Subprogram	INIT_07f0,For_Outer_Call
0176 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
0177 00c7       |    |		Action	Elaborate_Subprogram
0178 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
0179 00c7       |    |		Action	Elaborate_Subprogram
017a 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
017b 00c7       |    |		Action	Elaborate_Subprogram
017c 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
017d 00c7       |    |		Action	Elaborate_Subprogram
017e 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
017f 00c7       |    |		Action	Elaborate_Subprogram
0180 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
0181 00c7       |    |		Action	Elaborate_Subprogram
0182 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
0183 00c7       |    |		Action	Elaborate_Subprogram
0184 029d 0823  |   #|		Declare_Subprogram	INIT_0820,For_Outer_Call
0186 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
0187 00c7       |    |		Action	Elaborate_Subprogram
0188 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b
0189 00c7       |    |		Action	Elaborate_Subprogram
018a 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
018b 00c7       |    |		Action	Elaborate_Subprogram
018c 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
018d 00c7       |    |		Action	Elaborate_Subprogram
018e 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
018f 00c7       |    |		Action	Elaborate_Subprogram
0190 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
0191 00c7       |    |		Action	Elaborate_Subprogram
0192 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f
0193 00c7       |    |		Action	Elaborate_Subprogram
0194 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
0195 00c7       |    |		Action	Elaborate_Subprogram
0196 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
0197 00c7       |    |		Action	Elaborate_Subprogram
0198 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22
0199 00c7       |    |		Action	Elaborate_Subprogram
019a 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23
019b 00c7       |    |		Action	Elaborate_Subprogram
019c 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
019d 00c7       |    |		Action	Elaborate_Subprogram
019e 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25
019f 00c7       |    |		Action	Elaborate_Subprogram
01a0 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26
01a1 00c7       |    |		Action	Elaborate_Subprogram
01a2 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27
01a3 00c7       |    |		Action	Elaborate_Subprogram
01a4 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28
01a5 00c7       |    |		Action	Elaborate_Subprogram
01a6 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29
01a7 00c7       |    |		Action	Elaborate_Subprogram
01a8 1d2a       | *  |		Execute_Immediate	Reference_Lex_1,0x2a
01a9 00c7       |    |		Action	Elaborate_Subprogram
01aa 1d2b       | +  |		Execute_Immediate	Reference_Lex_1,0x2b
01ab 00c7       |    |		Action	Elaborate_Subprogram
01ac 1d2c       | ,  |		Execute_Immediate	Reference_Lex_1,0x2c
01ad 00c7       |    |		Action	Elaborate_Subprogram
01ae 1d2d       | -  |		Execute_Immediate	Reference_Lex_1,0x2d
01af 00c7       |    |		Action	Elaborate_Subprogram
01b0 1d2e       | .  |		Execute_Immediate	Reference_Lex_1,0x2e
01b1 00c7       |    |		Action	Elaborate_Subprogram
01b2 1d2f       | /  |		Execute_Immediate	Reference_Lex_1,0x2f
01b3 00c7       |    |		Action	Elaborate_Subprogram
01b4 1d30       | 0  |		Execute_Immediate	Reference_Lex_1,0x30
01b5 00c7       |    |		Action	Elaborate_Subprogram
01b6 1d31       | 1  |		Execute_Immediate	Reference_Lex_1,0x31
01b7 00c7       |    |		Action	Elaborate_Subprogram
01b8 1d32       | 2  |		Execute_Immediate	Reference_Lex_1,0x32
01b9 00c7       |    |		Action	Elaborate_Subprogram
01ba 1d33       | 3  |		Execute_Immediate	Reference_Lex_1,0x33
01bb 00c7       |    |		Action	Elaborate_Subprogram
01bc 1d34       | 4  |		Execute_Immediate	Reference_Lex_1,0x34
01bd 00c7       |    |		Action	Elaborate_Subprogram
01be 1d35       | 5  |		Execute_Immediate	Reference_Lex_1,0x35
01bf 00c7       |    |		Action	Elaborate_Subprogram
01c0 1d36       | 6  |		Execute_Immediate	Reference_Lex_1,0x36
01c1 00c7       |    |		Action	Elaborate_Subprogram
01c2 1d37       | 7  |		Execute_Immediate	Reference_Lex_1,0x37
01c3 00c7       |    |		Action	Elaborate_Subprogram
01c4 1d38       | 8  |		Execute_Immediate	Reference_Lex_1,0x38
01c5 00c7       |    |		Action	Elaborate_Subprogram
01c6 1d39       | 9  |		Execute_Immediate	Reference_Lex_1,0x39
01c7 00c7       |    |		Action	Elaborate_Subprogram
01c8 1d3a       | :  |		Execute_Immediate	Reference_Lex_1,0x3a
01c9 00c7       |    |		Action	Elaborate_Subprogram
01ca			BODY_0008:
01ca 00bc       |    |		Action	Signal_Activated
01cb 00bb       |    |		Action	Signal_Completion
01cc 0000 0000  |    |		.BLANK	0000[0x4]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3       |    |		.CONST	0x01d3								; Address of begin
01d1 0004       |    |		.CONST	0x0004								; Address of exception handler
01d2 0001       |    |		.CONST	0x0001								; Number of locals
01d3			BODY_01d0:
01d3			INIT_01d0:
01d3 4607       |F   |		Jump_Case	0x8
01d4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
01d5 7807       |x   |		Jump	0x1dd								; case 0x1
01d6 780a       |x   |		Jump	0x1e1								; case 0x2
01d7 780e       |x   |		Jump	0x1e6								; case 0x3
01d8 7811       |x   |		Jump	0x1ea								; case 0x4
01d9 7812       |x   |		Jump	0x1ec								; case 0x5
01da 7813       |x   |		Jump	0x1ee								; case 0x6
01db 7816       |x   |		Jump	0x1f2								; case 0x7
01dc 4302       |C   |		.XXX[0x1]
01dd 00da       |    |		Load_Top	At_Offset_2
01de 0091 08cd  |    |		Action	Push_String_Extended_Indexed,0x8cd				; "ANIMATE"
01e0 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
01e1 00db       |    |		Load_Top	At_Offset_3
01e2 00db       |    |		Load_Top	At_Offset_3
01e3 00e0       |    |		Load_Encached	Standard_Cache
01e4 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
01e5 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
01e6 00da       |    |		Load_Top	At_Offset_2
01e7 00e0       |    |		Load_Encached	Standard_Cache
01e8 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
01e9 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
01ea 00db       |    |		Load_Top	At_Offset_3
01eb 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
01ec 00db       |    |		Load_Top	At_Offset_3
01ed 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
01ee e20d       |    |		Load	0x1,0xd
01ef 00dc       |    |		Load_Top	At_Offset_4
01f0 0267       | g  |		Execute	Discrete,Predecessor
01f1 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
01f2 e20d       |    |		Load	0x1,0xd
01f3 00dc       |    |		Load_Top	At_Offset_4
01f4 0268       | h  |		Execute	Discrete,Successor
01f5 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
01f6 0000 0000  |    |		.XXX[0x2]
01f8 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
01fc 8000 0000  |    |		.LITERAL	{0x80000000, 0x00030000}
0200 8000 0000  |    |		.LITERAL	{0x80000000, 0x00040000}
0204 8000 0000  |    |		.LITERAL	{0x80000000, 0x00050000}
0208 8000 0000  |    |		.LITERAL	{0x80000000, 0x00060000}
020c 0000 0000  |    |		.BLANK	0000[0x4]
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0213       |    |		.CONST	0x0213								; Address of begin
0211 0004       |    |		.CONST	0x0004								; Address of exception handler
0212 0001       |    |		.CONST	0x0001								; Number of locals
0213			BODY_0210:
0213			INIT_0210:
0213 00da       |    |		Load_Top	At_Offset_2
0214 e5fe       |    |		Load	0x2,-0x2
0215 016d       | m  |		Execute	Variant_Record,Structure_Write
0216 00da       |    |		Load_Top	At_Offset_2
0217 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0218 4605       |F   |		Jump_Case	0x6
0219 7828       |x(  |		Jump	0x242								; case 0x0
021a 7805       |x   |		Jump	0x220								; case 0x1
021b 7815       |x   |		Jump	0x231								; case 0x2
021c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; case 0x3
021d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; case 0x4
021e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; case 0x5
021f 4502       |E   |		.XXX[0x1]
0220 00db       |    |		Load_Top	At_Offset_3
0221 2e0a       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa
0222 e01e       |    |		Load	0x0,0x1e
0223 e244       | D  |		Load	0x1,0x44
0224 0096       |    |		Execute	Package,Entry
0225 e5fe       |    |		Load	0x2,-0x2
0226 2a0a       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xa
0227 00db       |    |		Load_Top	At_Offset_3
0228 2e0a       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa
0229 00db       |    |		Load_Top	At_Offset_3
022a 260a       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xa
022b e01f       |    |		Load	0x0,0x1f
022c e244       | D  |		Load	0x1,0x44
022d 0096       |    |		Execute	Package,Entry
022e e5fe       |    |		Load	0x2,-0x2
022f 2a0a       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xa
0230 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0231 00db       |    |		Load_Top	At_Offset_3
0232 2e0e       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xe
0233 e01e       |    |		Load	0x0,0x1e
0234 e244       | D  |		Load	0x1,0x44
0235 0096       |    |		Execute	Package,Entry
0236 e5fe       |    |		Load	0x2,-0x2
0237 2a0e       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xe
0238 00db       |    |		Load_Top	At_Offset_3
0239 2e0e       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xe
023a 00db       |    |		Load_Top	At_Offset_3
023b 260e       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xe
023c e01f       |    |		Load	0x0,0x1f
023d e244       | D  |		Load	0x1,0x44
023e 0096       |    |		Execute	Package,Entry
023f e5fe       |    |		Load	0x2,-0x2
0240 2a0e       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xe
0241 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0242 00db       |    |		Load_Top	At_Offset_3
0243 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
0244 e01e       |    |		Load	0x0,0x1e
0245 e244       | D  |		Load	0x1,0x44
0246 0096       |    |		Execute	Package,Entry
0247 e5fe       |    |		Load	0x2,-0x2
0248 2a05       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5
0249 00db       |    |		Load_Top	At_Offset_3
024a 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
024b 00db       |    |		Load_Top	At_Offset_3
024c 2605       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
024d e01f       |    |		Load	0x0,0x1f
024e e244       | D  |		Load	0x1,0x44
024f 0096       |    |		Execute	Package,Entry
0250 e5fe       |    |		Load	0x2,-0x2
0251 2a05       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5
0252 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0253 0000 0000  |    |		.BLANK	0000[0x5]
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 025b       | [  |		.CONST	0x025b								; Address of begin
0259 0004       |    |		.CONST	0x0004								; Address of exception handler
025a 0001       |    |		.CONST	0x0001								; Number of locals
025b			BODY_0258:
025b			INIT_0258:
025b 00db       |    |		Load_Top	At_Offset_3
025c 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
025d 4605       |F   |		Jump_Case	0x6
025e 7808       |x   |		Jump	0x267								; case 0x0
025f 781e       |x   |		Jump	0x27e								; case 0x1
0260 7834       |x4  |		Jump	0x295								; case 0x2
0261 7802       |x   |		Jump	0x264								; case 0x3
0262 7801       |x   |		Jump	0x264								; case 0x4
0263 7800       |x   |		Jump	0x264								; case 0x5
0264 4800       |H   |		Short_Literal	0x0
0265 a5fd       |    |		Store_Unchecked	0x2,-0x3
0266 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0267 00da       |    |		Load_Top	At_Offset_2
0268 e5fe       |    |		Load	0x2,-0x2
0269 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
026a 00e1       |    |		Load_Encached	Boolean_Cache
026b 00db       |    |		Load_Top	At_Offset_3
026c 8020       |    |		Call	0x0,0x20
026d c5fd       |    |		Store	0x2,-0x3
026e 00e1       |    |		Load_Encached	Boolean_Cache
026f e5fe       |    |		Load	0x2,-0x2
0270 e5ff       |    |		Load	0x2,-0x1
0271 8021       | !  |		Call	0x0,0x21
0272 8022       | "  |		Call	0x0,0x22
0273 00d8       |    |		Load_Top	At_Offset_0
0274 00e4       |    |		Load_Encached	Positive_Cache
0275 0260       | `  |		Execute	Discrete,In_Type
0276 7001       |p   |		Jump_Nonzero	0x278
0277 0801       |    |		Execute_Immediate	Raise,0x1
0278 8226       | &  |		Call	0x1,0x26
0279 00d1       |    |		Pop_Control	Pop_Count_1
027a c5fd       |    |		Store	0x2,-0x3
027b 4801       |H   |		Short_Literal	0x1
027c a5fd       |    |		Store_Unchecked	0x2,-0x3
027d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
027e 00da       |    |		Load_Top	At_Offset_2
027f e5fe       |    |		Load	0x2,-0x2
0280 2a09       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x9
0281 00e1       |    |		Load_Encached	Boolean_Cache
0282 00db       |    |		Load_Top	At_Offset_3
0283 8020       |    |		Call	0x0,0x20
0284 c5fd       |    |		Store	0x2,-0x3
0285 00e1       |    |		Load_Encached	Boolean_Cache
0286 e5fe       |    |		Load	0x2,-0x2
0287 e5ff       |    |		Load	0x2,-0x1
0288 8021       | !  |		Call	0x0,0x21
0289 8022       | "  |		Call	0x0,0x22
028a 00d8       |    |		Load_Top	At_Offset_0
028b 00e4       |    |		Load_Encached	Positive_Cache
028c 0260       | `  |		Execute	Discrete,In_Type
028d 7001       |p   |		Jump_Nonzero	0x28f
028e 0801       |    |		Execute_Immediate	Raise,0x1
028f 8226       | &  |		Call	0x1,0x26
0290 00d1       |    |		Pop_Control	Pop_Count_1
0291 c5fd       |    |		Store	0x2,-0x3
0292 4801       |H   |		Short_Literal	0x1
0293 a5fd       |    |		Store_Unchecked	0x2,-0x3
0294 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0295 00da       |    |		Load_Top	At_Offset_2
0296 e5fe       |    |		Load	0x2,-0x2
0297 2a0d       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xd
0298 00e1       |    |		Load_Encached	Boolean_Cache
0299 00db       |    |		Load_Top	At_Offset_3
029a 8020       |    |		Call	0x0,0x20
029b c5fd       |    |		Store	0x2,-0x3
029c 00e1       |    |		Load_Encached	Boolean_Cache
029d e5fe       |    |		Load	0x2,-0x2
029e e5ff       |    |		Load	0x2,-0x1
029f 8021       | !  |		Call	0x0,0x21
02a0 8022       | "  |		Call	0x0,0x22
02a1 00d8       |    |		Load_Top	At_Offset_0
02a2 00e4       |    |		Load_Encached	Positive_Cache
02a3 0260       | `  |		Execute	Discrete,In_Type
02a4 7001       |p   |		Jump_Nonzero	0x2a6
02a5 0801       |    |		Execute_Immediate	Raise,0x1
02a6 8226       | &  |		Call	0x1,0x26
02a7 00d1       |    |		Pop_Control	Pop_Count_1
02a8 c5fd       |    |		Store	0x2,-0x3
02a9 4801       |H   |		Short_Literal	0x1
02aa a5fd       |    |		Store_Unchecked	0x2,-0x3
02ab 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02ac 0000 0000  |    |		.BLANK	0000[0x4]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02b4       |    |		.CONST	0x02b4								; Address of begin
02b1 0004       |    |		.CONST	0x0004								; Address of exception handler
02b2 0002       |    |		.CONST	0x0002								; Number of locals
02b3			INIT_02b0:
02b3 00e1       |    |		Load_Encached	Boolean_Cache
02b4			BODY_02b0:
02b4 4803       |H   |		Short_Literal	0x3
02b5 e24a       | J  |		Load	0x1,0x4a
02b6 1c08       |    |		Execute_Immediate	Run_Utility,0x8
02b7 e002       |    |		Load	0x0,0x2
02b8 e243       | C  |		Load	0x1,0x43
02b9 0098       |    |		Execute	Package,Field_Read_Dynamic
02ba 00d9       |    |		Load_Top	At_Offset_1
02bb 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
02bc e249       | I  |		Load	0x1,0x49
02bd 00d9       |    |		Load_Top	At_Offset_1
02be 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
02bf e5ff       |    |		Load	0x2,-0x1
02c0 00d9       |    |		Load_Top	At_Offset_1
02c1 2a10       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x10
02c2 e5fe       |    |		Load	0x2,-0x2
02c3 016d       | m  |		Execute	Variant_Record,Structure_Write
02c4 00e1       |    |		Load_Encached	Boolean_Cache
02c5 e5ff       |    |		Load	0x2,-0x1
02c6 8020       |    |		Call	0x0,0x20
02c7 0059       | Y  |		Store_Top	Discrete,At_Offset_1
02c8 00e1       |    |		Load_Encached	Boolean_Cache
02c9 e5fe       |    |		Load	0x2,-0x2
02ca e5ff       |    |		Load	0x2,-0x1
02cb 8021       | !  |		Call	0x0,0x21
02cc 8022       | "  |		Call	0x0,0x22
02cd 00d8       |    |		Load_Top	At_Offset_0
02ce 00e4       |    |		Load_Encached	Positive_Cache
02cf 0260       | `  |		Execute	Discrete,In_Type
02d0 7001       |p   |		Jump_Nonzero	0x2d2
02d1 0801       |    |		Execute_Immediate	Raise,0x1
02d2 8226       | &  |		Call	0x1,0x26
02d3 00d1       |    |		Pop_Control	Pop_Count_1
02d4 0059       | Y  |		Store_Top	Discrete,At_Offset_1
02d5 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02d6 0000 0000  |    |		.XXX[0x2]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02dc       |    |		.CONST	0x02dc								; Address of begin
02d9 0004       |    |		.CONST	0x0004								; Address of exception handler
02da 0002       |    |		.CONST	0x0002								; Number of locals
02db			INIT_02d8:
02db 00e1       |    |		Load_Encached	Boolean_Cache
02dc			BODY_02d8:
02dc 4804       |H   |		Short_Literal	0x4
02dd e24a       | J  |		Load	0x1,0x4a
02de 1c08       |    |		Execute_Immediate	Run_Utility,0x8
02df e002       |    |		Load	0x0,0x2
02e0 e243       | C  |		Load	0x1,0x43
02e1 0098       |    |		Execute	Package,Field_Read_Dynamic
02e2 00d9       |    |		Load_Top	At_Offset_1
02e3 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
02e4 e249       | I  |		Load	0x1,0x49
02e5 00d9       |    |		Load_Top	At_Offset_1
02e6 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
02e7 e5ff       |    |		Load	0x2,-0x1
02e8 00d9       |    |		Load_Top	At_Offset_1
02e9 2a11       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x11
02ea e5fd       |    |		Load	0x2,-0x3
02eb 016d       | m  |		Execute	Variant_Record,Structure_Write
02ec 00e1       |    |		Load_Encached	Boolean_Cache
02ed e5fe       |    |		Load	0x2,-0x2
02ee 8020       |    |		Call	0x0,0x20
02ef 0059       | Y  |		Store_Top	Discrete,At_Offset_1
02f0 00e1       |    |		Load_Encached	Boolean_Cache
02f1 e5fd       |    |		Load	0x2,-0x3
02f2 e5fe       |    |		Load	0x2,-0x2
02f3 8021       | !  |		Call	0x0,0x21
02f4 8022       | "  |		Call	0x0,0x22
02f5 00d8       |    |		Load_Top	At_Offset_0
02f6 00e4       |    |		Load_Encached	Positive_Cache
02f7 0260       | `  |		Execute	Discrete,In_Type
02f8 7001       |p   |		Jump_Nonzero	0x2fa
02f9 0801       |    |		Execute_Immediate	Raise,0x1
02fa 8226       | &  |		Call	0x1,0x26
02fb 00d1       |    |		Pop_Control	Pop_Count_1
02fc 0059       | Y  |		Store_Top	Discrete,At_Offset_1
02fd 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02fe 0000 0000  |    |		.XXX[0x2]
0300 ; --------------------------------------------------------------------------------------
0300 ; SUBPROGRAM
0300 ; --------------------------------------------------------------------------------------
0300 0307       |    |		.CONST	0x0307								; Address of begin
0301 0004       |    |		.CONST	0x0004								; Address of exception handler
0302 0002       |    |		.CONST	0x0002								; Number of locals
0303			INIT_0300:
0303 e00f       |    |		Load	0x0,0xf
0304 02ff       |    |		Declare_Variable	Variant_Record
0305 00d8       |    |		Load_Top	At_Offset_0
0306 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0307			BODY_0300:
0307 e5fe       |    |		Load	0x2,-0x2
0308 822f       | /  |		Call	0x1,0x2f
0309 e5ff       |    |		Load	0x2,-0x1
030a e5fe       |    |		Load	0x2,-0x2
030b 822e       | .  |		Call	0x1,0x2e
030c 0f00       |    |		Execute_Immediate	Equal,0x0
030d 0279       | y  |		Execute	Discrete,And
030e 680b       |h   |		Jump_Zero	0x31a
030f 00d8       |    |		Load_Top	At_Offset_0
0310 e5ff       |    |		Load	0x2,-0x1
0311 8023       | #  |		Call	0x0,0x23
0312 00d1       |    |		Pop_Control	Pop_Count_1
0313 e5fe       |    |		Load	0x2,-0x2
0314 00d9       |    |		Load_Top	At_Offset_1
0315 824d       | M  |		Call	0x1,0x4d
0316 00d1       |    |		Pop_Control	Pop_Count_1
0317 4801       |H   |		Short_Literal	0x1
0318 a5fd       |    |		Store_Unchecked	0x2,-0x3
0319 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
031a 4800       |H   |		Short_Literal	0x0
031b a5fd       |    |		Store_Unchecked	0x2,-0x3
031c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
031d 0000 0000  |    |		.XXX[0x3]
031f 0000       |    |
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0327       | '  |		.CONST	0x0327								; Address of begin
0321 0004       |    |		.CONST	0x0004								; Address of exception handler
0322 0002       |    |		.CONST	0x0002								; Number of locals
0323			INIT_0320:
0323 e00f       |    |		Load	0x0,0xf
0324 02ff       |    |		Declare_Variable	Variant_Record
0325 00d8       |    |		Load_Top	At_Offset_0
0326 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0327			BODY_0320:
0327 e5fe       |    |		Load	0x2,-0x2
0328 822f       | /  |		Call	0x1,0x2f
0329 e5ff       |    |		Load	0x2,-0x1
032a e5fe       |    |		Load	0x2,-0x2
032b 822e       | .  |		Call	0x1,0x2e
032c 0f00       |    |		Execute_Immediate	Equal,0x0
032d 0279       | y  |		Execute	Discrete,And
032e 680b       |h   |		Jump_Zero	0x33a
032f 00d8       |    |		Load_Top	At_Offset_0
0330 e5ff       |    |		Load	0x2,-0x1
0331 8024       | $  |		Call	0x0,0x24
0332 00d1       |    |		Pop_Control	Pop_Count_1
0333 e5fe       |    |		Load	0x2,-0x2
0334 00d9       |    |		Load_Top	At_Offset_1
0335 824d       | M  |		Call	0x1,0x4d
0336 00d1       |    |		Pop_Control	Pop_Count_1
0337 4801       |H   |		Short_Literal	0x1
0338 a5fd       |    |		Store_Unchecked	0x2,-0x3
0339 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
033a 4800       |H   |		Short_Literal	0x0
033b a5fd       |    |		Store_Unchecked	0x2,-0x3
033c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
033d 0000 0000  |    |		.XXX[0x3]
033f 0000       |    |
0340 ; --------------------------------------------------------------------------------------
0340 ; SUBPROGRAM
0340 ; --------------------------------------------------------------------------------------
0340 0347       | G  |		.CONST	0x0347								; Address of begin
0341 0004       |    |		.CONST	0x0004								; Address of exception handler
0342 0002       |    |		.CONST	0x0002								; Number of locals
0343			INIT_0340:
0343 e00f       |    |		Load	0x0,0xf
0344 02ff       |    |		Declare_Variable	Variant_Record
0345 00d8       |    |		Load_Top	At_Offset_0
0346 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0347			BODY_0340:
0347 e5fe       |    |		Load	0x2,-0x2
0348 822f       | /  |		Call	0x1,0x2f
0349 e5ff       |    |		Load	0x2,-0x1
034a e5fe       |    |		Load	0x2,-0x2
034b 822e       | .  |		Call	0x1,0x2e
034c 0f00       |    |		Execute_Immediate	Equal,0x0
034d 0279       | y  |		Execute	Discrete,And
034e 680b       |h   |		Jump_Zero	0x35a
034f 00d8       |    |		Load_Top	At_Offset_0
0350 e5ff       |    |		Load	0x2,-0x1
0351 8025       | %  |		Call	0x0,0x25
0352 00d1       |    |		Pop_Control	Pop_Count_1
0353 e5fe       |    |		Load	0x2,-0x2
0354 00d9       |    |		Load_Top	At_Offset_1
0355 824d       | M  |		Call	0x1,0x4d
0356 00d1       |    |		Pop_Control	Pop_Count_1
0357 4801       |H   |		Short_Literal	0x1
0358 a5fd       |    |		Store_Unchecked	0x2,-0x3
0359 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
035a 4800       |H   |		Short_Literal	0x0
035b a5fd       |    |		Store_Unchecked	0x2,-0x3
035c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
035d 0000 0000  |    |		.XXX[0x3]
035f 0000       |    |
0360 ; --------------------------------------------------------------------------------------
0360 ; SUBPROGRAM
0360 ; --------------------------------------------------------------------------------------
0360 0368       | h  |		.CONST	0x0368								; Address of begin
0361 0004       |    |		.CONST	0x0004								; Address of exception handler
0362 0003       |    |		.CONST	0x0003								; Number of locals
0363			INIT_0360:
0363 e00f       |    |		Load	0x0,0xf
0364 02ff       |    |		Declare_Variable	Variant_Record
0365 00d8       |    |		Load_Top	At_Offset_0
0366 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0367 00e1       |    |		Load_Encached	Boolean_Cache
0368			BODY_0360:
0368 00e1       |    |		Load_Encached	Boolean_Cache
0369 00da       |    |		Load_Top	At_Offset_2
036a e5ff       |    |		Load	0x2,-0x1
036b e5fd       |    |		Load	0x2,-0x3
036c 824c       | L  |		Call	0x1,0x4c
036d 00d1       |    |		Pop_Control	Pop_Count_1
036e 0059       | Y  |		Store_Top	Discrete,At_Offset_1
036f 00d8       |    |		Load_Top	At_Offset_0
0370 680c       |h   |		Jump_Zero	0x37d
0371 00e1       |    |		Load_Encached	Boolean_Cache
0372 00da       |    |		Load_Top	At_Offset_2
0373 e5fe       |    |		Load	0x2,-0x2
0374 8026       | &  |		Call	0x0,0x26
0375 00d1       |    |		Pop_Control	Pop_Count_1
0376 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0377 00d8       |    |		Load_Top	At_Offset_0
0378 6804       |h   |		Jump_Zero	0x37d
0379 e5fd       |    |		Load	0x2,-0x3
037a 00da       |    |		Load_Top	At_Offset_2
037b 824d       | M  |		Call	0x1,0x4d
037c 00d1       |    |		Pop_Control	Pop_Count_1
037d 00d8       |    |		Load_Top	At_Offset_0
037e a5fc       |    |		Store_Unchecked	0x2,-0x4
037f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0380 ; --------------------------------------------------------------------------------------
0380 ; SUBPROGRAM
0380 ; --------------------------------------------------------------------------------------
0380 0388       |    |		.CONST	0x0388								; Address of begin
0381 0004       |    |		.CONST	0x0004								; Address of exception handler
0382 0003       |    |		.CONST	0x0003								; Number of locals
0383			INIT_0380:
0383 e00f       |    |		Load	0x0,0xf
0384 02ff       |    |		Declare_Variable	Variant_Record
0385 00d8       |    |		Load_Top	At_Offset_0
0386 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0387 00e1       |    |		Load_Encached	Boolean_Cache
0388			BODY_0380:
0388 00e1       |    |		Load_Encached	Boolean_Cache
0389 00da       |    |		Load_Top	At_Offset_2
038a e5ff       |    |		Load	0x2,-0x1
038b e5fd       |    |		Load	0x2,-0x3
038c 824c       | L  |		Call	0x1,0x4c
038d 00d1       |    |		Pop_Control	Pop_Count_1
038e 0059       | Y  |		Store_Top	Discrete,At_Offset_1
038f 00d8       |    |		Load_Top	At_Offset_0
0390 680c       |h   |		Jump_Zero	0x39d
0391 00e1       |    |		Load_Encached	Boolean_Cache
0392 00da       |    |		Load_Top	At_Offset_2
0393 e5fe       |    |		Load	0x2,-0x2
0394 8027       | '  |		Call	0x0,0x27
0395 00d1       |    |		Pop_Control	Pop_Count_1
0396 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0397 00d8       |    |		Load_Top	At_Offset_0
0398 6804       |h   |		Jump_Zero	0x39d
0399 e5fd       |    |		Load	0x2,-0x3
039a 00da       |    |		Load_Top	At_Offset_2
039b 824d       | M  |		Call	0x1,0x4d
039c 00d1       |    |		Pop_Control	Pop_Count_1
039d 00d8       |    |		Load_Top	At_Offset_0
039e a5fc       |    |		Store_Unchecked	0x2,-0x4
039f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03a0 ; --------------------------------------------------------------------------------------
03a0 ; SUBPROGRAM
03a0 ; --------------------------------------------------------------------------------------
03a0 03a8       |    |		.CONST	0x03a8								; Address of begin
03a1 0004       |    |		.CONST	0x0004								; Address of exception handler
03a2 0003       |    |		.CONST	0x0003								; Number of locals
03a3			INIT_03a0:
03a3 e00f       |    |		Load	0x0,0xf
03a4 02ff       |    |		Declare_Variable	Variant_Record
03a5 00d8       |    |		Load_Top	At_Offset_0
03a6 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03a7 00e1       |    |		Load_Encached	Boolean_Cache
03a8			BODY_03a0:
03a8 00e1       |    |		Load_Encached	Boolean_Cache
03a9 00da       |    |		Load_Top	At_Offset_2
03aa e5ff       |    |		Load	0x2,-0x1
03ab e5fc       |    |		Load	0x2,-0x4
03ac 824c       | L  |		Call	0x1,0x4c
03ad 00d1       |    |		Pop_Control	Pop_Count_1
03ae 0059       | Y  |		Store_Top	Discrete,At_Offset_1
03af 00d8       |    |		Load_Top	At_Offset_0
03b0 680d       |h   |		Jump_Zero	0x3be
03b1 00e1       |    |		Load_Encached	Boolean_Cache
03b2 00da       |    |		Load_Top	At_Offset_2
03b3 e5fd       |    |		Load	0x2,-0x3
03b4 e5fe       |    |		Load	0x2,-0x2
03b5 8028       | (  |		Call	0x0,0x28
03b6 00d1       |    |		Pop_Control	Pop_Count_1
03b7 0059       | Y  |		Store_Top	Discrete,At_Offset_1
03b8 00d8       |    |		Load_Top	At_Offset_0
03b9 6804       |h   |		Jump_Zero	0x3be
03ba e5fc       |    |		Load	0x2,-0x4
03bb 00da       |    |		Load_Top	At_Offset_2
03bc 824d       | M  |		Call	0x1,0x4d
03bd 00d1       |    |		Pop_Control	Pop_Count_1
03be 00d8       |    |		Load_Top	At_Offset_0
03bf a5fb       |    |		Store_Unchecked	0x2,-0x5
03c0 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
03c1 0000 0000  |    |		.BLANK	0000[0x7]
03c8 ; --------------------------------------------------------------------------------------
03c8 ; SUBPROGRAM
03c8 ; --------------------------------------------------------------------------------------
03c8 03d5       |    |		.CONST	0x03d5								; Address of begin
03c9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ca 0004       |    |		.CONST	0x0004								; Number of locals
03cb			INIT_03c8:
03cb e009       |    |		Load	0x0,0x9
03cc e242       | B  |		Load	0x1,0x42
03cd 0098       |    |		Execute	Package,Field_Read_Dynamic
03ce 0322       | "  |		Declare_Variable	Record
03cf 00d8       |    |		Load_Top	At_Offset_0
03d0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03d1 e245       | E  |		Load	0x1,0x45
03d2 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
03d3 e245       | E  |		Load	0x1,0x45
03d4 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
03d5			BODY_03c8:
03d5 e5fe       |    |		Load	0x2,-0x2
03d6 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
03d7 704c       |pL  |		Jump_Nonzero	0x424
03d8 e245       | E  |		Load	0x1,0x45
03d9 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
03da e5fe       |    |		Load	0x2,-0x2
03db 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
03dc e245       | E  |		Load	0x1,0x45
03dd 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
03de 003a       | :  |		Store_Top	Access,At_Offset_2
03df 00cf       |    |		Action	Mark_Auxiliary
03e0 780f       |x   |		Jump	0x3f0
03e1 00da       |    |		Load_Top	At_Offset_2
03e2 e245       | E  |		Load	0x1,0x45
03e3 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
03e4 e402       |    |		Load	0x2,0x2
03e5 017d       | }  |		Execute	Record,Structure_Write
03e6 00d9       |    |		Load_Top	At_Offset_1
03e7 e402       |    |		Load	0x2,0x2
03e8 e245       | E  |		Load	0x1,0x45
03e9 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
03ea 003a       | :  |		Store_Top	Access,At_Offset_2
03eb 00da       |    |		Load_Top	At_Offset_2
03ec e245       | E  |		Load	0x1,0x45
03ed 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
03ee 003b       | ;  |		Store_Top	Access,At_Offset_3
03ef 00c9       |    |		Action	Pop_Auxiliary_Loop
03f0 00da       |    |		Load_Top	At_Offset_2
03f1 e245       | E  |		Load	0x1,0x45
03f2 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
03f3 6fed       |o   |		Jump_Zero	0x3e1
03f4 00ce       |    |		Action	Pop_Auxiliary
03f5 00da       |    |		Load_Top	At_Offset_2
03f6 e5ff       |    |		Load	0x2,-0x1
03f7 e029       | )  |		Load	0x0,0x29
03f8 e242       | B  |		Load	0x1,0x42
03f9 0096       |    |		Execute	Package,Entry
03fa 00d1       |    |		Pop_Control	Pop_Count_1
03fb 00d8       |    |		Load_Top	At_Offset_0
03fc 00db       |    |		Load_Top	At_Offset_3
03fd e245       | E  |		Load	0x1,0x45
03fe 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
03ff 0039       | 9  |		Store_Top	Access,At_Offset_1
0400 e5fe       |    |		Load	0x2,-0x2
0401 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
0402 e245       | E  |		Load	0x1,0x45
0403 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0404 e5fe       |    |		Load	0x2,-0x2
0405 2a07       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7
0406 e245       | E  |		Load	0x1,0x45
0407 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
0408 00d9       |    |		Load_Top	At_Offset_1
0409 e245       | E  |		Load	0x1,0x45
040a 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
040b 003a       | :  |		Store_Top	Access,At_Offset_2
040c 00cf       |    |		Action	Mark_Auxiliary
040d 7811       |x   |		Jump	0x41f
040e 00da       |    |		Load_Top	At_Offset_2
040f e245       | E  |		Load	0x1,0x45
0410 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0411 e402       |    |		Load	0x2,0x2
0412 017d       | }  |		Execute	Record,Structure_Write
0413 e5fe       |    |		Load	0x2,-0x2
0414 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
0415 e402       |    |		Load	0x2,0x2
0416 e245       | E  |		Load	0x1,0x45
0417 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0418 e5fe       |    |		Load	0x2,-0x2
0419 2a07       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7
041a 00da       |    |		Load_Top	At_Offset_2
041b e245       | E  |		Load	0x1,0x45
041c 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
041d 003b       | ;  |		Store_Top	Access,At_Offset_3
041e 00c9       |    |		Action	Pop_Auxiliary_Loop
041f 00da       |    |		Load_Top	At_Offset_2
0420 e245       | E  |		Load	0x1,0x45
0421 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0422 6feb       |o   |		Jump_Zero	0x40e
0423 00ce       |    |		Action	Pop_Auxiliary
0424 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0425 0000 0000  |    |		.XXX[0x3]
0427 0000       |    |
0428 ; --------------------------------------------------------------------------------------
0428 ; SUBPROGRAM
0428 ; --------------------------------------------------------------------------------------
0428 042b       | +  |		.CONST	0x042b								; Address of begin
0429 0004       |    |		.CONST	0x0004								; Address of exception handler
042a 0001       |    |		.CONST	0x0001								; Number of locals
042b			BODY_0428:
042b			INIT_0428:
042b 00da       |    |		Load_Top	At_Offset_2
042c 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
042d 7024       |p$  |		Jump_Nonzero	0x452
042e 00da       |    |		Load_Top	At_Offset_2
042f 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
0430 e245       | E  |		Load	0x1,0x45
0431 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0432 701f       |p   |		Jump_Nonzero	0x452
0433 00da       |    |		Load_Top	At_Offset_2
0434 2e08       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8
0435 e245       | E  |		Load	0x1,0x45
0436 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0437 680b       |h   |		Jump_Zero	0x443
0438 e245       | E  |		Load	0x1,0x45
0439 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
043a 00db       |    |		Load_Top	At_Offset_3
043b 2e08       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8
043c 00d1       |    |		Pop_Control	Pop_Count_1
043d 00db       |    |		Load_Top	At_Offset_3
043e 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
043f e245       | E  |		Load	0x1,0x45
0440 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0441 00db       |    |		Load_Top	At_Offset_3
0442 2a08       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8
0443 00da       |    |		Load_Top	At_Offset_2
0444 2e08       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8
0445 e245       | E  |		Load	0x1,0x45
0446 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0447 e02a       | *  |		Load	0x0,0x2a
0448 e242       | B  |		Load	0x1,0x42
0449 0096       |    |		Execute	Package,Entry
044a 00db       |    |		Load_Top	At_Offset_3
044b 2a06       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6
044c 00da       |    |		Load_Top	At_Offset_2
044d 2e08       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8
044e e245       | E  |		Load	0x1,0x45
044f 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0450 00db       |    |		Load_Top	At_Offset_3
0451 2a08       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8
0452 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0453 0000 0000  |    |		.BLANK	0000[0x5]
0458 ; --------------------------------------------------------------------------------------
0458 ; SUBPROGRAM
0458 ; --------------------------------------------------------------------------------------
0458 0460       | `  |		.CONST	0x0460								; Address of begin
0459 0004       |    |		.CONST	0x0004								; Address of exception handler
045a 0003       |    |		.CONST	0x0003								; Number of locals
045b			INIT_0458:
045b e017       |    |		Load	0x0,0x17
045c 0322       | "  |		Declare_Variable	Record
045d 00d8       |    |		Load_Top	At_Offset_0
045e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
045f 00e1       |    |		Load_Encached	Boolean_Cache
0460			BODY_0458:
0460 e5fa       |    |		Load	0x2,-0x6
0461 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0462 0f01       |    |		Execute_Immediate	Equal,0x1
0463 6819       |h   |		Jump_Zero	0x47d
0464 e5fd       |    |		Load	0x2,-0x3
0465 e5fa       |    |		Load	0x2,-0x6
0466 821b       |    |		Call	0x1,0x1b
0467 7013       |p   |		Jump_Nonzero	0x47b
0468 00d9       |    |		Load_Top	At_Offset_1
0469 e5fb       |    |		Load	0x2,-0x5
046a e5fc       |    |		Load	0x2,-0x4
046b e5fd       |    |		Load	0x2,-0x3
046c e5fe       |    |		Load	0x2,-0x2
046d e5ff       |    |		Load	0x2,-0x1
046e 802b       | +  |		Call	0x0,0x2b
046f 00d1       |    |		Pop_Control	Pop_Count_1
0470 e5fa       |    |		Load	0x2,-0x6
0471 2e0b       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xb
0472 00da       |    |		Load_Top	At_Offset_2
0473 e02c       | ,  |		Load	0x0,0x2c
0474 e246       | F  |		Load	0x1,0x46
0475 0096       |    |		Execute	Package,Entry
0476 e5fa       |    |		Load	0x2,-0x6
0477 2a0b       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xb
0478 4801       |H   |		Short_Literal	0x1
0479 a5f9       |    |		Store_Unchecked	0x2,-0x7
047a 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
047b 4800       |H   |		Short_Literal	0x0
047c a5f9       |    |		Store_Unchecked	0x2,-0x7
047d 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
047e 0000 0000  |    |		.XXX[0x2]
0480 ; --------------------------------------------------------------------------------------
0480 ; SUBPROGRAM
0480 ; --------------------------------------------------------------------------------------
0480 0483       |    |		.CONST	0x0483								; Address of begin
0481 0004       |    |		.CONST	0x0004								; Address of exception handler
0482 0001       |    |		.CONST	0x0001								; Number of locals
0483			BODY_0480:
0483			INIT_0480:
0483 00da       |    |		Load_Top	At_Offset_2
0484 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0485 0f01       |    |		Execute_Immediate	Equal,0x1
0486 6808       |h   |		Jump_Zero	0x48f
0487 00db       |    |		Load_Top	At_Offset_3
0488 802d       | -  |		Call	0x0,0x2d
0489 00db       |    |		Load_Top	At_Offset_3
048a 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
048b e02e       | .  |		Load	0x0,0x2e
048c e246       | F  |		Load	0x1,0x46
048d 0096       |    |		Execute	Package,Entry
048e 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
048f 4800       |H   |		Short_Literal	0x0
0490 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0491 0000 0000  |    |		.BLANK	0000[0x7]
0498 ; --------------------------------------------------------------------------------------
0498 ; SUBPROGRAM
0498 ; --------------------------------------------------------------------------------------
0498 049b       |    |		.CONST	0x049b								; Address of begin
0499 0004       |    |		.CONST	0x0004								; Address of exception handler
049a 0001       |    |		.CONST	0x0001								; Number of locals
049b			BODY_0498:
049b			INIT_0498:
049b 00da       |    |		Load_Top	At_Offset_2
049c 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
049d 0f01       |    |		Execute_Immediate	Equal,0x1
049e 6807       |h   |		Jump_Zero	0x4a6
049f 00da       |    |		Load_Top	At_Offset_2
04a0 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
04a1 e02f       | /  |		Load	0x0,0x2f
04a2 e246       | F  |		Load	0x1,0x46
04a3 0096       |    |		Execute	Package,Entry
04a4 0f00       |    |		Execute_Immediate	Equal,0x0
04a5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04a6 4800       |H   |		Short_Literal	0x0
04a7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04a8 ; --------------------------------------------------------------------------------------
04a8 ; SUBPROGRAM
04a8 ; --------------------------------------------------------------------------------------
04a8 04b0       |    |		.CONST	0x04b0								; Address of begin
04a9 0004       |    |		.CONST	0x0004								; Address of exception handler
04aa 0003       |    |		.CONST	0x0003								; Number of locals
04ab			INIT_04a8:
04ab e017       |    |		Load	0x0,0x17
04ac 0322       | "  |		Declare_Variable	Record
04ad 00d8       |    |		Load_Top	At_Offset_0
04ae 1c00       |    |		Execute_Immediate	Run_Utility,0x0
04af 00e1       |    |		Load_Encached	Boolean_Cache
04b0			BODY_04a8:
04b0 e5ff       |    |		Load	0x2,-0x1
04b1 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
04b2 0f01       |    |		Execute_Immediate	Equal,0x1
04b3 6812       |h   |		Jump_Zero	0x4c6
04b4 00e1       |    |		Load_Encached	Boolean_Cache
04b5 00da       |    |		Load_Top	At_Offset_2
04b6 e5fe       |    |		Load	0x2,-0x2
04b7 802d       | -  |		Call	0x0,0x2d
04b8 e5ff       |    |		Load	0x2,-0x1
04b9 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
04ba e030       | 0  |		Load	0x0,0x30
04bb e246       | F  |		Load	0x1,0x46
04bc 0096       |    |		Execute	Package,Entry
04bd 00d1       |    |		Pop_Control	Pop_Count_1
04be 0059       | Y  |		Store_Top	Discrete,At_Offset_1
04bf 00d8       |    |		Load_Top	At_Offset_0
04c0 6803       |h   |		Jump_Zero	0x4c4
04c1 00d9       |    |		Load_Top	At_Offset_1
04c2 8031       | 1  |		Call	0x0,0x31
04c3 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
04c4 4800       |H   |		Short_Literal	0x0
04c5 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
04c6 0831       | 1  |		Execute_Immediate	Raise,0x31
04c7 0000       |    |		.XXX[0x1]
04c8 ; --------------------------------------------------------------------------------------
04c8 ; SUBPROGRAM
04c8 ; --------------------------------------------------------------------------------------
04c8 04d0       |    |		.CONST	0x04d0								; Address of begin
04c9 0004       |    |		.CONST	0x0004								; Address of exception handler
04ca 0003       |    |		.CONST	0x0003								; Number of locals
04cb			INIT_04c8:
04cb e017       |    |		Load	0x0,0x17
04cc 0322       | "  |		Declare_Variable	Record
04cd 00d8       |    |		Load_Top	At_Offset_0
04ce 1c00       |    |		Execute_Immediate	Run_Utility,0x0
04cf 00e1       |    |		Load_Encached	Boolean_Cache
04d0			BODY_04c8:
04d0 e5ff       |    |		Load	0x2,-0x1
04d1 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
04d2 0f01       |    |		Execute_Immediate	Equal,0x1
04d3 6810       |h   |		Jump_Zero	0x4e4
04d4 00e1       |    |		Load_Encached	Boolean_Cache
04d5 00da       |    |		Load_Top	At_Offset_2
04d6 e5fe       |    |		Load	0x2,-0x2
04d7 802d       | -  |		Call	0x0,0x2d
04d8 e5ff       |    |		Load	0x2,-0x1
04d9 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
04da e030       | 0  |		Load	0x0,0x30
04db e246       | F  |		Load	0x1,0x46
04dc 0096       |    |		Execute	Package,Entry
04dd 00d1       |    |		Pop_Control	Pop_Count_1
04de 0059       | Y  |		Store_Top	Discrete,At_Offset_1
04df 00d8       |    |		Load_Top	At_Offset_0
04e0 6803       |h   |		Jump_Zero	0x4e4
04e1 00d9       |    |		Load_Top	At_Offset_1
04e2 8032       | 2  |		Call	0x0,0x32
04e3 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
04e4 4800       |H   |		Short_Literal	0x0
04e5 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
04e6 0000 0000  |    |		.XXX[0x2]
04e8 ; --------------------------------------------------------------------------------------
04e8 ; SUBPROGRAM
04e8 ; --------------------------------------------------------------------------------------
04e8 04f0       |    |		.CONST	0x04f0								; Address of begin
04e9 0004       |    |		.CONST	0x0004								; Address of exception handler
04ea 0003       |    |		.CONST	0x0003								; Number of locals
04eb			INIT_04e8:
04eb e017       |    |		Load	0x0,0x17
04ec 0322       | "  |		Declare_Variable	Record
04ed 00d8       |    |		Load_Top	At_Offset_0
04ee 1c00       |    |		Execute_Immediate	Run_Utility,0x0
04ef 00e1       |    |		Load_Encached	Boolean_Cache
04f0			BODY_04e8:
04f0 e5ff       |    |		Load	0x2,-0x1
04f1 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
04f2 0f01       |    |		Execute_Immediate	Equal,0x1
04f3 6812       |h   |		Jump_Zero	0x506
04f4 00e1       |    |		Load_Encached	Boolean_Cache
04f5 00da       |    |		Load_Top	At_Offset_2
04f6 e5fe       |    |		Load	0x2,-0x2
04f7 802d       | -  |		Call	0x0,0x2d
04f8 e5ff       |    |		Load	0x2,-0x1
04f9 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
04fa e030       | 0  |		Load	0x0,0x30
04fb e246       | F  |		Load	0x1,0x46
04fc 0096       |    |		Execute	Package,Entry
04fd 00d1       |    |		Pop_Control	Pop_Count_1
04fe 0059       | Y  |		Store_Top	Discrete,At_Offset_1
04ff 00d8       |    |		Load_Top	At_Offset_0
0500 6803       |h   |		Jump_Zero	0x504
0501 00d9       |    |		Load_Top	At_Offset_1
0502 8033       | 3  |		Call	0x0,0x33
0503 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0504 4800       |H   |		Short_Literal	0x0
0505 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0506 0831       | 1  |		Execute_Immediate	Raise,0x31
0507 0000       |    |		.XXX[0x1]
0508 ; --------------------------------------------------------------------------------------
0508 ; SUBPROGRAM
0508 ; --------------------------------------------------------------------------------------
0508 050b       |    |		.CONST	0x050b								; Address of begin
0509 0004       |    |		.CONST	0x0004								; Address of exception handler
050a 0001       |    |		.CONST	0x0001								; Number of locals
050b			BODY_0508:
050b			INIT_0508:
050b 00db       |    |		Load_Top	At_Offset_3
050c 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
050d 7006       |p   |		Jump_Nonzero	0x514
050e 00da       |    |		Load_Top	At_Offset_2
050f e5fe       |    |		Load	0x2,-0x2
0510 2a06       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6
0511 4801       |H   |		Short_Literal	0x1
0512 a5fd       |    |		Store_Unchecked	0x2,-0x3
0513 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0514 00db       |    |		Load_Top	At_Offset_3
0515 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0516 0f02       |    |		Execute_Immediate	Equal,0x2
0517 6806       |h   |		Jump_Zero	0x51e
0518 00da       |    |		Load_Top	At_Offset_2
0519 e5fe       |    |		Load	0x2,-0x2
051a 2a0f       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xf
051b 4801       |H   |		Short_Literal	0x1
051c a5fd       |    |		Store_Unchecked	0x2,-0x3
051d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
051e 4800       |H   |		Short_Literal	0x0
051f a5fd       |    |		Store_Unchecked	0x2,-0x3
0520 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0521 0000 0000  |    |		.BLANK	0000[0x7]
0528 ; --------------------------------------------------------------------------------------
0528 ; SUBPROGRAM
0528 ; --------------------------------------------------------------------------------------
0528 052d       | -  |		.CONST	0x052d								; Address of begin
0529 0004       |    |		.CONST	0x0004								; Address of exception handler
052a 0002       |    |		.CONST	0x0002								; Number of locals
052b			INIT_0528:
052b e245       | E  |		Load	0x1,0x45
052c 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
052d			BODY_0528:
052d 0092 08d3  |    |		Action	Push_String_Extended,0x8d3					; "Complement : Kind : "
052f e5ff       |    |		Load	0x2,-0x1
0530 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0531 e20d       |    |		Load	0x1,0xd
0532 011c       |    |		Execute	Any,Convert_Unchecked
0533 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0534 01cc       |    |		Execute	Vector,Catenate
0535 e034       | 4  |		Load	0x0,0x34
0536 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0537 00db       |    |		Load_Top	At_Offset_3
0538 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0539 4605       |F   |		Jump_Case	0x6
053a 7809       |x   |		Jump	0x544								; case 0x0
053b 7835       |x5  |		Jump	0x571								; case 0x1
053c 7846       |xF  |		Jump	0x583								; case 0x2
053d 7859       |xY  |		Jump	0x597								; case 0x3
053e 7860       |x`  |		Jump	0x59f								; case 0x4
053f 7800       |x   |		Jump	0x540								; case 0x5
0540 4801       |H   |		Short_Literal	0x1
0541 e034       | 4  |		Load	0x0,0x34
0542 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0543 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0544 0092 08d4  |    |		Action	Push_String_Extended,0x8d4					; " Name : "
0546 e5ff       |    |		Load	0x2,-0x1
0547 8235       | 5  |		Call	0x1,0x35
0548 01cc       |    |		Execute	Vector,Catenate
0549 0092 08d5  |    |		Action	Push_String_Extended,0x8d5					; " Place : "
054b 01cc       |    |		Execute	Vector,Catenate
054c e5ff       |    |		Load	0x2,-0x1
054d 8236       | 6  |		Call	0x1,0x36
054e 802d       | -  |		Call	0x0,0x2d
054f 01cc       |    |		Execute	Vector,Catenate
0550 e034       | 4  |		Load	0x0,0x34
0551 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0552 00db       |    |		Load_Top	At_Offset_3
0553 2605       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
0554 e035       | 5  |		Load	0x0,0x35
0555 e244       | D  |		Load	0x1,0x44
0556 0096       |    |		Execute	Package,Entry
0557 e245       | E  |		Load	0x1,0x45
0558 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
0559 e5ff       |    |		Load	0x2,-0x1
055a 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
055b e245       | E  |		Load	0x1,0x45
055c 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
055d 0039       | 9  |		Store_Top	Access,At_Offset_1
055e 00cf       |    |		Action	Mark_Auxiliary
055f 780b       |x   |		Jump	0x56b
0560 00d9       |    |		Load_Top	At_Offset_1
0561 e245       | E  |		Load	0x1,0x45
0562 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0563 e00b       |    |		Load	0x0,0xb
0564 e242       | B  |		Load	0x1,0x42
0565 0096       |    |		Execute	Package,Entry
0566 00d9       |    |		Load_Top	At_Offset_1
0567 e245       | E  |		Load	0x1,0x45
0568 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0569 003a       | :  |		Store_Top	Access,At_Offset_2
056a 00c9       |    |		Action	Pop_Auxiliary_Loop
056b 00d9       |    |		Load_Top	At_Offset_1
056c e245       | E  |		Load	0x1,0x45
056d 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
056e 6ff1       |o   |		Jump_Zero	0x560
056f 00ce       |    |		Action	Pop_Auxiliary
0570 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0571 0092 08d4  |    |		Action	Push_String_Extended,0x8d4					; " Name : "
0573 e5ff       |    |		Load	0x2,-0x1
0574 8235       | 5  |		Call	0x1,0x35
0575 01cc       |    |		Execute	Vector,Catenate
0576 e034       | 4  |		Load	0x0,0x34
0577 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0578 00db       |    |		Load_Top	At_Offset_3
0579 260a       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xa
057a e035       | 5  |		Load	0x0,0x35
057b e244       | D  |		Load	0x1,0x44
057c 0096       |    |		Execute	Package,Entry
057d 00db       |    |		Load_Top	At_Offset_3
057e 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
057f e035       | 5  |		Load	0x0,0x35
0580 e246       | F  |		Load	0x1,0x46
0581 0096       |    |		Execute	Package,Entry
0582 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0583 0092 08d4  |    |		Action	Push_String_Extended,0x8d4					; " Name : "
0585 e5ff       |    |		Load	0x2,-0x1
0586 8235       | 5  |		Call	0x1,0x35
0587 01cc       |    |		Execute	Vector,Catenate
0588 0092 08d5  |    |		Action	Push_String_Extended,0x8d5					; " Place : "
058a 01cc       |    |		Execute	Vector,Catenate
058b e5ff       |    |		Load	0x2,-0x1
058c 8236       | 6  |		Call	0x1,0x36
058d 802d       | -  |		Call	0x0,0x2d
058e 01cc       |    |		Execute	Vector,Catenate
058f e034       | 4  |		Load	0x0,0x34
0590 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0591 00db       |    |		Load_Top	At_Offset_3
0592 260e       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xe
0593 e035       | 5  |		Load	0x0,0x35
0594 e244       | D  |		Load	0x1,0x44
0595 0096       |    |		Execute	Package,Entry
0596 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0597 0092 08d4  |    |		Action	Push_String_Extended,0x8d4					; " Name : "
0599 e5ff       |    |		Load	0x2,-0x1
059a 8235       | 5  |		Call	0x1,0x35
059b 01cc       |    |		Execute	Vector,Catenate
059c e034       | 4  |		Load	0x0,0x34
059d 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
059e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
059f 0092 08d4  |    |		Action	Push_String_Extended,0x8d4					; " Name : "
05a1 e5ff       |    |		Load	0x2,-0x1
05a2 8235       | 5  |		Call	0x1,0x35
05a3 01cc       |    |		Execute	Vector,Catenate
05a4 e034       | 4  |		Load	0x0,0x34
05a5 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
05a6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
05a7 0000       |    |		.XXX[0x1]
05a8 ; --------------------------------------------------------------------------------------
05a8 ; SUBPROGRAM
05a8 ; --------------------------------------------------------------------------------------
05a8 05ab       |    |		.CONST	0x05ab								; Address of begin
05a9 0004       |    |		.CONST	0x0004								; Address of exception handler
05aa 0001       |    |		.CONST	0x0001								; Number of locals
05ab			BODY_05a8:
05ab			INIT_05a8:
05ab 00da       |    |		Load_Top	At_Offset_2
05ac 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
05ad 0f01       |    |		Execute_Immediate	Equal,0x1
05ae 6809       |h   |		Jump_Zero	0x5b8
05af 00da       |    |		Load_Top	At_Offset_2
05b0 2e0c       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc
05b1 00db       |    |		Load_Top	At_Offset_3
05b2 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
05b3 e036       | 6  |		Load	0x0,0x36
05b4 e246       | F  |		Load	0x1,0x46
05b5 0096       |    |		Execute	Package,Entry
05b6 00db       |    |		Load_Top	At_Offset_3
05b7 2a0c       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xc
05b8 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
05b9 0000 0000  |    |		.BLANK	0000[0x7]
05c0 ; --------------------------------------------------------------------------------------
05c0 ; SUBPROGRAM
05c0 ; --------------------------------------------------------------------------------------
05c0 05c3       |    |		.CONST	0x05c3								; Address of begin
05c1 0004       |    |		.CONST	0x0004								; Address of exception handler
05c2 0001       |    |		.CONST	0x0001								; Number of locals
05c3			BODY_05c0:
05c3			INIT_05c0:
05c3 00da       |    |		Load_Top	At_Offset_2
05c4 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
05c5 0f01       |    |		Execute_Immediate	Equal,0x1
05c6 6807       |h   |		Jump_Zero	0x5ce
05c7 00da       |    |		Load_Top	At_Offset_2
05c8 2e0c       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc
05c9 e037       | 7  |		Load	0x0,0x37
05ca e246       | F  |		Load	0x1,0x46
05cb 0096       |    |		Execute	Package,Entry
05cc 00db       |    |		Load_Top	At_Offset_3
05cd 2a0c       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xc
05ce 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
05cf 0000       |    |		.XXX[0x1]
05d0 ; --------------------------------------------------------------------------------------
05d0 ; SUBPROGRAM
05d0 ; --------------------------------------------------------------------------------------
05d0 05d3       |    |		.CONST	0x05d3								; Address of begin
05d1 0004       |    |		.CONST	0x0004								; Address of exception handler
05d2 0001       |    |		.CONST	0x0001								; Number of locals
05d3			BODY_05d0:
05d3			INIT_05d0:
05d3 00da       |    |		Load_Top	At_Offset_2
05d4 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
05d5 0f01       |    |		Execute_Immediate	Equal,0x1
05d6 6807       |h   |		Jump_Zero	0x5de
05d7 00da       |    |		Load_Top	At_Offset_2
05d8 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
05d9 e038       | 8  |		Load	0x0,0x38
05da e246       | F  |		Load	0x1,0x46
05db 0096       |    |		Execute	Package,Entry
05dc 8039       | 9  |		Call	0x0,0x39
05dd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05de 4800       |H   |		Short_Literal	0x0
05df 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05e0 ; --------------------------------------------------------------------------------------
05e0 ; SUBPROGRAM
05e0 ; --------------------------------------------------------------------------------------
05e0 05e3       |    |		.CONST	0x05e3								; Address of begin
05e1 0004       |    |		.CONST	0x0004								; Address of exception handler
05e2 0001       |    |		.CONST	0x0001								; Number of locals
05e3			BODY_05e0:
05e3			INIT_05e0:
05e3 00da       |    |		Load_Top	At_Offset_2
05e4 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
05e5 0f01       |    |		Execute_Immediate	Equal,0x1
05e6 6806       |h   |		Jump_Zero	0x5ed
05e7 00da       |    |		Load_Top	At_Offset_2
05e8 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
05e9 e03a       | :  |		Load	0x0,0x3a
05ea e246       | F  |		Load	0x1,0x46
05eb 0096       |    |		Execute	Package,Entry
05ec 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05ed 4801       |H   |		Short_Literal	0x1
05ee 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05ef 0000       |    |		.XXX[0x1]
05f0 ; --------------------------------------------------------------------------------------
05f0 ; SUBPROGRAM
05f0 ; --------------------------------------------------------------------------------------
05f0 05fb       |    |		.CONST	0x05fb								; Address of begin
05f1 0004       |    |		.CONST	0x0004								; Address of exception handler
05f2 0003       |    |		.CONST	0x0003								; Number of locals
05f3			INIT_05f0:
05f3 e009       |    |		Load	0x0,0x9
05f4 e240       | @  |		Load	0x1,0x40
05f5 0098       |    |		Execute	Package,Field_Read_Dynamic
05f6 0322       | "  |		Declare_Variable	Record
05f7 00d8       |    |		Load_Top	At_Offset_0
05f8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
05f9 00e1       |    |		Load_Encached	Boolean_Cache
05fa 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
05fb			BODY_05f0:
05fb 00d9       |    |		Load_Top	At_Offset_1
05fc e5ff       |    |		Load	0x2,-0x1
05fd e029       | )  |		Load	0x0,0x29
05fe e240       | @  |		Load	0x1,0x40
05ff 0096       |    |		Execute	Package,Entry
0600 00d1       |    |		Pop_Control	Pop_Count_1
0601 00e1       |    |		Load_Encached	Boolean_Cache
0602 e5fe       |    |		Load	0x2,-0x2
0603 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0604 00db       |    |		Load_Top	At_Offset_3
0605 e03b       | ;  |		Load	0x0,0x3b
0606 e243       | C  |		Load	0x1,0x43
0607 0096       |    |		Execute	Package,Entry
0608 00d1       |    |		Pop_Control	Pop_Count_1
0609 c5fd       |    |		Store	0x2,-0x3
060a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
060b 0000 0000  |    |		.BLANK	0000[0x5]
0610 ; --------------------------------------------------------------------------------------
0610 ; SUBPROGRAM
0610 ; --------------------------------------------------------------------------------------
0610 0613       |    |		.CONST	0x0613								; Address of begin
0611 0004       |    |		.CONST	0x0004								; Address of exception handler
0612 0001       |    |		.CONST	0x0001								; Number of locals
0613			BODY_0610:
0613			INIT_0610:
0613 00da       |    |		Load_Top	At_Offset_2
0614 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
0615 00db       |    |		Load_Top	At_Offset_3
0616 2402       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x2
0617 e036       | 6  |		Load	0x0,0x36
0618 e243       | C  |		Load	0x1,0x43
0619 0096       |    |		Execute	Package,Entry
061a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
061b 0000 0000  |    |		.BLANK	0000[0x5]
0620 ; --------------------------------------------------------------------------------------
0620 ; SUBPROGRAM
0620 ; --------------------------------------------------------------------------------------
0620 0623       | #  |		.CONST	0x0623								; Address of begin
0621 0004       |    |		.CONST	0x0004								; Address of exception handler
0622 0001       |    |		.CONST	0x0001								; Number of locals
0623			BODY_0620:
0623			INIT_0620:
0623 00da       |    |		Load_Top	At_Offset_2
0624 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
0625 e037       | 7  |		Load	0x0,0x37
0626 e243       | C  |		Load	0x1,0x43
0627 0096       |    |		Execute	Package,Entry
0628 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0629 0000 0000  |    |		.BLANK	0000[0x7]
0630 ; --------------------------------------------------------------------------------------
0630 ; SUBPROGRAM
0630 ; --------------------------------------------------------------------------------------
0630 0633       | 3  |		.CONST	0x0633								; Address of begin
0631 0004       |    |		.CONST	0x0004								; Address of exception handler
0632 0001       |    |		.CONST	0x0001								; Number of locals
0633			BODY_0630:
0633			INIT_0630:
0633 00da       |    |		Load_Top	At_Offset_2
0634 2403       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x3
0635 e038       | 8  |		Load	0x0,0x38
0636 e243       | C  |		Load	0x1,0x43
0637 0096       |    |		Execute	Package,Entry
0638 e00c       |    |		Load	0x0,0xc
0639 e240       | @  |		Load	0x1,0x40
063a 0096       |    |		Execute	Package,Entry
063b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
063c 0000 0000  |    |		.BLANK	0000[0x4]
0640 ; --------------------------------------------------------------------------------------
0640 ; SUBPROGRAM
0640 ; --------------------------------------------------------------------------------------
0640 0643       | C  |		.CONST	0x0643								; Address of begin
0641 0004       |    |		.CONST	0x0004								; Address of exception handler
0642 0001       |    |		.CONST	0x0001								; Number of locals
0643			BODY_0640:
0643			INIT_0640:
0643 00da       |    |		Load_Top	At_Offset_2
0644 2403       |$   |		Execute	Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x3
0645 e03a       | :  |		Load	0x0,0x3a
0646 e243       | C  |		Load	0x1,0x43
0647 0096       |    |		Execute	Package,Entry
0648 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0649 0000 0000  |    |		.BLANK	0000[0x7]
0650 ; --------------------------------------------------------------------------------------
0650 ; SUBPROGRAM
0650 ; --------------------------------------------------------------------------------------
0650 0658       | X  |		.CONST	0x0658								; Address of begin
0651 0004       |    |		.CONST	0x0004								; Address of exception handler
0652 0003       |    |		.CONST	0x0003								; Number of locals
0653			INIT_0650:
0653 e00f       |    |		Load	0x0,0xf
0654 02ff       |    |		Declare_Variable	Variant_Record
0655 00d8       |    |		Load_Top	At_Offset_0
0656 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0657 00e1       |    |		Load_Encached	Boolean_Cache
0658			BODY_0650:
0658 00e1       |    |		Load_Encached	Boolean_Cache
0659 00da       |    |		Load_Top	At_Offset_2
065a e5fe       |    |		Load	0x2,-0x2
065b e5ff       |    |		Load	0x2,-0x1
065c 824c       | L  |		Call	0x1,0x4c
065d 00d1       |    |		Pop_Control	Pop_Count_1
065e 0059       | Y  |		Store_Top	Discrete,At_Offset_1
065f 00d8       |    |		Load_Top	At_Offset_0
0660 6803       |h   |		Jump_Zero	0x664
0661 00d9       |    |		Load_Top	At_Offset_1
0662 803c       | <  |		Call	0x0,0x3c
0663 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0664 4800       |H   |		Short_Literal	0x0
0665 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0666 0000 0000  |    |		.XXX[0x2]
0668 ; --------------------------------------------------------------------------------------
0668 ; SUBPROGRAM
0668 ; --------------------------------------------------------------------------------------
0668 0670       | p  |		.CONST	0x0670								; Address of begin
0669 0004       |    |		.CONST	0x0004								; Address of exception handler
066a 0003       |    |		.CONST	0x0003								; Number of locals
066b			INIT_0668:
066b e00f       |    |		Load	0x0,0xf
066c 02ff       |    |		Declare_Variable	Variant_Record
066d 00d8       |    |		Load_Top	At_Offset_0
066e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
066f 00e1       |    |		Load_Encached	Boolean_Cache
0670			BODY_0668:
0670 00e1       |    |		Load_Encached	Boolean_Cache
0671 00da       |    |		Load_Top	At_Offset_2
0672 e5fe       |    |		Load	0x2,-0x2
0673 e5ff       |    |		Load	0x2,-0x1
0674 824c       | L  |		Call	0x1,0x4c
0675 00d1       |    |		Pop_Control	Pop_Count_1
0676 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0677 00d8       |    |		Load_Top	At_Offset_0
0678 6803       |h   |		Jump_Zero	0x67c
0679 00d9       |    |		Load_Top	At_Offset_1
067a 803d       | =  |		Call	0x0,0x3d
067b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
067c 4800       |H   |		Short_Literal	0x0
067d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
067e 0000 0000  |    |		.XXX[0x2]
0680 ; --------------------------------------------------------------------------------------
0680 ; SUBPROGRAM
0680 ; --------------------------------------------------------------------------------------
0680 0688       |    |		.CONST	0x0688								; Address of begin
0681 0004       |    |		.CONST	0x0004								; Address of exception handler
0682 0003       |    |		.CONST	0x0003								; Number of locals
0683			INIT_0680:
0683 e00f       |    |		Load	0x0,0xf
0684 02ff       |    |		Declare_Variable	Variant_Record
0685 00d8       |    |		Load_Top	At_Offset_0
0686 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0687 00e1       |    |		Load_Encached	Boolean_Cache
0688			BODY_0680:
0688 00e1       |    |		Load_Encached	Boolean_Cache
0689 00da       |    |		Load_Top	At_Offset_2
068a e5fe       |    |		Load	0x2,-0x2
068b e5ff       |    |		Load	0x2,-0x1
068c 824c       | L  |		Call	0x1,0x4c
068d 00d1       |    |		Pop_Control	Pop_Count_1
068e 0059       | Y  |		Store_Top	Discrete,At_Offset_1
068f 00d8       |    |		Load_Top	At_Offset_0
0690 6803       |h   |		Jump_Zero	0x694
0691 00d9       |    |		Load_Top	At_Offset_1
0692 803e       | >  |		Call	0x0,0x3e
0693 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0694 4800       |H   |		Short_Literal	0x0
0695 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0696 0000 0000  |    |		.XXX[0x2]
0698 ; --------------------------------------------------------------------------------------
0698 ; SUBPROGRAM
0698 ; --------------------------------------------------------------------------------------
0698 06a2       |    |		.CONST	0x06a2								; Address of begin
0699 0004       |    |		.CONST	0x0004								; Address of exception handler
069a 0003       |    |		.CONST	0x0003								; Number of locals
069b			INIT_0698:
069b e01c       |    |		Load	0x0,0x1c
069c e244       | D  |		Load	0x1,0x44
069d 0098       |    |		Execute	Package,Field_Read_Dynamic
069e 0322       | "  |		Declare_Variable	Record
069f 00d8       |    |		Load_Top	At_Offset_0
06a0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
06a1 00e1       |    |		Load_Encached	Boolean_Cache
06a2			BODY_0698:
06a2 00e1       |    |		Load_Encached	Boolean_Cache
06a3 00da       |    |		Load_Top	At_Offset_2
06a4 e5ff       |    |		Load	0x2,-0x1
06a5 824b       | K  |		Call	0x1,0x4b
06a6 00d1       |    |		Pop_Control	Pop_Count_1
06a7 0059       | Y  |		Store_Top	Discrete,At_Offset_1
06a8 00d8       |    |		Load_Top	At_Offset_0
06a9 6807       |h   |		Jump_Zero	0x6b1
06aa e5fe       |    |		Load	0x2,-0x2
06ab 803f       | ?  |		Call	0x0,0x3f
06ac 00da       |    |		Load_Top	At_Offset_2
06ad e02e       | .  |		Load	0x0,0x2e
06ae e244       | D  |		Load	0x1,0x44
06af 0096       |    |		Execute	Package,Entry
06b0 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06b1 4800       |H   |		Short_Literal	0x0
06b2 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
06b3 0000 0000  |    |		.BLANK	0000[0x5]
06b8 ; --------------------------------------------------------------------------------------
06b8 ; SUBPROGRAM
06b8 ; --------------------------------------------------------------------------------------
06b8 06bb       |    |		.CONST	0x06bb								; Address of begin
06b9 0004       |    |		.CONST	0x0004								; Address of exception handler
06ba 0001       |    |		.CONST	0x0001								; Number of locals
06bb			BODY_06b8:
06bb			INIT_06b8:
06bb 00da       |    |		Load_Top	At_Offset_2
06bc 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06bd 0f00       |    |		Execute_Immediate	Equal,0x0
06be 00db       |    |		Load_Top	At_Offset_3
06bf 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06c0 0f01       |    |		Execute_Immediate	Equal,0x1
06c1 0278       | x  |		Execute	Discrete,Or
06c2 00db       |    |		Load_Top	At_Offset_3
06c3 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06c4 0f02       |    |		Execute_Immediate	Equal,0x2
06c5 0278       | x  |		Execute	Discrete,Or
06c6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06c7 0000       |    |		.XXX[0x1]
06c8 ; --------------------------------------------------------------------------------------
06c8 ; SUBPROGRAM
06c8 ; --------------------------------------------------------------------------------------
06c8 06cb       |    |		.CONST	0x06cb								; Address of begin
06c9 0004       |    |		.CONST	0x0004								; Address of exception handler
06ca 0001       |    |		.CONST	0x0001								; Number of locals
06cb			BODY_06c8:
06cb			INIT_06c8:
06cb 00da       |    |		Load_Top	At_Offset_2
06cc 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06cd 0f00       |    |		Execute_Immediate	Equal,0x0
06ce 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06cf 0000       |    |		.XXX[0x1]
06d0 ; --------------------------------------------------------------------------------------
06d0 ; SUBPROGRAM
06d0 ; --------------------------------------------------------------------------------------
06d0 06d3       |    |		.CONST	0x06d3								; Address of begin
06d1 0004       |    |		.CONST	0x0004								; Address of exception handler
06d2 0001       |    |		.CONST	0x0001								; Number of locals
06d3			BODY_06d0:
06d3			INIT_06d0:
06d3 00da       |    |		Load_Top	At_Offset_2
06d4 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06d5 0f01       |    |		Execute_Immediate	Equal,0x1
06d6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06d7 0000       |    |		.XXX[0x1]
06d8 ; --------------------------------------------------------------------------------------
06d8 ; SUBPROGRAM
06d8 ; --------------------------------------------------------------------------------------
06d8 06db       |    |		.CONST	0x06db								; Address of begin
06d9 0004       |    |		.CONST	0x0004								; Address of exception handler
06da 0001       |    |		.CONST	0x0001								; Number of locals
06db			BODY_06d8:
06db			INIT_06d8:
06db 00da       |    |		Load_Top	At_Offset_2
06dc 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06dd 0f02       |    |		Execute_Immediate	Equal,0x2
06de 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06df 0000       |    |		.XXX[0x1]
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 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06e5 0f03       |    |		Execute_Immediate	Equal,0x3
06e6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06e7 0000       |    |		.XXX[0x1]
06e8 ; --------------------------------------------------------------------------------------
06e8 ; SUBPROGRAM
06e8 ; --------------------------------------------------------------------------------------
06e8 06eb       |    |		.CONST	0x06eb								; Address of begin
06e9 0004       |    |		.CONST	0x0004								; Address of exception handler
06ea 0001       |    |		.CONST	0x0001								; Number of locals
06eb			BODY_06e8:
06eb			INIT_06e8:
06eb 00da       |    |		Load_Top	At_Offset_2
06ec 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06ed 0f04       |    |		Execute_Immediate	Equal,0x4
06ee 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06ef 0000       |    |		.XXX[0x1]
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 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06f5 4605       |F   |		Jump_Case	0x6
06f6 7807       |x   |		Jump	0x6fe								; case 0x0
06f7 780a       |x   |		Jump	0x702								; case 0x1
06f8 780d       |x   |		Jump	0x706								; case 0x2
06f9 7810       |x   |		Jump	0x70a								; case 0x3
06fa 7813       |x   |		Jump	0x70e								; case 0x4
06fb 7800       |x   |		Jump	0x6fc								; case 0x5
06fc 00ea       |    |		Load_Encached	Null_String_Cache
06fd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06fe 00da       |    |		Load_Top	At_Offset_2
06ff 2604       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x4
0700 8021       | !  |		Call	0x0,0x21
0701 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0702 00da       |    |		Load_Top	At_Offset_2
0703 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
0704 8021       | !  |		Call	0x0,0x21
0705 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0706 00da       |    |		Load_Top	At_Offset_2
0707 260d       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xd
0708 8021       | !  |		Call	0x0,0x21
0709 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
070a 00da       |    |		Load_Top	At_Offset_2
070b 2610       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x10
070c 8021       | !  |		Call	0x0,0x21
070d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
070e 00da       |    |		Load_Top	At_Offset_2
070f 2611       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x11
0710 8021       | !  |		Call	0x0,0x21
0711 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0712 0000 0000  |    |		.BLANK	0000[0x6]
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 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
071d 4605       |F   |		Jump_Case	0x6
071e 7807       |x   |		Jump	0x726								; case 0x0
071f 7804       |x   |		Jump	0x724								; case 0x1
0720 7808       |x   |		Jump	0x729								; case 0x2
0721 7802       |x   |		Jump	0x724								; case 0x3
0722 7801       |x   |		Jump	0x724								; case 0x4
0723 7800       |x   |		Jump	0x724								; case 0x5
0724 4800       |H   |		Short_Literal	0x0
0725 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0726 00da       |    |		Load_Top	At_Offset_2
0727 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
0728 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0729 00da       |    |		Load_Top	At_Offset_2
072a 2e0f       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xf
072b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
072c 0000 0000  |    |		.BLANK	0000[0x4]
0730 ; --------------------------------------------------------------------------------------
0730 ; SUBPROGRAM
0730 ; --------------------------------------------------------------------------------------
0730 0738       | 8  |		.CONST	0x0738								; Address of begin
0731 0004       |    |		.CONST	0x0004								; Address of exception handler
0732 0003       |    |		.CONST	0x0003								; Number of locals
0733			INIT_0730:
0733 e00f       |    |		Load	0x0,0xf
0734 02ff       |    |		Declare_Variable	Variant_Record
0735 00d8       |    |		Load_Top	At_Offset_0
0736 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0737 00e1       |    |		Load_Encached	Boolean_Cache
0738			BODY_0730:
0738 00e1       |    |		Load_Encached	Boolean_Cache
0739 00da       |    |		Load_Top	At_Offset_2
073a e5fe       |    |		Load	0x2,-0x2
073b e5ff       |    |		Load	0x2,-0x1
073c 824c       | L  |		Call	0x1,0x4c
073d 00d1       |    |		Pop_Control	Pop_Count_1
073e 0059       | Y  |		Store_Top	Discrete,At_Offset_1
073f 00d8       |    |		Load_Top	At_Offset_0
0740 6803       |h   |		Jump_Zero	0x744
0741 00d9       |    |		Load_Top	At_Offset_1
0742 8040       | @  |		Call	0x0,0x40
0743 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0744 4800       |H   |		Short_Literal	0x0
0745 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0746 0000 0000  |    |		.XXX[0x2]
0748 ; --------------------------------------------------------------------------------------
0748 ; SUBPROGRAM
0748 ; --------------------------------------------------------------------------------------
0748 0750       | P  |		.CONST	0x0750								; Address of begin
0749 0004       |    |		.CONST	0x0004								; Address of exception handler
074a 0003       |    |		.CONST	0x0003								; Number of locals
074b			INIT_0748:
074b e00f       |    |		Load	0x0,0xf
074c 02ff       |    |		Declare_Variable	Variant_Record
074d 00d8       |    |		Load_Top	At_Offset_0
074e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
074f 00e1       |    |		Load_Encached	Boolean_Cache
0750			BODY_0748:
0750 00e1       |    |		Load_Encached	Boolean_Cache
0751 00da       |    |		Load_Top	At_Offset_2
0752 e5fe       |    |		Load	0x2,-0x2
0753 e5ff       |    |		Load	0x2,-0x1
0754 824c       | L  |		Call	0x1,0x4c
0755 00d1       |    |		Pop_Control	Pop_Count_1
0756 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0757 00d8       |    |		Load_Top	At_Offset_0
0758 6803       |h   |		Jump_Zero	0x75c
0759 00d9       |    |		Load_Top	At_Offset_1
075a 8041       | A  |		Call	0x0,0x41
075b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
075c 00ea       |    |		Load_Encached	Null_String_Cache
075d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
075e 0000 0000  |    |		.XXX[0x2]
0760 ; --------------------------------------------------------------------------------------
0760 ; SUBPROGRAM
0760 ; --------------------------------------------------------------------------------------
0760 0768       | h  |		.CONST	0x0768								; Address of begin
0761 0004       |    |		.CONST	0x0004								; Address of exception handler
0762 0003       |    |		.CONST	0x0003								; Number of locals
0763			INIT_0760:
0763 e00f       |    |		Load	0x0,0xf
0764 02ff       |    |		Declare_Variable	Variant_Record
0765 00d8       |    |		Load_Top	At_Offset_0
0766 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0767 00e1       |    |		Load_Encached	Boolean_Cache
0768			BODY_0760:
0768 00e1       |    |		Load_Encached	Boolean_Cache
0769 00da       |    |		Load_Top	At_Offset_2
076a e5fe       |    |		Load	0x2,-0x2
076b e5ff       |    |		Load	0x2,-0x1
076c 824c       | L  |		Call	0x1,0x4c
076d 00d1       |    |		Pop_Control	Pop_Count_1
076e 0059       | Y  |		Store_Top	Discrete,At_Offset_1
076f 00d8       |    |		Load_Top	At_Offset_0
0770 6803       |h   |		Jump_Zero	0x774
0771 00d9       |    |		Load_Top	At_Offset_1
0772 8042       | B  |		Call	0x0,0x42
0773 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0774 4800       |H   |		Short_Literal	0x0
0775 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0776 0000 0000  |    |		.XXX[0x2]
0778 ; --------------------------------------------------------------------------------------
0778 ; SUBPROGRAM
0778 ; --------------------------------------------------------------------------------------
0778 0780       |    |		.CONST	0x0780								; Address of begin
0779 0004       |    |		.CONST	0x0004								; Address of exception handler
077a 0003       |    |		.CONST	0x0003								; Number of locals
077b			INIT_0778:
077b e00f       |    |		Load	0x0,0xf
077c 02ff       |    |		Declare_Variable	Variant_Record
077d 00d8       |    |		Load_Top	At_Offset_0
077e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
077f 00e1       |    |		Load_Encached	Boolean_Cache
0780			BODY_0778:
0780 00e1       |    |		Load_Encached	Boolean_Cache
0781 00da       |    |		Load_Top	At_Offset_2
0782 e5fe       |    |		Load	0x2,-0x2
0783 e5ff       |    |		Load	0x2,-0x1
0784 824c       | L  |		Call	0x1,0x4c
0785 00d1       |    |		Pop_Control	Pop_Count_1
0786 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0787 00d8       |    |		Load_Top	At_Offset_0
0788 6803       |h   |		Jump_Zero	0x78c
0789 00d9       |    |		Load_Top	At_Offset_1
078a 8043       | C  |		Call	0x0,0x43
078b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
078c 4800       |H   |		Short_Literal	0x0
078d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
078e 0000 0000  |    |		.XXX[0x2]
0790 ; --------------------------------------------------------------------------------------
0790 ; SUBPROGRAM
0790 ; --------------------------------------------------------------------------------------
0790 0793       |    |		.CONST	0x0793								; Address of begin
0791 0004       |    |		.CONST	0x0004								; Address of exception handler
0792 0001       |    |		.CONST	0x0001								; Number of locals
0793			BODY_0790:
0793			INIT_0790:
0793 00da       |    |		Load_Top	At_Offset_2
0794 00d8       |    |		Load_Top	At_Offset_0
0795 00e3       |    |		Load_Encached	Natural_Cache
0796 0260       | `  |		Execute	Discrete,In_Type
0797 7001       |p   |		Jump_Nonzero	0x799
0798 0801       |    |		Execute_Immediate	Raise,0x1
0799 8044       | D  |		Call	0x0,0x44
079a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
079b 0000 0000  |    |		.BLANK	0000[0x5]
07a0 ; --------------------------------------------------------------------------------------
07a0 ; SUBPROGRAM
07a0 ; --------------------------------------------------------------------------------------
07a0 07a3       |    |		.CONST	0x07a3								; Address of begin
07a1 0004       |    |		.CONST	0x0004								; Address of exception handler
07a2 0001       |    |		.CONST	0x0001								; Number of locals
07a3			BODY_07a0:
07a3			INIT_07a0:
07a3 00da       |    |		Load_Top	At_Offset_2
07a4 00d8       |    |		Load_Top	At_Offset_0
07a5 00e3       |    |		Load_Encached	Natural_Cache
07a6 0260       | `  |		Execute	Discrete,In_Type
07a7 7001       |p   |		Jump_Nonzero	0x7a9
07a8 0801       |    |		Execute_Immediate	Raise,0x1
07a9 802d       | -  |		Call	0x0,0x2d
07aa 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07ab 0000 0000  |    |		.BLANK	0000[0x5]
07b0 ; --------------------------------------------------------------------------------------
07b0 ; SUBPROGRAM
07b0 ; --------------------------------------------------------------------------------------
07b0 07b3       |    |		.CONST	0x07b3								; Address of begin
07b1 0004       |    |		.CONST	0x0004								; Address of exception handler
07b2 0001       |    |		.CONST	0x0001								; Number of locals
07b3			BODY_07b0:
07b3			INIT_07b0:
07b3 4801       |H   |		Short_Literal	0x1
07b4 a5fd       |    |		Store_Unchecked	0x2,-0x3
07b5 00da       |    |		Load_Top	At_Offset_2
07b6 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
07b7 4605       |F   |		Jump_Case	0x6
07b8 7808       |x   |		Jump	0x7c1								; case 0x0
07b9 780c       |x   |		Jump	0x7c6								; case 0x1
07ba 7810       |x   |		Jump	0x7cb								; case 0x2
07bb 7802       |x   |		Jump	0x7be								; case 0x3
07bc 7801       |x   |		Jump	0x7be								; case 0x4
07bd 7800       |x   |		Jump	0x7be								; case 0x5
07be 4800       |H   |		Short_Literal	0x0
07bf a5fd       |    |		Store_Unchecked	0x2,-0x3
07c0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
07c1 00da       |    |		Load_Top	At_Offset_2
07c2 2605       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
07c3 e5fe       |    |		Load	0x2,-0x2
07c4 017d       | }  |		Execute	Record,Structure_Write
07c5 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
07c6 00da       |    |		Load_Top	At_Offset_2
07c7 260a       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xa
07c8 e5fe       |    |		Load	0x2,-0x2
07c9 017d       | }  |		Execute	Record,Structure_Write
07ca 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
07cb 00da       |    |		Load_Top	At_Offset_2
07cc 260e       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xe
07cd e5fe       |    |		Load	0x2,-0x2
07ce 017d       | }  |		Execute	Record,Structure_Write
07cf 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
07d0 ; --------------------------------------------------------------------------------------
07d0 ; SUBPROGRAM
07d0 ; --------------------------------------------------------------------------------------
07d0 07da       |    |		.CONST	0x07da								; Address of begin
07d1 0004       |    |		.CONST	0x0004								; Address of exception handler
07d2 0003       |    |		.CONST	0x0003								; Number of locals
07d3			INIT_07d0:
07d3 e01c       |    |		Load	0x0,0x1c
07d4 e244       | D  |		Load	0x1,0x44
07d5 0098       |    |		Execute	Package,Field_Read_Dynamic
07d6 0322       | "  |		Declare_Variable	Record
07d7 00d8       |    |		Load_Top	At_Offset_0
07d8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
07d9 00e1       |    |		Load_Encached	Boolean_Cache
07da			BODY_07d0:
07da 00e1       |    |		Load_Encached	Boolean_Cache
07db 00da       |    |		Load_Top	At_Offset_2
07dc e5ff       |    |		Load	0x2,-0x1
07dd 824b       | K  |		Call	0x1,0x4b
07de 00d1       |    |		Pop_Control	Pop_Count_1
07df 0059       | Y  |		Store_Top	Discrete,At_Offset_1
07e0 00d8       |    |		Load_Top	At_Offset_0
07e1 680b       |h   |		Jump_Zero	0x7ed
07e2 00e1       |    |		Load_Encached	Boolean_Cache
07e3 e5fd       |    |		Load	0x2,-0x3
07e4 e5fe       |    |		Load	0x2,-0x2
07e5 803f       | ?  |		Call	0x0,0x3f
07e6 e402       |    |		Load	0x2,0x2
07e7 e030       | 0  |		Load	0x0,0x30
07e8 e244       | D  |		Load	0x1,0x44
07e9 0096       |    |		Execute	Package,Entry
07ea 00d1       |    |		Pop_Control	Pop_Count_1
07eb c5fc       |    |		Store	0x2,-0x4
07ec 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
07ed 4800       |H   |		Short_Literal	0x0
07ee a5fc       |    |		Store_Unchecked	0x2,-0x4
07ef 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
07f0 ; --------------------------------------------------------------------------------------
07f0 ; SUBPROGRAM
07f0 ; --------------------------------------------------------------------------------------
07f0 07fa       |    |		.CONST	0x07fa								; Address of begin
07f1 0004       |    |		.CONST	0x0004								; Address of exception handler
07f2 0003       |    |		.CONST	0x0003								; Number of locals
07f3			INIT_07f0:
07f3 e01c       |    |		Load	0x0,0x1c
07f4 e244       | D  |		Load	0x1,0x44
07f5 0098       |    |		Execute	Package,Field_Read_Dynamic
07f6 0322       | "  |		Declare_Variable	Record
07f7 00d8       |    |		Load_Top	At_Offset_0
07f8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
07f9 00e1       |    |		Load_Encached	Boolean_Cache
07fa			BODY_07f0:
07fa e5fe       |    |		Load	0x2,-0x2
07fb 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
07fc 4605       |F   |		Jump_Case	0x6
07fd 7818       |x   |		Jump	0x816								; case 0x0
07fe 7805       |x   |		Jump	0x804								; case 0x1
07ff 780d       |x   |		Jump	0x80d								; case 0x2
0800 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; case 0x3
0801 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; case 0x4
0802 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; case 0x5
0803 4502       |E   |		.XXX[0x1]
0804 e5fe       |    |		Load	0x2,-0x2
0805 2e0a       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa
0806 e5ff       |    |		Load	0x2,-0x1
0807 e02c       | ,  |		Load	0x0,0x2c
0808 e244       | D  |		Load	0x1,0x44
0809 0096       |    |		Execute	Package,Entry
080a e5fe       |    |		Load	0x2,-0x2
080b 2a0a       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xa
080c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
080d e5fe       |    |		Load	0x2,-0x2
080e 2e0e       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xe
080f e5ff       |    |		Load	0x2,-0x1
0810 e02c       | ,  |		Load	0x0,0x2c
0811 e244       | D  |		Load	0x1,0x44
0812 0096       |    |		Execute	Package,Entry
0813 e5fe       |    |		Load	0x2,-0x2
0814 2a0e       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xe
0815 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0816 e5fe       |    |		Load	0x2,-0x2
0817 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
0818 e5ff       |    |		Load	0x2,-0x1
0819 e02c       | ,  |		Load	0x0,0x2c
081a e244       | D  |		Load	0x1,0x44
081b 0096       |    |		Execute	Package,Entry
081c e5fe       |    |		Load	0x2,-0x2
081d 2a05       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5
081e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
081f 0000       |    |		.XXX[0x1]
0820 ; --------------------------------------------------------------------------------------
0820 ; SUBPROGRAM
0820 ; --------------------------------------------------------------------------------------
0820 0823       | #  |		.CONST	0x0823								; Address of begin
0821 0004       |    |		.CONST	0x0004								; Address of exception handler
0822 0001       |    |		.CONST	0x0001								; Number of locals
0823			BODY_0820:
0823			INIT_0820:
0823 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0824 0000 0000  |    |		.BLANK	0000[0x4]
0828 ; --------------------------------------------------------------------------------------
0828 ; SUBPROGRAM
0828 ; --------------------------------------------------------------------------------------
0828 082b       | +  |		.CONST	0x082b								; Address of begin
0829 0004       |    |		.CONST	0x0004								; Address of exception handler
082a 0001       |    |		.CONST	0x0001								; Number of locals
082b			BODY_0828:
082b			INIT_0828:
082b 4609       |F   |		Jump_Case	0xa
082c 7809       |x   |		Jump	0x836								; case 0x0
082d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
082e 785d       |x]  |		Jump	0x88c								; case 0x2
082f 7860       |x`  |		Jump	0x890								; case 0x3
0830 789b       |x   |		Jump	0x8cc								; case 0x4
0831 789a       |x   |		Jump	0x8cc								; case 0x5
0832 7863       |xc  |		Jump	0x896								; case 0x6
0833 7876       |xv  |		Jump	0x8aa								; case 0x7
0834 788c       |x   |		Jump	0x8c1								; case 0x8
0835 7892       |x   |		Jump	0x8c8								; case 0x9
0836 00da       |    |		Load_Top	At_Offset_2
0837 016c       | l  |		Execute	Variant_Record,Is_Constrained
0838 7009       |p   |		Jump_Nonzero	0x842
0839 00cf       |    |		Action	Mark_Auxiliary
083a 4805       |H   |		Short_Literal	0x5
083b e5ff       |    |		Load	0x2,-0x1
083c 1c08       |    |		Execute_Immediate	Run_Utility,0x8
083d 00d8       |    |		Load_Top	At_Offset_0
083e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
083f c5ff       |    |		Store	0x2,-0x1
0840 00ce       |    |		Action	Pop_Auxiliary
0841 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0842 e002       |    |		Load	0x0,0x2
0843 e243       | C  |		Load	0x1,0x43
0844 0098       |    |		Execute	Package,Field_Read_Dynamic
0845 00db       |    |		Load_Top	At_Offset_3
0846 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0847 e249       | I  |		Load	0x1,0x49
0848 00db       |    |		Load_Top	At_Offset_3
0849 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
084a 00da       |    |		Load_Top	At_Offset_2
084b 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
084c 4605       |F   |		Jump_Case	0x6
084d 7806       |x   |		Jump	0x854								; case 0x0
084e 7818       |x   |		Jump	0x867								; case 0x1
084f 7828       |x(  |		Jump	0x878								; case 0x2
0850 7833       |x3  |		Jump	0x884								; case 0x3
0851 7836       |x6  |		Jump	0x888								; case 0x4
0852 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
0853 4302       |C   |		.XXX[0x1]
0854 e003       |    |		Load	0x0,0x3
0855 00db       |    |		Load_Top	At_Offset_3
0856 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0857 e002       |    |		Load	0x0,0x2
0858 e244       | D  |		Load	0x1,0x44
0859 0098       |    |		Execute	Package,Field_Read_Dynamic
085a 00db       |    |		Load_Top	At_Offset_3
085b 2a05       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5
085c 4800       |H   |		Short_Literal	0x0
085d 00db       |    |		Load_Top	At_Offset_3
085e 2a06       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6
085f e245       | E  |		Load	0x1,0x45
0860 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0861 00db       |    |		Load_Top	At_Offset_3
0862 2a07       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7
0863 e247       | G  |		Load	0x1,0x47
0864 00db       |    |		Load_Top	At_Offset_3
0865 2a08       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8
0866 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0867 e003       |    |		Load	0x0,0x3
0868 00db       |    |		Load_Top	At_Offset_3
0869 2a09       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x9
086a e002       |    |		Load	0x0,0x2
086b e244       | D  |		Load	0x1,0x44
086c 0098       |    |		Execute	Package,Field_Read_Dynamic
086d 00db       |    |		Load_Top	At_Offset_3
086e 2a0a       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xa
086f e002       |    |		Load	0x0,0x2
0870 e246       | F  |		Load	0x1,0x46
0871 0098       |    |		Execute	Package,Field_Read_Dynamic
0872 00db       |    |		Load_Top	At_Offset_3
0873 2a0b       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xb
0874 e248       | H  |		Load	0x1,0x48
0875 00db       |    |		Load_Top	At_Offset_3
0876 2a0c       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xc
0877 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0878 e003       |    |		Load	0x0,0x3
0879 00db       |    |		Load_Top	At_Offset_3
087a 2a0d       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xd
087b e002       |    |		Load	0x0,0x2
087c e244       | D  |		Load	0x1,0x44
087d 0098       |    |		Execute	Package,Field_Read_Dynamic
087e 00db       |    |		Load_Top	At_Offset_3
087f 2a0e       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xe
0880 4800       |H   |		Short_Literal	0x0
0881 00db       |    |		Load_Top	At_Offset_3
0882 2a0f       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xf
0883 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0884 e003       |    |		Load	0x0,0x3
0885 00db       |    |		Load_Top	At_Offset_3
0886 2a10       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x10
0887 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0888 e003       |    |		Load	0x0,0x3
0889 00db       |    |		Load_Top	At_Offset_3
088a 2a11       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x11
088b 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
088c 4801       |H   |		Short_Literal	0x1
088d 4811       |H   |		Short_Literal	0x11
088e 0311       |    |		Declare_Type	Variant_Record,Constrained_Incomplete
088f 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0890 e5fd       |    |		Load	0x2,-0x3
0891 00db       |    |		Load_Top	At_Offset_3
0892 1c07       |    |		Execute_Immediate	Run_Utility,0x7
0893 e5fe       |    |		Load	0x2,-0x2
0894 0306       |    |		Complete_Type	Variant_Record,By_Renaming
0895 4304       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x4
0896 00db       |    |		Load_Top	At_Offset_3
0897 4605       |F   |		Jump_Case	0x6
0898 7807       |x   |		Jump	0x8a0								; case 0x0
0899 7808       |x   |		Jump	0x8a2								; case 0x1
089a 7809       |x   |		Jump	0x8a4								; case 0x2
089b 780a       |x   |		Jump	0x8a6								; case 0x3
089c 780b       |x   |		Jump	0x8a8								; case 0x4
089d 7800       |x   |		Jump	0x89e								; case 0x5
089e 48ff       |H   |		Short_Literal	0xff
089f 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
08a0 4801       |H   |		Short_Literal	0x1
08a1 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
08a2 4802       |H   |		Short_Literal	0x2
08a3 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
08a4 4803       |H   |		Short_Literal	0x3
08a5 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
08a6 4804       |H   |		Short_Literal	0x4
08a7 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
08a8 4805       |H   |		Short_Literal	0x5
08a9 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
08aa 00db       |    |		Load_Top	At_Offset_3
08ab e5fe       |    |		Load	0x2,-0x2
08ac 4605       |F   |		Jump_Case	0x6
08ad 7807       |x   |		Jump	0x8b5								; case 0x0
08ae 7808       |x   |		Jump	0x8b7								; case 0x1
08af 7809       |x   |		Jump	0x8b9								; case 0x2
08b0 780a       |x   |		Jump	0x8bb								; case 0x3
08b1 780b       |x   |		Jump	0x8bd								; case 0x4
08b2 7800       |x   |		Jump	0x8b3								; case 0x5
08b3 48ff       |H   |		Short_Literal	0xff
08b4 7809       |x   |		Jump	0x8be
08b5 4801       |H   |		Short_Literal	0x1
08b6 7807       |x   |		Jump	0x8be
08b7 4802       |H   |		Short_Literal	0x2
08b8 7805       |x   |		Jump	0x8be
08b9 4803       |H   |		Short_Literal	0x3
08ba 7803       |x   |		Jump	0x8be
08bb 4804       |H   |		Short_Literal	0x4
08bc 7801       |x   |		Jump	0x8be
08bd 4805       |H   |		Short_Literal	0x5
08be e5ff       |    |		Load	0x2,-0x1
08bf 031b       |    |		Declare_Type	Variant_Record,Constrained
08c0 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
08c1 00db       |    |		Load_Top	At_Offset_3
08c2 e5fe       |    |		Load	0x2,-0x2
08c3 e5ff       |    |		Load	0x2,-0x1
08c4 1c06       |    |		Execute_Immediate	Run_Utility,0x6
08c5 e5ff       |    |		Load	0x2,-0x1
08c6 02fc       |    |		Declare_Variable	Variant_Record,With_Constraint
08c7 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
08c8 4805       |H   |		Short_Literal	0x5
08c9 00db       |    |		Load_Top	At_Offset_3
08ca 1c07       |    |		Execute_Immediate	Run_Utility,0x7
08cb 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
08cc 0869       | i  |		Execute_Immediate	Raise,0x69
08cd ; --------------------------------------------------------------------------------------
08cd ; STRING TABLE
08cd ; --------------------------------------------------------------------------------------
08cd 0014       |    |		.STRTAB	0x0014->0x08d7							; "ANIMATE"
08ce 0019       |    |		.STRTAB	0x0019->0x08da							; "PLACE"
08cf 001c       |    |		.STRTAB	0x001c->0x08dd							; "ENTITY"
08d0 0020       |    |		.STRTAB	0x0020->0x08e0							; "WORD"
08d1 0022       | "  |		.STRTAB	0x0022->0x08e2							; "VERB"
08d2 0024       | $  |		.STRTAB	0x0024->0x08e4							; "UNKNOWN"
08d3 0029       | )  |		.STRTAB	0x0029->0x08e7							; "Complement : Kind : "
08d4 003b       | ;  |		.STRTAB	0x003b->0x08f1							; " Name : "
08d5 0041       | A  |		.STRTAB	0x0041->0x08f5							; " Place : "
08d6 0048       | H  |		.STREND 0x0048->0x08fa
08d7 414e 494d  |ANIM|		.STRTAB_STRINGS
08fa 0000 0000  |    |		.BLANK	0000[0x6]
0900 ; --------------------------------------------------------------------------------------
0900 ; Debug Table
0900 ; --------------------------------------------------------------------------------------
0900 0004 0008  |    |		.DEBUG4	0x0004,0x0008,0x97e2,0x0000,0x0001,0x0037
0906 000b 09e2  |    |		.DBG4T	0x000b,0x09e2,0x8000,0x8000
090a 0168 0a64  | h d|		.DBG4T	0x0168,0x0a64,0x8000,0x0000
090e 01d3 0000  |    |		.DBG4T	0x01d3,0x0000,0x0005,0x0000
0912 0213 0a97  |    |		.DBG4T	0x0213,0x0a97,0x0001,0x4000
0916 025b 0aa9  | [  |		.DBG4T	0x025b,0x0aa9,0x0001,0x4000
091a 02b3 0ac7  |    |		.DBG4T	0x02b3,0x0ac7,0x0001,0x0000
091e 02db 0acd  |    |		.DBG4T	0x02db,0x0acd,0x0001,0x0000
0922 0303 0ad3  |    |		.DBG4T	0x0303,0x0ad3,0x0001,0x0000
0926 0323 0adb  | #  |		.DBG4T	0x0323,0x0adb,0x0001,0x0000
092a 0343 0ae3  | C  |		.DBG4T	0x0343,0x0ae3,0x0001,0x0000
092e 0363 0aeb  | c  |		.DBG4T	0x0363,0x0aeb,0x0001,0x0000
0932 0383 0af5  |    |		.DBG4T	0x0383,0x0af5,0x0001,0x0000
0936 03a3 0aff  |    |		.DBG4T	0x03a3,0x0aff,0x0001,0x0000
093a 03cb 0b09  |    |		.DBG4T	0x03cb,0x0b09,0x0001,0x4000
093e 042b 0b2a  | + *|		.DBG4T	0x042b,0x0b2a,0x0001,0x0000
0942 045b 0b32  | [ 2|		.DBG4T	0x045b,0x0b32,0x0001,0x0000
0946 0483 0b3c  |   <|		.DBG4T	0x0483,0x0b3c,0x0002,0x0000
094a 049b 0b41  |   A|		.DBG4T	0x049b,0x0b41,0x0002,0x0000
094e 04ab 0b46  |   F|		.DBG4T	0x04ab,0x0b46,0x0002,0x0000
0952 04cb 0b4f  |   O|		.DBG4T	0x04cb,0x0b4f,0x0002,0x0000
0956 04eb 0b58  |   X|		.DBG4T	0x04eb,0x0b58,0x0002,0x0000
095a 050b 0b61  |   a|		.DBG4T	0x050b,0x0b61,0x0001,0x0000
095e 052b 0b6a  | + j|		.DBG4T	0x052b,0x0b6a,0x0001,0x4000
0962 05ab 0b8d  |    |		.DBG4T	0x05ab,0x0b8d,0x0001,0x0000
0966 05c3 0b91  |    |		.DBG4T	0x05c3,0x0b91,0x0001,0x0000
096a 05d3 0b95  |    |		.DBG4T	0x05d3,0x0b95,0x0002,0x0000
096e 05e3 0b9a  |    |		.DBG4T	0x05e3,0x0b9a,0x0002,0x0000
0972 05f3 0b9f  |    |		.DBG4T	0x05f3,0x0b9f,0x0001,0x0000
0976 0613 0ba5  |    |		.DBG4T	0x0613,0x0ba5,0x0001,0x0000
097a 0623 0ba8  | #  |		.DBG4T	0x0623,0x0ba8,0x0001,0x0000
097e 0633 0bab  | 3  |		.DBG4T	0x0633,0x0bab,0x0002,0x0000
0982 0643 0bae  | C  |		.DBG4T	0x0643,0x0bae,0x0002,0x0000
0986 0653 0bb1  | S  |		.DBG4T	0x0653,0x0bb1,0x0002,0x0000
098a 066b 0bb9  | k  |		.DBG4T	0x066b,0x0bb9,0x0002,0x0000
098e 0683 0bc1  |    |		.DBG4T	0x0683,0x0bc1,0x0002,0x0000
0992 069b 0bc9  |    |		.DBG4T	0x069b,0x0bc9,0x0002,0x0000
0996 06bb 0bd1  |    |		.DBG4T	0x06bb,0x0bd1,0x0002,0x0000
099a 06cb 0bd4  |    |		.DBG4T	0x06cb,0x0bd4,0x0002,0x0000
099e 06d3 0bd7  |    |		.DBG4T	0x06d3,0x0bd7,0x0002,0x0000
09a2 06db 0bda  |    |		.DBG4T	0x06db,0x0bda,0x0002,0x0000
09a6 06e3 0bdd  |    |		.DBG4T	0x06e3,0x0bdd,0x0002,0x0000
09aa 06eb 0be0  |    |		.DBG4T	0x06eb,0x0be0,0x0002,0x0000
09ae 06f3 0be3  |    |		.DBG4T	0x06f3,0x0be3,0x0002,0x4000
09b2 071b 0bf3  |    |		.DBG4T	0x071b,0x0bf3,0x0002,0x4000
09b6 0733 0bfd  | 3  |		.DBG4T	0x0733,0x0bfd,0x0002,0x0000
09ba 074b 0c05  | K  |		.DBG4T	0x074b,0x0c05,0x0002,0x0000
09be 0763 0c0d  | c  |		.DBG4T	0x0763,0x0c0d,0x0002,0x0000
09c2 077b 0c15  | {  |		.DBG4T	0x077b,0x0c15,0x0002,0x0000
09c6 0793 0000  |    |		.DBG4T	0x0793,0x0000,0x000c,0x0000
09ca 07a3 0000  |    |		.DBG4T	0x07a3,0x0000,0x000c,0x0000
09ce 07b3 0c1d  |    |		.DBG4T	0x07b3,0x0c1d,0x0001,0x4000
09d2 07d3 0c2b  |   +|		.DBG4T	0x07d3,0x0c2b,0x0001,0x0000
09d6 07f3 0c33  |   3|		.DBG4T	0x07f3,0x0c33,0x0001,0x4000
09da 0823 0c3f  | # ?|		.DBG4T	0x0823,0x0c3f,0x0001,0x0000
09de 082b 0000  | +  |		.DBG4T	0x082b,0x0000,0x0005,0x0000
09e2 ; --------------------------------------------------------------------------------------
09e2 ; Debug chain
09e2 ; --------------------------------------------------------------------------------------
09e2 0040 0000  | @  |		.DBGLEN	0x0040,0x0000
09e4 000b 0010  |    |		.DBGLNO	0x000b,0x0010,0x0012,0x0014,0x0016,0x0018,0x001a,0x001c,0x001e,0x0020,0x0022,0x0024,0x0026,0x0028,0x002a,0x002c,0x002e,0x0030,0x0032,0x0034,0x0036,0x0038,0x003a,0x003c,0x003e,0x0040,0x0042,0x0044,0x0046,0x0048,0x004a,0x004c,0x004e,0x0050,0x0052,0x0054,0x0056,0x0058,0x005a,0x005c,0x005e,0x0060,0x0062,0x0064,0x0066,0x0068,0x006a,0x006b,0x006c,0x006d,0x006e,0x007d,0x008c,0x00a4,0x00b4,0x00bd,0x00cd,0x00d0,0x00d4,0x00d8,0x0106,0x0113,0x0132,0x014f
0a24 0001 0003  |    |		.XXX[0x40]
0a26 0004 0005  |    |
0a28 0006 0007  |    |
0a2a 0008 0009  |    |
0a2c 000a 000b  |    |
0a2e 000c 000d  |    |
0a30 000e 000f  |    |
0a32 0010 0011  |    |
0a34 0012 0013  |    |
0a36 0014 0015  |    |
0a38 0016 0017  |    |
0a3a 0018 0019  |    |
0a3c 001a 001b  |    |
0a3e 001c 001d  |    |
0a40 001e 001f  |    |
0a42 0020 0021  |   !|
0a44 0022 0023  | " #|
0a46 0024 0025  | $ %|
0a48 0026 0027  | & '|
0a4a 0028 0029  | ( )|
0a4c 002a 002b  | * +|
0a4e 002c 002d  | , -|
0a50 002e 002f  | . /|
0a52 0030 0031  | 0 1|
0a54 0032 0033  | 2 3|
0a56 0034 0035  | 4 5|
0a58 0036 0037  | 6 7|
0a5a 0038 0039  | 8 9|
0a5c 003a 003b  | : ;|
0a5e 003c 003d  | < =|
0a60 003e 003f  | > ?|
0a62 0040 0041  | @ A|
0a64 ; --------------------------------------------------------------------------------------
0a64 ; Debug chain
0a64 ; --------------------------------------------------------------------------------------
0a64 0031 0000  | 1  |		.DBGLEN	0x0031,0x0000
0a66 0168 016a  | h j|		.DBGLNO	0x0168,0x016a,0x016c,0x016e,0x0170,0x0172,0x0174,0x0176,0x0178,0x017a,0x017c,0x017e,0x0180,0x0182,0x0184,0x0186,0x0188,0x018a,0x018c,0x018e,0x0190,0x0192,0x0194,0x0196,0x0198,0x019a,0x019c,0x019e,0x01a0,0x01a2,0x01a4,0x01a6,0x01a8,0x01aa,0x01ac,0x01ae,0x01b0,0x01b2,0x01b4,0x01b6,0x01b8,0x01ba,0x01bc,0x01be,0x01c0,0x01c2,0x01c4,0x01c6,0x01c8
0a97 ; --------------------------------------------------------------------------------------
0a97 ; Debug chain
0a97 ; --------------------------------------------------------------------------------------
0a97 0000 0008  |    |		.DBGLEN	0x0000,0x0008
0a99 0213 0216  |    |		.DBGLNO	0x0213,0x0216,0x0220,0x0227,0x0231,0x0238,0x0242,0x0249
0aa1 0001 0002  |    |		.XXX[0x8]
0aa3 0005 0006  |    |
0aa5 0007 0008  |    |
0aa7 0003 0004  |    |
0aa9 ; --------------------------------------------------------------------------------------
0aa9 ; Debug chain
0aa9 ; --------------------------------------------------------------------------------------
0aa9 0000 000e  |    |		.DBGLEN	0x0000,0x000e
0aab 025b 0264  | [ d|		.DBGLNO	0x025b,0x0264,0x0267,0x026a,0x026e,0x027b,0x027e,0x0281,0x0285,0x0292,0x0295,0x0298,0x029c,0x02a9
0ab9 0001 000e  |    |		.XXX[0xe]
0abb 0002 0003  |    |
0abd 0004 0005  |    |
0abf 0006 0007  |    |
0ac1 0008 0009  |    |
0ac3 000a 000b  |    |
0ac5 000c 000d  |    |
0ac7 ; --------------------------------------------------------------------------------------
0ac7 ; Debug chain
0ac7 ; --------------------------------------------------------------------------------------
0ac7 0001 0003  |    |		.DBGLEN	0x0001,0x0003
0ac9 02b3 02b4  |    |		.DBGLNO	0x02b3,0x02b4,0x02c4,0x02c8
0acd ; --------------------------------------------------------------------------------------
0acd ; Debug chain
0acd ; --------------------------------------------------------------------------------------
0acd 0001 0003  |    |		.DBGLEN	0x0001,0x0003
0acf 02db 02dc  |    |		.DBGLNO	0x02db,0x02dc,0x02ec,0x02f0
0ad3 ; --------------------------------------------------------------------------------------
0ad3 ; Debug chain
0ad3 ; --------------------------------------------------------------------------------------
0ad3 0001 0005  |    |		.DBGLEN	0x0001,0x0005
0ad5 0303 0307  |    |		.DBGLNO	0x0303,0x0307,0x030f,0x0313,0x0317,0x031a
0adb ; --------------------------------------------------------------------------------------
0adb ; Debug chain
0adb ; --------------------------------------------------------------------------------------
0adb 0001 0005  |    |		.DBGLEN	0x0001,0x0005
0add 0323 0327  | # '|		.DBGLNO	0x0323,0x0327,0x032f,0x0333,0x0337,0x033a
0ae3 ; --------------------------------------------------------------------------------------
0ae3 ; Debug chain
0ae3 ; --------------------------------------------------------------------------------------
0ae3 0001 0005  |    |		.DBGLEN	0x0001,0x0005
0ae5 0343 0347  | C G|		.DBGLNO	0x0343,0x0347,0x034f,0x0353,0x0357,0x035a
0aeb ; --------------------------------------------------------------------------------------
0aeb ; Debug chain
0aeb ; --------------------------------------------------------------------------------------
0aeb 0002 0006  |    |		.DBGLEN	0x0002,0x0006
0aed 0363 0367  | c g|		.DBGLNO	0x0363,0x0367,0x0368,0x036f,0x0371,0x0377,0x0379,0x037d
0af5 ; --------------------------------------------------------------------------------------
0af5 ; Debug chain
0af5 ; --------------------------------------------------------------------------------------
0af5 0002 0006  |    |		.DBGLEN	0x0002,0x0006
0af7 0383 0387  |    |		.DBGLNO	0x0383,0x0387,0x0388,0x038f,0x0391,0x0397,0x0399,0x039d
0aff ; --------------------------------------------------------------------------------------
0aff ; Debug chain
0aff ; --------------------------------------------------------------------------------------
0aff 0002 0006  |    |		.DBGLEN	0x0002,0x0006
0b01 03a3 03a7  |    |		.DBGLNO	0x03a3,0x03a7,0x03a8,0x03af,0x03b1,0x03b8,0x03ba,0x03be
0b09 ; --------------------------------------------------------------------------------------
0b09 ; Debug chain
0b09 ; --------------------------------------------------------------------------------------
0b09 0003 000e  |    |		.DBGLEN	0x0003,0x000e
0b0b 03cb 03d1  |    |		.DBGLNO	0x03cb,0x03d1,0x03d3,0x03d5,0x03d8,0x03e1,0x03e6,0x03eb,0x03f0,0x03f5,0x03fb,0x0400,0x0406,0x040e,0x0413,0x041a,0x041f
0b1c 0001 0002  |    |		.XXX[0xe]
0b1e 0004 0005  |    |
0b20 0006 0003  |    |
0b22 0007 0008  |    |
0b24 0009 000a  |    |
0b26 000c 000d  |    |
0b28 000e 000b  |    |
0b2a ; --------------------------------------------------------------------------------------
0b2a ; Debug chain
0b2a ; --------------------------------------------------------------------------------------
0b2a 0000 0006  |    |		.DBGLEN	0x0000,0x0006
0b2c 042b 042e  | + .|		.DBGLNO	0x042b,0x042e,0x0433,0x0438,0x0443,0x044c
0b32 ; --------------------------------------------------------------------------------------
0b32 ; Debug chain
0b32 ; --------------------------------------------------------------------------------------
0b32 0002 0006  |    |		.DBGLEN	0x0002,0x0006
0b34 045b 045f  | [ _|		.DBGLNO	0x045b,0x045f,0x0460,0x0464,0x0468,0x0470,0x0478,0x047b
0b3c ; --------------------------------------------------------------------------------------
0b3c ; Debug chain
0b3c ; --------------------------------------------------------------------------------------
0b3c 0000 0003  |    |		.DBGLEN	0x0000,0x0003
0b3e 0483 0487  |    |		.DBGLNO	0x0483,0x0487,0x048f
0b41 ; --------------------------------------------------------------------------------------
0b41 ; Debug chain
0b41 ; --------------------------------------------------------------------------------------
0b41 0000 0003  |    |		.DBGLEN	0x0000,0x0003
0b43 049b 049f  |    |		.DBGLNO	0x049b,0x049f,0x04a6
0b46 ; --------------------------------------------------------------------------------------
0b46 ; Debug chain
0b46 ; --------------------------------------------------------------------------------------
0b46 0002 0005  |    |		.DBGLEN	0x0002,0x0005
0b48 04ab 04af  |    |		.DBGLNO	0x04ab,0x04af,0x04b0,0x04b4,0x04bf,0x04c1,0x04c4
0b4f ; --------------------------------------------------------------------------------------
0b4f ; Debug chain
0b4f ; --------------------------------------------------------------------------------------
0b4f 0002 0005  |    |		.DBGLEN	0x0002,0x0005
0b51 04cb 04cf  |    |		.DBGLNO	0x04cb,0x04cf,0x04d0,0x04d4,0x04df,0x04e1,0x04e4
0b58 ; --------------------------------------------------------------------------------------
0b58 ; Debug chain
0b58 ; --------------------------------------------------------------------------------------
0b58 0002 0005  |    |		.DBGLEN	0x0002,0x0005
0b5a 04eb 04ef  |    |		.DBGLNO	0x04eb,0x04ef,0x04f0,0x04f4,0x04ff,0x0501,0x0504
0b61 ; --------------------------------------------------------------------------------------
0b61 ; Debug chain
0b61 ; --------------------------------------------------------------------------------------
0b61 0000 0007  |    |		.DBGLEN	0x0000,0x0007
0b63 050b 050e  |    |		.DBGLNO	0x050b,0x050e,0x0511,0x0514,0x0518,0x051b,0x051e
0b6a ; --------------------------------------------------------------------------------------
0b6a ; Debug chain
0b6a ; --------------------------------------------------------------------------------------
0b6a 0001 0010  |    |		.DBGLEN	0x0001,0x0010
0b6c 052b 052d  | + -|		.DBGLNO	0x052b,0x052d,0x0537,0x0540,0x0544,0x0552,0x0557,0x0560,0x0566,0x056b,0x0571,0x0578,0x057d,0x0583,0x0591,0x0597,0x059f
0b7d 0001 0002  |    |		.XXX[0x10]
0b7f 0010 0003  |    |
0b81 0004 0005  |    |
0b83 0007 0008  |    |
0b85 0006 0009  |    |
0b87 000a 000b  |    |
0b89 000c 000d  |    |
0b8b 000e 000f  |    |
0b8d ; --------------------------------------------------------------------------------------
0b8d ; Debug chain
0b8d ; --------------------------------------------------------------------------------------
0b8d 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0b8f 05ab 05af  |    |		.DBGLNO	0x05ab,0x05af
0b91 ; --------------------------------------------------------------------------------------
0b91 ; Debug chain
0b91 ; --------------------------------------------------------------------------------------
0b91 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0b93 05c3 05c7  |    |		.DBGLNO	0x05c3,0x05c7
0b95 ; --------------------------------------------------------------------------------------
0b95 ; Debug chain
0b95 ; --------------------------------------------------------------------------------------
0b95 0000 0003  |    |		.DBGLEN	0x0000,0x0003
0b97 05d3 05d7  |    |		.DBGLNO	0x05d3,0x05d7,0x05de
0b9a ; --------------------------------------------------------------------------------------
0b9a ; Debug chain
0b9a ; --------------------------------------------------------------------------------------
0b9a 0000 0003  |    |		.DBGLEN	0x0000,0x0003
0b9c 05e3 05e7  |    |		.DBGLNO	0x05e3,0x05e7,0x05ed
0b9f ; --------------------------------------------------------------------------------------
0b9f ; Debug chain
0b9f ; --------------------------------------------------------------------------------------
0b9f 0002 0002  |    |		.DBGLEN	0x0002,0x0002
0ba1 05f3 05f9  |    |		.DBGLNO	0x05f3,0x05f9,0x05fb,0x0601
0ba5 ; --------------------------------------------------------------------------------------
0ba5 ; Debug chain
0ba5 ; --------------------------------------------------------------------------------------
0ba5 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0ba7 0613       |    |		.DBGLNO	0x0613
0ba8 ; --------------------------------------------------------------------------------------
0ba8 ; Debug chain
0ba8 ; --------------------------------------------------------------------------------------
0ba8 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0baa 0623       | #  |		.DBGLNO	0x0623
0bab ; --------------------------------------------------------------------------------------
0bab ; Debug chain
0bab ; --------------------------------------------------------------------------------------
0bab 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0bad 0633       | 3  |		.DBGLNO	0x0633
0bae ; --------------------------------------------------------------------------------------
0bae ; Debug chain
0bae ; --------------------------------------------------------------------------------------
0bae 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0bb0 0643       | C  |		.DBGLNO	0x0643
0bb1 ; --------------------------------------------------------------------------------------
0bb1 ; Debug chain
0bb1 ; --------------------------------------------------------------------------------------
0bb1 0002 0004  |    |		.DBGLEN	0x0002,0x0004
0bb3 0653 0657  | S W|		.DBGLNO	0x0653,0x0657,0x0658,0x065f,0x0661,0x0664
0bb9 ; --------------------------------------------------------------------------------------
0bb9 ; Debug chain
0bb9 ; --------------------------------------------------------------------------------------
0bb9 0002 0004  |    |		.DBGLEN	0x0002,0x0004
0bbb 066b 066f  | k o|		.DBGLNO	0x066b,0x066f,0x0670,0x0677,0x0679,0x067c
0bc1 ; --------------------------------------------------------------------------------------
0bc1 ; Debug chain
0bc1 ; --------------------------------------------------------------------------------------
0bc1 0002 0004  |    |		.DBGLEN	0x0002,0x0004
0bc3 0683 0687  |    |		.DBGLNO	0x0683,0x0687,0x0688,0x068f,0x0691,0x0694
0bc9 ; --------------------------------------------------------------------------------------
0bc9 ; Debug chain
0bc9 ; --------------------------------------------------------------------------------------
0bc9 0002 0004  |    |		.DBGLEN	0x0002,0x0004
0bcb 069b 06a1  |    |		.DBGLNO	0x069b,0x06a1,0x06a2,0x06a8,0x06aa,0x06b1
0bd1 ; --------------------------------------------------------------------------------------
0bd1 ; Debug chain
0bd1 ; --------------------------------------------------------------------------------------
0bd1 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0bd3 06bb       |    |		.DBGLNO	0x06bb
0bd4 ; --------------------------------------------------------------------------------------
0bd4 ; Debug chain
0bd4 ; --------------------------------------------------------------------------------------
0bd4 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0bd6 06cb       |    |		.DBGLNO	0x06cb
0bd7 ; --------------------------------------------------------------------------------------
0bd7 ; Debug chain
0bd7 ; --------------------------------------------------------------------------------------
0bd7 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0bd9 06d3       |    |		.DBGLNO	0x06d3
0bda ; --------------------------------------------------------------------------------------
0bda ; Debug chain
0bda ; --------------------------------------------------------------------------------------
0bda 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0bdc 06db       |    |		.DBGLNO	0x06db
0bdd ; --------------------------------------------------------------------------------------
0bdd ; Debug chain
0bdd ; --------------------------------------------------------------------------------------
0bdd 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0bdf 06e3       |    |		.DBGLNO	0x06e3
0be0 ; --------------------------------------------------------------------------------------
0be0 ; Debug chain
0be0 ; --------------------------------------------------------------------------------------
0be0 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0be2 06eb       |    |		.DBGLNO	0x06eb
0be3 ; --------------------------------------------------------------------------------------
0be3 ; Debug chain
0be3 ; --------------------------------------------------------------------------------------
0be3 0000 0007  |    |		.DBGLEN	0x0000,0x0007
0be5 06f3 06fc  |    |		.DBGLNO	0x06f3,0x06fc,0x06fe,0x0702,0x0706,0x070a,0x070e
0bec 0001 0007  |    |		.XXX[0x7]
0bee 0002 0003  |    |
0bf0 0004 0005  |    |
0bf2 0006       |    |
0bf3 ; --------------------------------------------------------------------------------------
0bf3 ; Debug chain
0bf3 ; --------------------------------------------------------------------------------------
0bf3 0000 0004  |    |		.DBGLEN	0x0000,0x0004
0bf5 071b 0724  |   $|		.DBGLNO	0x071b,0x0724,0x0726,0x0729
0bf9 0001 0004  |    |		.XXX[0x4]
0bfb 0002 0003  |    |
0bfd ; --------------------------------------------------------------------------------------
0bfd ; Debug chain
0bfd ; --------------------------------------------------------------------------------------
0bfd 0002 0004  |    |		.DBGLEN	0x0002,0x0004
0bff 0733 0737  | 3 7|		.DBGLNO	0x0733,0x0737,0x0738,0x073f,0x0741,0x0744
0c05 ; --------------------------------------------------------------------------------------
0c05 ; Debug chain
0c05 ; --------------------------------------------------------------------------------------
0c05 0002 0004  |    |		.DBGLEN	0x0002,0x0004
0c07 074b 074f  | K O|		.DBGLNO	0x074b,0x074f,0x0750,0x0757,0x0759,0x075c
0c0d ; --------------------------------------------------------------------------------------
0c0d ; Debug chain
0c0d ; --------------------------------------------------------------------------------------
0c0d 0002 0004  |    |		.DBGLEN	0x0002,0x0004
0c0f 0763 0767  | c g|		.DBGLNO	0x0763,0x0767,0x0768,0x076f,0x0771,0x0774
0c15 ; --------------------------------------------------------------------------------------
0c15 ; Debug chain
0c15 ; --------------------------------------------------------------------------------------
0c15 0002 0004  |    |		.DBGLEN	0x0002,0x0004
0c17 077b 077f  | {  |		.DBGLNO	0x077b,0x077f,0x0780,0x0787,0x0789,0x078c
0c1d ; --------------------------------------------------------------------------------------
0c1d ; Debug chain
0c1d ; --------------------------------------------------------------------------------------
0c1d 0000 0006  |    |		.DBGLEN	0x0000,0x0006
0c1f 07b3 07b5  |    |		.DBGLNO	0x07b3,0x07b5,0x07be,0x07c1,0x07c6,0x07cb
0c25 0001 0002  |    |		.XXX[0x6]
0c27 0006 0003  |    |
0c29 0004 0005  |    |
0c2b ; --------------------------------------------------------------------------------------
0c2b ; Debug chain
0c2b ; --------------------------------------------------------------------------------------
0c2b 0002 0004  |    |		.DBGLEN	0x0002,0x0004
0c2d 07d3 07d9  |    |		.DBGLNO	0x07d3,0x07d9,0x07da,0x07e0,0x07e2,0x07ed
0c33 ; --------------------------------------------------------------------------------------
0c33 ; Debug chain
0c33 ; --------------------------------------------------------------------------------------
0c33 0002 0004  |    |		.DBGLEN	0x0002,0x0004
0c35 07f3 07f9  |    |		.DBGLNO	0x07f3,0x07f9,0x07fa,0x0804,0x080d,0x0816
0c3b 0001 0003  |    |		.XXX[0x4]
0c3d 0004 0002  |    |
0c3f ; --------------------------------------------------------------------------------------
0c3f ; Debug chain
0c3f ; --------------------------------------------------------------------------------------
0c3f 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0c41 0823       | #  |		.DBGLNO	0x0823
0c42 0000 0000  |    |		.BLANK	0000[0x1be]