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

⟦9d64b007d⟧

    Length: 11264 (0x2c00)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0a7cf5

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5800       |X   |		.CONST	0x5800								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 1548       | H  |		.CONST	0x1548								; 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 800d       |    |		.CONST	0x800d								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 03d6       |    |		.CONST	0x03d6								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 00de       |    |		.CONST	0x00de								; Number of locals
000b			INIT_0008:
000b 00c4       |    |		Action	Make_Default
000c 00c4       |    |		Action	Make_Default
000d 00c4       |    |		Action	Make_Default
000e 00c4       |    |		Action	Make_Default
000f 00c4       |    |		Action	Make_Default
0010 00c4       |    |		Action	Make_Default
0011 00c4       |    |		Action	Make_Default
0012 00c4       |    |		Action	Make_Default
0013 00c4       |    |		Action	Make_Default
0014 00c4       |    |		Action	Make_Default
0015 00c4       |    |		Action	Make_Default
0016 00c4       |    |		Action	Make_Default
0017 00c4       |    |		Action	Make_Default
0018 00c4       |    |		Action	Make_Default
0019 00c4       |    |		Action	Make_Default
001a 00c4       |    |		Action	Make_Default
001b 00c4       |    |		Action	Make_Default
001c 00c4       |    |		Action	Make_Default
001d 00c4       |    |		Action	Make_Default
001e 00c4       |    |		Action	Make_Default
001f 00c4       |    |		Action	Make_Default
0020 00c4       |    |		Action	Make_Default
0021 00c4       |    |		Action	Make_Default
0022 00c4       |    |		Action	Make_Default
0023 00c4       |    |		Action	Make_Default
0024 00c4       |    |		Action	Make_Default
0025 00c4       |    |		Action	Make_Default
0026 00c4       |    |		Action	Make_Default
0027 00c4       |    |		Action	Make_Default
0028 00c4       |    |		Action	Make_Default
0029 00c4       |    |		Action	Make_Default
002a 00c4       |    |		Action	Make_Default
002b 00c4       |    |		Action	Make_Default
002c 00c4       |    |		Action	Make_Default
002d 00c4       |    |		Action	Make_Default
002e 00c4       |    |		Action	Make_Default
002f 00c4       |    |		Action	Make_Default
0030 00c4       |    |		Action	Make_Default
0031 00c4       |    |		Action	Make_Default
0032 00c4       |    |		Action	Make_Default
0033 00c4       |    |		Action	Make_Default
0034 00c4       |    |		Action	Make_Default
0035 00c4       |    |		Action	Make_Default
0036 00c4       |    |		Action	Make_Default
0037 00c4       |    |		Action	Make_Default
0038 00c4       |    |		Action	Make_Default
0039 00c4       |    |		Action	Make_Default
003a 00c4       |    |		Action	Make_Default
003b 00c4       |    |		Action	Make_Default
003c 00c4       |    |		Action	Make_Default
003d 00c4       |    |		Action	Make_Default
003e 00c4       |    |		Action	Make_Default
003f 00c4       |    |		Action	Make_Default
0040 00c4       |    |		Action	Make_Default
0041 00c4       |    |		Action	Make_Default
0042 00c4       |    |		Action	Make_Default
0043 00c4       |    |		Action	Make_Default
0044 00c4       |    |		Action	Make_Default
0045 00c4       |    |		Action	Make_Default
0046 00c4       |    |		Action	Make_Default
0047 00c4       |    |		Action	Make_Default
0048 00c4       |    |		Action	Make_Default
0049 00c4       |    |		Action	Make_Default
004a 00c4       |    |		Action	Make_Default
004b 00c4       |    |		Action	Make_Default
004c 00c4       |    |		Action	Make_Default
004d 00c4       |    |		Action	Make_Default
004e 00c4       |    |		Action	Make_Default
004f 00c4       |    |		Action	Make_Default
0050 00c4       |    |		Action	Make_Default
0051 00c4       |    |		Action	Make_Default
0052 00c4       |    |		Action	Make_Default
0053 00c4       |    |		Action	Make_Default
0054 00c4       |    |		Action	Make_Default
0055 00c4       |    |		Action	Make_Default
0056 00c4       |    |		Action	Make_Default
0057 00c4       |    |		Action	Make_Default
0058 00c4       |    |		Action	Make_Default
0059 00c4       |    |		Action	Make_Default
005a 00c4       |    |		Action	Make_Default
005b 00c4       |    |		Action	Make_Default
005c 00c4       |    |		Action	Make_Default
005d 00c4       |    |		Action	Make_Default
005e 00c4       |    |		Action	Make_Default
005f 00c4       |    |		Action	Make_Default
0060 00c4       |    |		Action	Make_Default
0061 00c4       |    |		Action	Make_Default
0062 00c4       |    |		Action	Make_Default
0063 00c4       |    |		Action	Make_Default
0064 00c4       |    |		Action	Make_Default
0065 00c4       |    |		Action	Make_Default
0066 00c4       |    |		Action	Make_Default
0067 00c4       |    |		Action	Make_Default
0068 00c4       |    |		Action	Make_Default
0069 00c4       |    |		Action	Make_Default
006a 00c4       |    |		Action	Make_Default
006b 00c4       |    |		Action	Make_Default
006c 00c4       |    |		Action	Make_Default
006d 00c4       |    |		Action	Make_Default
006e 00c4       |    |		Action	Make_Default
006f 00c4       |    |		Action	Make_Default
0070 00c4       |    |		Action	Make_Default
0071 00c4       |    |		Action	Make_Default
0072 00c4       |    |		Action	Make_Default
0073 00c4       |    |		Action	Make_Default
0074 00c4       |    |		Action	Make_Default
0075 00c4       |    |		Action	Make_Default
0076 00c4       |    |		Action	Make_Default
0077 00c4       |    |		Action	Make_Default
0078 00c4       |    |		Action	Make_Default
0079 00c4       |    |		Action	Make_Default
007a 00c4       |    |		Action	Make_Default
007b 00c4       |    |		Action	Make_Default
007c 00c4       |    |		Action	Make_Default
007d 00c4       |    |		Action	Make_Default
007e 00c4       |    |		Action	Make_Default
007f 00c4       |    |		Action	Make_Default
0080 00c4       |    |		Action	Make_Default
0081 00c4       |    |		Action	Make_Default
0082 00c4       |    |		Action	Make_Default
0083 00c4       |    |		Action	Make_Default
0084 00c4       |    |		Action	Make_Default
0085 00c4       |    |		Action	Make_Default
0086 00c4       |    |		Action	Make_Default
0087 00c4       |    |		Action	Make_Default
0088 00c4       |    |		Action	Make_Default
0089 00c4       |    |		Action	Make_Default
008a 00c4       |    |		Action	Make_Default
008b 00c4       |    |		Action	Make_Default
008c 00c4       |    |		Action	Make_Default
008d 00c4       |    |		Action	Make_Default
008e 00c4       |    |		Action	Make_Default
008f 00c4       |    |		Action	Make_Default
0090 00c4       |    |		Action	Make_Default
0091 00c4       |    |		Action	Make_Default
0092 00c4       |    |		Action	Make_Default
0093 00c4       |    |		Action	Make_Default
0094 00c4       |    |		Action	Make_Default
0095 00c4       |    |		Action	Make_Default
0096 00c4       |    |		Action	Make_Default
0097 00c4       |    |		Action	Make_Default
0098 00c4       |    |		Action	Make_Default
0099 00c4       |    |		Action	Make_Default
009a 00c4       |    |		Action	Make_Default
009b 00c4       |    |		Action	Make_Default
009c 00c4       |    |		Action	Make_Default
009d 00c4       |    |		Action	Make_Default
009e 4800       |H   |		Short_Literal	0x0
009f 4811       |H   |		Short_Literal	0x11
00a0 029f 03e3  |    |		Declare_Subprogram	INIT_03e0,For_Call
00a2 03fe       |    |		Declare_Type	Discrete,Defined,Visible
00a3 c278       | x  |		Store	0x1,0x78
00a4 029a 040b  |    |		Declare_Subprogram	INIT_0408,For_Outer_Call,Visible,Unelaborated
00a6 c262       | b  |		Store	0x1,0x62
00a7 029a 0413  |    |		Declare_Subprogram	INIT_0410,For_Outer_Call,Visible,Unelaborated
00a9 c277       | w  |		Store	0x1,0x77
00aa 029a 056b  |   k|		Declare_Subprogram	INIT_0568,For_Outer_Call,Visible,Unelaborated
00ac c215       |    |		Store	0x1,0x15
00ad e001       |    |		Load	0x0,0x1
00ae 0129       | )  |		Execute	Any,Make_Visible
00af c216       |    |		Store	0x1,0x16
00b0 029a 058b  |    |		Declare_Subprogram	INIT_0588,For_Outer_Call,Visible,Unelaborated
00b2 c279       | y  |		Store	0x1,0x79
00b3 029a 059b  |    |		Declare_Subprogram	INIT_0598,For_Outer_Call,Visible,Unelaborated
00b5 c217       |    |		Store	0x1,0x17
00b6 029a 05a3  |    |		Declare_Subprogram	INIT_05a0,For_Outer_Call,Visible,Unelaborated
00b8 c218       |    |		Store	0x1,0x18
00b9 029a 05ab  |    |		Declare_Subprogram	INIT_05a8,For_Outer_Call,Visible,Unelaborated
00bb c219       |    |		Store	0x1,0x19
00bc 029a 05bb  |    |		Declare_Subprogram	INIT_05b8,For_Outer_Call,Visible,Unelaborated
00be c288       |    |		Store	0x1,0x88
00bf e002       |    |		Load	0x0,0x2
00c0 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
00c1 0129       | )  |		Execute	Any,Make_Visible
00c2 c21a       |    |		Store	0x1,0x1a
00c3 00e3       |    |		Load_Encached	Natural_Cache
00c4 0129       | )  |		Execute	Any,Make_Visible
00c5 c21b       |    |		Store	0x1,0x1b
00c6 e003       |    |		Load	0x0,0x3
00c7 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00c8 02c6       |    |		Declare_Variable	Any,Visible
00c9 00d8       |    |		Load_Top	At_Offset_0
00ca 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00cb c289       |    |		Store	0x1,0x89
00cc e004       |    |		Load	0x0,0x4
00cd 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
00ce 02c6       |    |		Declare_Variable	Any,Visible
00cf 00d8       |    |		Load_Top	At_Offset_0
00d0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00d1 c28a       |    |		Store	0x1,0x8a
00d2 e005       |    |		Load	0x0,0x5
00d3 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
00d4 02c6       |    |		Declare_Variable	Any,Visible
00d5 00d8       |    |		Load_Top	At_Offset_0
00d6 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00d7 c28b       |    |		Store	0x1,0x8b
00d8 e006       |    |		Load	0x0,0x6
00d9 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
00da 02c6       |    |		Declare_Variable	Any,Visible
00db 00d8       |    |		Load_Top	At_Offset_0
00dc 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00dd c28c       |    |		Store	0x1,0x8c
00de e007       |    |		Load	0x0,0x7
00df 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
00e0 02c6       |    |		Declare_Variable	Any,Visible
00e1 00d8       |    |		Load_Top	At_Offset_0
00e2 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00e3 c28d       |    |		Store	0x1,0x8d
00e4 e008       |    |		Load	0x0,0x8
00e5 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
00e6 02c6       |    |		Declare_Variable	Any,Visible
00e7 00d8       |    |		Load_Top	At_Offset_0
00e8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00e9 c28e       |    |		Store	0x1,0x8e
00ea 4800       |H   |		Short_Literal	0x0
00eb 4806       |H   |		Short_Literal	0x6
00ec 029f 05cb  |    |		Declare_Subprogram	INIT_05c8,For_Call
00ee 03fe       |    |		Declare_Type	Discrete,Defined,Visible
00ef c21c       |    |		Store	0x1,0x1c
00f0 e21c       |    |		Load	0x1,0x1c
00f1 4801       |H   |		Short_Literal	0x1
00f2 e009       |    |		Load	0x0,0x9
00f3 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00f4 4801       |H   |		Short_Literal	0x1
00f5 e004       |    |		Load	0x0,0x4
00f6 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
00f7 4801       |H   |		Short_Literal	0x1
00f8 e005       |    |		Load	0x0,0x5
00f9 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
00fa 4801       |H   |		Short_Literal	0x1
00fb e007       |    |		Load	0x0,0x7
00fc 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
00fd 4801       |H   |		Short_Literal	0x1
00fe e006       |    |		Load	0x0,0x6
00ff 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0100 4801       |H   |		Short_Literal	0x1
0101 e008       |    |		Load	0x0,0x8
0102 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0103 029f 10f3  |    |		Declare_Subprogram	INIT_10f0,For_Call
0105 4806       |H   |		Short_Literal	0x6
0106 4800       |H   |		Short_Literal	0x0
0107 4806       |H   |		Short_Literal	0x6
0108 4800       |H   |		Short_Literal	0x0
0109 4801       |H   |		Short_Literal	0x1
010a 031e       |    |		Declare_Type	Variant_Record,Defined,Visible
010b c21d       |    |		Store	0x1,0x1d
010c 4800       |H   |		Short_Literal	0x0
010d e21d       |    |		Load	0x1,0x1d
010e 1c08       |    |		Execute_Immediate	Run_Utility,0x8
010f 0129       | )  |		Execute	Any,Make_Visible
0110 c21e       |    |		Store	0x1,0x1e
0111 029a 05f3  |    |		Declare_Subprogram	INIT_05f0,For_Outer_Call,Visible,Unelaborated
0113 c21f       |    |		Store	0x1,0x1f
0114 029a 062b  |   +|		Declare_Subprogram	INIT_0628,For_Outer_Call,Visible,Unelaborated
0116 c220       |    |		Store	0x1,0x20
0117 029a 0663  |   c|		Declare_Subprogram	INIT_0660,For_Outer_Call,Visible,Unelaborated
0119 c221       | !  |		Store	0x1,0x21
011a 029a 06a3  |    |		Declare_Subprogram	INIT_06a0,For_Outer_Call,Visible,Unelaborated
011c c222       | "  |		Store	0x1,0x22
011d 00e3       |    |		Load_Encached	Natural_Cache
011e 0129       | )  |		Execute	Any,Make_Visible
011f c223       | #  |		Store	0x1,0x23
0120 00e2       |    |		Load_Encached	Integer_Cache
0121 0129       | )  |		Execute	Any,Make_Visible
0122 c224       | $  |		Store	0x1,0x24
0123 0092 11e8  |    |		Action	Push_String_Extended,0x11e8					; "NONE."
0125 0129       | )  |		Execute	Any,Make_Visible
0126 c263       | c  |		Store	0x1,0x63
0127 e224       | $  |		Load	0x1,0x24
0128 0266       | f  |		Execute	Discrete,Bounds
0129 e009       |    |		Load	0x0,0x9
012a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
012b 029f 06e3  |    |		Declare_Subprogram	INIT_06e0,For_Call
012d 4801       |H   |		Short_Literal	0x1
012e 0351       | Q  |		Declare_Type	Array,Defined,Visible,Bounds_With_Object
012f c24a       | J  |		Store	0x1,0x4a
0130 e24a       | J  |		Load	0x1,0x4a
0131 02a0       |    |		Declare_Subprogram	Null_Subprogram
0132 4818       |H   |		Short_Literal	0x18
0133 03d4       |    |		Declare_Type	Access,Defined,Visible,Accesses_Protected
0134 c24b       | K  |		Store	0x1,0x4b
0135 e004       |    |		Load	0x0,0x4
0136 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0137 02a0       |    |		Declare_Subprogram	Null_Subprogram
0138 4818       |H   |		Short_Literal	0x18
0139 03d4       |    |		Declare_Type	Access,Defined,Visible,Accesses_Protected
013a c24c       | L  |		Store	0x1,0x4c
013b e005       |    |		Load	0x0,0x5
013c 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
013d 02a0       |    |		Declare_Subprogram	Null_Subprogram
013e 4818       |H   |		Short_Literal	0x18
013f 03d4       |    |		Declare_Type	Access,Defined,Visible,Accesses_Protected
0140 c24d       | M  |		Store	0x1,0x4d
0141 e007       |    |		Load	0x0,0x7
0142 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0143 02a0       |    |		Declare_Subprogram	Null_Subprogram
0144 4818       |H   |		Short_Literal	0x18
0145 03d4       |    |		Declare_Type	Access,Defined,Visible,Accesses_Protected
0146 c24e       | N  |		Store	0x1,0x4e
0147 e006       |    |		Load	0x0,0x6
0148 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0149 02a0       |    |		Declare_Subprogram	Null_Subprogram
014a 4818       |H   |		Short_Literal	0x18
014b 03d4       |    |		Declare_Type	Access,Defined,Visible,Accesses_Protected
014c c24f       | O  |		Store	0x1,0x4f
014d e008       |    |		Load	0x0,0x8
014e 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
014f 02a0       |    |		Declare_Subprogram	Null_Subprogram
0150 4818       |H   |		Short_Literal	0x18
0151 03d4       |    |		Declare_Type	Access,Defined,Visible,Accesses_Protected
0152 c250       | P  |		Store	0x1,0x50
0153 e21c       |    |		Load	0x1,0x1c
0154 e223       | #  |		Load	0x1,0x23
0155 4801       |H   |		Short_Literal	0x1
0156 e24b       | K  |		Load	0x1,0x4b
0157 4801       |H   |		Short_Literal	0x1
0158 e24c       | L  |		Load	0x1,0x4c
0159 4801       |H   |		Short_Literal	0x1
015a e24d       | M  |		Load	0x1,0x4d
015b 4801       |H   |		Short_Literal	0x1
015c e24e       | N  |		Load	0x1,0x4e
015d 4801       |H   |		Short_Literal	0x1
015e e24f       | O  |		Load	0x1,0x4f
015f 4801       |H   |		Short_Literal	0x1
0160 e250       | P  |		Load	0x1,0x50
0161 029f 1173  |   s|		Declare_Subprogram	INIT_1170,For_Call
0163 4806       |H   |		Short_Literal	0x6
0164 4801       |H   |		Short_Literal	0x1
0165 4806       |H   |		Short_Literal	0x6
0166 4800       |H   |		Short_Literal	0x0
0167 4801       |H   |		Short_Literal	0x1
0168 031e       |    |		Declare_Type	Variant_Record,Defined,Visible
0169 c28f       |    |		Store	0x1,0x8f
016a 4800       |H   |		Short_Literal	0x0
016b e28f       |    |		Load	0x1,0x8f
016c 1c08       |    |		Execute_Immediate	Run_Utility,0x8
016d 4800       |H   |		Short_Literal	0x0
016e 00d9       |    |		Load_Top	At_Offset_1
016f 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0170 0129       | )  |		Execute	Any,Make_Visible
0171 c290       |    |		Store	0x1,0x90
0172 4801       |H   |		Short_Literal	0x1
0173 e28f       |    |		Load	0x1,0x8f
0174 1c07       |    |		Execute_Immediate	Run_Utility,0x7
0175 0129       | )  |		Execute	Any,Make_Visible
0176 c291       |    |		Store	0x1,0x91
0177 4802       |H   |		Short_Literal	0x2
0178 e28f       |    |		Load	0x1,0x8f
0179 1c07       |    |		Execute_Immediate	Run_Utility,0x7
017a 0129       | )  |		Execute	Any,Make_Visible
017b c292       |    |		Store	0x1,0x92
017c 4803       |H   |		Short_Literal	0x3
017d e28f       |    |		Load	0x1,0x8f
017e 1c07       |    |		Execute_Immediate	Run_Utility,0x7
017f 0129       | )  |		Execute	Any,Make_Visible
0180 c293       |    |		Store	0x1,0x93
0181 4805       |H   |		Short_Literal	0x5
0182 e28f       |    |		Load	0x1,0x8f
0183 1c07       |    |		Execute_Immediate	Run_Utility,0x7
0184 0129       | )  |		Execute	Any,Make_Visible
0185 c294       |    |		Store	0x1,0x94
0186 4804       |H   |		Short_Literal	0x4
0187 e28f       |    |		Load	0x1,0x8f
0188 1c07       |    |		Execute_Immediate	Run_Utility,0x7
0189 0129       | )  |		Execute	Any,Make_Visible
018a c295       |    |		Store	0x1,0x95
018b 4806       |H   |		Short_Literal	0x6
018c e28f       |    |		Load	0x1,0x8f
018d 1c07       |    |		Execute_Immediate	Run_Utility,0x7
018e 0129       | )  |		Execute	Any,Make_Visible
018f c296       |    |		Store	0x1,0x96
0190 029a 06fb  |    |		Declare_Subprogram	INIT_06f8,For_Outer_Call,Visible,Unelaborated
0192 c227       | '  |		Store	0x1,0x27
0193 029a 07ab  |    |		Declare_Subprogram	INIT_07a8,For_Outer_Call,Visible,Unelaborated
0195 c276       | v  |		Store	0x1,0x76
0196 e002       |    |		Load	0x0,0x2
0197 1b29       | )  |		Execute	Package,Field_Read,Field_Number 0x29
0198 0129       | )  |		Execute	Any,Make_Visible
0199 c228       | (  |		Store	0x1,0x28
019a 029a 07f3  |    |		Declare_Subprogram	INIT_07f0,For_Outer_Call,Visible,Unelaborated
019c c229       | )  |		Store	0x1,0x29
019d 029a 07fb  |    |		Declare_Subprogram	INIT_07f8,For_Outer_Call,Visible,Unelaborated
019f c297       |    |		Store	0x1,0x97
01a0 029a 081b  |    |		Declare_Subprogram	INIT_0818,For_Outer_Call,Visible,Unelaborated
01a2 c298       |    |		Store	0x1,0x98
01a3 029a 0843  |   C|		Declare_Subprogram	INIT_0840,For_Outer_Call,Visible,Unelaborated
01a5 c299       |    |		Store	0x1,0x99
01a6 029a 08a3  |    |		Declare_Subprogram	INIT_08a0,For_Outer_Call,Visible,Unelaborated
01a8 c29a       |    |		Store	0x1,0x9a
01a9 029a 0913  |    |		Declare_Subprogram	INIT_0910,For_Outer_Call,Visible,Unelaborated
01ab c29b       |    |		Store	0x1,0x9b
01ac e00a       |    |		Load	0x0,0xa
01ad 02a8       |    |		Declare_Subprogram	For_Call,Visible,Unelaborated,With_Address
01ae c29c       |    |		Store	0x1,0x9c
01af e00b       |    |		Load	0x0,0xb
01b0 02a8       |    |		Declare_Subprogram	For_Call,Visible,Unelaborated,With_Address
01b1 c29d       |    |		Store	0x1,0x9d
01b2 00e3       |    |		Load_Encached	Natural_Cache
01b3 0129       | )  |		Execute	Any,Make_Visible
01b4 c22a       | *  |		Store	0x1,0x2a
01b5 029a 0943  |   C|		Declare_Subprogram	INIT_0940,For_Outer_Call,Visible,Unelaborated
01b7 c22b       | +  |		Store	0x1,0x2b
01b8 029a 094b  |   K|		Declare_Subprogram	INIT_0948,For_Outer_Call,Visible,Unelaborated
01ba c22c       | ,  |		Store	0x1,0x2c
01bb 029a 0953  |   S|		Declare_Subprogram	INIT_0950,For_Outer_Call,Visible,Unelaborated
01bd c22d       | -  |		Store	0x1,0x2d
01be 029a 098b  |    |		Declare_Subprogram	INIT_0988,For_Outer_Call,Visible,Unelaborated
01c0 c22e       | .  |		Store	0x1,0x2e
01c1 029a 09c3  |    |		Declare_Subprogram	INIT_09c0,For_Outer_Call,Visible,Unelaborated
01c3 c22f       | /  |		Store	0x1,0x2f
01c4 e00c       |    |		Load	0x0,0xc
01c5 02a8       |    |		Declare_Subprogram	For_Call,Visible,Unelaborated,With_Address
01c6 c230       | 0  |		Store	0x1,0x30
01c7 029a 0a0b  |    |		Declare_Subprogram	INIT_0a08,For_Outer_Call,Visible,Unelaborated
01c9 c231       | 1  |		Store	0x1,0x31
01ca 029a 0a7b  |   {|		Declare_Subprogram	INIT_0a78,For_Outer_Call,Visible,Unelaborated
01cc c27a       | z  |		Store	0x1,0x7a
01cd 029a 0aa3  |    |		Declare_Subprogram	INIT_0aa0,For_Outer_Call,Visible,Unelaborated
01cf c233       | 3  |		Store	0x1,0x33
01d0 029a 0b63  |   c|		Declare_Subprogram	INIT_0b60,For_Outer_Call,Visible,Unelaborated
01d2 c234       | 4  |		Store	0x1,0x34
01d3 029a 0bab  |    |		Declare_Subprogram	INIT_0ba8,For_Outer_Call,Visible,Unelaborated
01d5 c235       | 5  |		Store	0x1,0x35
01d6 029a 0bf3  |    |		Declare_Subprogram	INIT_0bf0,For_Outer_Call,Visible,Unelaborated
01d8 c236       | 6  |		Store	0x1,0x36
01d9 029a 0c43  |   C|		Declare_Subprogram	INIT_0c40,For_Outer_Call,Visible,Unelaborated
01db c237       | 7  |		Store	0x1,0x37
01dc 00e3       |    |		Load_Encached	Natural_Cache
01dd 0129       | )  |		Execute	Any,Make_Visible
01de c238       | 8  |		Store	0x1,0x38
01df 029a 0c93  |    |		Declare_Subprogram	INIT_0c90,For_Outer_Call,Visible,Unelaborated
01e1 c239       | 9  |		Store	0x1,0x39
01e2 029a 0c9b  |    |		Declare_Subprogram	INIT_0c98,For_Outer_Call,Visible,Unelaborated
01e4 c23a       | :  |		Store	0x1,0x3a
01e5 029a 0ceb  |    |		Declare_Subprogram	INIT_0ce8,For_Outer_Call,Visible,Unelaborated
01e7 c23b       | ;  |		Store	0x1,0x3b
01e8 029a 0cfb  |    |		Declare_Subprogram	INIT_0cf8,For_Outer_Call,Visible,Unelaborated
01ea c23c       | <  |		Store	0x1,0x3c
01eb 029a 0d43  |   C|		Declare_Subprogram	INIT_0d40,For_Outer_Call,Visible,Unelaborated
01ed c23f       | ?  |		Store	0x1,0x3f
01ee 029a 0d63  |   c|		Declare_Subprogram	INIT_0d60,For_Outer_Call,Visible,Unelaborated
01f0 c240       | @  |		Store	0x1,0x40
01f1 4800       |H   |		Short_Literal	0x0
01f2 e00d       |    |		Load	0x0,0xd
01f3 02a0       |    |		Declare_Subprogram	Null_Subprogram
01f4 038f       |    |		Declare_Type	Package,Defined,Visible
01f5 0386       |    |		Declare_Variable	Package,Visible
01f6 c29e       |    |		Store	0x1,0x9e
01f7 00e3       |    |		Load_Encached	Natural_Cache
01f8 0129       | )  |		Execute	Any,Make_Visible
01f9 c241       | A  |		Store	0x1,0x41
01fa e00e       |    |		Load	0x0,0xe
01fb 02a8       |    |		Declare_Subprogram	For_Call,Visible,Unelaborated,With_Address
01fc c242       | B  |		Store	0x1,0x42
01fd e00f       |    |		Load	0x0,0xf
01fe 191f       |    |		Execute	Package,Field_Reference,Field_Number 0x1f
01ff 0129       | )  |		Execute	Any,Make_Visible
0200 c264       | d  |		Store	0x1,0x64
0201 e00f       |    |		Load	0x0,0xf
0202 1916       |    |		Execute	Package,Field_Reference,Field_Number 0x16
0203 0129       | )  |		Execute	Any,Make_Visible
0204 c265       | e  |		Store	0x1,0x65
0205 029a 0d7b  |   {|		Declare_Subprogram	INIT_0d78,For_Outer_Call,Visible,Unelaborated
0207 c27b       | {  |		Store	0x1,0x7b
0208 029a 0d8b  |    |		Declare_Subprogram	INIT_0d88,For_Outer_Call,Visible,Unelaborated
020a c27c       | |  |		Store	0x1,0x7c
020b 029a 0d9b  |    |		Declare_Subprogram	INIT_0d98,For_Outer_Call,Visible,Unelaborated
020d c27d       | }  |		Store	0x1,0x7d
020e 029a 0dab  |    |		Declare_Subprogram	INIT_0da8,For_Outer_Call,Visible,Unelaborated
0210 c27e       | ~  |		Store	0x1,0x7e
0211 029a 0dbb  |    |		Declare_Subprogram	INIT_0db8,For_Outer_Call,Visible,Unelaborated
0213 c27f       |    |		Store	0x1,0x7f
0214 029a 0dcb  |    |		Declare_Subprogram	INIT_0dc8,For_Outer_Call,Visible,Unelaborated
0216 c280       |    |		Store	0x1,0x80
0217 029a 0ddb  |    |		Declare_Subprogram	INIT_0dd8,For_Outer_Call,Visible,Unelaborated
0219 c281       |    |		Store	0x1,0x81
021a 029a 0deb  |    |		Declare_Subprogram	INIT_0de8,For_Outer_Call,Visible,Unelaborated
021c c282       |    |		Store	0x1,0x82
021d 029a 0dfb  |    |		Declare_Subprogram	INIT_0df8,For_Outer_Call,Visible,Unelaborated
021f c26e       | n  |		Store	0x1,0x6e
0220 029a 0e0b  |    |		Declare_Subprogram	INIT_0e08,For_Outer_Call,Visible,Unelaborated
0222 c286       |    |		Store	0x1,0x86
0223 029a 0e7b  |   {|		Declare_Subprogram	INIT_0e78,For_Outer_Call,Visible,Unelaborated
0225 c287       |    |		Store	0x1,0x87
0226 029a 0ea3  |    |		Declare_Subprogram	INIT_0ea0,For_Outer_Call,Visible,Unelaborated
0228 c29f       |    |		Store	0x1,0x9f
0229 029a 0efb  |    |		Declare_Subprogram	INIT_0ef8,For_Outer_Call,Visible,Unelaborated
022b c243       | C  |		Store	0x1,0x43
022c 029a 0f03  |    |		Declare_Subprogram	INIT_0f00,For_Outer_Call,Visible,Unelaborated
022e c244       | D  |		Store	0x1,0x44
022f e010       |    |		Load	0x0,0x10
0230 191b       |    |		Execute	Package,Field_Reference,Field_Number 0x1b
0231 0129       | )  |		Execute	Any,Make_Visible
0232 c245       | E  |		Store	0x1,0x45
0233 e010       |    |		Load	0x0,0x10
0234 191c       |    |		Execute	Package,Field_Reference,Field_Number 0x1c
0235 0129       | )  |		Execute	Any,Make_Visible
0236 c246       | F  |		Store	0x1,0x46
0237 e010       |    |		Load	0x0,0x10
0238 191d       |    |		Execute	Package,Field_Reference,Field_Number 0x1d
0239 0129       | )  |		Execute	Any,Make_Visible
023a c247       | G  |		Store	0x1,0x47
023b e010       |    |		Load	0x0,0x10
023c 191d       |    |		Execute	Package,Field_Reference,Field_Number 0x1d
023d 0129       | )  |		Execute	Any,Make_Visible
023e c248       | H  |		Store	0x1,0x48
023f 4800       |H   |		Short_Literal	0x0
0240 e011       |    |		Load	0x0,0x11
0241 02a0       |    |		Declare_Subprogram	Null_Subprogram
0242 038f       |    |		Declare_Type	Package,Defined,Visible
0243 0386       |    |		Declare_Variable	Package,Visible
0244 c249       | I  |		Store	0x1,0x49
0245 00bf       |    |		Action	Accept_Activation
0246 e012       |    |		Load	0x0,0x12
0247 e013       |    |		Load	0x0,0x13
0248 4814       |H   |		Short_Literal	0x14
0249 e014       |    |		Load	0x0,0x14
024a 0387       |    |		Declare_Variable	Package
024b 00d8       |    |		Load_Top	At_Offset_0
024c 020f       |    |		Execute	Module,Activate
024d e002       |    |		Load	0x0,0x2
024e 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
024f e009       |    |		Load	0x0,0x9
0250 1b58       | X  |		Execute	Package,Field_Read,Field_Number 0x58
0251 1919       |    |		Execute	Package,Field_Reference,Field_Number 0x19
0252 0007       |    |		Action	Break_Optional
0253 e015       |    |		Load	0x0,0x15
0254 1916       |    |		Execute	Package,Field_Reference,Field_Number 0x16
0255 0007       |    |		Action	Break_Optional
0256 e016       |    |		Load	0x0,0x16
0257 e017       |    |		Load	0x0,0x17
0258 e278       | x  |		Load	0x1,0x78
0259 e018       |    |		Load	0x0,0x18
025a 0387       |    |		Declare_Variable	Package
025b 00d8       |    |		Load_Top	At_Offset_0
025c 020f       |    |		Execute	Module,Activate
025d 0092 11e9  |    |		Action	Push_String_Extended,0x11e9					; "non_proportional=(ff=courier),primary_cover_item=(ps=18),secondary_cover_item=(ps=14),cover_item=(ps=12),list_title=(fs=bold),list_item_header=(fs=italic),column_header=(fs=bold),emphasized_row_entry=(fs=bold),text_header=(fs=bold)"
025f 029b 0f0b  |    |		Declare_Subprogram	INIT_0f08,For_Outer_Call,Unelaborated
0261 029b 0f2b  |   +|		Declare_Subprogram	INIT_0f28,For_Outer_Call,Unelaborated
0263 029b 0f4b  |   K|		Declare_Subprogram	INIT_0f48,For_Outer_Call,Unelaborated
0265 a019       |    |		Store_Unchecked	0x0,0x19
0266 00c6       |    |		Action	Check_Subprogram_Elaborated
0267 e004       |    |		Load	0x0,0x4
0268 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0269 e004       |    |		Load	0x0,0x4
026a 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
026b e004       |    |		Load	0x0,0x4
026c 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
026d 1da6       |    |		Execute_Immediate	Reference_Lex_1,0xa6
026e e01a       |    |		Load	0x0,0x1a
026f e01b       |    |		Load	0x0,0x1b
0270 4800       |H   |		Short_Literal	0x0
0271 0007       |    |		Action	Break_Optional
0272 a019       |    |		Store_Unchecked	0x0,0x19
0273 00c6       |    |		Action	Check_Subprogram_Elaborated
0274 e007       |    |		Load	0x0,0x7
0275 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0276 e007       |    |		Load	0x0,0x7
0277 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0278 e007       |    |		Load	0x0,0x7
0279 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
027a 1da7       |    |		Execute_Immediate	Reference_Lex_1,0xa7
027b e01c       |    |		Load	0x0,0x1c
027c e01d       |    |		Load	0x0,0x1d
027d 4800       |H   |		Short_Literal	0x0
027e 0007       |    |		Action	Break_Optional
027f a019       |    |		Store_Unchecked	0x0,0x19
0280 00c6       |    |		Action	Check_Subprogram_Elaborated
0281 e005       |    |		Load	0x0,0x5
0282 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0283 e005       |    |		Load	0x0,0x5
0284 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0285 e005       |    |		Load	0x0,0x5
0286 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0287 1da8       |    |		Execute_Immediate	Reference_Lex_1,0xa8
0288 e01e       |    |		Load	0x0,0x1e
0289 e01f       |    |		Load	0x0,0x1f
028a 4800       |H   |		Short_Literal	0x0
028b 0007       |    |		Action	Break_Optional
028c 0092 11ea  |    |		Action	Push_String_Extended,0x11ea					; ".FILES.ACRONYMS"
028e e00f       |    |		Load	0x0,0xf
028f 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
0290 0092 11eb  |    |		Action	Push_String_Extended,0x11eb					; "<UNKNOWN>"
0292 e020       |    |		Load	0x0,0x20
0293 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0294 e020       |    |		Load	0x0,0x20
0295 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0296 e291       |    |		Load	0x1,0x91
0297 02ff       |    |		Declare_Variable	Variant_Record
0298 00d8       |    |		Load_Top	At_Offset_0
0299 1c00       |    |		Execute_Immediate	Run_Utility,0x0
029a e292       |    |		Load	0x1,0x92
029b 02ff       |    |		Declare_Variable	Variant_Record
029c 00d8       |    |		Load_Top	At_Offset_0
029d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
029e e293       |    |		Load	0x1,0x93
029f 02ff       |    |		Declare_Variable	Variant_Record
02a0 00d8       |    |		Load_Top	At_Offset_0
02a1 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02a2 e294       |    |		Load	0x1,0x94
02a3 02ff       |    |		Declare_Variable	Variant_Record
02a4 00d8       |    |		Load_Top	At_Offset_0
02a5 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02a6 e295       |    |		Load	0x1,0x95
02a7 02ff       |    |		Declare_Variable	Variant_Record
02a8 00d8       |    |		Load_Top	At_Offset_0
02a9 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02aa e296       |    |		Load	0x1,0x96
02ab 02ff       |    |		Declare_Variable	Variant_Record
02ac 00d8       |    |		Load_Top	At_Offset_0
02ad 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02ae e010       |    |		Load	0x0,0x10
02af 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02b0 02c7       |    |		Declare_Variable	Any
02b1 00d8       |    |		Load_Top	At_Offset_0
02b2 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02b3 e2a4       |    |		Load	0x1,0xa4
02b4 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
02b5 0337       | 7  |		Declare_Variable	Array
02b6 00d8       |    |		Load_Top	At_Offset_0
02b7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02b8 00e1       |    |		Load_Encached	Boolean_Cache
02b9 e021       | !  |		Load	0x0,0x21
02ba 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
02bb e022       | "  |		Load	0x0,0x22
02bc 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02bd 02c7       |    |		Declare_Variable	Any
02be 00d8       |    |		Load_Top	At_Offset_0
02bf 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02c0 e023       | #  |		Load	0x0,0x23
02c1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02c2 e022       | "  |		Load	0x0,0x22
02c3 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02c4 02c7       |    |		Declare_Variable	Any
02c5 00d8       |    |		Load_Top	At_Offset_0
02c6 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02c7 e00f       |    |		Load	0x0,0xf
02c8 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
02c9 02c7       |    |		Declare_Variable	Any
02ca 00d8       |    |		Load_Top	At_Offset_0
02cb 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02cc e024       | $  |		Load	0x0,0x24
02cd 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
02ce 02c7       |    |		Declare_Variable	Any
02cf 00d8       |    |		Load_Top	At_Offset_0
02d0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02d1 e004       |    |		Load	0x0,0x4
02d2 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
02d3 02c7       |    |		Declare_Variable	Any
02d4 00d8       |    |		Load_Top	At_Offset_0
02d5 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02d6 e004       |    |		Load	0x0,0x4
02d7 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
02d8 02c7       |    |		Declare_Variable	Any
02d9 00d8       |    |		Load_Top	At_Offset_0
02da 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02db e21d       |    |		Load	0x1,0x1d
02dc 02ff       |    |		Declare_Variable	Variant_Record
02dd 00d8       |    |		Load_Top	At_Offset_0
02de 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02df 00d8       |    |		Load_Top	At_Offset_0
02e0 02ff       |    |		Declare_Variable	Variant_Record
02e1 00d8       |    |		Load_Top	At_Offset_0
02e2 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02e3 e004       |    |		Load	0x0,0x4
02e4 192e       | .  |		Execute	Package,Field_Reference,Field_Number 0x2e
02e5 0007       |    |		Action	Break_Optional
02e6 4800       |H   |		Short_Literal	0x0
02e7 e025       | %  |		Load	0x0,0x25
02e8 02a0       |    |		Declare_Subprogram	Null_Subprogram
02e9 038e       |    |		Declare_Type	Package,Defined
02ea 00b6       |    |		Action	Make_Scope
02eb 4801       |H   |		Short_Literal	0x1
02ec 00da       |    |		Load_Top	At_Offset_2
02ed 020e       |    |		Execute	Module,Augment_Imports
02ee 0387       |    |		Declare_Variable	Package
02ef 4800       |H   |		Short_Literal	0x0
02f0 e026       | &  |		Load	0x0,0x26
02f1 02a0       |    |		Declare_Subprogram	Null_Subprogram
02f2 038e       |    |		Declare_Type	Package,Defined
02f3 0387       |    |		Declare_Variable	Package
02f4 029d 0f5b  |   [|		Declare_Subprogram	INIT_0f58,For_Outer_Call
02f6 e027       | '  |		Load	0x0,0x27
02f7 e028       | (  |		Load	0x0,0x28
02f8 4811       |H   |		Short_Literal	0x11
02f9 e004       |    |		Load	0x0,0x4
02fa 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
02fb 00e1       |    |		Load_Encached	Boolean_Cache
02fc 1dd9       |    |		Execute_Immediate	Reference_Lex_1,0xd9
02fd e029       | )  |		Load	0x0,0x29
02fe 0387       |    |		Declare_Variable	Package
02ff 00d8       |    |		Load_Top	At_Offset_0
0300 020f       |    |		Execute	Module,Activate
0301 029d 0f73  |   s|		Declare_Subprogram	INIT_0f70,For_Outer_Call
0303 029d 0f8b  |    |		Declare_Subprogram	INIT_0f88,For_Outer_Call
0305 029d 0fa3  |    |		Declare_Subprogram	INIT_0fa0,For_Outer_Call
0307 1da6       |    |		Execute_Immediate	Reference_Lex_1,0xa6
0308 00c7       |    |		Action	Elaborate_Subprogram
0309 1da7       |    |		Execute_Immediate	Reference_Lex_1,0xa7
030a 00c7       |    |		Action	Elaborate_Subprogram
030b 1da8       |    |		Execute_Immediate	Reference_Lex_1,0xa8
030c 00c7       |    |		Action	Elaborate_Subprogram
030d e010       |    |		Load	0x0,0x10
030e 1dd0       |    |		Execute_Immediate	Reference_Lex_1,0xd0
030f e00f       |    |		Load	0x0,0xf
0310 1dc9       |    |		Execute_Immediate	Reference_Lex_1,0xc9
0311 e015       |    |		Load	0x0,0x15
0312 1dd2       |    |		Execute_Immediate	Reference_Lex_1,0xd2
0313 e02a       | *  |		Load	0x0,0x2a
0314 e005       |    |		Load	0x0,0x5
0315 e004       |    |		Load	0x0,0x4
0316 e009       |    |		Load	0x0,0x9
0317 480a       |H   |		Short_Literal	0xa
0318 e2d7       |    |		Load	0x1,0xd7
0319 020e       |    |		Execute	Module,Augment_Imports
031a e2d7       |    |		Load	0x1,0xd7
031b 020f       |    |		Execute	Module,Activate
031c e009       |    |		Load	0x0,0x9
031d e02b       | +  |		Load	0x0,0x2b
031e e02c       | ,  |		Load	0x0,0x2c
031f 00b6       |    |		Action	Make_Scope
0320 e002       |    |		Load	0x0,0x2
0321 e2c8       |    |		Load	0x1,0xc8
0322 1dd6       |    |		Execute_Immediate	Reference_Lex_1,0xd6
0323 e008       |    |		Load	0x0,0x8
0324 e2c4       |    |		Load	0x1,0xc4
0325 e004       |    |		Load	0x0,0x4
0326 e2d7       |    |		Load	0x1,0xd7
0327 e007       |    |		Load	0x0,0x7
0328 e006       |    |		Load	0x0,0x6
0329 e005       |    |		Load	0x0,0x5
032a e2c5       |    |		Load	0x1,0xc5
032b 1dd0       |    |		Execute_Immediate	Reference_Lex_1,0xd0
032c e00f       |    |		Load	0x0,0xf
032d e02d       | -  |		Load	0x0,0x2d
032e e2da       |    |		Load	0x1,0xda
032f 1ddb       |    |		Execute_Immediate	Reference_Lex_1,0xdb
0330 e2a9       |    |		Load	0x1,0xa9
0331 e2aa       |    |		Load	0x1,0xaa
0332 e2ab       |    |		Load	0x1,0xab
0333 1dac       |    |		Execute_Immediate	Reference_Lex_1,0xac
0334 1dad       |    |		Execute_Immediate	Reference_Lex_1,0xad
0335 a019       |    |		Store_Unchecked	0x0,0x19
0336 481a       |H   |		Short_Literal	0x1a
0337 e2d8       |    |		Load	0x1,0xd8
0338 020e       |    |		Execute	Module,Augment_Imports
0339 e2d8       |    |		Load	0x1,0xd8
033a 020f       |    |		Execute	Module,Activate
033b 1d62       | b  |		Execute_Immediate	Reference_Lex_1,0x62
033c 00c7       |    |		Action	Elaborate_Subprogram
033d 1d77       | w  |		Execute_Immediate	Reference_Lex_1,0x77
033e 00c7       |    |		Action	Elaborate_Subprogram
033f 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
0340 00c7       |    |		Action	Elaborate_Subprogram
0341 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
0342 00c7       |    |		Action	Elaborate_Subprogram
0343 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
0344 00c7       |    |		Action	Elaborate_Subprogram
0345 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
0346 00c7       |    |		Action	Elaborate_Subprogram
0347 1d88       |    |		Execute_Immediate	Reference_Lex_1,0x88
0348 00c7       |    |		Action	Elaborate_Subprogram
0349 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f
034a 00c7       |    |		Action	Elaborate_Subprogram
034b 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
034c 00c7       |    |		Action	Elaborate_Subprogram
034d 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
034e 00c7       |    |		Action	Elaborate_Subprogram
034f 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22
0350 00c7       |    |		Action	Elaborate_Subprogram
0351 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27
0352 00c7       |    |		Action	Elaborate_Subprogram
0353 1d76       | v  |		Execute_Immediate	Reference_Lex_1,0x76
0354 00c7       |    |		Action	Elaborate_Subprogram
0355 1d97       |    |		Execute_Immediate	Reference_Lex_1,0x97
0356 00c7       |    |		Action	Elaborate_Subprogram
0357 1d98       |    |		Execute_Immediate	Reference_Lex_1,0x98
0358 00c7       |    |		Action	Elaborate_Subprogram
0359 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29
035a 00c7       |    |		Action	Elaborate_Subprogram
035b 1d99       |    |		Execute_Immediate	Reference_Lex_1,0x99
035c 00c7       |    |		Action	Elaborate_Subprogram
035d 1d9a       |    |		Execute_Immediate	Reference_Lex_1,0x9a
035e 00c7       |    |		Action	Elaborate_Subprogram
035f 1d9b       |    |		Execute_Immediate	Reference_Lex_1,0x9b
0360 00c7       |    |		Action	Elaborate_Subprogram
0361 1d9c       |    |		Execute_Immediate	Reference_Lex_1,0x9c
0362 00c7       |    |		Action	Elaborate_Subprogram
0363 1d9d       |    |		Execute_Immediate	Reference_Lex_1,0x9d
0364 00c7       |    |		Action	Elaborate_Subprogram
0365 1d2b       | +  |		Execute_Immediate	Reference_Lex_1,0x2b
0366 00c7       |    |		Action	Elaborate_Subprogram
0367 1d2c       | ,  |		Execute_Immediate	Reference_Lex_1,0x2c
0368 00c7       |    |		Action	Elaborate_Subprogram
0369 1d2d       | -  |		Execute_Immediate	Reference_Lex_1,0x2d
036a 00c7       |    |		Action	Elaborate_Subprogram
036b 1d2e       | .  |		Execute_Immediate	Reference_Lex_1,0x2e
036c 00c7       |    |		Action	Elaborate_Subprogram
036d 1d2f       | /  |		Execute_Immediate	Reference_Lex_1,0x2f
036e 00c7       |    |		Action	Elaborate_Subprogram
036f 1d30       | 0  |		Execute_Immediate	Reference_Lex_1,0x30
0370 00c7       |    |		Action	Elaborate_Subprogram
0371 1d31       | 1  |		Execute_Immediate	Reference_Lex_1,0x31
0372 00c7       |    |		Action	Elaborate_Subprogram
0373 1d7a       | z  |		Execute_Immediate	Reference_Lex_1,0x7a
0374 00c7       |    |		Action	Elaborate_Subprogram
0375 1d33       | 3  |		Execute_Immediate	Reference_Lex_1,0x33
0376 00c7       |    |		Action	Elaborate_Subprogram
0377 1d34       | 4  |		Execute_Immediate	Reference_Lex_1,0x34
0378 00c7       |    |		Action	Elaborate_Subprogram
0379 1d35       | 5  |		Execute_Immediate	Reference_Lex_1,0x35
037a 00c7       |    |		Action	Elaborate_Subprogram
037b 1d36       | 6  |		Execute_Immediate	Reference_Lex_1,0x36
037c 00c7       |    |		Action	Elaborate_Subprogram
037d 1d37       | 7  |		Execute_Immediate	Reference_Lex_1,0x37
037e 00c7       |    |		Action	Elaborate_Subprogram
037f 1d39       | 9  |		Execute_Immediate	Reference_Lex_1,0x39
0380 00c7       |    |		Action	Elaborate_Subprogram
0381 1d3a       | :  |		Execute_Immediate	Reference_Lex_1,0x3a
0382 00c7       |    |		Action	Elaborate_Subprogram
0383 1d3b       | ;  |		Execute_Immediate	Reference_Lex_1,0x3b
0384 00c7       |    |		Action	Elaborate_Subprogram
0385 1d3c       | <  |		Execute_Immediate	Reference_Lex_1,0x3c
0386 00c7       |    |		Action	Elaborate_Subprogram
0387 029d 0fc3  |    |		Declare_Subprogram	INIT_0fc0,For_Outer_Call
0389 1d3f       | ?  |		Execute_Immediate	Reference_Lex_1,0x3f
038a 00c7       |    |		Action	Elaborate_Subprogram
038b 1d40       | @  |		Execute_Immediate	Reference_Lex_1,0x40
038c 00c7       |    |		Action	Elaborate_Subprogram
038d 1d42       | B  |		Execute_Immediate	Reference_Lex_1,0x42
038e 00c7       |    |		Action	Elaborate_Subprogram
038f 1d9f       |    |		Execute_Immediate	Reference_Lex_1,0x9f
0390 00c7       |    |		Action	Elaborate_Subprogram
0391 1d43       | C  |		Execute_Immediate	Reference_Lex_1,0x43
0392 00c7       |    |		Action	Elaborate_Subprogram
0393 1d44       | D  |		Execute_Immediate	Reference_Lex_1,0x44
0394 00c7       |    |		Action	Elaborate_Subprogram
0395 e02e       | .  |		Load	0x0,0x2e
0396 e02f       | /  |		Load	0x0,0x2f
0397 e014       |    |		Load	0x0,0x14
0398 e002       |    |		Load	0x0,0x2
0399 e030       | 0  |		Load	0x0,0x30
039a 00b6       |    |		Action	Make_Scope
039b e003       |    |		Load	0x0,0x3
039c e009       |    |		Load	0x0,0x9
039d e004       |    |		Load	0x0,0x4
039e e031       | 1  |		Load	0x0,0x31
039f 1da3       |    |		Execute_Immediate	Reference_Lex_1,0xa3
03a0 e005       |    |		Load	0x0,0x5
03a1 e015       |    |		Load	0x0,0x15
03a2 e007       |    |		Load	0x0,0x7
03a3 e006       |    |		Load	0x0,0x6
03a4 e008       |    |		Load	0x0,0x8
03a5 e032       | 2  |		Load	0x0,0x32
03a6 e010       |    |		Load	0x0,0x10
03a7 e022       | "  |		Load	0x0,0x22
03a8 e033       | 3  |		Load	0x0,0x33
03a9 e00f       |    |		Load	0x0,0xf
03aa e02d       | -  |		Load	0x0,0x2d
03ab 1dd0       |    |		Execute_Immediate	Reference_Lex_1,0xd0
03ac 4817       |H   |		Short_Literal	0x17
03ad e249       | I  |		Load	0x1,0x49
03ae 020e       |    |		Execute	Module,Augment_Imports
03af e249       | I  |		Load	0x1,0x49
03b0 020f       |    |		Execute	Module,Activate
03b1 1d7b       | {  |		Execute_Immediate	Reference_Lex_1,0x7b
03b2 00c7       |    |		Action	Elaborate_Subprogram
03b3 1d7c       | |  |		Execute_Immediate	Reference_Lex_1,0x7c
03b4 00c7       |    |		Action	Elaborate_Subprogram
03b5 1d7d       | }  |		Execute_Immediate	Reference_Lex_1,0x7d
03b6 00c7       |    |		Action	Elaborate_Subprogram
03b7 1d7e       | ~  |		Execute_Immediate	Reference_Lex_1,0x7e
03b8 00c7       |    |		Action	Elaborate_Subprogram
03b9 1d7f       |    |		Execute_Immediate	Reference_Lex_1,0x7f
03ba 00c7       |    |		Action	Elaborate_Subprogram
03bb 1d80       |    |		Execute_Immediate	Reference_Lex_1,0x80
03bc 00c7       |    |		Action	Elaborate_Subprogram
03bd 1d81       |    |		Execute_Immediate	Reference_Lex_1,0x81
03be 00c7       |    |		Action	Elaborate_Subprogram
03bf 1d82       |    |		Execute_Immediate	Reference_Lex_1,0x82
03c0 00c7       |    |		Action	Elaborate_Subprogram
03c1 1d6e       | n  |		Execute_Immediate	Reference_Lex_1,0x6e
03c2 00c7       |    |		Action	Elaborate_Subprogram
03c3 1d86       |    |		Execute_Immediate	Reference_Lex_1,0x86
03c4 00c7       |    |		Action	Elaborate_Subprogram
03c5 1d87       |    |		Execute_Immediate	Reference_Lex_1,0x87
03c6 00c7       |    |		Action	Elaborate_Subprogram
03c7 1d79       | y  |		Execute_Immediate	Reference_Lex_1,0x79
03c8 00c7       |    |		Action	Elaborate_Subprogram
03c9 e034       | 4  |		Load	0x0,0x34
03ca e035       | 5  |		Load	0x0,0x35
03cb e005       |    |		Load	0x0,0x5
03cc e036       | 6  |		Load	0x0,0x36
03cd 00b6       |    |		Action	Make_Scope
03ce 1dd0       |    |		Execute_Immediate	Reference_Lex_1,0xd0
03cf e00f       |    |		Load	0x0,0xf
03d0 e2d7       |    |		Load	0x1,0xd7
03d1 4808       |H   |		Short_Literal	0x8
03d2 e29e       |    |		Load	0x1,0x9e
03d3 020e       |    |		Execute	Module,Augment_Imports
03d4 e29e       |    |		Load	0x1,0x9e
03d5 020f       |    |		Execute	Module,Activate
03d6			BODY_0008:
03d6 00be       |    |		Action	Activate_Tasks
03d7 00bc       |    |		Action	Signal_Activated
03d8 00bb       |    |		Action	Signal_Completion
03d9 0000 0000  |    |		.BLANK	0000[0x7]
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 03e3       |    |		.CONST	0x03e3								; Address of begin
03e1 0004       |    |		.CONST	0x0004								; Address of exception handler
03e2 0001       |    |		.CONST	0x0001								; Number of locals
03e3			BODY_03e0:
03e3			INIT_03e0:
03e3 4607       |F   |		Jump_Case	0x8
03e4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
03e5 7806       |x   |		Jump	0x3ec								; case 0x1
03e6 7809       |x   |		Jump	0x3f0								; case 0x2
03e7 780d       |x   |		Jump	0x3f5								; case 0x3
03e8 7810       |x   |		Jump	0x3f9								; case 0x4
03e9 7811       |x   |		Jump	0x3fb								; case 0x5
03ea 7812       |x   |		Jump	0x3fd								; case 0x6
03eb 7815       |x   |		Jump	0x401								; case 0x7
03ec 00da       |    |		Load_Top	At_Offset_2
03ed 0091 11cf  |    |		Action	Push_String_Extended_Indexed,0x11cf				; "NIL"
03ef 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
03f0 00db       |    |		Load_Top	At_Offset_3
03f1 00db       |    |		Load_Top	At_Offset_3
03f2 00e0       |    |		Load_Encached	Standard_Cache
03f3 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
03f4 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
03f5 00da       |    |		Load_Top	At_Offset_2
03f6 00e0       |    |		Load_Encached	Standard_Cache
03f7 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
03f8 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
03f9 00db       |    |		Load_Top	At_Offset_3
03fa 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
03fb 00db       |    |		Load_Top	At_Offset_3
03fc 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
03fd e278       | x  |		Load	0x1,0x78
03fe 00dc       |    |		Load_Top	At_Offset_4
03ff 0267       | g  |		Execute	Discrete,Predecessor
0400 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0401 e278       | x  |		Load	0x1,0x78
0402 00dc       |    |		Load_Top	At_Offset_4
0403 0268       | h  |		Execute	Discrete,Successor
0404 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0405 0000 0000  |    |		.XXX[0x3]
0407 0000       |    |
0408 ; --------------------------------------------------------------------------------------
0408 ; SUBPROGRAM
0408 ; --------------------------------------------------------------------------------------
0408 040b       |    |		.CONST	0x040b								; Address of begin
0409 0004       |    |		.CONST	0x0004								; Address of exception handler
040a 0001       |    |		.CONST	0x0001								; Number of locals
040b			BODY_0408:
040b			INIT_0408:
040b e2ca       |    |		Load	0x1,0xca
040c 00db       |    |		Load_Top	At_Offset_3
040d e2a4       |    |		Load	0x1,0xa4
040e 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
040f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0410 ; --------------------------------------------------------------------------------------
0410 ; SUBPROGRAM
0410 ; --------------------------------------------------------------------------------------
0410 041e       |    |		.CONST	0x041e								; Address of begin
0411 0554       | T  |		.CONST	0x0554								; Address of exception handler
0412 0003       |    |		.CONST	0x0003								; Number of locals
0413			INIT_0410:
0413 00db       |    |		Load_Top	At_Offset_3
0414 e004       |    |		Load	0x0,0x4
0415 1872       | r  |		Execute	Package,Field_Execute,Field_Number 0x72
0416 e004       |    |		Load	0x0,0x4
0417 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
0418 e2d2       |    |		Load	0x1,0xd2
0419 e004       |    |		Load	0x0,0x4
041a 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
041b 012f       | /  |		Execute	Any,Equal
041c 029f 0fdb  |    |		Declare_Subprogram	INIT_0fd8,For_Call
041e			BODY_0410:
041e e2c9       |    |		Load	0x1,0xc9
041f e010       |    |		Load	0x0,0x10
0420 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0421 c2c9       |    |		Store	0x1,0xc9
0422 e5ff       |    |		Load	0x2,-0x1
0423 c2cd       |    |		Store	0x1,0xcd
0424 4800       |H   |		Short_Literal	0x0
0425 4800       |H   |		Short_Literal	0x0
0426 4802       |H   |		Short_Literal	0x2
0427 0092 11ec  |    |		Action	Push_String_Extended,0x11ec					; "Establishing context for "
0429 e2cd       |    |		Load	0x1,0xcd
042a e022       | "  |		Load	0x0,0x22
042b 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
042c 01cc       |    |		Execute	Vector,Catenate
042d 0092 11ed  |    |		Action	Push_String_Extended,0x11ed					; " document generation"
042f 01cc       |    |		Execute	Vector,Catenate
0430 8218       |    |		Call	0x1,0x18
0431 8247       | G  |		Call	0x1,0x47
0432 00d9       |    |		Load_Top	At_Offset_1
0433 680d       |h   |		Jump_Zero	0x441
0434 4800       |H   |		Short_Literal	0x0
0435 4800       |H   |		Short_Literal	0x0
0436 4802       |H   |		Short_Literal	0x2
0437 0092 11ee  |    |		Action	Push_String_Extended,0x11ee					; "Document generation has already been initialized for "
0439 e2d1       |    |		Load	0x1,0xd1
043a e037       | 7  |		Load	0x0,0x37
043b 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
043c 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
043d 01cc       |    |		Execute	Vector,Catenate
043e 8218       |    |		Call	0x1,0x18
043f 8247       | G  |		Call	0x1,0x47
0440 7853       |xS  |		Jump	0x494
0441 e5fe       |    |		Load	0x2,-0x2
0442 e004       |    |		Load	0x0,0x4
0443 1872       | r  |		Execute	Package,Field_Execute,Field_Number 0x72
0444 c2d2       |    |		Store	0x1,0xd2
0445 e5fe       |    |		Load	0x2,-0x2
0446 e004       |    |		Load	0x0,0x4
0447 186b       | k  |		Execute	Package,Field_Execute,Field_Number 0x6b
0448 c2d1       |    |		Store	0x1,0xd1
0449 e2d1       |    |		Load	0x1,0xd1
044a e037       | 7  |		Load	0x0,0x37
044b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
044c 1834       | 4  |		Execute	Package,Field_Execute,Field_Number 0x34
044d 6817       |h   |		Jump_Zero	0x465
044e 4800       |H   |		Short_Literal	0x0
044f 4800       |H   |		Short_Literal	0x0
0450 4807       |H   |		Short_Literal	0x7
0451 4829       |H)  |		Short_Literal	0x29
0452 0092 11ef  |    |		Action	Push_String_Extended,0x11ef					; "Unable to obtain view for \x22"
0454 e2d2       |    |		Load	0x1,0xd2
0455 e004       |    |		Load	0x0,0x4
0456 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0457 01cc       |    |		Execute	Vector,Catenate
0458 0092 11f0  |    |		Action	Push_String_Extended,0x11f0					; "\x22 ("
045a 01cc       |    |		Execute	Vector,Catenate
045b e2d1       |    |		Load	0x1,0xd1
045c e037       | 7  |		Load	0x0,0x37
045d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
045e 183a       | :  |		Execute	Package,Field_Execute,Field_Number 0x3a
045f 01cc       |    |		Execute	Vector,Catenate
0460 01cb       |    |		Execute	Vector,Append
0461 8218       |    |		Call	0x1,0x18
0462 8247       | G  |		Call	0x1,0x47
0463 e216       |    |		Load	0x1,0x16
0464 0257       | W  |		Execute	Discrete,Raise
0465 e2c9       |    |		Load	0x1,0xc9
0466 e28a       |    |		Load	0x1,0x8a
0467 e5fe       |    |		Load	0x2,-0x2
0468 e004       |    |		Load	0x0,0x4
0469 186c       | l  |		Execute	Package,Field_Execute,Field_Number 0x6c
046a c28a       |    |		Store	0x1,0x8a
046b c2c9       |    |		Store	0x1,0xc9
046c e2c9       |    |		Load	0x1,0xc9
046d 4801       |H   |		Short_Literal	0x1
046e 4807       |H   |		Short_Literal	0x7
046f 0092 11f1  |    |		Action	Push_String_Extended,0x11f1					; "Errors were detected by component analysis while visiting the view closure of "
0471 e2d1       |    |		Load	0x1,0xd1
0472 e037       | 7  |		Load	0x0,0x37
0473 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0474 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0475 01cc       |    |		Execute	Vector,Catenate
0476 e2d7       |    |		Load	0x1,0xd7
0477 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0478 c2c9       |    |		Store	0x1,0xc9
0479 4802       |H   |		Short_Literal	0x2
047a e21d       |    |		Load	0x1,0x1d
047b 1c08       |    |		Execute_Immediate	Run_Utility,0x8
047c e2d2       |    |		Load	0x1,0xd2
047d e21d       |    |		Load	0x1,0x1d
047e 2303       |#   |		Execute	Variant_Record,Field_Type,Field_Number 0x3
047f 0119       |    |		Execute	Any,Check_In_Formal_Type
0480 00d9       |    |		Load_Top	At_Offset_1
0481 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
0482 e2d4       |    |		Load	0x1,0xd4
0483 016d       | m  |		Execute	Variant_Record,Structure_Write
0484 e28a       |    |		Load	0x1,0x8a
0485 e004       |    |		Load	0x0,0x4
0486 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0487 c2d3       |    |		Store	0x1,0xd3
0488 4802       |H   |		Short_Literal	0x2
0489 e21d       |    |		Load	0x1,0x1d
048a 1c08       |    |		Execute_Immediate	Run_Utility,0x8
048b e2d3       |    |		Load	0x1,0xd3
048c e21d       |    |		Load	0x1,0x1d
048d 2303       |#   |		Execute	Variant_Record,Field_Type,Field_Number 0x3
048e 0119       |    |		Execute	Any,Check_In_Formal_Type
048f 00d9       |    |		Load_Top	At_Offset_1
0490 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
0491 e2d5       |    |		Load	0x1,0xd5
0492 016d       | m  |		Execute	Variant_Record,Structure_Write
0493 8403       |    |		Call	0x2,0x3
0494 e2c9       |    |		Load	0x1,0xc9
0495 e2d0       |    |		Load	0x1,0xd0
0496 4801       |H   |		Short_Literal	0x1
0497 4801       |H   |		Short_Literal	0x1
0498 e2cd       |    |		Load	0x1,0xcd
0499 e022       | "  |		Load	0x0,0x22
049a 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
049b e00f       |    |		Load	0x0,0xf
049c 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
049d c2d0       |    |		Store	0x1,0xd0
049e c2c9       |    |		Store	0x1,0xc9
049f e2c9       |    |		Load	0x1,0xc9
04a0 4801       |H   |		Short_Literal	0x1
04a1 4807       |H   |		Short_Literal	0x7
04a2 482e       |H.  |		Short_Literal	0x2e
04a3 0092 11f2  |    |		Action	Push_String_Extended,0x11f2					; "Unable to create abstract document "
04a5 e2cd       |    |		Load	0x1,0xcd
04a6 e022       | "  |		Load	0x0,0x22
04a7 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
04a8 01cc       |    |		Execute	Vector,Catenate
04a9 01cb       |    |		Execute	Vector,Append
04aa e2d7       |    |		Load	0x1,0xd7
04ab 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
04ac c2c9       |    |		Store	0x1,0xc9
04ad e2c9       |    |		Load	0x1,0xc9
04ae e2ca       |    |		Load	0x1,0xca
04af e2a5       |    |		Load	0x1,0xa5
04b0 e5fd       |    |		Load	0x2,-0x3
04b1 e021       | !  |		Load	0x0,0x21
04b2 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
04b3 e2d0       |    |		Load	0x1,0xd0
04b4 e2a4       |    |		Load	0x1,0xa4
04b5 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
04b6 00d1       |    |		Pop_Control	Pop_Count_1
04b7 c2c9       |    |		Store	0x1,0xc9
04b8 4801       |H   |		Short_Literal	0x1
04b9 e2c9       |    |		Load	0x1,0xc9
04ba e010       |    |		Load	0x0,0x10
04bb 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
04bc 6812       |h   |		Jump_Zero	0x4cf
04bd e010       |    |		Load	0x0,0x10
04be 1b2a       | *  |		Execute	Package,Field_Read,Field_Number 0x2a
04bf e2c9       |    |		Load	0x1,0xc9
04c0 e010       |    |		Load	0x0,0x10
04c1 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
04c2 700c       |p   |		Jump_Nonzero	0x4cf
04c3 e2c9       |    |		Load	0x1,0xc9
04c4 4801       |H   |		Short_Literal	0x1
04c5 4807       |H   |		Short_Literal	0x7
04c6 0092 11f3  |    |		Action	Push_String_Extended,0x11f3					; "Errors were detected during format initialization of document "
04c8 e2d0       |    |		Load	0x1,0xd0
04c9 e00f       |    |		Load	0x0,0xf
04ca 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
04cb 01cc       |    |		Execute	Vector,Catenate
04cc e2d7       |    |		Load	0x1,0xd7
04cd 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
04ce c2c9       |    |		Store	0x1,0xc9
04cf 00d9       |    |		Load_Top	At_Offset_1
04d0 706e       |pn  |		Jump_Nonzero	0x53f
04d1 4800       |H   |		Short_Literal	0x0
04d2 4800       |H   |		Short_Literal	0x0
04d3 4802       |H   |		Short_Literal	0x2
04d4 0092 11f4  |    |		Action	Push_String_Extended,0x11f4					; "Initializing document generator for "
04d6 e2d1       |    |		Load	0x1,0xd1
04d7 e037       | 7  |		Load	0x0,0x37
04d8 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
04d9 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
04da 01cc       |    |		Execute	Vector,Catenate
04db 8218       |    |		Call	0x1,0x18
04dc 8247       | G  |		Call	0x1,0x47
04dd e2c9       |    |		Load	0x1,0xc9
04de e289       |    |		Load	0x1,0x89
04df e5fd       |    |		Load	0x2,-0x3
04e0 e021       | !  |		Load	0x0,0x21
04e1 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
04e2 e2d1       |    |		Load	0x1,0xd1
04e3 82dc       |    |		Call	0x1,0xdc
04e4 e003       |    |		Load	0x0,0x3
04e5 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
04e6 c289       |    |		Store	0x1,0x89
04e7 c2c9       |    |		Store	0x1,0xc9
04e8 4801       |H   |		Short_Literal	0x1
04e9 e2c9       |    |		Load	0x1,0xc9
04ea e010       |    |		Load	0x0,0x10
04eb 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
04ec 680e       |h   |		Jump_Zero	0x4fb
04ed e010       |    |		Load	0x0,0x10
04ee 1b2a       | *  |		Execute	Package,Field_Read,Field_Number 0x2a
04ef e2c9       |    |		Load	0x1,0xc9
04f0 e010       |    |		Load	0x0,0x10
04f1 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
04f2 7008       |p   |		Jump_Nonzero	0x4fb
04f3 e2c9       |    |		Load	0x1,0xc9
04f4 4801       |H   |		Short_Literal	0x1
04f5 4807       |H   |		Short_Literal	0x7
04f6 0092 11f5  |    |		Action	Push_String_Extended,0x11f5					; "Errors were detected during acronym initialization"
04f8 e2d7       |    |		Load	0x1,0xd7
04f9 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
04fa c2c9       |    |		Store	0x1,0xc9
04fb e2c9       |    |		Load	0x1,0xc9
04fc e28b       |    |		Load	0x1,0x8b
04fd e28a       |    |		Load	0x1,0x8a
04fe e005       |    |		Load	0x0,0x5
04ff 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0500 c28b       |    |		Store	0x1,0x8b
0501 c2c9       |    |		Store	0x1,0xc9
0502 e2c9       |    |		Load	0x1,0xc9
0503 4801       |H   |		Short_Literal	0x1
0504 4807       |H   |		Short_Literal	0x7
0505 0092 11f6  |    |		Action	Push_String_Extended,0x11f6					; "Errors were detected during requirement analysis"
0507 e2d7       |    |		Load	0x1,0xd7
0508 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0509 c2c9       |    |		Store	0x1,0xc9
050a e2c9       |    |		Load	0x1,0xc9
050b e28c       |    |		Load	0x1,0x8c
050c e28a       |    |		Load	0x1,0x8a
050d e006       |    |		Load	0x0,0x6
050e 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
050f c28c       |    |		Store	0x1,0x8c
0510 c2c9       |    |		Store	0x1,0xc9
0511 e2c9       |    |		Load	0x1,0xc9
0512 4800       |H   |		Short_Literal	0x0
0513 4807       |H   |		Short_Literal	0x7
0514 0092 11f7  |    |		Action	Push_String_Extended,0x11f7					; "An error was detected while initializing IOs."
0516 e2d7       |    |		Load	0x1,0xd7
0517 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0518 c2c9       |    |		Store	0x1,0xc9
0519 e2c9       |    |		Load	0x1,0xc9
051a e28d       |    |		Load	0x1,0x8d
051b e28a       |    |		Load	0x1,0x8a
051c e007       |    |		Load	0x0,0x7
051d 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
051e c28d       |    |		Store	0x1,0x8d
051f c2c9       |    |		Store	0x1,0xc9
0520 e2c9       |    |		Load	0x1,0xc9
0521 4800       |H   |		Short_Literal	0x0
0522 4807       |H   |		Short_Literal	0x7
0523 0092 11f8  |    |		Action	Push_String_Extended,0x11f8					; "An error was detected while initializing Data."
0525 e2d7       |    |		Load	0x1,0xd7
0526 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0527 c2c9       |    |		Store	0x1,0xc9
0528 e2c9       |    |		Load	0x1,0xc9
0529 e28e       |    |		Load	0x1,0x8e
052a e28a       |    |		Load	0x1,0x8a
052b e008       |    |		Load	0x0,0x8
052c 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
052d c28e       |    |		Store	0x1,0x8e
052e c2c9       |    |		Store	0x1,0xc9
052f e2c9       |    |		Load	0x1,0xc9
0530 4800       |H   |		Short_Literal	0x0
0531 4807       |H   |		Short_Literal	0x7
0532 0092 11f9  |    |		Action	Push_String_Extended,0x11f9					; "An error was detected while initializing Interrupts."
0534 e2d7       |    |		Load	0x1,0xd7
0535 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0536 c2c9       |    |		Store	0x1,0xc9
0537 e5fd       |    |		Load	0x2,-0x3
0538 e021       | !  |		Load	0x0,0x21
0539 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
053a a2cb       |    |		Store_Unchecked	0x1,0xcb
053b e5fd       |    |		Load	0x2,-0x3
053c e021       | !  |		Load	0x0,0x21
053d 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
053e a2cc       |    |		Store_Unchecked	0x1,0xcc
053f e2d8       |    |		Load	0x1,0xd8
0540 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0541 4800       |H   |		Short_Literal	0x0
0542 4800       |H   |		Short_Literal	0x0
0543 4802       |H   |		Short_Literal	0x2
0544 0092 11fa  |    |		Action	Push_String_Extended,0x11fa					; "Creating Abstract Document for \x22"
0546 e2cd       |    |		Load	0x1,0xcd
0547 e022       | "  |		Load	0x0,0x22
0548 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0549 01cc       |    |		Execute	Vector,Catenate
054a 0092 11fb  |    |		Action	Push_String_Extended,0x11fb					; "\x22 in "
054c 01cc       |    |		Execute	Vector,Catenate
054d e2cd       |    |		Load	0x1,0xcd
054e e022       | "  |		Load	0x0,0x22
054f 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0550 01cc       |    |		Execute	Vector,Catenate
0551 8218       |    |		Call	0x1,0x18
0552 8247       | G  |		Call	0x1,0x47
0553 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0554			TRAP_0410:
0554 e216       |    |		Load	0x1,0x16
0555 010f       |    |		Execute	Exception,Equal
0556 6802       |h   |		Jump_Zero	0x559
0557 00d8       |    |		Load_Top	At_Offset_0
0558 0101       |    |		Execute	Exception,Reraise
0559 4800       |H   |		Short_Literal	0x0
055a 4800       |H   |		Short_Literal	0x0
055b 4807       |H   |		Short_Literal	0x7
055c 0092 11fc  |    |		Action	Push_String_Extended,0x11fc					; "Unexpected exception in Start."
055e 8218       |    |		Call	0x1,0x18
055f 8245       | E  |		Call	0x1,0x45
0560 e2d7       |    |		Load	0x1,0xd7
0561 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0562 e216       |    |		Load	0x1,0x16
0563 0257       | W  |		Execute	Discrete,Raise
0564 0000 0000  |    |		.BLANK	0000[0x4]
0568 ; --------------------------------------------------------------------------------------
0568 ; SUBPROGRAM
0568 ; --------------------------------------------------------------------------------------
0568 056b       | k  |		.CONST	0x056b								; Address of begin
0569 057c       | |  |		.CONST	0x057c								; Address of exception handler
056a 0001       |    |		.CONST	0x0001								; Number of locals
056b			BODY_0568:
056b			INIT_0568:
056b 4800       |H   |		Short_Literal	0x0
056c 4800       |H   |		Short_Literal	0x0
056d 4801       |H   |		Short_Literal	0x1
056e 0092 11fd  |    |		Action	Push_String_Extended,0x11fd					; "Finish called."
0570 8218       |    |		Call	0x1,0x18
0571 8248       | H  |		Call	0x1,0x48
0572 e2d7       |    |		Load	0x1,0xd7
0573 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0574 4800       |H   |		Short_Literal	0x0
0575 4800       |H   |		Short_Literal	0x0
0576 4802       |H   |		Short_Literal	0x2
0577 0092 11fe  |    |		Action	Push_String_Extended,0x11fe					; "Document generated. Terminating."
0579 8218       |    |		Call	0x1,0x18
057a 8247       | G  |		Call	0x1,0x47
057b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
057c			TRAP_0568:
057c 0007       |    |		Action	Break_Optional
057d 4800       |H   |		Short_Literal	0x0
057e 4800       |H   |		Short_Literal	0x0
057f 4807       |H   |		Short_Literal	0x7
0580 0092 11ff  |    |		Action	Push_String_Extended,0x11ff					; "Unexpected exception in Finish."
0582 8218       |    |		Call	0x1,0x18
0583 8245       | E  |		Call	0x1,0x45
0584 e2d7       |    |		Load	0x1,0xd7
0585 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0586 e216       |    |		Load	0x1,0x16
0587 0257       | W  |		Execute	Discrete,Raise
0588 ; --------------------------------------------------------------------------------------
0588 ; SUBPROGRAM
0588 ; --------------------------------------------------------------------------------------
0588 058b       |    |		.CONST	0x058b								; Address of begin
0589 0004       |    |		.CONST	0x0004								; Address of exception handler
058a 0001       |    |		.CONST	0x0001								; Number of locals
058b			BODY_0588:
058b			INIT_0588:
058b e2c9       |    |		Load	0x1,0xc9
058c 00d8       |    |		Load_Top	At_Offset_0
058d 0120       |    |		Execute	Any,Is_Value
058e 7002       |p   |		Jump_Nonzero	0x591
058f 00d8       |    |		Load_Top	At_Offset_0
0590 011e       |    |		Execute	Any,Convert
0591 00ca       |    |		Action	Exit_Nullary_Function
0592 0000 0000  |    |		.BLANK	0000[0x6]
0598 ; --------------------------------------------------------------------------------------
0598 ; SUBPROGRAM
0598 ; --------------------------------------------------------------------------------------
0598 059b       |    |		.CONST	0x059b								; Address of begin
0599 0004       |    |		.CONST	0x0004								; Address of exception handler
059a 0001       |    |		.CONST	0x0001								; Number of locals
059b			BODY_0598:
059b			INIT_0598:
059b e2d1       |    |		Load	0x1,0xd1
059c e037       | 7  |		Load	0x0,0x37
059d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
059e 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
059f 00ca       |    |		Action	Exit_Nullary_Function
05a0 ; --------------------------------------------------------------------------------------
05a0 ; SUBPROGRAM
05a0 ; --------------------------------------------------------------------------------------
05a0 05a3       |    |		.CONST	0x05a3								; Address of begin
05a1 0004       |    |		.CONST	0x0004								; Address of exception handler
05a2 0001       |    |		.CONST	0x0001								; Number of locals
05a3			BODY_05a0:
05a3			INIT_05a0:
05a3 e2cd       |    |		Load	0x1,0xcd
05a4 e022       | "  |		Load	0x0,0x22
05a5 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
05a6 00ca       |    |		Action	Exit_Nullary_Function
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 e2d0       |    |		Load	0x1,0xd0
05ac 00d8       |    |		Load_Top	At_Offset_0
05ad 0120       |    |		Execute	Any,Is_Value
05ae 7002       |p   |		Jump_Nonzero	0x5b1
05af 00d8       |    |		Load_Top	At_Offset_0
05b0 011e       |    |		Execute	Any,Convert
05b1 00ca       |    |		Action	Exit_Nullary_Function
05b2 0000 0000  |    |		.BLANK	0000[0x6]
05b8 ; --------------------------------------------------------------------------------------
05b8 ; SUBPROGRAM
05b8 ; --------------------------------------------------------------------------------------
05b8 05bb       |    |		.CONST	0x05bb								; Address of begin
05b9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ba 0001       |    |		.CONST	0x0001								; Number of locals
05bb			BODY_05b8:
05bb			INIT_05b8:
05bb e28b       |    |		Load	0x1,0x8b
05bc 00d8       |    |		Load_Top	At_Offset_0
05bd 0120       |    |		Execute	Any,Is_Value
05be 7002       |p   |		Jump_Nonzero	0x5c1
05bf 00d8       |    |		Load_Top	At_Offset_0
05c0 011e       |    |		Execute	Any,Convert
05c1 00ca       |    |		Action	Exit_Nullary_Function
05c2 0000 0000  |    |		.BLANK	0000[0x6]
05c8 ; --------------------------------------------------------------------------------------
05c8 ; SUBPROGRAM
05c8 ; --------------------------------------------------------------------------------------
05c8 05cb       |    |		.CONST	0x05cb								; Address of begin
05c9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ca 0001       |    |		.CONST	0x0001								; Number of locals
05cb			BODY_05c8:
05cb			INIT_05c8:
05cb 4607       |F   |		Jump_Case	0x8
05cc 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
05cd 7806       |x   |		Jump	0x5d4								; case 0x1
05ce 7809       |x   |		Jump	0x5d8								; case 0x2
05cf 780d       |x   |		Jump	0x5dd								; case 0x3
05d0 7810       |x   |		Jump	0x5e1								; case 0x4
05d1 7811       |x   |		Jump	0x5e3								; case 0x5
05d2 7812       |x   |		Jump	0x5e5								; case 0x6
05d3 7815       |x   |		Jump	0x5e9								; case 0x7
05d4 00da       |    |		Load_Top	At_Offset_2
05d5 0091 11e1  |    |		Action	Push_String_Extended_Indexed,0x11e1				; "NIL"
05d7 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
05d8 00db       |    |		Load_Top	At_Offset_3
05d9 00db       |    |		Load_Top	At_Offset_3
05da 00e0       |    |		Load_Encached	Standard_Cache
05db 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
05dc 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
05dd 00da       |    |		Load_Top	At_Offset_2
05de 00e0       |    |		Load_Encached	Standard_Cache
05df 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
05e0 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
05e1 00db       |    |		Load_Top	At_Offset_3
05e2 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
05e3 00db       |    |		Load_Top	At_Offset_3
05e4 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
05e5 e21c       |    |		Load	0x1,0x1c
05e6 00dc       |    |		Load_Top	At_Offset_4
05e7 0267       | g  |		Execute	Discrete,Predecessor
05e8 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
05e9 e21c       |    |		Load	0x1,0x1c
05ea 00dc       |    |		Load_Top	At_Offset_4
05eb 0268       | h  |		Execute	Discrete,Successor
05ec 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
05ed 0000 0000  |    |		.XXX[0x3]
05ef 0000       |    |
05f0 ; --------------------------------------------------------------------------------------
05f0 ; SUBPROGRAM
05f0 ; --------------------------------------------------------------------------------------
05f0 05f3       |    |		.CONST	0x05f3								; Address of begin
05f1 0004       |    |		.CONST	0x0004								; Address of exception handler
05f2 0001       |    |		.CONST	0x0001								; Number of locals
05f3			BODY_05f0:
05f3			INIT_05f0:
05f3 00da       |    |		Load_Top	At_Offset_2
05f4 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
05f5 4606       |F   |		Jump_Case	0x7
05f6 780c       |x   |		Jump	0x603								; case 0x0
05f7 780e       |x   |		Jump	0x606								; case 0x1
05f8 7813       |x   |		Jump	0x60c								; case 0x2
05f9 7818       |x   |		Jump	0x612								; case 0x3
05fa 7823       |x#  |		Jump	0x61e								; case 0x4
05fb 781c       |x   |		Jump	0x618								; case 0x5
05fc 7800       |x   |		Jump	0x5fd								; case 0x6
05fd 00db       |    |		Load_Top	At_Offset_3
05fe 00db       |    |		Load_Top	At_Offset_3
05ff 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
0600 e249       | I  |		Load	0x1,0x49
0601 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0602 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0603 0092 1200  |    |		Action	Push_String_Extended,0x1200					; "<NIL LIST ITEM>"
0605 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0606 00db       |    |		Load_Top	At_Offset_3
0607 00db       |    |		Load_Top	At_Offset_3
0608 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
0609 e249       | I  |		Load	0x1,0x49
060a 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
060b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
060c 00db       |    |		Load_Top	At_Offset_3
060d 00db       |    |		Load_Top	At_Offset_3
060e 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
060f e249       | I  |		Load	0x1,0x49
0610 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0611 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0612 00db       |    |		Load_Top	At_Offset_3
0613 00db       |    |		Load_Top	At_Offset_3
0614 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0615 e249       | I  |		Load	0x1,0x49
0616 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0617 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0618 00db       |    |		Load_Top	At_Offset_3
0619 00db       |    |		Load_Top	At_Offset_3
061a 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
061b e249       | I  |		Load	0x1,0x49
061c 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
061d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
061e 00db       |    |		Load_Top	At_Offset_3
061f 00db       |    |		Load_Top	At_Offset_3
0620 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
0621 e249       | I  |		Load	0x1,0x49
0622 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0623 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0624 0000 0000  |    |		.BLANK	0000[0x4]
0628 ; --------------------------------------------------------------------------------------
0628 ; SUBPROGRAM
0628 ; --------------------------------------------------------------------------------------
0628 062b       | +  |		.CONST	0x062b								; Address of begin
0629 0004       |    |		.CONST	0x0004								; Address of exception handler
062a 0001       |    |		.CONST	0x0001								; Number of locals
062b			BODY_0628:
062b			INIT_0628:
062b 00da       |    |		Load_Top	At_Offset_2
062c 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
062d 4606       |F   |		Jump_Case	0x7
062e 780c       |x   |		Jump	0x63b								; case 0x0
062f 780e       |x   |		Jump	0x63e								; case 0x1
0630 7813       |x   |		Jump	0x644								; case 0x2
0631 7818       |x   |		Jump	0x64a								; case 0x3
0632 7823       |x#  |		Jump	0x656								; case 0x4
0633 781c       |x   |		Jump	0x650								; case 0x5
0634 7800       |x   |		Jump	0x635								; case 0x6
0635 00db       |    |		Load_Top	At_Offset_3
0636 00db       |    |		Load_Top	At_Offset_3
0637 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
0638 e249       | I  |		Load	0x1,0x49
0639 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
063a 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
063b 0092 1200  |    |		Action	Push_String_Extended,0x1200					; "<NIL LIST ITEM>"
063d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
063e 00db       |    |		Load_Top	At_Offset_3
063f 00db       |    |		Load_Top	At_Offset_3
0640 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
0641 e249       | I  |		Load	0x1,0x49
0642 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0643 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0644 00db       |    |		Load_Top	At_Offset_3
0645 00db       |    |		Load_Top	At_Offset_3
0646 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0647 e249       | I  |		Load	0x1,0x49
0648 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0649 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
064a 00db       |    |		Load_Top	At_Offset_3
064b 00db       |    |		Load_Top	At_Offset_3
064c 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
064d e249       | I  |		Load	0x1,0x49
064e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
064f 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0650 00db       |    |		Load_Top	At_Offset_3
0651 00db       |    |		Load_Top	At_Offset_3
0652 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
0653 e249       | I  |		Load	0x1,0x49
0654 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0655 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0656 00db       |    |		Load_Top	At_Offset_3
0657 00db       |    |		Load_Top	At_Offset_3
0658 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
0659 e249       | I  |		Load	0x1,0x49
065a 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
065b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
065c 0000 0000  |    |		.BLANK	0000[0x4]
0660 ; --------------------------------------------------------------------------------------
0660 ; SUBPROGRAM
0660 ; --------------------------------------------------------------------------------------
0660 0663       | c  |		.CONST	0x0663								; Address of begin
0661 0004       |    |		.CONST	0x0004								; Address of exception handler
0662 0001       |    |		.CONST	0x0001								; Number of locals
0663			BODY_0660:
0663			INIT_0660:
0663 00da       |    |		Load_Top	At_Offset_2
0664 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0665 4606       |F   |		Jump_Case	0x7
0666 780d       |x   |		Jump	0x674								; case 0x0
0667 780f       |x   |		Jump	0x677								; case 0x1
0668 7815       |x   |		Jump	0x67e								; case 0x2
0669 781b       |x   |		Jump	0x685								; case 0x3
066a 7828       |x(  |		Jump	0x693								; case 0x4
066b 7820       |x   |		Jump	0x68c								; case 0x5
066c 7800       |x   |		Jump	0x66d								; case 0x6
066d e5fd       |    |		Load	0x2,-0x3
066e e5fe       |    |		Load	0x2,-0x2
066f e5ff       |    |		Load	0x2,-0x1
0670 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
0671 e249       | I  |		Load	0x1,0x49
0672 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0673 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0674 e00f       |    |		Load	0x0,0xf
0675 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0676 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0677 e5fd       |    |		Load	0x2,-0x3
0678 e5fe       |    |		Load	0x2,-0x2
0679 e5ff       |    |		Load	0x2,-0x1
067a 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
067b e249       | I  |		Load	0x1,0x49
067c 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
067d 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
067e e5fd       |    |		Load	0x2,-0x3
067f e5fe       |    |		Load	0x2,-0x2
0680 e5ff       |    |		Load	0x2,-0x1
0681 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0682 e249       | I  |		Load	0x1,0x49
0683 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0684 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0685 e5fd       |    |		Load	0x2,-0x3
0686 e5fe       |    |		Load	0x2,-0x2
0687 e5ff       |    |		Load	0x2,-0x1
0688 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0689 e249       | I  |		Load	0x1,0x49
068a 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
068b 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
068c e5fd       |    |		Load	0x2,-0x3
068d e5fe       |    |		Load	0x2,-0x2
068e e5ff       |    |		Load	0x2,-0x1
068f 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
0690 e249       | I  |		Load	0x1,0x49
0691 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0692 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0693 e5fd       |    |		Load	0x2,-0x3
0694 e5fe       |    |		Load	0x2,-0x2
0695 e5ff       |    |		Load	0x2,-0x1
0696 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
0697 e249       | I  |		Load	0x1,0x49
0698 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0699 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
069a 0000 0000  |    |		.BLANK	0000[0x6]
06a0 ; --------------------------------------------------------------------------------------
06a0 ; SUBPROGRAM
06a0 ; --------------------------------------------------------------------------------------
06a0 06a3       |    |		.CONST	0x06a3								; Address of begin
06a1 0004       |    |		.CONST	0x0004								; Address of exception handler
06a2 0001       |    |		.CONST	0x0001								; Number of locals
06a3			BODY_06a0:
06a3			INIT_06a0:
06a3 00da       |    |		Load_Top	At_Offset_2
06a4 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06a5 4606       |F   |		Jump_Case	0x7
06a6 780d       |x   |		Jump	0x6b4								; case 0x0
06a7 780f       |x   |		Jump	0x6b7								; case 0x1
06a8 7815       |x   |		Jump	0x6be								; case 0x2
06a9 781b       |x   |		Jump	0x6c5								; case 0x3
06aa 7828       |x(  |		Jump	0x6d3								; case 0x4
06ab 7820       |x   |		Jump	0x6cc								; case 0x5
06ac 7800       |x   |		Jump	0x6ad								; case 0x6
06ad e5fd       |    |		Load	0x2,-0x3
06ae e5fe       |    |		Load	0x2,-0x2
06af e5ff       |    |		Load	0x2,-0x1
06b0 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
06b1 e249       | I  |		Load	0x1,0x49
06b2 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
06b3 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
06b4 e00f       |    |		Load	0x0,0xf
06b5 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
06b6 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
06b7 e5fd       |    |		Load	0x2,-0x3
06b8 e5fe       |    |		Load	0x2,-0x2
06b9 e5ff       |    |		Load	0x2,-0x1
06ba 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
06bb e249       | I  |		Load	0x1,0x49
06bc 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
06bd 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
06be e5fd       |    |		Load	0x2,-0x3
06bf e5fe       |    |		Load	0x2,-0x2
06c0 e5ff       |    |		Load	0x2,-0x1
06c1 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
06c2 e249       | I  |		Load	0x1,0x49
06c3 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
06c4 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
06c5 e5fd       |    |		Load	0x2,-0x3
06c6 e5fe       |    |		Load	0x2,-0x2
06c7 e5ff       |    |		Load	0x2,-0x1
06c8 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
06c9 e249       | I  |		Load	0x1,0x49
06ca 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
06cb 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
06cc e5fd       |    |		Load	0x2,-0x3
06cd e5fe       |    |		Load	0x2,-0x2
06ce e5ff       |    |		Load	0x2,-0x1
06cf 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
06d0 e249       | I  |		Load	0x1,0x49
06d1 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
06d2 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
06d3 e5fd       |    |		Load	0x2,-0x3
06d4 e5fe       |    |		Load	0x2,-0x2
06d5 e5ff       |    |		Load	0x2,-0x1
06d6 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
06d7 e249       | I  |		Load	0x1,0x49
06d8 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
06d9 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
06da 0000 0000  |    |		.BLANK	0000[0x6]
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 00d1       |    |		Pop_Control	Pop_Count_1
06e4 00da       |    |		Load_Top	At_Offset_2
06e5 01dc       |    |		Execute	Vector,Last
06e6 00db       |    |		Load_Top	At_Offset_3
06e7 01dd       |    |		Execute	Vector,First
06e8 0263       | c  |		Execute	Discrete,Above_Bound
06e9 700a       |p   |		Jump_Nonzero	0x6f4
06ea 00d8       |    |		Load_Top	At_Offset_0
06eb e5ff       |    |		Load	0x2,-0x1
06ec 01d5       |    |		Execute	Vector,Field_Reference
06ed 0125       | %  |		Execute	Any,Set_Constraint
06ee 00d8       |    |		Load_Top	At_Offset_0
06ef e5ff       |    |		Load	0x2,-0x1
06f0 01d5       |    |		Execute	Vector,Field_Reference
06f1 1c00       |    |		Execute_Immediate	Run_Utility,0x0
06f2 0a01       |    |		Execute_Immediate	Plus,0x1
06f3 7ff4       |    |		Jump	0x6e8
06f4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
06f5 0000 0000  |    |		.XXX[0x3]
06f7 0000       |    |
06f8 ; --------------------------------------------------------------------------------------
06f8 ; SUBPROGRAM
06f8 ; --------------------------------------------------------------------------------------
06f8 0701       |    |		.CONST	0x0701								; Address of begin
06f9 0004       |    |		.CONST	0x0004								; Address of exception handler
06fa 0002       |    |		.CONST	0x0002								; Number of locals
06fb			INIT_06f8:
06fb 00da       |    |		Load_Top	At_Offset_2
06fc 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
06fd e28f       |    |		Load	0x1,0x8f
06fe 1c08       |    |		Execute_Immediate	Run_Utility,0x8
06ff 00d8       |    |		Load_Top	At_Offset_0
0700 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0701			BODY_06f8:
0701 00d8       |    |		Load_Top	At_Offset_0
0702 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0703 4606       |F   |		Jump_Case	0x7
0704 781f       |x   |		Jump	0x724								; case 0x0
0705 7820       |x   |		Jump	0x726								; case 0x1
0706 7837       |x7  |		Jump	0x73e								; case 0x2
0707 784f       |xO  |		Jump	0x757								; case 0x3
0708 7880       |x   |		Jump	0x789								; case 0x4
0709 7866       |xf  |		Jump	0x770								; case 0x5
070a 7800       |x   |		Jump	0x70b								; case 0x6
070b 4801       |H   |		Short_Literal	0x1
070c 4801       |H   |		Short_Literal	0x1
070d e008       |    |		Load	0x0,0x8
070e 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
070f 035b       | [  |		Declare_Type	Array,Constrained
0710 0337       | 7  |		Declare_Variable	Array
0711 e5ff       |    |		Load	0x2,-0x1
0712 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
0713 e008       |    |		Load	0x0,0x8
0714 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0715 0119       |    |		Execute	Any,Check_In_Formal_Type
0716 4801       |H   |		Short_Literal	0x1
0717 00da       |    |		Load_Top	At_Offset_2
0718 01d6       |    |		Execute	Vector,Field_Write
0719 e250       | P  |		Load	0x1,0x50
071a 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
071b 00d9       |    |		Load_Top	At_Offset_1
071c 2a08       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8
071d 00d8       |    |		Load_Top	At_Offset_0
071e 2e08       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8
071f 0227       | '  |		Execute	Access,All_Reference
0720 01db       |    |		Execute	Vector,Length
0721 00d9       |    |		Load_Top	At_Offset_1
0722 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0723 787d       |x}  |		Jump	0x7a1
0724 e290       |    |		Load	0x1,0x90
0725 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0726 4801       |H   |		Short_Literal	0x1
0727 4801       |H   |		Short_Literal	0x1
0728 e24a       | J  |		Load	0x1,0x4a
0729 035b       | [  |		Declare_Type	Array,Constrained
072a 0337       | 7  |		Declare_Variable	Array
072b e5ff       |    |		Load	0x2,-0x1
072c 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
072d e009       |    |		Load	0x0,0x9
072e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
072f 0119       |    |		Execute	Any,Check_In_Formal_Type
0730 4801       |H   |		Short_Literal	0x1
0731 00da       |    |		Load_Top	At_Offset_2
0732 01d6       |    |		Execute	Vector,Field_Write
0733 e24b       | K  |		Load	0x1,0x4b
0734 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0735 00d9       |    |		Load_Top	At_Offset_1
0736 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
0737 00d8       |    |		Load_Top	At_Offset_0
0738 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0739 0227       | '  |		Execute	Access,All_Reference
073a 01db       |    |		Execute	Vector,Length
073b 00d9       |    |		Load_Top	At_Offset_1
073c 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
073d 7863       |xc  |		Jump	0x7a1
073e 4801       |H   |		Short_Literal	0x1
073f 4801       |H   |		Short_Literal	0x1
0740 e004       |    |		Load	0x0,0x4
0741 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0742 035b       | [  |		Declare_Type	Array,Constrained
0743 0337       | 7  |		Declare_Variable	Array
0744 e5ff       |    |		Load	0x2,-0x1
0745 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0746 e004       |    |		Load	0x0,0x4
0747 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0748 0119       |    |		Execute	Any,Check_In_Formal_Type
0749 4801       |H   |		Short_Literal	0x1
074a 00da       |    |		Load_Top	At_Offset_2
074b 01d6       |    |		Execute	Vector,Field_Write
074c e24c       | L  |		Load	0x1,0x4c
074d 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
074e 00d9       |    |		Load_Top	At_Offset_1
074f 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0750 00d8       |    |		Load_Top	At_Offset_0
0751 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0752 0227       | '  |		Execute	Access,All_Reference
0753 01db       |    |		Execute	Vector,Length
0754 00d9       |    |		Load_Top	At_Offset_1
0755 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0756 784a       |xJ  |		Jump	0x7a1
0757 4801       |H   |		Short_Literal	0x1
0758 4801       |H   |		Short_Literal	0x1
0759 e005       |    |		Load	0x0,0x5
075a 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
075b 035b       | [  |		Declare_Type	Array,Constrained
075c 0337       | 7  |		Declare_Variable	Array
075d e5ff       |    |		Load	0x2,-0x1
075e 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
075f e005       |    |		Load	0x0,0x5
0760 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0761 0119       |    |		Execute	Any,Check_In_Formal_Type
0762 4801       |H   |		Short_Literal	0x1
0763 00da       |    |		Load_Top	At_Offset_2
0764 01d6       |    |		Execute	Vector,Field_Write
0765 e24d       | M  |		Load	0x1,0x4d
0766 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0767 00d9       |    |		Load_Top	At_Offset_1
0768 2a05       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5
0769 00d8       |    |		Load_Top	At_Offset_0
076a 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
076b 0227       | '  |		Execute	Access,All_Reference
076c 01db       |    |		Execute	Vector,Length
076d 00d9       |    |		Load_Top	At_Offset_1
076e 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
076f 7831       |x1  |		Jump	0x7a1
0770 4801       |H   |		Short_Literal	0x1
0771 4801       |H   |		Short_Literal	0x1
0772 e007       |    |		Load	0x0,0x7
0773 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0774 035b       | [  |		Declare_Type	Array,Constrained
0775 0337       | 7  |		Declare_Variable	Array
0776 e5ff       |    |		Load	0x2,-0x1
0777 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
0778 e007       |    |		Load	0x0,0x7
0779 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
077a 0119       |    |		Execute	Any,Check_In_Formal_Type
077b 4801       |H   |		Short_Literal	0x1
077c 00da       |    |		Load_Top	At_Offset_2
077d 01d6       |    |		Execute	Vector,Field_Write
077e e24e       | N  |		Load	0x1,0x4e
077f 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0780 00d9       |    |		Load_Top	At_Offset_1
0781 2a06       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6
0782 00d8       |    |		Load_Top	At_Offset_0
0783 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
0784 0227       | '  |		Execute	Access,All_Reference
0785 01db       |    |		Execute	Vector,Length
0786 00d9       |    |		Load_Top	At_Offset_1
0787 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0788 7818       |x   |		Jump	0x7a1
0789 4801       |H   |		Short_Literal	0x1
078a 4801       |H   |		Short_Literal	0x1
078b e006       |    |		Load	0x0,0x6
078c 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
078d 035b       | [  |		Declare_Type	Array,Constrained
078e 0337       | 7  |		Declare_Variable	Array
078f e5ff       |    |		Load	0x2,-0x1
0790 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
0791 e006       |    |		Load	0x0,0x6
0792 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0793 0119       |    |		Execute	Any,Check_In_Formal_Type
0794 4801       |H   |		Short_Literal	0x1
0795 00da       |    |		Load_Top	At_Offset_2
0796 01d6       |    |		Execute	Vector,Field_Write
0797 e24f       | O  |		Load	0x1,0x4f
0798 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0799 00d9       |    |		Load_Top	At_Offset_1
079a 2a07       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7
079b 00d8       |    |		Load_Top	At_Offset_0
079c 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
079d 0227       | '  |		Execute	Access,All_Reference
079e 01db       |    |		Execute	Vector,Length
079f 00d9       |    |		Load_Top	At_Offset_1
07a0 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
07a1 4801       |H   |		Short_Literal	0x1
07a2 00d9       |    |		Load_Top	At_Offset_1
07a3 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
07a4 00d8       |    |		Load_Top	At_Offset_0
07a5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07a6 0000 0000  |    |		.XXX[0x2]
07a8 ; --------------------------------------------------------------------------------------
07a8 ; SUBPROGRAM
07a8 ; --------------------------------------------------------------------------------------
07a8 07ab       |    |		.CONST	0x07ab								; Address of begin
07a9 0004       |    |		.CONST	0x0004								; Address of exception handler
07aa 0001       |    |		.CONST	0x0001								; Number of locals
07ab			BODY_07a8:
07ab			INIT_07a8:
07ab 00da       |    |		Load_Top	At_Offset_2
07ac 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
07ad 4606       |F   |		Jump_Case	0x7
07ae 7806       |x   |		Jump	0x7b5								; case 0x0
07af 7805       |x   |		Jump	0x7b5								; case 0x1
07b0 7815       |x   |		Jump	0x7c6								; case 0x2
07b1 782c       |x,  |		Jump	0x7de								; case 0x3
07b2 7802       |x   |		Jump	0x7b5								; case 0x4
07b3 781e       |x   |		Jump	0x7d2								; case 0x5
07b4 7800       |x   |		Jump	0x7b5								; case 0x6
07b5 4800       |H   |		Short_Literal	0x0
07b6 4800       |H   |		Short_Literal	0x0
07b7 4806       |H   |		Short_Literal	0x6
07b8 0092 1201  |    |		Action	Push_String_Extended,0x1201					; "Sorting of "
07ba e5ff       |    |		Load	0x2,-0x1
07bb 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
07bc e21c       |    |		Load	0x1,0x1c
07bd 011c       |    |		Execute	Any,Convert_Unchecked
07be 1c01       |    |		Execute_Immediate	Run_Utility,0x1
07bf 01cc       |    |		Execute	Vector,Catenate
07c0 0092 1202  |    |		Action	Push_String_Extended,0x1202					; " lists is not implemented"
07c2 01cc       |    |		Execute	Vector,Catenate
07c3 8218       |    |		Call	0x1,0x18
07c4 8247       | G  |		Call	0x1,0x47
07c5 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
07c6 00da       |    |		Load_Top	At_Offset_2
07c7 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
07c8 0229       | )  |		Execute	Access,All_Read
07c9 00d8       |    |		Load_Top	At_Offset_0
07ca e2a9       |    |		Load	0x1,0xa9
07cb e2aa       |    |		Load	0x1,0xaa
07cc e2ab       |    |		Load	0x1,0xab
07cd 1dac       |    |		Execute_Immediate	Reference_Lex_1,0xac
07ce 1dad       |    |		Execute_Immediate	Reference_Lex_1,0xad
07cf 8019       |    |		Call	0x0,0x19
07d0 00d2       |    |		Pop_Control	Pop_Count_2
07d1 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
07d2 00da       |    |		Load_Top	At_Offset_2
07d3 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
07d4 0229       | )  |		Execute	Access,All_Read
07d5 00d8       |    |		Load_Top	At_Offset_0
07d6 e2b0       |    |		Load	0x1,0xb0
07d7 e2b1       |    |		Load	0x1,0xb1
07d8 e2b2       |    |		Load	0x1,0xb2
07d9 1db3       |    |		Execute_Immediate	Reference_Lex_1,0xb3
07da 1db4       |    |		Execute_Immediate	Reference_Lex_1,0xb4
07db 8019       |    |		Call	0x0,0x19
07dc 00d2       |    |		Pop_Control	Pop_Count_2
07dd 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
07de 00da       |    |		Load_Top	At_Offset_2
07df 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
07e0 0229       | )  |		Execute	Access,All_Read
07e1 00d8       |    |		Load_Top	At_Offset_0
07e2 e2b7       |    |		Load	0x1,0xb7
07e3 e2b8       |    |		Load	0x1,0xb8
07e4 e2b9       |    |		Load	0x1,0xb9
07e5 1dba       |    |		Execute_Immediate	Reference_Lex_1,0xba
07e6 1dbb       |    |		Execute_Immediate	Reference_Lex_1,0xbb
07e7 8019       |    |		Call	0x0,0x19
07e8 00d2       |    |		Pop_Control	Pop_Count_2
07e9 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
07ea 0000 0000  |    |		.BLANK	0000[0x6]
07f0 ; --------------------------------------------------------------------------------------
07f0 ; SUBPROGRAM
07f0 ; --------------------------------------------------------------------------------------
07f0 07f3       |    |		.CONST	0x07f3								; Address of begin
07f1 0004       |    |		.CONST	0x0004								; Address of exception handler
07f2 0001       |    |		.CONST	0x0001								; Number of locals
07f3			BODY_07f0:
07f3			INIT_07f0:
07f3 00db       |    |		Load_Top	At_Offset_3
07f4 00db       |    |		Load_Top	At_Offset_3
07f5 e2d8       |    |		Load	0x1,0xd8
07f6 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
07f7 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
07f8 ; --------------------------------------------------------------------------------------
07f8 ; SUBPROGRAM
07f8 ; --------------------------------------------------------------------------------------
07f8 0800       |    |		.CONST	0x0800								; Address of begin
07f9 0004       |    |		.CONST	0x0004								; Address of exception handler
07fa 0002       |    |		.CONST	0x0002								; Number of locals
07fb			INIT_07f8:
07fb e28f       |    |		Load	0x1,0x8f
07fc 02ff       |    |		Declare_Variable	Variant_Record
07fd e2c4       |    |		Load	0x1,0xc4
07fe 00d9       |    |		Load_Top	At_Offset_1
07ff 016d       | m  |		Execute	Variant_Record,Structure_Write
0800			BODY_07f8:
0800 00db       |    |		Load_Top	At_Offset_3
0801 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0802 e28a       |    |		Load	0x1,0x8a
0803 e004       |    |		Load	0x0,0x4
0804 187e       | ~  |		Execute	Package,Field_Execute,Field_Number 0x7e
0805 e24c       | L  |		Load	0x1,0x4c
0806 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0807 00d9       |    |		Load_Top	At_Offset_1
0808 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0809 00d8       |    |		Load_Top	At_Offset_0
080a 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
080b 0227       | '  |		Execute	Access,All_Reference
080c 01db       |    |		Execute	Vector,Length
080d 00d9       |    |		Load_Top	At_Offset_1
080e 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
080f 00d8       |    |		Load_Top	At_Offset_0
0810 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0811 0000 0000  |    |		.BLANK	0000[0x7]
0818 ; --------------------------------------------------------------------------------------
0818 ; SUBPROGRAM
0818 ; --------------------------------------------------------------------------------------
0818 0824       | $  |		.CONST	0x0824								; Address of begin
0819 0004       |    |		.CONST	0x0004								; Address of exception handler
081a 0003       |    |		.CONST	0x0003								; Number of locals
081b			INIT_0818:
081b e291       |    |		Load	0x1,0x91
081c 02ff       |    |		Declare_Variable	Variant_Record
081d 00d8       |    |		Load_Top	At_Offset_0
081e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
081f e009       |    |		Load	0x0,0x9
0820 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0821 02c7       |    |		Declare_Variable	Any
0822 00d8       |    |		Load_Top	At_Offset_0
0823 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0824			BODY_0818:
0824 e5ff       |    |		Load	0x2,-0x1
0825 e009       |    |		Load	0x0,0x9
0826 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0827 6802       |h   |		Jump_Zero	0x82a
0828 e290       |    |		Load	0x1,0x90
0829 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
082a e5ff       |    |		Load	0x2,-0x1
082b e004       |    |		Load	0x0,0x4
082c 187f       |    |		Execute	Package,Field_Execute,Field_Number 0x7f
082d c403       |    |		Store	0x2,0x3
082e 00d8       |    |		Load_Top	At_Offset_0
082f e2d7       |    |		Load	0x1,0xd7
0830 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0831 e24b       | K  |		Load	0x1,0x4b
0832 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0833 00da       |    |		Load_Top	At_Offset_2
0834 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
0835 00d9       |    |		Load_Top	At_Offset_1
0836 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0837 0227       | '  |		Execute	Access,All_Reference
0838 01db       |    |		Execute	Vector,Length
0839 00da       |    |		Load_Top	At_Offset_2
083a 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
083b 00d9       |    |		Load_Top	At_Offset_1
083c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
083d 0000 0000  |    |		.XXX[0x3]
083f 0000       |    |
0840 ; --------------------------------------------------------------------------------------
0840 ; SUBPROGRAM
0840 ; --------------------------------------------------------------------------------------
0840 085a       | Z  |		.CONST	0x085a								; Address of begin
0841 0004       |    |		.CONST	0x0004								; Address of exception handler
0842 0008       |    |		.CONST	0x0008								; Number of locals
0843			INIT_0840:
0843 4801       |H   |		Short_Literal	0x1
0844 8243       | C  |		Call	0x1,0x43
0845 8220       |    |		Call	0x1,0x20
0846 e009       |    |		Load	0x0,0x9
0847 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0848 02c7       |    |		Declare_Variable	Any
0849 00d8       |    |		Load_Top	At_Offset_0
084a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
084b e004       |    |		Load	0x0,0x4
084c 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
084d 02c7       |    |		Declare_Variable	Any
084e 00d8       |    |		Load_Top	At_Offset_0
084f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0850 e004       |    |		Load	0x0,0x4
0851 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0852 02c7       |    |		Declare_Variable	Any
0853 00d8       |    |		Load_Top	At_Offset_0
0854 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0855 00e1       |    |		Load_Encached	Boolean_Cache
0856 e004       |    |		Load	0x0,0x4
0857 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0858 029f 1013  |    |		Declare_Subprogram	INIT_1010,For_Call
085a			BODY_0840:
085a 8243       | C  |		Call	0x1,0x43
085b 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
085c e004       |    |		Load	0x0,0x4
085d 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
085e 0f01       |    |		Execute_Immediate	Equal,0x1
085f 6802       |h   |		Jump_Zero	0x862
0860 4801       |H   |		Short_Literal	0x1
0861 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0862 e5ff       |    |		Load	0x2,-0x1
0863 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0864 4606       |F   |		Jump_Case	0x7
0865 781b       |x   |		Jump	0x881								; case 0x0
0866 7814       |x   |		Jump	0x87b								; case 0x1
0867 7804       |x   |		Jump	0x86c								; case 0x2
0868 7807       |x   |		Jump	0x870								; case 0x3
0869 7817       |x   |		Jump	0x881								; case 0x4
086a 7816       |x   |		Jump	0x881								; case 0x5
086b 7815       |x   |		Jump	0x881								; case 0x6
086c e5ff       |    |		Load	0x2,-0x1
086d 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
086e c405       |    |		Store	0x2,0x5
086f 7811       |x   |		Jump	0x881
0870 e5ff       |    |		Load	0x2,-0x1
0871 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0872 e005       |    |		Load	0x0,0x5
0873 1848       | H  |		Execute	Package,Field_Execute,Field_Number 0x48
0874 c403       |    |		Store	0x2,0x3
0875 e28a       |    |		Load	0x1,0x8a
0876 e403       |    |		Load	0x2,0x3
0877 e004       |    |		Load	0x0,0x4
0878 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
0879 c405       |    |		Store	0x2,0x5
087a 7806       |x   |		Jump	0x881
087b e28a       |    |		Load	0x1,0x8a
087c e5ff       |    |		Load	0x2,-0x1
087d 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
087e e004       |    |		Load	0x0,0x4
087f 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
0880 c405       |    |		Store	0x2,0x5
0881 00db       |    |		Load_Top	At_Offset_3
0882 e004       |    |		Load	0x0,0x4
0883 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
0884 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0885 4800       |H   |		Short_Literal	0x0
0886 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0887 00cf       |    |		Action	Mark_Auxiliary
0888 7806       |x   |		Jump	0x88f
0889 8408       |    |		Call	0x2,0x8
088a e405       |    |		Load	0x2,0x5
088b e004       |    |		Load	0x0,0x4
088c 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
088d 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
088e 00c9       |    |		Action	Pop_Auxiliary_Loop
088f 00da       |    |		Load_Top	At_Offset_2
0890 0f05       |    |		Execute_Immediate	Equal,0x5
0891 6ff7       |o   |		Jump_Zero	0x889
0892 00ce       |    |		Action	Pop_Auxiliary
0893 4801       |H   |		Short_Literal	0x1
0894 e405       |    |		Load	0x2,0x5
0895 e249       | I  |		Load	0x1,0x49
0896 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0897 e402       |    |		Load	0x2,0x2
0898 01df       |    |		Execute	Vector,Equal
0899 6802       |h   |		Jump_Zero	0x89c
089a 4801       |H   |		Short_Literal	0x1
089b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
089c 4800       |H   |		Short_Literal	0x0
089d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
089e 0000 0000  |    |		.XXX[0x2]
08a0 ; --------------------------------------------------------------------------------------
08a0 ; SUBPROGRAM
08a0 ; --------------------------------------------------------------------------------------
08a0 08b9       |    |		.CONST	0x08b9								; Address of begin
08a1 0004       |    |		.CONST	0x0004								; Address of exception handler
08a2 0007       |    |		.CONST	0x0007								; Number of locals
08a3			INIT_08a0:
08a3 e002       |    |		Load	0x0,0x2
08a4 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
08a5 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
08a6 e002       |    |		Load	0x0,0x2
08a7 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
08a8 1b2b       | +  |		Execute	Package,Field_Read,Field_Number 0x2b
08a9 0322       | "  |		Declare_Variable	Record
08aa e28f       |    |		Load	0x1,0x8f
08ab 02ff       |    |		Declare_Variable	Variant_Record
08ac e290       |    |		Load	0x1,0x90
08ad 00d9       |    |		Load_Top	At_Offset_1
08ae 016d       | m  |		Execute	Variant_Record,Structure_Write
08af 00e1       |    |		Load_Encached	Boolean_Cache
08b0 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
08b1 e21d       |    |		Load	0x1,0x1d
08b2 02ff       |    |		Declare_Variable	Variant_Record
08b3 00d8       |    |		Load_Top	At_Offset_0
08b4 1c00       |    |		Execute_Immediate	Run_Utility,0x0
08b5 e293       |    |		Load	0x1,0x93
08b6 02ff       |    |		Declare_Variable	Variant_Record
08b7 00d8       |    |		Load_Top	At_Offset_0
08b8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
08b9			BODY_08a0:
08b9 8288       |    |		Call	0x1,0x88
08ba 480f       |H   |		Short_Literal	0xf
08bb e005       |    |		Load	0x0,0x5
08bc 187e       | ~  |		Execute	Package,Field_Execute,Field_Number 0x7e
08bd e24d       | M  |		Load	0x1,0x4d
08be 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
08bf 00d9       |    |		Load_Top	At_Offset_1
08c0 2a05       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5
08c1 00d8       |    |		Load_Top	At_Offset_0
08c2 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
08c3 6845       |hE  |		Jump_Zero	0x909
08c4 00d8       |    |		Load_Top	At_Offset_0
08c5 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
08c6 0227       | '  |		Execute	Access,All_Reference
08c7 01db       |    |		Execute	Vector,Length
08c8 00d9       |    |		Load_Top	At_Offset_1
08c9 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
08ca 00cf       |    |		Action	Mark_Auxiliary
08cb 00d9       |    |		Load_Top	At_Offset_1
08cc 822e       | .  |		Call	0x1,0x2e
08cd 00da       |    |		Load_Top	At_Offset_2
08ce 822d       | -  |		Call	0x1,0x2d
08cf 0263       | c  |		Execute	Discrete,Above_Bound
08d0 7035       |p5  |		Jump_Nonzero	0x906
08d1 00d8       |    |		Load_Top	At_Offset_0
08d2 e407       |    |		Load	0x2,0x7
08d3 822f       | /  |		Call	0x1,0x2f
08d4 e406       |    |		Load	0x2,0x6
08d5 016d       | m  |		Execute	Variant_Record,Structure_Write
08d6 e406       |    |		Load	0x2,0x6
08d7 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
08d8 e005       |    |		Load	0x0,0x5
08d9 1850       | P  |		Execute	Package,Field_Execute,Field_Number 0x50
08da e403       |    |		Load	0x2,0x3
08db 017d       | }  |		Execute	Record,Structure_Write
08dc e403       |    |		Load	0x2,0x3
08dd 483f       |H?  |		Short_Literal	0x3f
08de e030       | 0  |		Load	0x0,0x30
08df 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
08e0 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
08e1 a402       |    |		Store_Unchecked	0x2,0x2
08e2 e402       |    |		Load	0x2,0x2
08e3 e002       |    |		Load	0x0,0x2
08e4 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
08e5 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
08e6 701d       |p   |		Jump_Nonzero	0x904
08e7 00ea       |    |		Load_Encached	Null_String_Cache
08e8 e402       |    |		Load	0x2,0x2
08e9 e030       | 0  |		Load	0x0,0x30
08ea 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
08eb 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
08ec e015       |    |		Load	0x0,0x15
08ed 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
08ee 0092 1203  |    |		Action	Push_String_Extended,0x1203					; "EXTERNAL"
08f0 01df       |    |		Execute	Vector,Equal
08f1 6812       |h   |		Jump_Zero	0x904
08f2 e406       |    |		Load	0x2,0x6
08f3 8299       |    |		Call	0x1,0x99
08f4 680f       |h   |		Jump_Zero	0x904
08f5 e405       |    |		Load	0x2,0x5
08f6 6807       |h   |		Jump_Zero	0x8fe
08f7 e406       |    |		Load	0x2,0x6
08f8 8227       | '  |		Call	0x1,0x27
08f9 e404       |    |		Load	0x2,0x4
08fa 016d       | m  |		Execute	Variant_Record,Structure_Write
08fb 4800       |H   |		Short_Literal	0x0
08fc a405       |    |		Store_Unchecked	0x2,0x5
08fd 7806       |x   |		Jump	0x904
08fe e404       |    |		Load	0x2,0x4
08ff e406       |    |		Load	0x2,0x6
0900 8227       | '  |		Call	0x1,0x27
0901 8231       | 1  |		Call	0x1,0x31
0902 e404       |    |		Load	0x2,0x4
0903 016d       | m  |		Execute	Variant_Record,Structure_Write
0904 00c8       |    |		Action	Pop_Auxiliary_Range
0905 3fcb       |?   |		Loop_Increasing	0x8d1
0906 00ce       |    |		Action	Pop_Auxiliary
0907 00db       |    |		Load_Top	At_Offset_3
0908 00ca       |    |		Action	Exit_Nullary_Function
0909 e290       |    |		Load	0x1,0x90
090a 00ca       |    |		Action	Exit_Nullary_Function
090b 0000 0000  |    |		.BLANK	0000[0x5]
0910 ; --------------------------------------------------------------------------------------
0910 ; SUBPROGRAM
0910 ; --------------------------------------------------------------------------------------
0910 0917       |    |		.CONST	0x0917								; Address of begin
0911 0004       |    |		.CONST	0x0004								; Address of exception handler
0912 0002       |    |		.CONST	0x0002								; Number of locals
0913			INIT_0910:
0913 e293       |    |		Load	0x1,0x93
0914 02ff       |    |		Declare_Variable	Variant_Record
0915 00d8       |    |		Load_Top	At_Offset_0
0916 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0917			BODY_0910:
0917 e28b       |    |		Load	0x1,0x8b
0918 e5fe       |    |		Load	0x2,-0x2
0919 00d8       |    |		Load_Top	At_Offset_0
091a e005       |    |		Load	0x0,0x5
091b 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
091c 0260       | `  |		Execute	Discrete,In_Type
091d 7001       |p   |		Jump_Nonzero	0x91f
091e 0801       |    |		Execute_Immediate	Raise,0x1
091f e005       |    |		Load	0x0,0x5
0920 1b41       | A  |		Execute	Package,Field_Read,Field_Number 0x41
0921 00d9       |    |		Load_Top	At_Offset_1
0922 00d0       |    |		Action	Swap_Control
0923 0260       | `  |		Execute	Discrete,In_Type
0924 7001       |p   |		Jump_Nonzero	0x926
0925 0801       |    |		Execute_Immediate	Raise,0x1
0926 e5ff       |    |		Load	0x2,-0x1
0927 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0928 e005       |    |		Load	0x0,0x5
0929 1855       | U  |		Execute	Package,Field_Execute,Field_Number 0x55
092a e24d       | M  |		Load	0x1,0x4d
092b 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
092c 00d9       |    |		Load_Top	At_Offset_1
092d 2a05       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5
092e 00d8       |    |		Load_Top	At_Offset_0
092f 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
0930 0227       | '  |		Execute	Access,All_Reference
0931 01dc       |    |		Execute	Vector,Last
0932 00d9       |    |		Load_Top	At_Offset_1
0933 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
0934 0227       | '  |		Execute	Access,All_Reference
0935 01dd       |    |		Execute	Vector,First
0936 0272       | r  |		Execute	Discrete,Minus
0937 0a01       |    |		Execute_Immediate	Plus,0x1
0938 00d9       |    |		Load_Top	At_Offset_1
0939 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
093a 00d8       |    |		Load_Top	At_Offset_0
093b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
093c 0000 0000  |    |		.BLANK	0000[0x4]
0940 ; --------------------------------------------------------------------------------------
0940 ; SUBPROGRAM
0940 ; --------------------------------------------------------------------------------------
0940 0943       | C  |		.CONST	0x0943								; Address of begin
0941 0004       |    |		.CONST	0x0004								; Address of exception handler
0942 0001       |    |		.CONST	0x0001								; Number of locals
0943			BODY_0940:
0943			INIT_0940:
0943 00db       |    |		Load_Top	At_Offset_3
0944 00db       |    |		Load_Top	At_Offset_3
0945 e2d8       |    |		Load	0x1,0xd8
0946 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0947 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0948 ; --------------------------------------------------------------------------------------
0948 ; SUBPROGRAM
0948 ; --------------------------------------------------------------------------------------
0948 094b       | K  |		.CONST	0x094b								; Address of begin
0949 0004       |    |		.CONST	0x0004								; Address of exception handler
094a 0001       |    |		.CONST	0x0001								; Number of locals
094b			BODY_0948:
094b			INIT_0948:
094b 00da       |    |		Load_Top	At_Offset_2
094c 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
094d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
094e 0000 0000  |    |		.XXX[0x2]
0950 ; --------------------------------------------------------------------------------------
0950 ; SUBPROGRAM
0950 ; --------------------------------------------------------------------------------------
0950 0953       | S  |		.CONST	0x0953								; Address of begin
0951 0004       |    |		.CONST	0x0004								; Address of exception handler
0952 0001       |    |		.CONST	0x0001								; Number of locals
0953			BODY_0950:
0953			INIT_0950:
0953 00da       |    |		Load_Top	At_Offset_2
0954 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0955 7002       |p   |		Jump_Nonzero	0x958
0956 4801       |H   |		Short_Literal	0x1
0957 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0958 00da       |    |		Load_Top	At_Offset_2
0959 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
095a 4606       |F   |		Jump_Case	0x7
095b 780b       |x   |		Jump	0x967								; case 0x0
095c 780c       |x   |		Jump	0x969								; case 0x1
095d 7810       |x   |		Jump	0x96e								; case 0x2
095e 7814       |x   |		Jump	0x973								; case 0x3
095f 781d       |x   |		Jump	0x97d								; case 0x4
0960 7817       |x   |		Jump	0x978								; case 0x5
0961 7800       |x   |		Jump	0x962								; case 0x6
0962 00da       |    |		Load_Top	At_Offset_2
0963 2e08       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8
0964 0227       | '  |		Execute	Access,All_Reference
0965 01dd       |    |		Execute	Vector,First
0966 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0967 4801       |H   |		Short_Literal	0x1
0968 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0969 00da       |    |		Load_Top	At_Offset_2
096a 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
096b 0227       | '  |		Execute	Access,All_Reference
096c 01dd       |    |		Execute	Vector,First
096d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
096e 00da       |    |		Load_Top	At_Offset_2
096f 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0970 0227       | '  |		Execute	Access,All_Reference
0971 01dd       |    |		Execute	Vector,First
0972 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0973 00da       |    |		Load_Top	At_Offset_2
0974 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
0975 0227       | '  |		Execute	Access,All_Reference
0976 01dd       |    |		Execute	Vector,First
0977 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0978 00da       |    |		Load_Top	At_Offset_2
0979 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
097a 0227       | '  |		Execute	Access,All_Reference
097b 01dd       |    |		Execute	Vector,First
097c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
097d 00da       |    |		Load_Top	At_Offset_2
097e 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
097f 0227       | '  |		Execute	Access,All_Reference
0980 01dd       |    |		Execute	Vector,First
0981 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0982 0000 0000  |    |		.BLANK	0000[0x6]
0988 ; --------------------------------------------------------------------------------------
0988 ; SUBPROGRAM
0988 ; --------------------------------------------------------------------------------------
0988 098b       |    |		.CONST	0x098b								; Address of begin
0989 0004       |    |		.CONST	0x0004								; Address of exception handler
098a 0001       |    |		.CONST	0x0001								; Number of locals
098b			BODY_0988:
098b			INIT_0988:
098b 00da       |    |		Load_Top	At_Offset_2
098c 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
098d 7002       |p   |		Jump_Nonzero	0x990
098e 4800       |H   |		Short_Literal	0x0
098f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0990 00da       |    |		Load_Top	At_Offset_2
0991 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0992 4606       |F   |		Jump_Case	0x7
0993 780b       |x   |		Jump	0x99f								; case 0x0
0994 780c       |x   |		Jump	0x9a1								; case 0x1
0995 7810       |x   |		Jump	0x9a6								; case 0x2
0996 7814       |x   |		Jump	0x9ab								; case 0x3
0997 781d       |x   |		Jump	0x9b5								; case 0x4
0998 7817       |x   |		Jump	0x9b0								; case 0x5
0999 7800       |x   |		Jump	0x99a								; case 0x6
099a 00da       |    |		Load_Top	At_Offset_2
099b 2e08       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8
099c 0227       | '  |		Execute	Access,All_Reference
099d 01dc       |    |		Execute	Vector,Last
099e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
099f 4800       |H   |		Short_Literal	0x0
09a0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
09a1 00da       |    |		Load_Top	At_Offset_2
09a2 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
09a3 0227       | '  |		Execute	Access,All_Reference
09a4 01dc       |    |		Execute	Vector,Last
09a5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
09a6 00da       |    |		Load_Top	At_Offset_2
09a7 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
09a8 0227       | '  |		Execute	Access,All_Reference
09a9 01dc       |    |		Execute	Vector,Last
09aa 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
09ab 00da       |    |		Load_Top	At_Offset_2
09ac 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
09ad 0227       | '  |		Execute	Access,All_Reference
09ae 01dc       |    |		Execute	Vector,Last
09af 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
09b0 00da       |    |		Load_Top	At_Offset_2
09b1 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
09b2 0227       | '  |		Execute	Access,All_Reference
09b3 01dc       |    |		Execute	Vector,Last
09b4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
09b5 00da       |    |		Load_Top	At_Offset_2
09b6 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
09b7 0227       | '  |		Execute	Access,All_Reference
09b8 01dc       |    |		Execute	Vector,Last
09b9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
09ba 0000 0000  |    |		.BLANK	0000[0x6]
09c0 ; --------------------------------------------------------------------------------------
09c0 ; SUBPROGRAM
09c0 ; --------------------------------------------------------------------------------------
09c0 09c9       |    |		.CONST	0x09c9								; Address of begin
09c1 0004       |    |		.CONST	0x0004								; Address of exception handler
09c2 0002       |    |		.CONST	0x0002								; Number of locals
09c3			INIT_09c0:
09c3 00da       |    |		Load_Top	At_Offset_2
09c4 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
09c5 e21d       |    |		Load	0x1,0x1d
09c6 1c08       |    |		Execute_Immediate	Run_Utility,0x8
09c7 00d8       |    |		Load_Top	At_Offset_0
09c8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
09c9			BODY_09c0:
09c9 00db       |    |		Load_Top	At_Offset_3
09ca 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
09cb 4606       |F   |		Jump_Case	0x7
09cc 780e       |x   |		Jump	0x9db								; case 0x0
09cd 780f       |x   |		Jump	0x9dd								; case 0x1
09ce 7816       |x   |		Jump	0x9e5								; case 0x2
09cf 781d       |x   |		Jump	0x9ed								; case 0x3
09d0 782c       |x,  |		Jump	0x9fd								; case 0x4
09d1 7823       |x#  |		Jump	0x9f5								; case 0x5
09d2 7800       |x   |		Jump	0x9d3								; case 0x6
09d3 e5fe       |    |		Load	0x2,-0x2
09d4 e5ff       |    |		Load	0x2,-0x1
09d5 2e08       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8
09d6 0227       | '  |		Execute	Access,All_Reference
09d7 01d7       |    |		Execute	Vector,Field_Read
09d8 00d9       |    |		Load_Top	At_Offset_1
09d9 2a07       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7
09da 7829       |x)  |		Jump	0xa04
09db e21e       |    |		Load	0x1,0x1e
09dc 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
09dd e5fe       |    |		Load	0x2,-0x2
09de e5ff       |    |		Load	0x2,-0x1
09df 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
09e0 0227       | '  |		Execute	Access,All_Reference
09e1 01d7       |    |		Execute	Vector,Field_Read
09e2 00d9       |    |		Load_Top	At_Offset_1
09e3 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
09e4 781f       |x   |		Jump	0xa04
09e5 e5fe       |    |		Load	0x2,-0x2
09e6 e5ff       |    |		Load	0x2,-0x1
09e7 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
09e8 0227       | '  |		Execute	Access,All_Reference
09e9 01d7       |    |		Execute	Vector,Field_Read
09ea 00d9       |    |		Load_Top	At_Offset_1
09eb 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
09ec 7817       |x   |		Jump	0xa04
09ed e5fe       |    |		Load	0x2,-0x2
09ee e5ff       |    |		Load	0x2,-0x1
09ef 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
09f0 0227       | '  |		Execute	Access,All_Reference
09f1 01d7       |    |		Execute	Vector,Field_Read
09f2 00d9       |    |		Load_Top	At_Offset_1
09f3 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
09f4 780f       |x   |		Jump	0xa04
09f5 e5fe       |    |		Load	0x2,-0x2
09f6 e5ff       |    |		Load	0x2,-0x1
09f7 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
09f8 0227       | '  |		Execute	Access,All_Reference
09f9 01d7       |    |		Execute	Vector,Field_Read
09fa 00d9       |    |		Load_Top	At_Offset_1
09fb 2a05       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5
09fc 7807       |x   |		Jump	0xa04
09fd e5fe       |    |		Load	0x2,-0x2
09fe e5ff       |    |		Load	0x2,-0x1
09ff 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
0a00 0227       | '  |		Execute	Access,All_Reference
0a01 01d7       |    |		Execute	Vector,Field_Read
0a02 00d9       |    |		Load_Top	At_Offset_1
0a03 2a06       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6
0a04 00d8       |    |		Load_Top	At_Offset_0
0a05 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0a06 0000 0000  |    |		.XXX[0x2]
0a08 ; --------------------------------------------------------------------------------------
0a08 ; SUBPROGRAM
0a08 ; --------------------------------------------------------------------------------------
0a08 0a11       |    |		.CONST	0x0a11								; Address of begin
0a09 0004       |    |		.CONST	0x0004								; Address of exception handler
0a0a 0002       |    |		.CONST	0x0002								; Number of locals
0a0b			INIT_0a08:
0a0b 00da       |    |		Load_Top	At_Offset_2
0a0c 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a0d e28f       |    |		Load	0x1,0x8f
0a0e 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0a0f 00d8       |    |		Load_Top	At_Offset_0
0a10 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0a11			BODY_0a08:
0a11 00db       |    |		Load_Top	At_Offset_3
0a12 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a13 e5fe       |    |		Load	0x2,-0x2
0a14 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a15 027e       | ~  |		Execute	Discrete,Not_Equal
0a16 6804       |h   |		Jump_Zero	0xa1b
0a17 e5fe       |    |		Load	0x2,-0x2
0a18 02fd       |    |		Declare_Variable	Variant_Record,Duplicate
0a19 00cd       |    |		Action	Spare6_Action
0a1a 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0a1b 00db       |    |		Load_Top	At_Offset_3
0a1c 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0a1d 4606       |F   |		Jump_Case	0x7
0a1e 7812       |x   |		Jump	0xa31								; case 0x0
0a1f 7813       |x   |		Jump	0xa33								; case 0x1
0a20 781e       |x   |		Jump	0xa3f								; case 0x2
0a21 7829       |x)  |		Jump	0xa4b								; case 0x3
0a22 7840       |x@  |		Jump	0xa63								; case 0x4
0a23 7833       |x3  |		Jump	0xa57								; case 0x5
0a24 7800       |x   |		Jump	0xa25								; case 0x6
0a25 e5fe       |    |		Load	0x2,-0x2
0a26 2e08       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8
0a27 0227       | '  |		Execute	Access,All_Reference
0a28 e5ff       |    |		Load	0x2,-0x1
0a29 2e08       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8
0a2a 0227       | '  |		Execute	Access,All_Reference
0a2b 01cc       |    |		Execute	Vector,Catenate
0a2c e250       | P  |		Load	0x1,0x50
0a2d 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0a2e 00d9       |    |		Load_Top	At_Offset_1
0a2f 2a08       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8
0a30 783d       |x=  |		Jump	0xa6e
0a31 e290       |    |		Load	0x1,0x90
0a32 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0a33 e5fe       |    |		Load	0x2,-0x2
0a34 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0a35 0227       | '  |		Execute	Access,All_Reference
0a36 e5ff       |    |		Load	0x2,-0x1
0a37 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0a38 0227       | '  |		Execute	Access,All_Reference
0a39 01cc       |    |		Execute	Vector,Catenate
0a3a e24b       | K  |		Load	0x1,0x4b
0a3b 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0a3c 00d9       |    |		Load_Top	At_Offset_1
0a3d 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
0a3e 782f       |x/  |		Jump	0xa6e
0a3f e5fe       |    |		Load	0x2,-0x2
0a40 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0a41 0227       | '  |		Execute	Access,All_Reference
0a42 e5ff       |    |		Load	0x2,-0x1
0a43 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0a44 0227       | '  |		Execute	Access,All_Reference
0a45 01cc       |    |		Execute	Vector,Catenate
0a46 e24c       | L  |		Load	0x1,0x4c
0a47 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0a48 00d9       |    |		Load_Top	At_Offset_1
0a49 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0a4a 7823       |x#  |		Jump	0xa6e
0a4b e5fe       |    |		Load	0x2,-0x2
0a4c 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
0a4d 0227       | '  |		Execute	Access,All_Reference
0a4e e5ff       |    |		Load	0x2,-0x1
0a4f 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
0a50 0227       | '  |		Execute	Access,All_Reference
0a51 01cc       |    |		Execute	Vector,Catenate
0a52 e24d       | M  |		Load	0x1,0x4d
0a53 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0a54 00d9       |    |		Load_Top	At_Offset_1
0a55 2a05       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5
0a56 7817       |x   |		Jump	0xa6e
0a57 e5fe       |    |		Load	0x2,-0x2
0a58 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
0a59 0227       | '  |		Execute	Access,All_Reference
0a5a e5ff       |    |		Load	0x2,-0x1
0a5b 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
0a5c 0227       | '  |		Execute	Access,All_Reference
0a5d 01cc       |    |		Execute	Vector,Catenate
0a5e e24e       | N  |		Load	0x1,0x4e
0a5f 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0a60 00d9       |    |		Load_Top	At_Offset_1
0a61 2a06       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6
0a62 780b       |x   |		Jump	0xa6e
0a63 e5fe       |    |		Load	0x2,-0x2
0a64 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
0a65 0227       | '  |		Execute	Access,All_Reference
0a66 e5ff       |    |		Load	0x2,-0x1
0a67 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
0a68 0227       | '  |		Execute	Access,All_Reference
0a69 01cc       |    |		Execute	Vector,Catenate
0a6a e24f       | O  |		Load	0x1,0x4f
0a6b 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0a6c 00d9       |    |		Load_Top	At_Offset_1
0a6d 2a07       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7
0a6e e5fe       |    |		Load	0x2,-0x2
0a6f 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0a70 e5ff       |    |		Load	0x2,-0x1
0a71 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0a72 0273       | s  |		Execute	Discrete,Plus
0a73 00d9       |    |		Load_Top	At_Offset_1
0a74 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0a75 00d8       |    |		Load_Top	At_Offset_0
0a76 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0a77 0000       |    |		.XXX[0x1]
0a78 ; --------------------------------------------------------------------------------------
0a78 ; SUBPROGRAM
0a78 ; --------------------------------------------------------------------------------------
0a78 0a7f       |    |		.CONST	0x0a7f								; Address of begin
0a79 0004       |    |		.CONST	0x0004								; Address of exception handler
0a7a 0003       |    |		.CONST	0x0003								; Number of locals
0a7b			INIT_0a78:
0a7b e2a0       |    |		Load	0x1,0xa0
0a7c 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0a7d 029f 102b  |   +|		Declare_Subprogram	INIT_1028,For_Call
0a7f			BODY_0a78:
0a7f e5ff       |    |		Load	0x2,-0x1
0a80 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0a81 7002       |p   |		Jump_Nonzero	0xa84
0a82 00ea       |    |		Load_Encached	Null_String_Cache
0a83 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0a84 00cf       |    |		Action	Mark_Auxiliary
0a85 e5ff       |    |		Load	0x2,-0x1
0a86 822e       | .  |		Call	0x1,0x2e
0a87 e5ff       |    |		Load	0x2,-0x1
0a88 822d       | -  |		Call	0x1,0x2d
0a89 0263       | c  |		Execute	Discrete,Above_Bound
0a8a 700c       |p   |		Jump_Nonzero	0xa97
0a8b e402       |    |		Load	0x2,0x2
0a8c e5fd       |    |		Load	0x2,-0x3
0a8d 00da       |    |		Load_Top	At_Offset_2
0a8e e5ff       |    |		Load	0x2,-0x1
0a8f 8235       | 5  |		Call	0x1,0x35
0a90 e5fe       |    |		Load	0x2,-0x2
0a91 01cc       |    |		Execute	Vector,Catenate
0a92 e2a0       |    |		Load	0x1,0xa0
0a93 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0a94 c402       |    |		Store	0x2,0x2
0a95 00c8       |    |		Action	Pop_Auxiliary_Range
0a96 3ff4       |?   |		Loop_Increasing	0xa8b
0a97 00ce       |    |		Action	Pop_Auxiliary
0a98 8403       |    |		Call	0x2,0x3
0a99 0831       | 1  |		Execute_Immediate	Raise,0x31
0a9a 0000 0000  |    |		.BLANK	0000[0x6]
0aa0 ; --------------------------------------------------------------------------------------
0aa0 ; SUBPROGRAM
0aa0 ; --------------------------------------------------------------------------------------
0aa0 0abc       |    |		.CONST	0x0abc								; Address of begin
0aa1 0004       |    |		.CONST	0x0004								; Address of exception handler
0aa2 0005       |    |		.CONST	0x0005								; Number of locals
0aa3			INIT_0aa0:
0aa3 e009       |    |		Load	0x0,0x9
0aa4 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0aa5 02c7       |    |		Declare_Variable	Any
0aa6 00d8       |    |		Load_Top	At_Offset_0
0aa7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0aa8 e009       |    |		Load	0x0,0x9
0aa9 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0aaa 02c7       |    |		Declare_Variable	Any
0aab 00d8       |    |		Load_Top	At_Offset_0
0aac 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0aad 00e1       |    |		Load_Encached	Boolean_Cache
0aae e033       | 3  |		Load	0x0,0x33
0aaf 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0ab0 02c7       |    |		Declare_Variable	Any
0ab1 e033       | 3  |		Load	0x0,0x33
0ab2 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0ab3 e033       | 3  |		Load	0x0,0x33
0ab4 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0ab5 e033       | 3  |		Load	0x0,0x33
0ab6 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0ab7 e033       | 3  |		Load	0x0,0x33
0ab8 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0ab9 e033       | 3  |		Load	0x0,0x33
0aba 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0abb a405       |    |		Store_Unchecked	0x2,0x5
0abc			BODY_0aa0:
0abc e5ff       |    |		Load	0x2,-0x1
0abd 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0abe 4606       |F   |		Jump_Case	0x7
0abf 781c       |x   |		Jump	0xadc								; case 0x0
0ac0 781e       |x   |		Jump	0xadf								; case 0x1
0ac1 7831       |x1  |		Jump	0xaf3								; case 0x2
0ac2 7846       |xF  |		Jump	0xb09								; case 0x3
0ac3 785b       |x[  |		Jump	0xb1f								; case 0x4
0ac4 7870       |xp  |		Jump	0xb35								; case 0x5
0ac5 7800       |x   |		Jump	0xac6								; case 0x6
0ac6 00cf       |    |		Action	Mark_Auxiliary
0ac7 e5ff       |    |		Load	0x2,-0x1
0ac8 2e08       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8
0ac9 0227       | '  |		Execute	Access,All_Reference
0aca 01d9       |    |		Execute	Vector,Reverse_Bounds
0acb 0263       | c  |		Execute	Discrete,Above_Bound
0acc 700d       |p   |		Jump_Nonzero	0xada
0acd e402       |    |		Load	0x2,0x2
0ace 00d9       |    |		Load_Top	At_Offset_1
0acf e5ff       |    |		Load	0x2,-0x1
0ad0 2e08       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8
0ad1 0227       | '  |		Execute	Access,All_Reference
0ad2 01d7       |    |		Execute	Vector,Field_Read
0ad3 e008       |    |		Load	0x0,0x8
0ad4 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0ad5 e009       |    |		Load	0x0,0x9
0ad6 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0ad7 c402       |    |		Store	0x2,0x2
0ad8 00c8       |    |		Action	Pop_Auxiliary_Range
0ad9 3ff3       |?   |		Loop_Increasing	0xacd
0ada 00ce       |    |		Action	Pop_Auxiliary
0adb 786e       |xn  |		Jump	0xb4a
0adc e00f       |    |		Load	0x0,0xf
0add 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0ade 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0adf 00cf       |    |		Action	Mark_Auxiliary
0ae0 e5ff       |    |		Load	0x2,-0x1
0ae1 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0ae2 0227       | '  |		Execute	Access,All_Reference
0ae3 01d9       |    |		Execute	Vector,Reverse_Bounds
0ae4 0263       | c  |		Execute	Discrete,Above_Bound
0ae5 700b       |p   |		Jump_Nonzero	0xaf1
0ae6 e402       |    |		Load	0x2,0x2
0ae7 00d9       |    |		Load_Top	At_Offset_1
0ae8 e5ff       |    |		Load	0x2,-0x1
0ae9 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0aea 0227       | '  |		Execute	Access,All_Reference
0aeb 01d7       |    |		Execute	Vector,Field_Read
0aec e009       |    |		Load	0x0,0x9
0aed 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0aee c402       |    |		Store	0x2,0x2
0aef 00c8       |    |		Action	Pop_Auxiliary_Range
0af0 3ff5       |?   |		Loop_Increasing	0xae6
0af1 00ce       |    |		Action	Pop_Auxiliary
0af2 7857       |xW  |		Jump	0xb4a
0af3 00cf       |    |		Action	Mark_Auxiliary
0af4 e5ff       |    |		Load	0x2,-0x1
0af5 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0af6 0227       | '  |		Execute	Access,All_Reference
0af7 01d9       |    |		Execute	Vector,Reverse_Bounds
0af8 0263       | c  |		Execute	Discrete,Above_Bound
0af9 700d       |p   |		Jump_Nonzero	0xb07
0afa e402       |    |		Load	0x2,0x2
0afb 00d9       |    |		Load_Top	At_Offset_1
0afc e5ff       |    |		Load	0x2,-0x1
0afd 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0afe 0227       | '  |		Execute	Access,All_Reference
0aff 01d7       |    |		Execute	Vector,Field_Read
0b00 e004       |    |		Load	0x0,0x4
0b01 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
0b02 e009       |    |		Load	0x0,0x9
0b03 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0b04 c402       |    |		Store	0x2,0x2
0b05 00c8       |    |		Action	Pop_Auxiliary_Range
0b06 3ff3       |?   |		Loop_Increasing	0xafa
0b07 00ce       |    |		Action	Pop_Auxiliary
0b08 7841       |xA  |		Jump	0xb4a
0b09 00cf       |    |		Action	Mark_Auxiliary
0b0a e5ff       |    |		Load	0x2,-0x1
0b0b 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
0b0c 0227       | '  |		Execute	Access,All_Reference
0b0d 01d9       |    |		Execute	Vector,Reverse_Bounds
0b0e 0263       | c  |		Execute	Discrete,Above_Bound
0b0f 700d       |p   |		Jump_Nonzero	0xb1d
0b10 e402       |    |		Load	0x2,0x2
0b11 00d9       |    |		Load_Top	At_Offset_1
0b12 e5ff       |    |		Load	0x2,-0x1
0b13 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
0b14 0227       | '  |		Execute	Access,All_Reference
0b15 01d7       |    |		Execute	Vector,Field_Read
0b16 e005       |    |		Load	0x0,0x5
0b17 184a       | J  |		Execute	Package,Field_Execute,Field_Number 0x4a
0b18 e009       |    |		Load	0x0,0x9
0b19 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0b1a c402       |    |		Store	0x2,0x2
0b1b 00c8       |    |		Action	Pop_Auxiliary_Range
0b1c 3ff3       |?   |		Loop_Increasing	0xb10
0b1d 00ce       |    |		Action	Pop_Auxiliary
0b1e 782b       |x+  |		Jump	0xb4a
0b1f 00cf       |    |		Action	Mark_Auxiliary
0b20 e5ff       |    |		Load	0x2,-0x1
0b21 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
0b22 0227       | '  |		Execute	Access,All_Reference
0b23 01d9       |    |		Execute	Vector,Reverse_Bounds
0b24 0263       | c  |		Execute	Discrete,Above_Bound
0b25 700d       |p   |		Jump_Nonzero	0xb33
0b26 e402       |    |		Load	0x2,0x2
0b27 00d9       |    |		Load_Top	At_Offset_1
0b28 e5ff       |    |		Load	0x2,-0x1
0b29 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
0b2a 0227       | '  |		Execute	Access,All_Reference
0b2b 01d7       |    |		Execute	Vector,Field_Read
0b2c e006       |    |		Load	0x0,0x6
0b2d 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0b2e e009       |    |		Load	0x0,0x9
0b2f 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0b30 c402       |    |		Store	0x2,0x2
0b31 00c8       |    |		Action	Pop_Auxiliary_Range
0b32 3ff3       |?   |		Loop_Increasing	0xb26
0b33 00ce       |    |		Action	Pop_Auxiliary
0b34 7815       |x   |		Jump	0xb4a
0b35 00cf       |    |		Action	Mark_Auxiliary
0b36 e5ff       |    |		Load	0x2,-0x1
0b37 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
0b38 0227       | '  |		Execute	Access,All_Reference
0b39 01d9       |    |		Execute	Vector,Reverse_Bounds
0b3a 0263       | c  |		Execute	Discrete,Above_Bound
0b3b 700d       |p   |		Jump_Nonzero	0xb49
0b3c e402       |    |		Load	0x2,0x2
0b3d 00d9       |    |		Load_Top	At_Offset_1
0b3e e5ff       |    |		Load	0x2,-0x1
0b3f 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
0b40 0227       | '  |		Execute	Access,All_Reference
0b41 01d7       |    |		Execute	Vector,Field_Read
0b42 e007       |    |		Load	0x0,0x7
0b43 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0b44 e009       |    |		Load	0x0,0x9
0b45 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0b46 c402       |    |		Store	0x2,0x2
0b47 00c8       |    |		Action	Pop_Auxiliary_Range
0b48 3ff3       |?   |		Loop_Increasing	0xb3c
0b49 00ce       |    |		Action	Pop_Auxiliary
0b4a 00db       |    |		Load_Top	At_Offset_3
0b4b e030       | 0  |		Load	0x0,0x30
0b4c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0b4d 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0b4e c405       |    |		Store	0x2,0x5
0b4f e033       | 3  |		Load	0x0,0x33
0b50 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0b51 e033       | 3  |		Load	0x0,0x33
0b52 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0b53 00da       |    |		Load_Top	At_Offset_2
0b54 e5fe       |    |		Load	0x2,-0x2
0b55 e2d0       |    |		Load	0x1,0xd0
0b56 e00f       |    |		Load	0x0,0xf
0b57 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
0b58 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0b59 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0b5a 0000 0000  |    |		.BLANK	0000[0x6]
0b60 ; --------------------------------------------------------------------------------------
0b60 ; SUBPROGRAM
0b60 ; --------------------------------------------------------------------------------------
0b60 0b63       | c  |		.CONST	0x0b63								; Address of begin
0b61 0004       |    |		.CONST	0x0004								; Address of exception handler
0b62 0001       |    |		.CONST	0x0001								; Number of locals
0b63			BODY_0b60:
0b63			INIT_0b60:
0b63 00da       |    |		Load_Top	At_Offset_2
0b64 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0b65 4606       |F   |		Jump_Case	0x7
0b66 780f       |x   |		Jump	0xb76								; case 0x0
0b67 7811       |x   |		Jump	0xb79								; case 0x1
0b68 7819       |x   |		Jump	0xb82								; case 0x2
0b69 7821       |x!  |		Jump	0xb8b								; case 0x3
0b6a 7832       |x2  |		Jump	0xb9d								; case 0x4
0b6b 7828       |x(  |		Jump	0xb94								; case 0x5
0b6c 7800       |x   |		Jump	0xb6d								; case 0x6
0b6d e5fd       |    |		Load	0x2,-0x3
0b6e e5fe       |    |		Load	0x2,-0x2
0b6f e5ff       |    |		Load	0x2,-0x1
0b70 2e08       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8
0b71 0227       | '  |		Execute	Access,All_Reference
0b72 01d7       |    |		Execute	Vector,Field_Read
0b73 e249       | I  |		Load	0x1,0x49
0b74 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0b75 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0b76 0092 1204  |    |		Action	Push_String_Extended,0x1204					; "<NIL LIST>"
0b78 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0b79 e5fd       |    |		Load	0x2,-0x3
0b7a e5fe       |    |		Load	0x2,-0x2
0b7b e5ff       |    |		Load	0x2,-0x1
0b7c 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0b7d 0227       | '  |		Execute	Access,All_Reference
0b7e 01d7       |    |		Execute	Vector,Field_Read
0b7f e249       | I  |		Load	0x1,0x49
0b80 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0b81 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0b82 e5fd       |    |		Load	0x2,-0x3
0b83 e5fe       |    |		Load	0x2,-0x2
0b84 e5ff       |    |		Load	0x2,-0x1
0b85 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0b86 0227       | '  |		Execute	Access,All_Reference
0b87 01d7       |    |		Execute	Vector,Field_Read
0b88 e249       | I  |		Load	0x1,0x49
0b89 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0b8a 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0b8b e5fd       |    |		Load	0x2,-0x3
0b8c e5fe       |    |		Load	0x2,-0x2
0b8d e5ff       |    |		Load	0x2,-0x1
0b8e 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
0b8f 0227       | '  |		Execute	Access,All_Reference
0b90 01d7       |    |		Execute	Vector,Field_Read
0b91 e249       | I  |		Load	0x1,0x49
0b92 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0b93 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0b94 e5fd       |    |		Load	0x2,-0x3
0b95 e5fe       |    |		Load	0x2,-0x2
0b96 e5ff       |    |		Load	0x2,-0x1
0b97 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
0b98 0227       | '  |		Execute	Access,All_Reference
0b99 01d7       |    |		Execute	Vector,Field_Read
0b9a e249       | I  |		Load	0x1,0x49
0b9b 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0b9c 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0b9d e5fd       |    |		Load	0x2,-0x3
0b9e e5fe       |    |		Load	0x2,-0x2
0b9f e5ff       |    |		Load	0x2,-0x1
0ba0 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
0ba1 0227       | '  |		Execute	Access,All_Reference
0ba2 01d7       |    |		Execute	Vector,Field_Read
0ba3 e249       | I  |		Load	0x1,0x49
0ba4 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0ba5 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0ba6 0000 0000  |    |		.XXX[0x2]
0ba8 ; --------------------------------------------------------------------------------------
0ba8 ; SUBPROGRAM
0ba8 ; --------------------------------------------------------------------------------------
0ba8 0bab       |    |		.CONST	0x0bab								; Address of begin
0ba9 0004       |    |		.CONST	0x0004								; Address of exception handler
0baa 0001       |    |		.CONST	0x0001								; Number of locals
0bab			BODY_0ba8:
0bab			INIT_0ba8:
0bab 00da       |    |		Load_Top	At_Offset_2
0bac 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0bad 4606       |F   |		Jump_Case	0x7
0bae 780f       |x   |		Jump	0xbbe								; case 0x0
0baf 7811       |x   |		Jump	0xbc1								; case 0x1
0bb0 7819       |x   |		Jump	0xbca								; case 0x2
0bb1 7821       |x!  |		Jump	0xbd3								; case 0x3
0bb2 7832       |x2  |		Jump	0xbe5								; case 0x4
0bb3 7828       |x(  |		Jump	0xbdc								; case 0x5
0bb4 7800       |x   |		Jump	0xbb5								; case 0x6
0bb5 e5fd       |    |		Load	0x2,-0x3
0bb6 e5fe       |    |		Load	0x2,-0x2
0bb7 e5ff       |    |		Load	0x2,-0x1
0bb8 2e08       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8
0bb9 0227       | '  |		Execute	Access,All_Reference
0bba 01d7       |    |		Execute	Vector,Field_Read
0bbb e249       | I  |		Load	0x1,0x49
0bbc 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0bbd 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0bbe 0092 1204  |    |		Action	Push_String_Extended,0x1204					; "<NIL LIST>"
0bc0 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0bc1 e5fd       |    |		Load	0x2,-0x3
0bc2 e5fe       |    |		Load	0x2,-0x2
0bc3 e5ff       |    |		Load	0x2,-0x1
0bc4 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0bc5 0227       | '  |		Execute	Access,All_Reference
0bc6 01d7       |    |		Execute	Vector,Field_Read
0bc7 e249       | I  |		Load	0x1,0x49
0bc8 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0bc9 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0bca e5fd       |    |		Load	0x2,-0x3
0bcb e5fe       |    |		Load	0x2,-0x2
0bcc e5ff       |    |		Load	0x2,-0x1
0bcd 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0bce 0227       | '  |		Execute	Access,All_Reference
0bcf 01d7       |    |		Execute	Vector,Field_Read
0bd0 e249       | I  |		Load	0x1,0x49
0bd1 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0bd2 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0bd3 e5fd       |    |		Load	0x2,-0x3
0bd4 e5fe       |    |		Load	0x2,-0x2
0bd5 e5ff       |    |		Load	0x2,-0x1
0bd6 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
0bd7 0227       | '  |		Execute	Access,All_Reference
0bd8 01d7       |    |		Execute	Vector,Field_Read
0bd9 e249       | I  |		Load	0x1,0x49
0bda 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0bdb 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0bdc e5fd       |    |		Load	0x2,-0x3
0bdd e5fe       |    |		Load	0x2,-0x2
0bde e5ff       |    |		Load	0x2,-0x1
0bdf 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
0be0 0227       | '  |		Execute	Access,All_Reference
0be1 01d7       |    |		Execute	Vector,Field_Read
0be2 e249       | I  |		Load	0x1,0x49
0be3 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0be4 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0be5 e5fd       |    |		Load	0x2,-0x3
0be6 e5fe       |    |		Load	0x2,-0x2
0be7 e5ff       |    |		Load	0x2,-0x1
0be8 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
0be9 0227       | '  |		Execute	Access,All_Reference
0bea 01d7       |    |		Execute	Vector,Field_Read
0beb e249       | I  |		Load	0x1,0x49
0bec 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0bed 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0bee 0000 0000  |    |		.XXX[0x2]
0bf0 ; --------------------------------------------------------------------------------------
0bf0 ; SUBPROGRAM
0bf0 ; --------------------------------------------------------------------------------------
0bf0 0bf3       |    |		.CONST	0x0bf3								; Address of begin
0bf1 0004       |    |		.CONST	0x0004								; Address of exception handler
0bf2 0001       |    |		.CONST	0x0001								; Number of locals
0bf3			BODY_0bf0:
0bf3			INIT_0bf0:
0bf3 00da       |    |		Load_Top	At_Offset_2
0bf4 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0bf5 4606       |F   |		Jump_Case	0x7
0bf6 7810       |x   |		Jump	0xc07								; case 0x0
0bf7 7812       |x   |		Jump	0xc0a								; case 0x1
0bf8 781b       |x   |		Jump	0xc14								; case 0x2
0bf9 7824       |x$  |		Jump	0xc1e								; case 0x3
0bfa 7837       |x7  |		Jump	0xc32								; case 0x4
0bfb 782c       |x,  |		Jump	0xc28								; case 0x5
0bfc 7800       |x   |		Jump	0xbfd								; case 0x6
0bfd 00ea       |    |		Load_Encached	Null_String_Cache
0bfe e5fd       |    |		Load	0x2,-0x3
0bff e5fe       |    |		Load	0x2,-0x2
0c00 e5ff       |    |		Load	0x2,-0x1
0c01 2e08       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8
0c02 0227       | '  |		Execute	Access,All_Reference
0c03 01d7       |    |		Execute	Vector,Field_Read
0c04 e249       | I  |		Load	0x1,0x49
0c05 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0c06 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0c07 e00f       |    |		Load	0x0,0xf
0c08 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0c09 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0c0a 00ea       |    |		Load_Encached	Null_String_Cache
0c0b e5fd       |    |		Load	0x2,-0x3
0c0c e5fe       |    |		Load	0x2,-0x2
0c0d e5ff       |    |		Load	0x2,-0x1
0c0e 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0c0f 0227       | '  |		Execute	Access,All_Reference
0c10 01d7       |    |		Execute	Vector,Field_Read
0c11 e249       | I  |		Load	0x1,0x49
0c12 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0c13 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0c14 00ea       |    |		Load_Encached	Null_String_Cache
0c15 e5fd       |    |		Load	0x2,-0x3
0c16 e5fe       |    |		Load	0x2,-0x2
0c17 e5ff       |    |		Load	0x2,-0x1
0c18 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0c19 0227       | '  |		Execute	Access,All_Reference
0c1a 01d7       |    |		Execute	Vector,Field_Read
0c1b e249       | I  |		Load	0x1,0x49
0c1c 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0c1d 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0c1e 00ea       |    |		Load_Encached	Null_String_Cache
0c1f e5fd       |    |		Load	0x2,-0x3
0c20 e5fe       |    |		Load	0x2,-0x2
0c21 e5ff       |    |		Load	0x2,-0x1
0c22 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
0c23 0227       | '  |		Execute	Access,All_Reference
0c24 01d7       |    |		Execute	Vector,Field_Read
0c25 e249       | I  |		Load	0x1,0x49
0c26 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0c27 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0c28 00ea       |    |		Load_Encached	Null_String_Cache
0c29 e5fd       |    |		Load	0x2,-0x3
0c2a e5fe       |    |		Load	0x2,-0x2
0c2b e5ff       |    |		Load	0x2,-0x1
0c2c 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
0c2d 0227       | '  |		Execute	Access,All_Reference
0c2e 01d7       |    |		Execute	Vector,Field_Read
0c2f e249       | I  |		Load	0x1,0x49
0c30 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0c31 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0c32 00ea       |    |		Load_Encached	Null_String_Cache
0c33 e5fd       |    |		Load	0x2,-0x3
0c34 e5fe       |    |		Load	0x2,-0x2
0c35 e5ff       |    |		Load	0x2,-0x1
0c36 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
0c37 0227       | '  |		Execute	Access,All_Reference
0c38 01d7       |    |		Execute	Vector,Field_Read
0c39 e249       | I  |		Load	0x1,0x49
0c3a 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0c3b 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0c3c 0000 0000  |    |		.BLANK	0000[0x4]
0c40 ; --------------------------------------------------------------------------------------
0c40 ; SUBPROGRAM
0c40 ; --------------------------------------------------------------------------------------
0c40 0c43       | C  |		.CONST	0x0c43								; Address of begin
0c41 0004       |    |		.CONST	0x0004								; Address of exception handler
0c42 0001       |    |		.CONST	0x0001								; Number of locals
0c43			BODY_0c40:
0c43			INIT_0c40:
0c43 00da       |    |		Load_Top	At_Offset_2
0c44 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0c45 4606       |F   |		Jump_Case	0x7
0c46 7810       |x   |		Jump	0xc57								; case 0x0
0c47 7812       |x   |		Jump	0xc5a								; case 0x1
0c48 781b       |x   |		Jump	0xc64								; case 0x2
0c49 7824       |x$  |		Jump	0xc6e								; case 0x3
0c4a 7837       |x7  |		Jump	0xc82								; case 0x4
0c4b 782c       |x,  |		Jump	0xc78								; case 0x5
0c4c 7800       |x   |		Jump	0xc4d								; case 0x6
0c4d 00ea       |    |		Load_Encached	Null_String_Cache
0c4e e5fd       |    |		Load	0x2,-0x3
0c4f e5fe       |    |		Load	0x2,-0x2
0c50 e5ff       |    |		Load	0x2,-0x1
0c51 2e08       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8
0c52 0227       | '  |		Execute	Access,All_Reference
0c53 01d7       |    |		Execute	Vector,Field_Read
0c54 e249       | I  |		Load	0x1,0x49
0c55 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
0c56 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0c57 e00f       |    |		Load	0x0,0xf
0c58 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0c59 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0c5a 00ea       |    |		Load_Encached	Null_String_Cache
0c5b e5fd       |    |		Load	0x2,-0x3
0c5c e5fe       |    |		Load	0x2,-0x2
0c5d e5ff       |    |		Load	0x2,-0x1
0c5e 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0c5f 0227       | '  |		Execute	Access,All_Reference
0c60 01d7       |    |		Execute	Vector,Field_Read
0c61 e249       | I  |		Load	0x1,0x49
0c62 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0c63 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0c64 00ea       |    |		Load_Encached	Null_String_Cache
0c65 e5fd       |    |		Load	0x2,-0x3
0c66 e5fe       |    |		Load	0x2,-0x2
0c67 e5ff       |    |		Load	0x2,-0x1
0c68 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0c69 0227       | '  |		Execute	Access,All_Reference
0c6a 01d7       |    |		Execute	Vector,Field_Read
0c6b e249       | I  |		Load	0x1,0x49
0c6c 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0c6d 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0c6e 00ea       |    |		Load_Encached	Null_String_Cache
0c6f e5fd       |    |		Load	0x2,-0x3
0c70 e5fe       |    |		Load	0x2,-0x2
0c71 e5ff       |    |		Load	0x2,-0x1
0c72 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
0c73 0227       | '  |		Execute	Access,All_Reference
0c74 01d7       |    |		Execute	Vector,Field_Read
0c75 e249       | I  |		Load	0x1,0x49
0c76 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0c77 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0c78 00ea       |    |		Load_Encached	Null_String_Cache
0c79 e5fd       |    |		Load	0x2,-0x3
0c7a e5fe       |    |		Load	0x2,-0x2
0c7b e5ff       |    |		Load	0x2,-0x1
0c7c 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
0c7d 0227       | '  |		Execute	Access,All_Reference
0c7e 01d7       |    |		Execute	Vector,Field_Read
0c7f e249       | I  |		Load	0x1,0x49
0c80 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0c81 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0c82 00ea       |    |		Load_Encached	Null_String_Cache
0c83 e5fd       |    |		Load	0x2,-0x3
0c84 e5fe       |    |		Load	0x2,-0x2
0c85 e5ff       |    |		Load	0x2,-0x1
0c86 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
0c87 0227       | '  |		Execute	Access,All_Reference
0c88 01d7       |    |		Execute	Vector,Field_Read
0c89 e249       | I  |		Load	0x1,0x49
0c8a 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0c8b 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0c8c 0000 0000  |    |		.BLANK	0000[0x4]
0c90 ; --------------------------------------------------------------------------------------
0c90 ; SUBPROGRAM
0c90 ; --------------------------------------------------------------------------------------
0c90 0c93       |    |		.CONST	0x0c93								; Address of begin
0c91 0004       |    |		.CONST	0x0004								; Address of exception handler
0c92 0001       |    |		.CONST	0x0001								; Number of locals
0c93			BODY_0c90:
0c93			INIT_0c90:
0c93 00db       |    |		Load_Top	At_Offset_3
0c94 e21e       |    |		Load	0x1,0x1e
0c95 e5ff       |    |		Load	0x2,-0x1
0c96 823a       | :  |		Call	0x1,0x3a
0c97 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0c98 ; --------------------------------------------------------------------------------------
0c98 ; SUBPROGRAM
0c98 ; --------------------------------------------------------------------------------------
0c98 0c9d       |    |		.CONST	0x0c9d								; Address of begin
0c99 0004       |    |		.CONST	0x0004								; Address of exception handler
0c9a 0002       |    |		.CONST	0x0002								; Number of locals
0c9b			INIT_0c98:
0c9b 029f 104b  |   K|		Declare_Subprogram	INIT_1048,For_Call
0c9d			BODY_0c98:
0c9d 00db       |    |		Load_Top	At_Offset_3
0c9e 00d8       |    |		Load_Top	At_Offset_0
0c9f 0c0c       |    |		Execute_Immediate	Greater_Equal,0xc
0ca0 7012       |p   |		Jump_Nonzero	0xcb3
0ca1 460b       |F   |		Jump_Case	0xc
0ca2 783e       |x>  |		Jump	0xce1								; case 0x0
0ca3 7811       |x   |		Jump	0xcb5								; case 0x1
0ca4 781b       |x   |		Jump	0xcc0								; case 0x2
0ca5 783e       |x>  |		Jump	0xce4								; case 0x3
0ca6 781b       |x   |		Jump	0xcc2								; case 0x4
0ca7 781e       |x   |		Jump	0xcc6								; case 0x5
0ca8 7821       |x!  |		Jump	0xcca								; case 0x6
0ca9 783a       |x:  |		Jump	0xce4								; case 0x7
0caa 7839       |x9  |		Jump	0xce4								; case 0x8
0cab 7838       |x8  |		Jump	0xce4								; case 0x9
0cac 7829       |x)  |		Jump	0xcd6								; case 0xa
0cad 7800       |x   |		Jump	0xcae								; case 0xb
0cae 8218       |    |		Call	0x1,0x18
0caf e5fd       |    |		Load	0x2,-0x3
0cb0 e031       | 1  |		Load	0x0,0x31
0cb1 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0cb2 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0cb3 00d1       |    |		Pop_Control	Pop_Count_1
0cb4 782f       |x/  |		Jump	0xce4
0cb5 00ea       |    |		Load_Encached	Null_String_Cache
0cb6 4805       |H   |		Short_Literal	0x5
0cb7 8239       | 9  |		Call	0x1,0x39
0cb8 0092 1205  |    |		Action	Push_String_Extended,0x1205					; ", "
0cba 01cc       |    |		Execute	Vector,Catenate
0cbb 00ea       |    |		Load_Encached	Null_String_Cache
0cbc 4802       |H   |		Short_Literal	0x2
0cbd 8239       | 9  |		Call	0x1,0x39
0cbe 01cc       |    |		Execute	Vector,Catenate
0cbf 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0cc0 8402       |    |		Call	0x2,0x2
0cc1 7822       |x"  |		Jump	0xce4
0cc2 e2cd       |    |		Load	0x1,0xcd
0cc3 e022       | "  |		Load	0x0,0x22
0cc4 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
0cc5 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0cc6 e2cd       |    |		Load	0x1,0xcd
0cc7 e022       | "  |		Load	0x0,0x22
0cc8 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
0cc9 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0cca e5fe       |    |		Load	0x2,-0x2
0ccb 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0ccc 0f03       |    |		Execute_Immediate	Equal,0x3
0ccd 6816       |h   |		Jump_Zero	0xce4
0cce e5fd       |    |		Load	0x2,-0x3
0ccf e5fe       |    |		Load	0x2,-0x2
0cd0 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0cd1 e005       |    |		Load	0x0,0x5
0cd2 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0cd3 e249       | I  |		Load	0x1,0x49
0cd4 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0cd5 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0cd6 4801       |H   |		Short_Literal	0x1
0cd7 e5fd       |    |		Load	0x2,-0x3
0cd8 e2c1       |    |		Load	0x1,0xc1
0cd9 e020       |    |		Load	0x0,0x20
0cda 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0cdb e2d7       |    |		Load	0x1,0xd7
0cdc 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0cdd e030       | 0  |		Load	0x0,0x30
0cde 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0cdf 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0ce0 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0ce1 0092 1206  |    |		Action	Push_String_Extended,0x1206					; "<NIL OPERATION>"
0ce3 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0ce4 e2c0       |    |		Load	0x1,0xc0
0ce5 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0ce6 0000 0000  |    |		.XXX[0x2]
0ce8 ; --------------------------------------------------------------------------------------
0ce8 ; SUBPROGRAM
0ce8 ; --------------------------------------------------------------------------------------
0ce8 0ceb       |    |		.CONST	0x0ceb								; Address of begin
0ce9 0004       |    |		.CONST	0x0004								; Address of exception handler
0cea 0001       |    |		.CONST	0x0001								; Number of locals
0ceb			BODY_0ce8:
0ceb			INIT_0ce8:
0ceb e5fd       |    |		Load	0x2,-0x3
0cec e5fe       |    |		Load	0x2,-0x2
0ced e21e       |    |		Load	0x1,0x1e
0cee e5ff       |    |		Load	0x2,-0x1
0cef 823c       | <  |		Call	0x1,0x3c
0cf0 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0cf1 0000 0000  |    |		.BLANK	0000[0x7]
0cf8 ; --------------------------------------------------------------------------------------
0cf8 ; SUBPROGRAM
0cf8 ; --------------------------------------------------------------------------------------
0cf8 0cff       |    |		.CONST	0x0cff								; Address of begin
0cf9 0004       |    |		.CONST	0x0004								; Address of exception handler
0cfa 0003       |    |		.CONST	0x0003								; Number of locals
0cfb			INIT_0cf8:
0cfb 029f 106b  |   k|		Declare_Subprogram	INIT_1068,For_Call
0cfd 029f 109b  |    |		Declare_Subprogram	INIT_1098,For_Call
0cff			BODY_0cf8:
0cff e5ff       |    |		Load	0x2,-0x1
0d00 00d8       |    |		Load_Top	At_Offset_0
0d01 0c0b       |    |		Execute_Immediate	Greater_Equal,0xb
0d02 700e       |p   |		Jump_Nonzero	0xd11
0d03 460a       |F   |		Jump_Case	0xb
0d04 782d       |x-  |		Jump	0xd32								; case 0x0
0d05 7827       |x'  |		Jump	0xd2d								; case 0x1
0d06 780c       |x   |		Jump	0xd13								; case 0x2
0d07 7812       |x   |		Jump	0xd1a								; case 0x3
0d08 7829       |x)  |		Jump	0xd32								; case 0x4
0d09 780b       |x   |		Jump	0xd15								; case 0x5
0d0a 7815       |x   |		Jump	0xd20								; case 0x6
0d0b 7826       |x&  |		Jump	0xd32								; case 0x7
0d0c 7825       |x%  |		Jump	0xd32								; case 0x8
0d0d 7824       |x$  |		Jump	0xd32								; case 0x9
0d0e 7800       |x   |		Jump	0xd0f								; case 0xa
0d0f 8403       |    |		Call	0x2,0x3
0d10 7821       |x!  |		Jump	0xd32
0d11 00d1       |    |		Pop_Control	Pop_Count_1
0d12 781f       |x   |		Jump	0xd32
0d13 8402       |    |		Call	0x2,0x2
0d14 781d       |x   |		Jump	0xd32
0d15 e5fc       |    |		Load	0x2,-0x4
0d16 480b       |H   |		Short_Literal	0xb
0d17 8243       | C  |		Call	0x1,0x43
0d18 8221       | !  |		Call	0x1,0x21
0d19 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0d1a e5fc       |    |		Load	0x2,-0x4
0d1b e5fd       |    |		Load	0x2,-0x3
0d1c e2cd       |    |		Load	0x1,0xcd
0d1d e249       | I  |		Load	0x1,0x49
0d1e 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0d1f 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0d20 e5fe       |    |		Load	0x2,-0x2
0d21 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0d22 0f03       |    |		Execute_Immediate	Equal,0x3
0d23 680e       |h   |		Jump_Zero	0xd32
0d24 e5fc       |    |		Load	0x2,-0x4
0d25 e5fd       |    |		Load	0x2,-0x3
0d26 e5fe       |    |		Load	0x2,-0x2
0d27 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0d28 e005       |    |		Load	0x0,0x5
0d29 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0d2a e249       | I  |		Load	0x1,0x49
0d2b 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0d2c 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0d2d e5fc       |    |		Load	0x2,-0x4
0d2e 480b       |H   |		Short_Literal	0xb
0d2f 8243       | C  |		Call	0x1,0x43
0d30 8221       | !  |		Call	0x1,0x21
0d31 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0d32 e033       | 3  |		Load	0x0,0x33
0d33 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0d34 e033       | 3  |		Load	0x0,0x33
0d35 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0d36 e033       | 3  |		Load	0x0,0x33
0d37 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0d38 e5fc       |    |		Load	0x2,-0x4
0d39 8219       |    |		Call	0x1,0x19
0d3a e00f       |    |		Load	0x0,0xf
0d3b 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
0d3c 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0d3d 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0d3e 0000 0000  |    |		.XXX[0x2]
0d40 ; --------------------------------------------------------------------------------------
0d40 ; SUBPROGRAM
0d40 ; --------------------------------------------------------------------------------------
0d40 0d43       | C  |		.CONST	0x0d43								; Address of begin
0d41 0004       |    |		.CONST	0x0004								; Address of exception handler
0d42 0001       |    |		.CONST	0x0001								; Number of locals
0d43			BODY_0d40:
0d43			INIT_0d40:
0d43 00da       |    |		Load_Top	At_Offset_2
0d44 82de       |    |		Call	0x1,0xde
0d45 7011       |p   |		Jump_Nonzero	0xd57
0d46 e2bf       |    |		Load	0x1,0xbf
0d47 00ea       |    |		Load_Encached	Null_String_Cache
0d48 4800       |H   |		Short_Literal	0x0
0d49 580e       |X   |		Indirect_Literal	Float,0xd58,4.5
0d4a e5fd       |    |		Load	0x2,-0x3
0d4b e5fe       |    |		Load	0x2,-0x2
0d4c 4802       |H   |		Short_Literal	0x2
0d4d e5ff       |    |		Load	0x2,-0x1
0d4e e2c2       |    |		Load	0x1,0xc2
0d4f e020       |    |		Load	0x0,0x20
0d50 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0d51 e2d7       |    |		Load	0x1,0xd7
0d52 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0d53 8219       |    |		Call	0x1,0x19
0d54 e00f       |    |		Load	0x0,0xf
0d55 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
0d56 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0d57 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0d58 4012 0000  |@   |		.DBL	4.5
0d5a 0000 0000  |    |
0d5c 0000 0000  |    |		.BLANK	0000[0x4]
0d60 ; --------------------------------------------------------------------------------------
0d60 ; SUBPROGRAM
0d60 ; --------------------------------------------------------------------------------------
0d60 0d63       | c  |		.CONST	0x0d63								; Address of begin
0d61 0004       |    |		.CONST	0x0004								; Address of exception handler
0d62 0001       |    |		.CONST	0x0001								; Number of locals
0d63			BODY_0d60:
0d63			INIT_0d60:
0d63 e00f       |    |		Load	0x0,0xf
0d64 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
0d65 00ea       |    |		Load_Encached	Null_String_Cache
0d66 4801       |H   |		Short_Literal	0x1
0d67 e5ff       |    |		Load	0x2,-0x1
0d68 e2c1       |    |		Load	0x1,0xc1
0d69 e020       |    |		Load	0x0,0x20
0d6a 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0d6b e2d7       |    |		Load	0x1,0xd7
0d6c 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0d6d 8219       |    |		Call	0x1,0x19
0d6e e00f       |    |		Load	0x0,0xf
0d6f 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
0d70 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0d71 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0d72 0000 0000  |    |		.BLANK	0000[0x6]
0d78 ; --------------------------------------------------------------------------------------
0d78 ; SUBPROGRAM
0d78 ; --------------------------------------------------------------------------------------
0d78 0d7b       | {  |		.CONST	0x0d7b								; Address of begin
0d79 0004       |    |		.CONST	0x0004								; Address of exception handler
0d7a 0001       |    |		.CONST	0x0001								; Number of locals
0d7b			BODY_0d78:
0d7b			INIT_0d78:
0d7b e5fd       |    |		Load	0x2,-0x3
0d7c e5fe       |    |		Load	0x2,-0x2
0d7d e5ff       |    |		Load	0x2,-0x1
0d7e e2d0       |    |		Load	0x1,0xd0
0d7f e00f       |    |		Load	0x0,0xf
0d80 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
0d81 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0d82 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0d83 0000 0000  |    |		.BLANK	0000[0x5]
0d88 ; --------------------------------------------------------------------------------------
0d88 ; SUBPROGRAM
0d88 ; --------------------------------------------------------------------------------------
0d88 0d8b       |    |		.CONST	0x0d8b								; Address of begin
0d89 0004       |    |		.CONST	0x0004								; Address of exception handler
0d8a 0001       |    |		.CONST	0x0001								; Number of locals
0d8b			BODY_0d88:
0d8b			INIT_0d88:
0d8b e5fc       |    |		Load	0x2,-0x4
0d8c e5fd       |    |		Load	0x2,-0x3
0d8d e5fe       |    |		Load	0x2,-0x2
0d8e e5ff       |    |		Load	0x2,-0x1
0d8f e2d0       |    |		Load	0x1,0xd0
0d90 e00f       |    |		Load	0x0,0xf
0d91 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
0d92 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0d93 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0d94 0000 0000  |    |		.BLANK	0000[0x4]
0d98 ; --------------------------------------------------------------------------------------
0d98 ; SUBPROGRAM
0d98 ; --------------------------------------------------------------------------------------
0d98 0d9b       |    |		.CONST	0x0d9b								; Address of begin
0d99 0004       |    |		.CONST	0x0004								; Address of exception handler
0d9a 0001       |    |		.CONST	0x0001								; Number of locals
0d9b			BODY_0d98:
0d9b			INIT_0d98:
0d9b e5fc       |    |		Load	0x2,-0x4
0d9c e5fd       |    |		Load	0x2,-0x3
0d9d e5fe       |    |		Load	0x2,-0x2
0d9e e5ff       |    |		Load	0x2,-0x1
0d9f e2d0       |    |		Load	0x1,0xd0
0da0 e00f       |    |		Load	0x0,0xf
0da1 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
0da2 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0da3 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0da4 0000 0000  |    |		.BLANK	0000[0x4]
0da8 ; --------------------------------------------------------------------------------------
0da8 ; SUBPROGRAM
0da8 ; --------------------------------------------------------------------------------------
0da8 0dab       |    |		.CONST	0x0dab								; Address of begin
0da9 0004       |    |		.CONST	0x0004								; Address of exception handler
0daa 0001       |    |		.CONST	0x0001								; Number of locals
0dab			BODY_0da8:
0dab			INIT_0da8:
0dab e5fc       |    |		Load	0x2,-0x4
0dac e5fd       |    |		Load	0x2,-0x3
0dad e5fe       |    |		Load	0x2,-0x2
0dae e5ff       |    |		Load	0x2,-0x1
0daf e2d0       |    |		Load	0x1,0xd0
0db0 e00f       |    |		Load	0x0,0xf
0db1 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
0db2 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0db3 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0db4 0000 0000  |    |		.BLANK	0000[0x4]
0db8 ; --------------------------------------------------------------------------------------
0db8 ; SUBPROGRAM
0db8 ; --------------------------------------------------------------------------------------
0db8 0dbb       |    |		.CONST	0x0dbb								; Address of begin
0db9 0004       |    |		.CONST	0x0004								; Address of exception handler
0dba 0001       |    |		.CONST	0x0001								; Number of locals
0dbb			BODY_0db8:
0dbb			INIT_0db8:
0dbb e5fd       |    |		Load	0x2,-0x3
0dbc e5fe       |    |		Load	0x2,-0x2
0dbd e5ff       |    |		Load	0x2,-0x1
0dbe e2d0       |    |		Load	0x1,0xd0
0dbf e00f       |    |		Load	0x0,0xf
0dc0 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
0dc1 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0dc2 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0dc3 0000 0000  |    |		.BLANK	0000[0x5]
0dc8 ; --------------------------------------------------------------------------------------
0dc8 ; SUBPROGRAM
0dc8 ; --------------------------------------------------------------------------------------
0dc8 0dcb       |    |		.CONST	0x0dcb								; Address of begin
0dc9 0004       |    |		.CONST	0x0004								; Address of exception handler
0dca 0001       |    |		.CONST	0x0001								; Number of locals
0dcb			BODY_0dc8:
0dcb			INIT_0dc8:
0dcb e5fd       |    |		Load	0x2,-0x3
0dcc e5fe       |    |		Load	0x2,-0x2
0dcd e5ff       |    |		Load	0x2,-0x1
0dce e2d0       |    |		Load	0x1,0xd0
0dcf e00f       |    |		Load	0x0,0xf
0dd0 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
0dd1 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0dd2 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0dd3 0000 0000  |    |		.BLANK	0000[0x5]
0dd8 ; --------------------------------------------------------------------------------------
0dd8 ; SUBPROGRAM
0dd8 ; --------------------------------------------------------------------------------------
0dd8 0ddb       |    |		.CONST	0x0ddb								; Address of begin
0dd9 0004       |    |		.CONST	0x0004								; Address of exception handler
0dda 0001       |    |		.CONST	0x0001								; Number of locals
0ddb			BODY_0dd8:
0ddb			INIT_0dd8:
0ddb e5fd       |    |		Load	0x2,-0x3
0ddc e5fe       |    |		Load	0x2,-0x2
0ddd e5ff       |    |		Load	0x2,-0x1
0dde e2d0       |    |		Load	0x1,0xd0
0ddf e00f       |    |		Load	0x0,0xf
0de0 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
0de1 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0de2 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0de3 0000 0000  |    |		.BLANK	0000[0x5]
0de8 ; --------------------------------------------------------------------------------------
0de8 ; SUBPROGRAM
0de8 ; --------------------------------------------------------------------------------------
0de8 0deb       |    |		.CONST	0x0deb								; Address of begin
0de9 0004       |    |		.CONST	0x0004								; Address of exception handler
0dea 0001       |    |		.CONST	0x0001								; Number of locals
0deb			BODY_0de8:
0deb			INIT_0de8:
0deb e5fd       |    |		Load	0x2,-0x3
0dec e5fe       |    |		Load	0x2,-0x2
0ded e5ff       |    |		Load	0x2,-0x1
0dee e2d0       |    |		Load	0x1,0xd0
0def e00f       |    |		Load	0x0,0xf
0df0 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
0df1 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0df2 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0df3 0000 0000  |    |		.BLANK	0000[0x5]
0df8 ; --------------------------------------------------------------------------------------
0df8 ; SUBPROGRAM
0df8 ; --------------------------------------------------------------------------------------
0df8 0dfb       |    |		.CONST	0x0dfb								; Address of begin
0df9 0004       |    |		.CONST	0x0004								; Address of exception handler
0dfa 0001       |    |		.CONST	0x0001								; Number of locals
0dfb			BODY_0df8:
0dfb			INIT_0df8:
0dfb 00db       |    |		Load_Top	At_Offset_3
0dfc 00db       |    |		Load_Top	At_Offset_3
0dfd e2d0       |    |		Load	0x1,0xd0
0dfe e00f       |    |		Load	0x0,0xf
0dff 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
0e00 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0e01 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0e02 0000 0000  |    |		.BLANK	0000[0x6]
0e08 ; --------------------------------------------------------------------------------------
0e08 ; SUBPROGRAM
0e08 ; --------------------------------------------------------------------------------------
0e08 0e14       |    |		.CONST	0x0e14								; Address of begin
0e09 0004       |    |		.CONST	0x0004								; Address of exception handler
0e0a 0005       |    |		.CONST	0x0005								; Number of locals
0e0b			INIT_0e08:
0e0b 0092 1207  |    |		Action	Push_String_Extended,0x1207					; "#INCLUDE"
0e0d 0092 1208  |    |		Action	Push_String_Extended,0x1208					; "\x0a\x0a"
0e0f 00e3       |    |		Load_Encached	Natural_Cache
0e10 e5ff       |    |		Load	0x2,-0x1
0e11 01dd       |    |		Execute	Vector,First
0e12 00e4       |    |		Load_Encached	Positive_Cache
0e13 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0e14			BODY_0e08:
0e14 e5ff       |    |		Load	0x2,-0x1
0e15 01db       |    |		Execute	Vector,Length
0e16 6859       |hY  |		Jump_Zero	0xe70
0e17 e5fc       |    |		Load	0x2,-0x4
0e18 7005       |p   |		Jump_Nonzero	0xe1e
0e19 4801       |H   |		Short_Literal	0x1
0e1a e2d0       |    |		Load	0x1,0xd0
0e1b e00f       |    |		Load	0x0,0xf
0e1c 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
0e1d 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0e1e e5ff       |    |		Load	0x2,-0x1
0e1f 01db       |    |		Execute	Vector,Length
0e20 0c09       |    |		Execute_Immediate	Greater_Equal,0x9
0e21 681f       |h   |		Jump_Zero	0xe41
0e22 4801       |H   |		Short_Literal	0x1
0e23 e402       |    |		Load	0x2,0x2
0e24 e5ff       |    |		Load	0x2,-0x1
0e25 01dd       |    |		Execute	Vector,First
0e26 e5ff       |    |		Load	0x2,-0x1
0e27 01dd       |    |		Execute	Vector,First
0e28 0a07       |    |		Execute_Immediate	Plus,0x7
0e29 00d8       |    |		Load_Top	At_Offset_0
0e2a 00e2       |    |		Load_Encached	Integer_Cache
0e2b 0260       | `  |		Execute	Discrete,In_Type
0e2c 7001       |p   |		Jump_Nonzero	0xe2e
0e2d 0801       |    |		Execute_Immediate	Raise,0x1
0e2e e5ff       |    |		Load	0x2,-0x1
0e2f 01cf       |    |		Execute	Vector,Slice_Read
0e30 e015       |    |		Load	0x0,0x15
0e31 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0e32 680e       |h   |		Jump_Zero	0xe41
0e33 e5ff       |    |		Load	0x2,-0x1
0e34 01dd       |    |		Execute	Vector,First
0e35 0a08       |    |		Execute_Immediate	Plus,0x8
0e36 00d8       |    |		Load_Top	At_Offset_0
0e37 00e2       |    |		Load_Encached	Integer_Cache
0e38 0260       | `  |		Execute	Discrete,In_Type
0e39 7001       |p   |		Jump_Nonzero	0xe3b
0e3a 0801       |    |		Execute_Immediate	Raise,0x1
0e3b e5ff       |    |		Load	0x2,-0x1
0e3c 01dc       |    |		Execute	Vector,Last
0e3d e5ff       |    |		Load	0x2,-0x1
0e3e 01cf       |    |		Execute	Vector,Slice_Read
0e3f 8240       | @  |		Call	0x1,0x40
0e40 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0e41 4801       |H   |		Short_Literal	0x1
0e42 e5ff       |    |		Load	0x2,-0x1
0e43 e403       |    |		Load	0x2,0x3
0e44 e015       |    |		Load	0x0,0x15
0e45 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0e46 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0e47 00cf       |    |		Action	Mark_Auxiliary
0e48 7819       |x   |		Jump	0xe62
0e49 e5fd       |    |		Load	0x2,-0x3
0e4a e5fe       |    |		Load	0x2,-0x2
0e4b 00db       |    |		Load_Top	At_Offset_3
0e4c e404       |    |		Load	0x2,0x4
0e4d 0aff       |    |		Execute_Immediate	Plus,-0x1
0e4e e5ff       |    |		Load	0x2,-0x1
0e4f 01cf       |    |		Execute	Vector,Slice_Read
0e50 e2d0       |    |		Load	0x1,0xd0
0e51 e00f       |    |		Load	0x0,0xf
0e52 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
0e53 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0e54 00da       |    |		Load_Top	At_Offset_2
0e55 0a01       |    |		Execute_Immediate	Plus,0x1
0e56 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0e57 4801       |H   |		Short_Literal	0x1
0e58 00da       |    |		Load_Top	At_Offset_2
0e59 e5ff       |    |		Load	0x2,-0x1
0e5a 01dc       |    |		Execute	Vector,Last
0e5b e5ff       |    |		Load	0x2,-0x1
0e5c 01cf       |    |		Execute	Vector,Slice_Read
0e5d e403       |    |		Load	0x2,0x3
0e5e e015       |    |		Load	0x0,0x15
0e5f 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0e60 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0e61 00c9       |    |		Action	Pop_Auxiliary_Loop
0e62 00da       |    |		Load_Top	At_Offset_2
0e63 77e5       |w   |		Jump_Nonzero	0xe49
0e64 00ce       |    |		Action	Pop_Auxiliary
0e65 e5fd       |    |		Load	0x2,-0x3
0e66 e5fe       |    |		Load	0x2,-0x2
0e67 00da       |    |		Load_Top	At_Offset_2
0e68 e5ff       |    |		Load	0x2,-0x1
0e69 01dc       |    |		Execute	Vector,Last
0e6a e5ff       |    |		Load	0x2,-0x1
0e6b 01cf       |    |		Execute	Vector,Slice_Read
0e6c e2d0       |    |		Load	0x1,0xd0
0e6d e00f       |    |		Load	0x0,0xf
0e6e 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
0e6f 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0e70 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0e71 0000 0000  |    |		.BLANK	0000[0x7]
0e78 ; --------------------------------------------------------------------------------------
0e78 ; SUBPROGRAM
0e78 ; --------------------------------------------------------------------------------------
0e78 0e7b       | {  |		.CONST	0x0e7b								; Address of begin
0e79 0004       |    |		.CONST	0x0004								; Address of exception handler
0e7a 0001       |    |		.CONST	0x0001								; Number of locals
0e7b			BODY_0e78:
0e7b			INIT_0e78:
0e7b 00db       |    |		Load_Top	At_Offset_3
0e7c 01db       |    |		Execute	Vector,Length
0e7d 681b       |h   |		Jump_Zero	0xe99
0e7e 00da       |    |		Load_Top	At_Offset_2
0e7f 01db       |    |		Execute	Vector,Length
0e80 6813       |h   |		Jump_Zero	0xe94
0e81 4801       |H   |		Short_Literal	0x1
0e82 e2d0       |    |		Load	0x1,0xd0
0e83 e00f       |    |		Load	0x0,0xf
0e84 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
0e85 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0e86 480f       |H   |		Short_Literal	0xf
0e87 8262       | b  |		Call	0x1,0x62
0e88 e00f       |    |		Load	0x0,0xf
0e89 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0e8a e5ff       |    |		Load	0x2,-0x1
0e8b e2d0       |    |		Load	0x1,0xd0
0e8c e00f       |    |		Load	0x0,0xf
0e8d 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
0e8e 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0e8f 4801       |H   |		Short_Literal	0x1
0e90 e2d0       |    |		Load	0x1,0xd0
0e91 e00f       |    |		Load	0x0,0xf
0e92 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
0e93 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0e94 4801       |H   |		Short_Literal	0x1
0e95 e5fc       |    |		Load	0x2,-0x4
0e96 e5fd       |    |		Load	0x2,-0x3
0e97 e5fe       |    |		Load	0x2,-0x2
0e98 8286       |    |		Call	0x1,0x86
0e99 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0e9a 0000 0000  |    |		.BLANK	0000[0x6]
0ea0 ; --------------------------------------------------------------------------------------
0ea0 ; SUBPROGRAM
0ea0 ; --------------------------------------------------------------------------------------
0ea0 0ea5       |    |		.CONST	0x0ea5								; Address of begin
0ea1 0004       |    |		.CONST	0x0004								; Address of exception handler
0ea2 0002       |    |		.CONST	0x0002								; Number of locals
0ea3			INIT_0ea0:
0ea3 029f 10c3  |    |		Declare_Subprogram	INIT_10c0,For_Call
0ea5			BODY_0ea0:
0ea5 00db       |    |		Load_Top	At_Offset_3
0ea6 e005       |    |		Load	0x0,0x5
0ea7 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0ea8 0af4       |    |		Execute_Immediate	Plus,-0xc
0ea9 4607       |F   |		Jump_Case	0x8
0eaa 7807       |x   |		Jump	0xeb2								; case 0x0
0eab 7814       |x   |		Jump	0xec0								; case 0x1
0eac 7815       |x   |		Jump	0xec2								; case 0x2
0ead 7804       |x   |		Jump	0xeb2								; case 0x3
0eae 7826       |x&  |		Jump	0xed5								; case 0x4
0eaf 7822       |x"  |		Jump	0xed2								; case 0x5
0eb0 7835       |x5  |		Jump	0xee6								; case 0x6
0eb1 7800       |x   |		Jump	0xeb2								; case 0x7
0eb2 0092 1209  |    |		Action	Push_String_Extended,0x1209					; "<SRS_PARA ("
0eb4 e5ff       |    |		Load	0x2,-0x1
0eb5 e005       |    |		Load	0x0,0x5
0eb6 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0eb7 e002       |    |		Load	0x0,0x2
0eb8 1b29       | )  |		Execute	Package,Field_Read,Field_Number 0x29
0eb9 011c       |    |		Execute	Any,Convert_Unchecked
0eba 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0ebb 01cc       |    |		Execute	Vector,Catenate
0ebc 0092 120a  |    |		Action	Push_String_Extended,0x120a					; ")>"
0ebe 01cc       |    |		Execute	Vector,Catenate
0ebf 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0ec0 8402       |    |		Call	0x2,0x2
0ec1 782f       |x/  |		Jump	0xef1
0ec2 482e       |H.  |		Short_Literal	0x2e
0ec3 e28b       |    |		Load	0x1,0x8b
0ec4 e5ff       |    |		Load	0x2,-0x1
0ec5 e005       |    |		Load	0x0,0x5
0ec6 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
0ec7 829f       |    |		Call	0x1,0x9f
0ec8 01cb       |    |		Execute	Vector,Append
0ec9 4820       |H   |		Short_Literal	0x20
0eca 4800       |H   |		Short_Literal	0x0
0ecb 480a       |H   |		Short_Literal	0xa
0ecc e5ff       |    |		Load	0x2,-0x1
0ecd e005       |    |		Load	0x0,0x5
0ece 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
0ecf 82a3       |    |		Call	0x1,0xa3
0ed0 01cc       |    |		Execute	Vector,Catenate
0ed1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0ed2 0092 120b  |    |		Action	Push_String_Extended,0x120b					; "3.3"
0ed4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0ed5 0092 120c  |    |		Action	Push_String_Extended,0x120c					; "3."
0ed7 4820       |H   |		Short_Literal	0x20
0ed8 4800       |H   |		Short_Literal	0x0
0ed9 480a       |H   |		Short_Literal	0xa
0eda e5ff       |    |		Load	0x2,-0x1
0edb e005       |    |		Load	0x0,0x5
0edc 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
0edd 0a01       |    |		Execute_Immediate	Plus,0x1
0ede 00d8       |    |		Load_Top	At_Offset_0
0edf 00e2       |    |		Load_Encached	Integer_Cache
0ee0 0260       | `  |		Execute	Discrete,In_Type
0ee1 7001       |p   |		Jump_Nonzero	0xee3
0ee2 0801       |    |		Execute_Immediate	Raise,0x1
0ee3 82a3       |    |		Call	0x1,0xa3
0ee4 01cc       |    |		Execute	Vector,Catenate
0ee5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0ee6 0092 120d  |    |		Action	Push_String_Extended,0x120d					; "4.2."
0ee8 4820       |H   |		Short_Literal	0x20
0ee9 4800       |H   |		Short_Literal	0x0
0eea 480a       |H   |		Short_Literal	0xa
0eeb e5ff       |    |		Load	0x2,-0x1
0eec e005       |    |		Load	0x0,0x5
0eed 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
0eee 82a3       |    |		Call	0x1,0xa3
0eef 01cc       |    |		Execute	Vector,Catenate
0ef0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0ef1 0831       | 1  |		Execute_Immediate	Raise,0x31
0ef2 0000 0000  |    |		.BLANK	0000[0x6]
0ef8 ; --------------------------------------------------------------------------------------
0ef8 ; SUBPROGRAM
0ef8 ; --------------------------------------------------------------------------------------
0ef8 0efb       |    |		.CONST	0x0efb								; Address of begin
0ef9 0004       |    |		.CONST	0x0004								; Address of exception handler
0efa 0001       |    |		.CONST	0x0001								; Number of locals
0efb			BODY_0ef8:
0efb			INIT_0ef8:
0efb e2d4       |    |		Load	0x1,0xd4
0efc 02fd       |    |		Declare_Variable	Variant_Record,Duplicate
0efd 00cd       |    |		Action	Spare6_Action
0efe 00ca       |    |		Action	Exit_Nullary_Function
0eff 0000       |    |		.XXX[0x1]
0f00 ; --------------------------------------------------------------------------------------
0f00 ; SUBPROGRAM
0f00 ; --------------------------------------------------------------------------------------
0f00 0f03       |    |		.CONST	0x0f03								; Address of begin
0f01 0004       |    |		.CONST	0x0004								; Address of exception handler
0f02 0001       |    |		.CONST	0x0001								; Number of locals
0f03			BODY_0f00:
0f03			INIT_0f00:
0f03 e2d5       |    |		Load	0x1,0xd5
0f04 02fd       |    |		Declare_Variable	Variant_Record,Duplicate
0f05 00cd       |    |		Action	Spare6_Action
0f06 00ca       |    |		Action	Exit_Nullary_Function
0f07 0000       |    |		.XXX[0x1]
0f08 ; --------------------------------------------------------------------------------------
0f08 ; SUBPROGRAM
0f08 ; --------------------------------------------------------------------------------------
0f08 0f0b       |    |		.CONST	0x0f0b								; Address of begin
0f09 0004       |    |		.CONST	0x0004								; Address of exception handler
0f0a 0001       |    |		.CONST	0x0001								; Number of locals
0f0b			BODY_0f08:
0f0b			INIT_0f08:
0f0b 00da       |    |		Load_Top	At_Offset_2
0f0c e004       |    |		Load	0x0,0x4
0f0d 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
0f0e e5fe       |    |		Load	0x2,-0x2
0f0f e004       |    |		Load	0x0,0x4
0f10 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
0f11 027c       | |  |		Execute	Discrete,Less
0f12 7012       |p   |		Jump_Nonzero	0xf25
0f13 00da       |    |		Load_Top	At_Offset_2
0f14 e004       |    |		Load	0x0,0x4
0f15 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
0f16 e5fe       |    |		Load	0x2,-0x2
0f17 e004       |    |		Load	0x0,0x4
0f18 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
0f19 027f       |    |		Execute	Discrete,Equal
0f1a 6808       |h   |		Jump_Zero	0xf23
0f1b 00da       |    |		Load_Top	At_Offset_2
0f1c e004       |    |		Load	0x0,0x4
0f1d 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0f1e e5fe       |    |		Load	0x2,-0x2
0f1f e004       |    |		Load	0x0,0x4
0f20 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0f21 01c1       |    |		Execute	Vector,Less
0f22 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0f23 4800       |H   |		Short_Literal	0x0
0f24 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0f25 4801       |H   |		Short_Literal	0x1
0f26 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0f27 0000       |    |		.XXX[0x1]
0f28 ; --------------------------------------------------------------------------------------
0f28 ; SUBPROGRAM
0f28 ; --------------------------------------------------------------------------------------
0f28 0f2b       | +  |		.CONST	0x0f2b								; Address of begin
0f29 0004       |    |		.CONST	0x0004								; Address of exception handler
0f2a 0001       |    |		.CONST	0x0001								; Number of locals
0f2b			BODY_0f28:
0f2b			INIT_0f28:
0f2b 00da       |    |		Load_Top	At_Offset_2
0f2c e007       |    |		Load	0x0,0x7
0f2d 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0f2e e5fe       |    |		Load	0x2,-0x2
0f2f e007       |    |		Load	0x0,0x7
0f30 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0f31 027c       | |  |		Execute	Discrete,Less
0f32 7012       |p   |		Jump_Nonzero	0xf45
0f33 00da       |    |		Load_Top	At_Offset_2
0f34 e007       |    |		Load	0x0,0x7
0f35 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0f36 e5fe       |    |		Load	0x2,-0x2
0f37 e007       |    |		Load	0x0,0x7
0f38 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0f39 027f       |    |		Execute	Discrete,Equal
0f3a 6808       |h   |		Jump_Zero	0xf43
0f3b 00da       |    |		Load_Top	At_Offset_2
0f3c e007       |    |		Load	0x0,0x7
0f3d 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
0f3e e5fe       |    |		Load	0x2,-0x2
0f3f e007       |    |		Load	0x0,0x7
0f40 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
0f41 01c1       |    |		Execute	Vector,Less
0f42 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0f43 4800       |H   |		Short_Literal	0x0
0f44 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0f45 4801       |H   |		Short_Literal	0x1
0f46 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0f47 0000       |    |		.XXX[0x1]
0f48 ; --------------------------------------------------------------------------------------
0f48 ; SUBPROGRAM
0f48 ; --------------------------------------------------------------------------------------
0f48 0f4b       | K  |		.CONST	0x0f4b								; Address of begin
0f49 0004       |    |		.CONST	0x0004								; Address of exception handler
0f4a 0001       |    |		.CONST	0x0001								; Number of locals
0f4b			BODY_0f48:
0f4b			INIT_0f48:
0f4b 00da       |    |		Load_Top	At_Offset_2
0f4c 829f       |    |		Call	0x1,0x9f
0f4d e5fe       |    |		Load	0x2,-0x2
0f4e 829f       |    |		Call	0x1,0x9f
0f4f 01c1       |    |		Execute	Vector,Less
0f50 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0f51 0000 0000  |    |		.BLANK	0000[0x7]
0f58 ; --------------------------------------------------------------------------------------
0f58 ; SUBPROGRAM
0f58 ; --------------------------------------------------------------------------------------
0f58 0f5b       | [  |		.CONST	0x0f5b								; Address of begin
0f59 0004       |    |		.CONST	0x0004								; Address of exception handler
0f5a 0001       |    |		.CONST	0x0001								; Number of locals
0f5b			BODY_0f58:
0f5b			INIT_0f58:
0f5b 00da       |    |		Load_Top	At_Offset_2
0f5c e004       |    |		Load	0x0,0x4
0f5d 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
0f5e e009       |    |		Load	0x0,0x9
0f5f 1b58       | X  |		Execute	Package,Field_Read,Field_Number 0x58
0f60 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0f61 4811       |H   |		Short_Literal	0x11
0f62 026e       | n  |		Execute	Discrete,Modulo
0f63 00d8       |    |		Load_Top	At_Offset_0
0f64 00e2       |    |		Load_Encached	Integer_Cache
0f65 0260       | `  |		Execute	Discrete,In_Type
0f66 7001       |p   |		Jump_Nonzero	0xf68
0f67 0801       |    |		Execute_Immediate	Raise,0x1
0f68 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0f69 0000 0000  |    |		.BLANK	0000[0x7]
0f70 ; --------------------------------------------------------------------------------------
0f70 ; SUBPROGRAM
0f70 ; --------------------------------------------------------------------------------------
0f70 0f76       | v  |		.CONST	0x0f76								; Address of begin
0f71 0004       |    |		.CONST	0x0004								; Address of exception handler
0f72 0003       |    |		.CONST	0x0003								; Number of locals
0f73			INIT_0f70:
0f73 00e1       |    |		Load_Encached	Boolean_Cache
0f74 00e1       |    |		Load_Encached	Boolean_Cache
0f75 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0f76			BODY_0f70:
0f76 00e1       |    |		Load_Encached	Boolean_Cache
0f77 00d9       |    |		Load_Top	At_Offset_1
0f78 e5ff       |    |		Load	0x2,-0x1
0f79 e5fe       |    |		Load	0x2,-0x2
0f7a e2da       |    |		Load	0x1,0xda
0f7b 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0f7c 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0f7d 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0f7e 00d9       |    |		Load_Top	At_Offset_1
0f7f 7007       |p   |		Jump_Nonzero	0xf87
0f80 e5fe       |    |		Load	0x2,-0x2
0f81 4800       |H   |		Short_Literal	0x0
0f82 4800       |H   |		Short_Literal	0x0
0f83 e5ff       |    |		Load	0x2,-0x1
0f84 e2da       |    |		Load	0x1,0xda
0f85 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0f86 c5fe       |    |		Store	0x2,-0x2
0f87 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0f88 ; --------------------------------------------------------------------------------------
0f88 ; SUBPROGRAM
0f88 ; --------------------------------------------------------------------------------------
0f88 0f8b       |    |		.CONST	0x0f8b								; Address of begin
0f89 0004       |    |		.CONST	0x0004								; Address of exception handler
0f8a 0001       |    |		.CONST	0x0001								; Number of locals
0f8b			BODY_0f88:
0f8b			INIT_0f88:
0f8b 00db       |    |		Load_Top	At_Offset_3
0f8c 01db       |    |		Execute	Vector,Length
0f8d 7007       |p   |		Jump_Nonzero	0xf95
0f8e 00da       |    |		Load_Top	At_Offset_2
0f8f e037       | 7  |		Load	0x0,0x37
0f90 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0f91 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0f92 e2be       |    |		Load	0x1,0xbe
0f93 01cc       |    |		Execute	Vector,Catenate
0f94 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0f95 482e       |H.  |		Short_Literal	0x2e
0f96 00db       |    |		Load_Top	At_Offset_3
0f97 e037       | 7  |		Load	0x0,0x37
0f98 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0f99 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0f9a 01cb       |    |		Execute	Vector,Append
0f9b e5fe       |    |		Load	0x2,-0x2
0f9c 01cc       |    |		Execute	Vector,Catenate
0f9d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0f9e 0000 0000  |    |		.XXX[0x2]
0fa0 ; --------------------------------------------------------------------------------------
0fa0 ; SUBPROGRAM
0fa0 ; --------------------------------------------------------------------------------------
0fa0 0fb3       |    |		.CONST	0x0fb3								; Address of begin
0fa1 0004       |    |		.CONST	0x0004								; Address of exception handler
0fa2 0003       |    |		.CONST	0x0003								; Number of locals
0fa3			INIT_0fa0:
0fa3 00da       |    |		Load_Top	At_Offset_2
0fa4 0007       |    |		Action	Break_Optional
0fa5 00d8       |    |		Load_Top	At_Offset_0
0fa6 e2a0       |    |		Load	0x1,0xa0
0fa7 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0fa8 e5fe       |    |		Load	0x2,-0x2
0fa9 0272       | r  |		Execute	Discrete,Minus
0faa 00d8       |    |		Load_Top	At_Offset_0
0fab 00e3       |    |		Load_Encached	Natural_Cache
0fac 0260       | `  |		Execute	Discrete,In_Type
0fad 7001       |p   |		Jump_Nonzero	0xfaf
0fae 0801       |    |		Execute_Immediate	Raise,0x1
0faf 4801       |H   |		Short_Literal	0x1
0fb0 00da       |    |		Load_Top	At_Offset_2
0fb1 e2a0       |    |		Load	0x1,0xa0
0fb2 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0fb3			BODY_0fa0:
0fb3 00d9       |    |		Load_Top	At_Offset_1
0fb4 e2a0       |    |		Load	0x1,0xa0
0fb5 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0fb6 003a       | :  |		Store_Top	Access,At_Offset_2
0fb7 00d8       |    |		Load_Top	At_Offset_0
0fb8 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0fb9 0000 0000  |    |		.BLANK	0000[0x7]
0fc0 ; --------------------------------------------------------------------------------------
0fc0 ; SUBPROGRAM
0fc0 ; --------------------------------------------------------------------------------------
0fc0 0fc9       |    |		.CONST	0x0fc9								; Address of begin
0fc1 0004       |    |		.CONST	0x0004								; Address of exception handler
0fc2 0002       |    |		.CONST	0x0002								; Number of locals
0fc3			INIT_0fc0:
0fc3 4820       |H   |		Short_Literal	0x20
0fc4 00db       |    |		Load_Top	At_Offset_3
0fc5 e015       |    |		Load	0x0,0x15
0fc6 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0fc7 e015       |    |		Load	0x0,0x15
0fc8 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0fc9			BODY_0fc0:
0fc9 00d8       |    |		Load_Top	At_Offset_0
0fca 01db       |    |		Execute	Vector,Length
0fcb 6805       |h   |		Jump_Zero	0xfd1
0fcc 00d8       |    |		Load_Top	At_Offset_0
0fcd 0092 120e  |    |		Action	Push_String_Extended,0x120e					; "NONE"
0fcf 01df       |    |		Execute	Vector,Equal
0fd0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0fd1 4801       |H   |		Short_Literal	0x1
0fd2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0fd3 0000 0000  |    |		.BLANK	0000[0x5]
0fd8 ; --------------------------------------------------------------------------------------
0fd8 ; SUBPROGRAM
0fd8 ; --------------------------------------------------------------------------------------
0fd8 0fe2       |    |		.CONST	0x0fe2								; Address of begin
0fd9 0004       |    |		.CONST	0x0004								; Address of exception handler
0fda 0002       |    |		.CONST	0x0002								; Number of locals
0fdb			INIT_0fd8:
0fdb e004       |    |		Load	0x0,0x4
0fdc 1b65       | e  |		Execute	Package,Field_Read,Field_Number 0x65
0fdd 02c7       |    |		Declare_Variable	Any
0fde e28a       |    |		Load	0x1,0x8a
0fdf e004       |    |		Load	0x0,0x4
0fe0 186e       | n  |		Execute	Package,Field_Execute,Field_Number 0x6e
0fe1 a602       |    |		Store_Unchecked	0x3,0x2
0fe2			BODY_0fd8:
0fe2 00cf       |    |		Action	Mark_Auxiliary
0fe3 7822       |x"  |		Jump	0x1006
0fe4 e2c1       |    |		Load	0x1,0xc1
0fe5 00da       |    |		Load_Top	At_Offset_2
0fe6 e037       | 7  |		Load	0x0,0x37
0fe7 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0fe8 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0fe9 e037       | 7  |		Load	0x0,0x37
0fea 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0feb 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0fec 0092 120f  |    |		Action	Push_String_Extended,0x120f					; ".FILES.NAME_MAP"
0fee 01cc       |    |		Execute	Vector,Catenate
0fef e020       |    |		Load	0x0,0x20
0ff0 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0ff1 c2c1       |    |		Store	0x1,0xc1
0ff2 e2c2       |    |		Load	0x1,0xc2
0ff3 00da       |    |		Load_Top	At_Offset_2
0ff4 e037       | 7  |		Load	0x0,0x37
0ff5 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0ff6 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0ff7 e037       | 7  |		Load	0x0,0x37
0ff8 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0ff9 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0ffa 0092 1210  |    |		Action	Push_String_Extended,0x1210					; ".GRAPHICS.NAME_MAP"
0ffc 01cc       |    |		Execute	Vector,Catenate
0ffd e020       |    |		Load	0x0,0x20
0ffe 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0fff c2c2       |    |		Store	0x1,0xc2
1000 00d9       |    |		Load_Top	At_Offset_1
1001 e037       | 7  |		Load	0x0,0x37
1002 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1003 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
1004 c602       |    |		Store	0x3,0x2
1005 00c9       |    |		Action	Pop_Auxiliary_Loop
1006 00d9       |    |		Load_Top	At_Offset_1
1007 e037       | 7  |		Load	0x0,0x37
1008 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
1009 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
100a 6fd9       |o   |		Jump_Zero	0xfe4
100b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
100c 0000 0000  |    |		.BLANK	0000[0x4]
1010 ; --------------------------------------------------------------------------------------
1010 ; SUBPROGRAM
1010 ; --------------------------------------------------------------------------------------
1010 1017       |    |		.CONST	0x1017								; Address of begin
1011 0004       |    |		.CONST	0x0004								; Address of exception handler
1012 0002       |    |		.CONST	0x0002								; Number of locals
1013			INIT_1010:
1013 e28a       |    |		Load	0x1,0x8a
1014 e405       |    |		Load	0x2,0x5
1015 e004       |    |		Load	0x0,0x4
1016 185c       | \  |		Execute	Package,Field_Execute,Field_Number 0x5c
1017			BODY_1010:
1017 00d8       |    |		Load_Top	At_Offset_0
1018 e004       |    |		Load	0x0,0x4
1019 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
101a 6803       |h   |		Jump_Zero	0x101e
101b e406       |    |		Load	0x2,0x6
101c 00cb       |    |		Action	Pop_Block_With_Result
101d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
101e 4801       |H   |		Short_Literal	0x1
101f 00d9       |    |		Load_Top	At_Offset_1
1020 01d7       |    |		Execute	Vector,Field_Read
1021 c405       |    |		Store	0x2,0x5
1022 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
1023 0000 0000  |    |		.BLANK	0000[0x5]
1028 ; --------------------------------------------------------------------------------------
1028 ; SUBPROGRAM
1028 ; --------------------------------------------------------------------------------------
1028 103a       | :  |		.CONST	0x103a								; Address of begin
1029 0004       |    |		.CONST	0x0004								; Address of exception handler
102a 0002       |    |		.CONST	0x0002								; Number of locals
102b			INIT_1028:
102b e402       |    |		Load	0x2,0x2
102c e2a0       |    |		Load	0x1,0xa0
102d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
102e e5fe       |    |		Load	0x2,-0x2
102f 01db       |    |		Execute	Vector,Length
1030 0272       | r  |		Execute	Discrete,Minus
1031 00d8       |    |		Load_Top	At_Offset_0
1032 00e3       |    |		Load_Encached	Natural_Cache
1033 0260       | `  |		Execute	Discrete,In_Type
1034 7001       |p   |		Jump_Nonzero	0x1036
1035 0801       |    |		Execute_Immediate	Raise,0x1
1036 4801       |H   |		Short_Literal	0x1
1037 e402       |    |		Load	0x2,0x2
1038 e2a0       |    |		Load	0x1,0xa0
1039 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
103a			BODY_1028:
103a e402       |    |		Load	0x2,0x2
103b e2a0       |    |		Load	0x1,0xa0
103c 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
103d c402       |    |		Store	0x2,0x2
103e 00d8       |    |		Load_Top	At_Offset_0
103f 00cb       |    |		Action	Pop_Block_With_Result
1040 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
1041 0000 0000  |    |		.BLANK	0000[0x7]
1048 ; --------------------------------------------------------------------------------------
1048 ; SUBPROGRAM
1048 ; --------------------------------------------------------------------------------------
1048 1055       | U  |		.CONST	0x1055								; Address of begin
1049 0004       |    |		.CONST	0x0004								; Address of exception handler
104a 0002       |    |		.CONST	0x0002								; Number of locals
104b			INIT_1048:
104b 4801       |H   |		Short_Literal	0x1
104c 8218       |    |		Call	0x1,0x18
104d e2c1       |    |		Load	0x1,0xc1
104e e020       |    |		Load	0x0,0x20
104f 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
1050 0092 1211  |    |		Action	Push_String_Extended,0x1211					; "_PREPARATION_DATE"
1052 01cc       |    |		Execute	Vector,Catenate
1053 e2d7       |    |		Load	0x1,0xd7
1054 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
1055			BODY_1048:
1055 00d8       |    |		Load_Top	At_Offset_0
1056 e030       | 0  |		Load	0x0,0x30
1057 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1058 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
1059 6806       |h   |		Jump_Zero	0x1060
105a 00d8       |    |		Load_Top	At_Offset_0
105b e030       | 0  |		Load	0x0,0x30
105c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
105d 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
105e 00cb       |    |		Action	Pop_Block_With_Result
105f 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
1060 e031       | 1  |		Load	0x0,0x31
1061 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
1062 00cb       |    |		Action	Pop_Block_With_Result
1063 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
1064 0000 0000  |    |		.BLANK	0000[0x4]
1068 ; --------------------------------------------------------------------------------------
1068 ; SUBPROGRAM
1068 ; --------------------------------------------------------------------------------------
1068 107e       | ~  |		.CONST	0x107e								; Address of begin
1069 0004       |    |		.CONST	0x0004								; Address of exception handler
106a 0003       |    |		.CONST	0x0003								; Number of locals
106b			INIT_1068:
106b 4801       |H   |		Short_Literal	0x1
106c 8218       |    |		Call	0x1,0x18
106d e2c1       |    |		Load	0x1,0xc1
106e e020       |    |		Load	0x0,0x20
106f 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
1070 0092 1211  |    |		Action	Push_String_Extended,0x1211					; "_PREPARATION_DATE"
1072 01cc       |    |		Execute	Vector,Catenate
1073 e2d7       |    |		Load	0x1,0xd7
1074 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
1075 e033       | 3  |		Load	0x0,0x33
1076 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
1077 02c7       |    |		Declare_Variable	Any
1078 4800       |H   |		Short_Literal	0x0
1079 00da       |    |		Load_Top	At_Offset_2
107a e030       | 0  |		Load	0x0,0x30
107b 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
107c 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
107d a603       |    |		Store_Unchecked	0x3,0x3
107e			BODY_1068:
107e 00d8       |    |		Load_Top	At_Offset_0
107f e033       | 3  |		Load	0x0,0x33
1080 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
1081 00da       |    |		Load_Top	At_Offset_2
1082 0092 1212  |    |		Action	Push_String_Extended,0x1212					; "Preparation date comes from the file \x22"
1084 e602       |    |		Load	0x3,0x2
1085 01cc       |    |		Execute	Vector,Catenate
1086 0092 1213  |    |		Action	Push_String_Extended,0x1213					; "\x22 or, if the file doesn't exist, the document generation date.  Definition/Edit will take you to or create the file.  "
1088 01cc       |    |		Execute	Vector,Catenate
1089 e5fc       |    |		Load	0x2,-0x4
108a 01cc       |    |		Execute	Vector,Catenate
108b 8219       |    |		Call	0x1,0x19
108c e00f       |    |		Load	0x0,0xf
108d 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
108e 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
108f 00cb       |    |		Action	Pop_Block_With_Result
1090 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
1091 0000 0000  |    |		.BLANK	0000[0x7]
1098 ; --------------------------------------------------------------------------------------
1098 ; SUBPROGRAM
1098 ; --------------------------------------------------------------------------------------
1098 10ab       |    |		.CONST	0x10ab								; Address of begin
1099 0004       |    |		.CONST	0x0004								; Address of exception handler
109a 0003       |    |		.CONST	0x0003								; Number of locals
109b			INIT_1098:
109b 4801       |H   |		Short_Literal	0x1
109c e5fd       |    |		Load	0x2,-0x3
109d e2c1       |    |		Load	0x1,0xc1
109e e020       |    |		Load	0x0,0x20
109f 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
10a0 e2d7       |    |		Load	0x1,0xd7
10a1 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
10a2 e033       | 3  |		Load	0x0,0x33
10a3 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
10a4 02c7       |    |		Declare_Variable	Any
10a5 4800       |H   |		Short_Literal	0x0
10a6 00da       |    |		Load_Top	At_Offset_2
10a7 e030       | 0  |		Load	0x0,0x30
10a8 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
10a9 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
10aa a603       |    |		Store_Unchecked	0x3,0x3
10ab			BODY_1098:
10ab 00d8       |    |		Load_Top	At_Offset_0
10ac e033       | 3  |		Load	0x0,0x33
10ad 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
10ae 00da       |    |		Load_Top	At_Offset_2
10af 0092 1214  |    |		Action	Push_String_Extended,0x1214					; "Information from file \x22"
10b1 e602       |    |		Load	0x3,0x2
10b2 01cc       |    |		Execute	Vector,Catenate
10b3 0092 1215  |    |		Action	Push_String_Extended,0x1215					; "\x22.  "
10b5 01cc       |    |		Execute	Vector,Catenate
10b6 e5fc       |    |		Load	0x2,-0x4
10b7 01cc       |    |		Execute	Vector,Catenate
10b8 8219       |    |		Call	0x1,0x19
10b9 e00f       |    |		Load	0x0,0xf
10ba 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
10bb 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
10bc 00cb       |    |		Action	Pop_Block_With_Result
10bd 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
10be 0000 0000  |    |		.XXX[0x2]
10c0 ; --------------------------------------------------------------------------------------
10c0 ; SUBPROGRAM
10c0 ; --------------------------------------------------------------------------------------
10c0 10cb       |    |		.CONST	0x10cb								; Address of begin
10c1 0004       |    |		.CONST	0x0004								; Address of exception handler
10c2 0002       |    |		.CONST	0x0002								; Number of locals
10c3			INIT_10c0:
10c3 e005       |    |		Load	0x0,0x5
10c4 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
10c5 02c7       |    |		Declare_Variable	Any
10c6 e28b       |    |		Load	0x1,0x8b
10c7 e5ff       |    |		Load	0x2,-0x1
10c8 e005       |    |		Load	0x0,0x5
10c9 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
10ca a602       |    |		Store_Unchecked	0x3,0x2
10cb			BODY_10c0:
10cb 00d8       |    |		Load_Top	At_Offset_0
10cc e005       |    |		Load	0x0,0x5
10cd 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
10ce 680c       |h   |		Jump_Zero	0x10db
10cf 0092 1216  |    |		Action	Push_String_Extended,0x1216					; "3.2."
10d1 4820       |H   |		Short_Literal	0x20
10d2 4800       |H   |		Short_Literal	0x0
10d3 480a       |H   |		Short_Literal	0xa
10d4 e5ff       |    |		Load	0x2,-0x1
10d5 e005       |    |		Load	0x0,0x5
10d6 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
10d7 82a3       |    |		Call	0x1,0xa3
10d8 01cc       |    |		Execute	Vector,Catenate
10d9 00cb       |    |		Action	Pop_Block_With_Result
10da 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
10db 00d8       |    |		Load_Top	At_Offset_0
10dc 829f       |    |		Call	0x1,0x9f
10dd 0092 1217  |    |		Action	Push_String_Extended,0x1217					; "."
10df 01cc       |    |		Execute	Vector,Catenate
10e0 4820       |H   |		Short_Literal	0x20
10e1 4800       |H   |		Short_Literal	0x0
10e2 480a       |H   |		Short_Literal	0xa
10e3 e5ff       |    |		Load	0x2,-0x1
10e4 e005       |    |		Load	0x0,0x5
10e5 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
10e6 82a3       |    |		Call	0x1,0xa3
10e7 01cc       |    |		Execute	Vector,Catenate
10e8 00cb       |    |		Action	Pop_Block_With_Result
10e9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
10ea 0000 0000  |    |		.BLANK	0000[0x6]
10f0 ; --------------------------------------------------------------------------------------
10f0 ; SUBPROGRAM
10f0 ; --------------------------------------------------------------------------------------
10f0 10f3       |    |		.CONST	0x10f3								; Address of begin
10f1 0004       |    |		.CONST	0x0004								; Address of exception handler
10f2 0001       |    |		.CONST	0x0001								; Number of locals
10f3			BODY_10f0:
10f3			INIT_10f0:
10f3 4608       |F   |		Jump_Case	0x9
10f4 7808       |x   |		Jump	0x10fd								; case 0x0
10f5 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
10f6 7878       |xx  |		Jump	0x116f								; case 0x2
10f7 7877       |xw  |		Jump	0x116f								; case 0x3
10f8 7876       |xv  |		Jump	0x116f								; case 0x4
10f9 7875       |xu  |		Jump	0x116f								; case 0x5
10fa 783c       |x<  |		Jump	0x1137								; case 0x6
10fb 7852       |xR  |		Jump	0x114e								; case 0x7
10fc 786b       |xk  |		Jump	0x1168								; case 0x8
10fd 00da       |    |		Load_Top	At_Offset_2
10fe 016c       | l  |		Execute	Variant_Record,Is_Constrained
10ff 7009       |p   |		Jump_Nonzero	0x1109
1100 00cf       |    |		Action	Mark_Auxiliary
1101 4800       |H   |		Short_Literal	0x0
1102 e5ff       |    |		Load	0x2,-0x1
1103 1c08       |    |		Execute_Immediate	Run_Utility,0x8
1104 00d8       |    |		Load_Top	At_Offset_0
1105 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1106 c5ff       |    |		Store	0x2,-0x1
1107 00ce       |    |		Action	Pop_Auxiliary
1108 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
1109 00da       |    |		Load_Top	At_Offset_2
110a 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
110b 4606       |F   |		Jump_Case	0x7
110c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
110d 780b       |x   |		Jump	0x1119								; case 0x1
110e 7810       |x   |		Jump	0x111f								; case 0x2
110f 7815       |x   |		Jump	0x1125								; case 0x3
1110 7820       |x   |		Jump	0x1131								; case 0x4
1111 7819       |x   |		Jump	0x112b								; case 0x5
1112 7800       |x   |		Jump	0x1113								; case 0x6
1113 00da       |    |		Load_Top	At_Offset_2
1114 2207       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x7
1115 00da       |    |		Load_Top	At_Offset_2
1116 2607       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x7
1117 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1118 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
1119 00da       |    |		Load_Top	At_Offset_2
111a 2202       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x2
111b 00da       |    |		Load_Top	At_Offset_2
111c 2602       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
111d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
111e 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
111f 00da       |    |		Load_Top	At_Offset_2
1120 2203       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x3
1121 00da       |    |		Load_Top	At_Offset_2
1122 2603       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3
1123 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1124 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
1125 00da       |    |		Load_Top	At_Offset_2
1126 2204       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x4
1127 00da       |    |		Load_Top	At_Offset_2
1128 2604       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x4
1129 1c00       |    |		Execute_Immediate	Run_Utility,0x0
112a 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
112b 00da       |    |		Load_Top	At_Offset_2
112c 2205       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x5
112d 00da       |    |		Load_Top	At_Offset_2
112e 2605       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
112f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1130 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
1131 00da       |    |		Load_Top	At_Offset_2
1132 2206       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x6
1133 00da       |    |		Load_Top	At_Offset_2
1134 2606       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6
1135 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1136 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
1137 00db       |    |		Load_Top	At_Offset_3
1138 4606       |F   |		Jump_Case	0x7
1139 7812       |x   |		Jump	0x114c								; case 0x0
113a 7807       |x   |		Jump	0x1142								; case 0x1
113b 7808       |x   |		Jump	0x1144								; case 0x2
113c 7809       |x   |		Jump	0x1146								; case 0x3
113d 780c       |x   |		Jump	0x114a								; case 0x4
113e 7809       |x   |		Jump	0x1148								; case 0x5
113f 7800       |x   |		Jump	0x1140								; case 0x6
1140 4806       |H   |		Short_Literal	0x6
1141 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
1142 4801       |H   |		Short_Literal	0x1
1143 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
1144 4802       |H   |		Short_Literal	0x2
1145 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
1146 4803       |H   |		Short_Literal	0x3
1147 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
1148 4804       |H   |		Short_Literal	0x4
1149 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
114a 4805       |H   |		Short_Literal	0x5
114b 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
114c 48ff       |H   |		Short_Literal	0xff
114d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
114e 00db       |    |		Load_Top	At_Offset_3
114f e5fe       |    |		Load	0x2,-0x2
1150 4606       |F   |		Jump_Case	0x7
1151 7808       |x   |		Jump	0x115a								; case 0x0
1152 7809       |x   |		Jump	0x115c								; case 0x1
1153 780a       |x   |		Jump	0x115e								; case 0x2
1154 780b       |x   |		Jump	0x1160								; case 0x3
1155 780e       |x   |		Jump	0x1164								; case 0x4
1156 780b       |x   |		Jump	0x1162								; case 0x5
1157 7800       |x   |		Jump	0x1158								; case 0x6
1158 4806       |H   |		Short_Literal	0x6
1159 780b       |x   |		Jump	0x1165
115a 48ff       |H   |		Short_Literal	0xff
115b 7809       |x   |		Jump	0x1165
115c 4801       |H   |		Short_Literal	0x1
115d 7807       |x   |		Jump	0x1165
115e 4802       |H   |		Short_Literal	0x2
115f 7805       |x   |		Jump	0x1165
1160 4803       |H   |		Short_Literal	0x3
1161 7803       |x   |		Jump	0x1165
1162 4804       |H   |		Short_Literal	0x4
1163 7801       |x   |		Jump	0x1165
1164 4805       |H   |		Short_Literal	0x5
1165 e5ff       |    |		Load	0x2,-0x1
1166 031b       |    |		Declare_Type	Variant_Record,Constrained
1167 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
1168 00db       |    |		Load_Top	At_Offset_3
1169 e5fe       |    |		Load	0x2,-0x2
116a e5ff       |    |		Load	0x2,-0x1
116b 1c06       |    |		Execute_Immediate	Run_Utility,0x6
116c e5ff       |    |		Load	0x2,-0x1
116d 02fc       |    |		Declare_Variable	Variant_Record,With_Constraint
116e 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
116f 0869       | i  |		Execute_Immediate	Raise,0x69
1170 ; --------------------------------------------------------------------------------------
1170 ; SUBPROGRAM
1170 ; --------------------------------------------------------------------------------------
1170 1173       | s  |		.CONST	0x1173								; Address of begin
1171 0004       |    |		.CONST	0x0004								; Address of exception handler
1172 0001       |    |		.CONST	0x0001								; Number of locals
1173			BODY_1170:
1173			INIT_1170:
1173 4608       |F   |		Jump_Case	0x9
1174 7808       |x   |		Jump	0x117d								; case 0x0
1175 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
1176 7857       |xW  |		Jump	0x11ce								; case 0x2
1177 7856       |xV  |		Jump	0x11ce								; case 0x3
1178 7855       |xU  |		Jump	0x11ce								; case 0x4
1179 7854       |xT  |		Jump	0x11ce								; case 0x5
117a 781b       |x   |		Jump	0x1196								; case 0x6
117b 7831       |x1  |		Jump	0x11ad								; case 0x7
117c 784a       |xJ  |		Jump	0x11c7								; case 0x8
117d 00da       |    |		Load_Top	At_Offset_2
117e 016c       | l  |		Execute	Variant_Record,Is_Constrained
117f 7009       |p   |		Jump_Nonzero	0x1189
1180 00cf       |    |		Action	Mark_Auxiliary
1181 4800       |H   |		Short_Literal	0x0
1182 e5ff       |    |		Load	0x2,-0x1
1183 1c08       |    |		Execute_Immediate	Run_Utility,0x8
1184 00d8       |    |		Load_Top	At_Offset_0
1185 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1186 c5ff       |    |		Store	0x2,-0x1
1187 00ce       |    |		Action	Pop_Auxiliary
1188 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
1189 4800       |H   |		Short_Literal	0x0
118a 00db       |    |		Load_Top	At_Offset_3
118b 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
118c 00da       |    |		Load_Top	At_Offset_2
118d 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
118e 4606       |F   |		Jump_Case	0x7
118f 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
1190 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
1191 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
1192 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
1193 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
1194 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
1195 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
1196 00db       |    |		Load_Top	At_Offset_3
1197 4606       |F   |		Jump_Case	0x7
1198 7812       |x   |		Jump	0x11ab								; case 0x0
1199 7807       |x   |		Jump	0x11a1								; case 0x1
119a 7808       |x   |		Jump	0x11a3								; case 0x2
119b 7809       |x   |		Jump	0x11a5								; case 0x3
119c 780c       |x   |		Jump	0x11a9								; case 0x4
119d 7809       |x   |		Jump	0x11a7								; case 0x5
119e 7800       |x   |		Jump	0x119f								; case 0x6
119f 4806       |H   |		Short_Literal	0x6
11a0 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
11a1 4801       |H   |		Short_Literal	0x1
11a2 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
11a3 4802       |H   |		Short_Literal	0x2
11a4 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
11a5 4803       |H   |		Short_Literal	0x3
11a6 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
11a7 4804       |H   |		Short_Literal	0x4
11a8 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
11a9 4805       |H   |		Short_Literal	0x5
11aa 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
11ab 48ff       |H   |		Short_Literal	0xff
11ac 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
11ad 00db       |    |		Load_Top	At_Offset_3
11ae e5fe       |    |		Load	0x2,-0x2
11af 4606       |F   |		Jump_Case	0x7
11b0 7808       |x   |		Jump	0x11b9								; case 0x0
11b1 7809       |x   |		Jump	0x11bb								; case 0x1
11b2 780a       |x   |		Jump	0x11bd								; case 0x2
11b3 780b       |x   |		Jump	0x11bf								; case 0x3
11b4 780e       |x   |		Jump	0x11c3								; case 0x4
11b5 780b       |x   |		Jump	0x11c1								; case 0x5
11b6 7800       |x   |		Jump	0x11b7								; case 0x6
11b7 4806       |H   |		Short_Literal	0x6
11b8 780b       |x   |		Jump	0x11c4
11b9 48ff       |H   |		Short_Literal	0xff
11ba 7809       |x   |		Jump	0x11c4
11bb 4801       |H   |		Short_Literal	0x1
11bc 7807       |x   |		Jump	0x11c4
11bd 4802       |H   |		Short_Literal	0x2
11be 7805       |x   |		Jump	0x11c4
11bf 4803       |H   |		Short_Literal	0x3
11c0 7803       |x   |		Jump	0x11c4
11c1 4804       |H   |		Short_Literal	0x4
11c2 7801       |x   |		Jump	0x11c4
11c3 4805       |H   |		Short_Literal	0x5
11c4 e5ff       |    |		Load	0x2,-0x1
11c5 031b       |    |		Declare_Type	Variant_Record,Constrained
11c6 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
11c7 00db       |    |		Load_Top	At_Offset_3
11c8 e5fe       |    |		Load	0x2,-0x2
11c9 e5ff       |    |		Load	0x2,-0x1
11ca 1c06       |    |		Execute_Immediate	Run_Utility,0x6
11cb e5ff       |    |		Load	0x2,-0x1
11cc 02fc       |    |		Declare_Variable	Variant_Record,With_Constraint
11cd 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
11ce 0869       | i  |		Execute_Immediate	Raise,0x69
11cf ; --------------------------------------------------------------------------------------
11cf ; STRING TABLE
11cf ; --------------------------------------------------------------------------------------
11cf 0094       |    |		.STRTAB	0x0094->0x1219							; "NIL"
11d0 0095       |    |		.STRTAB	0x0095->0x121a							; "APPENDIX_TITLE"
11d1 00a1       |    |		.STRTAB	0x00a1->0x1221							; "COVER"
11d2 00a4       |    |		.STRTAB	0x00a4->0x1224							; "PRIMARY_COVER_ITEM"
11d3 00b4       |    |		.STRTAB	0x00b4->0x122d							; "SECONDARY_COVER_ITEM"
11d4 00c6       |    |		.STRTAB	0x00c6->0x1237							; "COVER_ITEM"
11d5 00ce       |    |		.STRTAB	0x00ce->0x123c							; "LIST_TITLE"
11d6 00d6       |    |		.STRTAB	0x00d6->0x1241							; "LIST_ITEM_HEADER"
11d7 00e4       |    |		.STRTAB	0x00e4->0x1249							; "PARAGRAPH_TITLE"
11d8 00f1       |    |		.STRTAB	0x00f1->0x1250							; "SUB_PARAGRAPH_TITLE"
11d9 0102       |    |		.STRTAB	0x0102->0x125a							; "TABLE_TITLE"
11da 010b       |    |		.STRTAB	0x010b->0x125f							; "COLUMN_HEADER"
11db 0116       |    |		.STRTAB	0x0116->0x1266							; "EMPHASIZED_ROW_ENTRY"
11dc 0128       | (  |		.STRTAB	0x0128->0x1270							; "ROW_ENTRY"
11dd 012f       | /  |		.STRTAB	0x012f->0x1274							; "TEXT_BLOCK"
11de 0137       | 7  |		.STRTAB	0x0137->0x1279							; "TEXT_HEADER"
11df 0140       | @  |		.STRTAB	0x0140->0x127f							; "NON_PROPORTIONAL"
11e0 014e       | N  |		.STRTAB	0x014e->0x1287							; "UNIMPLEMENTED"
11e1 0159       | Y  |		.STRTAB	0x0159->0x128d							; "NIL"
11e2 015a       | Z  |		.STRTAB	0x015a->0x128f							; "ADA_ELEMENT"
11e3 0163       | c  |		.STRTAB	0x0163->0x1294							; "COMPONENT"
11e4 016a       | j  |		.STRTAB	0x016a->0x1299							; "REQUIREMENT"
11e5 0173       | s  |		.STRTAB	0x0173->0x129e							; "IO"
11e6 0173       | s  |		.STRTAB	0x0173->0x129f							; "DATUM"
11e7 0176       | v  |		.STRTAB	0x0176->0x12a2							; "INTERRUPT"
11e8 017d       | }  |		.STRTAB	0x017d->0x12a6							; "NONE."
11e9 0180       |    |		.STRTAB	0x0180->0x12a9							; "non_proportional=(ff=courier),primary_cover_item=(ps=18),secondary_cover_item=(ps=14),cover_item=(ps=12),list_title=(fs=bold),list_item_header=(fs=italic),column_header=(fs=bold),emphasized_row_entry=(fs=bold),text_header=(fs=bold)"
11ea 0265       | e  |		.STRTAB	0x0265->0x131c							; ".FILES.ACRONYMS"
11eb 0272       | r  |		.STRTAB	0x0272->0x1324							; "<UNKNOWN>"
11ec 0279       | y  |		.STRTAB	0x0279->0x1328							; "Establishing context for "
11ed 0290       |    |		.STRTAB	0x0290->0x1335							; " document generation"
11ee 02a2       |    |		.STRTAB	0x02a2->0x133f							; "Document generation has already been initialized for "
11ef 02d5       |    |		.STRTAB	0x02d5->0x1359							; "Unable to obtain view for \x22"
11f0 02ee       |    |		.STRTAB	0x02ee->0x1367							; "\x22 ("
11f1 02ef       |    |		.STRTAB	0x02ef->0x1368							; "Errors were detected by component analysis while visiting the view closure of "
11f2 033b       | ;  |		.STRTAB	0x033b->0x138f							; "Unable to create abstract document "
11f3 035c       | \  |		.STRTAB	0x035c->0x13a1							; "Errors were detected during format initialization of document "
11f4 0398       |    |		.STRTAB	0x0398->0x13c0							; "Initializing document generator for "
11f5 03ba       |    |		.STRTAB	0x03ba->0x13d2							; "Errors were detected during acronym initialization"
11f6 03ea       |    |		.STRTAB	0x03ea->0x13eb							; "Errors were detected during requirement analysis"
11f7 0418       |    |		.STRTAB	0x0418->0x1403							; "An error was detected while initializing IOs."
11f8 0443       | C  |		.STRTAB	0x0443->0x1419							; "An error was detected while initializing Data."
11f9 046f       | o  |		.STRTAB	0x046f->0x1430							; "An error was detected while initializing Interrupts."
11fa 04a1       |    |		.STRTAB	0x04a1->0x144a							; "Creating Abstract Document for \x22"
11fb 04bf       |    |		.STRTAB	0x04bf->0x145a							; "\x22 in "
11fc 04c2       |    |		.STRTAB	0x04c2->0x145d							; "Unexpected exception in Start."
11fd 04de       |    |		.STRTAB	0x04de->0x146c							; "Finish called."
11fe 04ea       |    |		.STRTAB	0x04ea->0x1473							; "Document generated. Terminating."
11ff 0508       |    |		.STRTAB	0x0508->0x1483							; "Unexpected exception in Finish."
1200 0525       | %  |		.STRTAB	0x0525->0x1492							; "<NIL LIST ITEM>"
1201 0532       | 2  |		.STRTAB	0x0532->0x149a							; "Sorting of "
1202 053b       | ;  |		.STRTAB	0x053b->0x149f							; " lists is not implemented"
1203 0552       | R  |		.STRTAB	0x0552->0x14ac							; "EXTERNAL"
1204 0558       | X  |		.STRTAB	0x0558->0x14b0							; "<NIL LIST>"
1205 0560       | `  |		.STRTAB	0x0560->0x14b5							; ", "
1206 0560       | `  |		.STRTAB	0x0560->0x14b6							; "<NIL OPERATION>"
1207 056d       | m  |		.STRTAB	0x056d->0x14bd							; "#INCLUDE"
1208 0573       | s  |		.STRTAB	0x0573->0x14c1							; "\x0a\x0a"
1209 0573       | s  |		.STRTAB	0x0573->0x14c2							; "<SRS_PARA ("
120a 057c       | |  |		.STRTAB	0x057c->0x14c8							; ")>"
120b 057c       | |  |		.STRTAB	0x057c->0x14c9							; "3.3"
120c 057d       | }  |		.STRTAB	0x057d->0x14ca							; "3."
120d 057d       | }  |		.STRTAB	0x057d->0x14cb							; "4.2."
120e 057f       |    |		.STRTAB	0x057f->0x14cd							; "NONE"
120f 0581       |    |		.STRTAB	0x0581->0x14cf							; ".FILES.NAME_MAP"
1210 058e       |    |		.STRTAB	0x058e->0x14d7							; ".GRAPHICS.NAME_MAP"
1211 059e       |    |		.STRTAB	0x059e->0x14e0							; "_PREPARATION_DATE"
1212 05ad       |    |		.STRTAB	0x05ad->0x14e8							; "Preparation date comes from the file \x22"
1213 05d1       |    |		.STRTAB	0x05d1->0x14fb							; "\x22 or, if the file doesn't exist, the document generation date.  Definition/Edit will take you to or create the file.  "
1214 0645       | E  |		.STRTAB	0x0645->0x1536							; "Information from file \x22"
1215 065a       | Z  |		.STRTAB	0x065a->0x1542							; "\x22.  "
1216 065c       | \  |		.STRTAB	0x065c->0x1544							; "3.2."
1217 065e       | ^  |		.STRTAB	0x065e->0x1546							; "."
1218 065d       | ]  |		.STREND 0x065d->0x1546
1219 4e49 4c41  |NILA|		.STRTAB_STRINGS
1547 0000       |    |		.XXX[0x1]
1548 ; --------------------------------------------------------------------------------------
1548 ; Debug Table
1548 ; --------------------------------------------------------------------------------------
1548 0004 0012  |    |		.DEBUG4	0x0004,0x0012,0xfc6e,0x0000,0x0001,0x0000
154e 36f0 24df  |6 $ |		.XXX[0xb2]
1550 c0bb 7303  |  s |
1552 6dc0 0fbf  |m   |
1554 0c36 f044  | 6 D|
1556 dfc1 3b73  |  ;s|
1558 016d c40f  | m  |
155a bf14 36f0  |  6 |
155c 64df c1bb  |d   |
155e 7303 6dc4  |s m |
1560 0fbf 1c36  |   6|
1562 f084 dfc2  |    |
1564 3b73 016d  |;s m|
1566 c80f bf24  |   $|
1568 36f0 a4df  |6   |
156a c2bb 7303  |  s |
156c 6dc8 0fbf  |m   |
156e 2c36 f0c4  |,6  |
1570 dfc3 3b73  |  ;s|
1572 016d cc0f  | m  |
1574 bf34 36f0  | 46 |
1576 e4df c3bb  |    |
1578 7303 6dcc  |s m |
157a 0fbf 3c36  |  <6|
157c f104 dfc0  |    |
157e 3b77 016d  |;w m|
1580 d00f bf44  |   D|
1582 36f1 24df  |6 $ |
1584 c0bb 7703  |  w |
1586 6dd0 0fbf  |m   |
1588 4c36 f146  |L6 F|
158a dfbe 4a60  |  J`|
158c 01c1 bdc6  |    |
158e 0757 56f9  | WV |
1590 615f eda9  |a_  |
1592 77b7 2dd6  |w - |
1594 d6bf 5f56  |  _V|
1596 f981 5fee  |  _ |
1598 2977 b52d  |)w -|
159a dad6 bf67  |   g|
159c 56f9 a15f  |V  _|
159e eea9 77b7  |  w |
15a0 2dda d6bf  |-   |
15a2 6f56 f9c1  |oV  |
15a4 5fef 2975  |_ )u|
15a6 7624 2fb0  |v$/ |
15a8 bbfd f6df  |    |
15aa 6a5f bfc9  |j_  |
15ac 7f03 2dfc  |  - |
15ae 1cbf fcb6  |    |
15b0 f3f3 dfc3  |    |
15b2 cb7f 132d  |   -|
15b4 fc5c bffd  | \  |
15b6 b6f3 f3df  |    |
15b8 c7cb 7f23  |   #|
15ba 2dfc 9cbf  |-   |
15bc feb6 f3f3  |    |
15be dfcb cb7f  |    |
15c0 332d fcdc  |3-  |
15c2 bfff b6f3  |    |
15c4 f3df cfcb  |    |
15c6 7f43 2dfd  | C- |
15c8 1cbf fcb6  |    |
15ca f7f3 dfd3  |    |
15cc cb7f 532d  |  S-|
15ce fd5c bffd  | \  |
15d0 b6f7 f3df  |    |
15d2 d7cb 7f63  |   c|
15d4 2dfd 9cbf  |-   |
15d6 feb6 f7f3  |    |
15d8 dfdb cb7f  |    |
15da 732d fddc  |s-  |
15dc bfff b6f7  |    |
15de f3df dfcb  |    |
15e0 7f83 2dfe  |  - |
15e2 1cbf fcb6  |    |
15e4 fbf3 dfe3  |    |
15e6 cb7f 932d  |   -|
15e8 fe5c bffd  | \  |
15ea b6fb f3df  |    |
15ec e7cb 7fa3  |    |
15ee 2dfe 9cbf  |-   |
15f0 feb6 fbf3  |    |
15f2 dfeb cb7f  |    |
15f4 b2ac adcc  |    |
15f6 0757 b6ee  | W  |
15f8 e783 eddb  |    |
15fa 87c3 6e17  |  n |
15fc 1dbc 5cba  |  \ |
15fe fd77 e3f1  | w  |