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

⟦555f06d26⟧

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

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 1448       | H  |		.CONST	0x1448								; 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 028d       |    |		.CONST	0x028d								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 008f       |    |		.CONST	0x008f								; Number of locals
000b			INIT_0008:
000b 4801       |H   |		Short_Literal	0x1
000c 4828       |H(  |		Short_Literal	0x28
000d e003       |    |		Load	0x0,0x3
000e 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
000f 02a0       |    |		Declare_Subprogram	Null_Subprogram
0010 4801       |H   |		Short_Literal	0x1
0011 035e       | ^  |		Declare_Type	Array,Defined,Visible
0012 4800       |H   |		Short_Literal	0x0
0013 4828       |H(  |		Short_Literal	0x28
0014 00e3       |    |		Load_Encached	Natural_Cache
0015 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
0016 029a 0293  |    |		Declare_Subprogram	INIT_0290,For_Outer_Call,Visible,Unelaborated
0018 0093 0000  |    |		push_full_address	0x0
001a 62a1       |b   |		Indirect_Literal	Discrete,0x2bc,{0x80000000, 0x00050000}
001b 0273       | s  |		Execute	Discrete,Plus
001c 0129       | )  |		Execute	Any,Make_Visible
001d 0093 0000  |    |		push_full_address	0x0
001f 6298       |b   |		Indirect_Literal	Discrete,0x2b8,{0x80000000, 0x00060000}
0020 0273       | s  |		Execute	Discrete,Plus
0021 0129       | )  |		Execute	Any,Make_Visible
0022 0093 0000  |    |		push_full_address	0x0
0024 628f       |b   |		Indirect_Literal	Discrete,0x2b4,{0x80000000, 0x00070000}
0025 0273       | s  |		Execute	Discrete,Plus
0026 0129       | )  |		Execute	Any,Make_Visible
0027 029a 02c3  |    |		Declare_Subprogram	INIT_02c0,For_Outer_Call,Visible,Unelaborated
0029 029a 02cb  |    |		Declare_Subprogram	INIT_02c8,For_Outer_Call,Visible,Unelaborated
002b 029a 02db  |    |		Declare_Subprogram	INIT_02d8,For_Outer_Call,Visible,Unelaborated
002d 029a 02eb  |    |		Declare_Subprogram	INIT_02e8,For_Outer_Call,Visible,Unelaborated
002f 0093 0000  |    |		push_full_address	0x0
0031 627e       |b~  |		Indirect_Literal	Discrete,0x2b0,{0x80000000, 0x00080000}
0032 0273       | s  |		Execute	Discrete,Plus
0033 0129       | )  |		Execute	Any,Make_Visible
0034 029a 0303  |    |		Declare_Subprogram	INIT_0300,For_Outer_Call,Visible,Unelaborated
0036 0093 0000  |    |		push_full_address	0x0
0038 6273       |bs  |		Indirect_Literal	Discrete,0x2ac,{0x80000000, 0x00090000}
0039 0273       | s  |		Execute	Discrete,Plus
003a 0129       | )  |		Execute	Any,Make_Visible
003b 029a 0313  |    |		Declare_Subprogram	INIT_0310,For_Outer_Call,Visible,Unelaborated
003d 0093 0000  |    |		push_full_address	0x0
003f 6268       |bh  |		Indirect_Literal	Discrete,0x2a8,{0x80000000, 0x000a0000}
0040 0273       | s  |		Execute	Discrete,Plus
0041 0129       | )  |		Execute	Any,Make_Visible
0042 029a 0323  |   #|		Declare_Subprogram	INIT_0320,For_Outer_Call,Visible,Unelaborated
0044 0093 0000  |    |		push_full_address	0x0
0046 625d       |b]  |		Indirect_Literal	Discrete,0x2a4,{0x80000000, 0x000b0000}
0047 0273       | s  |		Execute	Discrete,Plus
0048 0129       | )  |		Execute	Any,Make_Visible
0049 029a 0333  |   3|		Declare_Subprogram	INIT_0330,For_Outer_Call,Visible,Unelaborated
004b 029a 0343  |   C|		Declare_Subprogram	INIT_0340,For_Outer_Call,Visible,Unelaborated
004d 029a 034b  |   K|		Declare_Subprogram	INIT_0348,For_Outer_Call,Visible,Unelaborated
004f 029a 0353  |   S|		Declare_Subprogram	INIT_0350,For_Outer_Call,Visible,Unelaborated
0051 029a 035b  |   [|		Declare_Subprogram	INIT_0358,For_Outer_Call,Visible,Unelaborated
0053 029a 0363  |   c|		Declare_Subprogram	INIT_0360,For_Outer_Call,Visible,Unelaborated
0055 029a 0373  |   s|		Declare_Subprogram	INIT_0370,For_Outer_Call,Visible,Unelaborated
0057 029a 0383  |    |		Declare_Subprogram	INIT_0380,For_Outer_Call,Visible,Unelaborated
0059 029a 03ab  |    |		Declare_Subprogram	INIT_03a8,For_Outer_Call,Visible,Unelaborated
005b 029a 03bb  |    |		Declare_Subprogram	INIT_03b8,For_Outer_Call,Visible,Unelaborated
005d 029a 03c3  |    |		Declare_Subprogram	INIT_03c0,For_Outer_Call,Visible,Unelaborated
005f 029a 03f3  |    |		Declare_Subprogram	INIT_03f0,For_Outer_Call,Visible,Unelaborated
0061 029a 0403  |    |		Declare_Subprogram	INIT_0400,For_Outer_Call,Visible,Unelaborated
0063 029a 05cb  |    |		Declare_Subprogram	INIT_05c8,For_Outer_Call,Visible,Unelaborated
0065 029a 05fb  |    |		Declare_Subprogram	INIT_05f8,For_Outer_Call,Visible,Unelaborated
0067 029a 0603  |    |		Declare_Subprogram	INIT_0600,For_Outer_Call,Visible,Unelaborated
0069 029a 060b  |    |		Declare_Subprogram	INIT_0608,For_Outer_Call,Visible,Unelaborated
006b 029a 061b  |    |		Declare_Subprogram	INIT_0618,For_Outer_Call,Visible,Unelaborated
006d 00bf       |    |		Action	Accept_Activation
006e 4800       |H   |		Short_Literal	0x0
006f 4864       |Hd  |		Short_Literal	0x64
0070 00e3       |    |		Load_Encached	Natural_Cache
0071 03f8       |    |		Declare_Type	Discrete,Constrained
0072 4800       |H   |		Short_Literal	0x0
0073 480f       |H   |		Short_Literal	0xf
0074 00e3       |    |		Load_Encached	Natural_Cache
0075 03f8       |    |		Declare_Type	Discrete,Constrained
0076 e004       |    |		Load	0x0,0x4
0077 1b25       | %  |		Execute	Package,Field_Read,Field_Number 0x25
0078 e004       |    |		Load	0x0,0x4
0079 1b25       | %  |		Execute	Package,Field_Read,Field_Number 0x25
007a 00e3       |    |		Load_Encached	Natural_Cache
007b e004       |    |		Load	0x0,0x4
007c 1b51       | Q  |		Execute	Package,Field_Read,Field_Number 0x51
007d e004       |    |		Load	0x0,0x4
007e 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
007f e004       |    |		Load	0x0,0x4
0080 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
0081 e004       |    |		Load	0x0,0x4
0082 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0083 e231       | 1  |		Load	0x1,0x31
0084 00e1       |    |		Load_Encached	Boolean_Cache
0085 00e1       |    |		Load_Encached	Boolean_Cache
0086 02a0       |    |		Declare_Subprogram	Null_Subprogram
0087 4805       |H   |		Short_Literal	0x5
0088 032d       | -  |		Declare_Type	Record,Defined
0089 4800       |H   |		Short_Literal	0x0
008a 4864       |Hd  |		Short_Literal	0x64
008b 00da       |    |		Load_Top	At_Offset_2
008c 02a0       |    |		Declare_Subprogram	Null_Subprogram
008d 4801       |H   |		Short_Literal	0x1
008e 035d       | ]  |		Declare_Type	Array,Defined
008f 00d8       |    |		Load_Top	At_Offset_0
0090 0337       | 7  |		Declare_Variable	Array
0091 00e5       |    |		Load_Encached	Long_Integer_Cache
0092 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0093 00e5       |    |		Load_Encached	Long_Integer_Cache
0094 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0095 00e5       |    |		Load_Encached	Long_Integer_Cache
0096 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0097 00e5       |    |		Load_Encached	Long_Integer_Cache
0098 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0099 00e5       |    |		Load_Encached	Long_Integer_Cache
009a 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
009b 00e1       |    |		Load_Encached	Boolean_Cache
009c 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
009d 4800       |H   |		Short_Literal	0x0
009e 4803       |H   |		Short_Literal	0x3
009f 029f 062b  |   +|		Declare_Subprogram	INIT_0628,For_Call
00a1 03fd       |    |		Declare_Type	Discrete,Defined
00a2 00e1       |    |		Load_Encached	Boolean_Cache
00a3 00e2       |    |		Load_Encached	Integer_Cache
00a4 e004       |    |		Load	0x0,0x4
00a5 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
00a6 00e3       |    |		Load_Encached	Natural_Cache
00a7 e004       |    |		Load	0x0,0x4
00a8 1b29       | )  |		Execute	Package,Field_Read,Field_Number 0x29
00a9 00e2       |    |		Load_Encached	Integer_Cache
00aa e004       |    |		Load	0x0,0x4
00ab 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
00ac 00e3       |    |		Load_Encached	Natural_Cache
00ad 00e2       |    |		Load_Encached	Integer_Cache
00ae 00e4       |    |		Load_Encached	Positive_Cache
00af 00e4       |    |		Load_Encached	Positive_Cache
00b0 e005       |    |		Load	0x0,0x5
00b1 00e2       |    |		Load_Encached	Integer_Cache
00b2 00e1       |    |		Load_Encached	Boolean_Cache
00b3 029f 0653  |   S|		Declare_Subprogram	INIT_0650,For_Call
00b5 4805       |H   |		Short_Literal	0x5
00b6 032d       | -  |		Declare_Type	Record,Defined
00b7 e004       |    |		Load	0x0,0x4
00b8 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00b9 e004       |    |		Load	0x0,0x4
00ba 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
00bb 00e4       |    |		Load_Encached	Positive_Cache
00bc 00e4       |    |		Load_Encached	Positive_Cache
00bd e005       |    |		Load	0x0,0x5
00be 00e2       |    |		Load_Encached	Integer_Cache
00bf 00e1       |    |		Load_Encached	Boolean_Cache
00c0 029f 0663  |   c|		Declare_Subprogram	INIT_0660,For_Call
00c2 4807       |H   |		Short_Literal	0x7
00c3 032d       | -  |		Declare_Type	Record,Defined
00c4 4801       |H   |		Short_Literal	0x1
00c5 4814       |H   |		Short_Literal	0x14
00c6 e004       |    |		Load	0x0,0x4
00c7 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00c8 02a0       |    |		Declare_Subprogram	Null_Subprogram
00c9 4801       |H   |		Short_Literal	0x1
00ca 035d       | ]  |		Declare_Type	Array,Defined
00cb 00d8       |    |		Load_Top	At_Offset_0
00cc 0337       | 7  |		Declare_Variable	Array
00cd 4801       |H   |		Short_Literal	0x1
00ce 4814       |H   |		Short_Literal	0x14
00cf e24a       | J  |		Load	0x1,0x4a
00d0 029f 0673  |   s|		Declare_Subprogram	INIT_0670,For_Call
00d2 4801       |H   |		Short_Literal	0x1
00d3 035d       | ]  |		Declare_Type	Array,Defined
00d4 00d8       |    |		Load_Top	At_Offset_0
00d5 0337       | 7  |		Declare_Variable	Array
00d6 00d8       |    |		Load_Top	At_Offset_0
00d7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00d8 4800       |H   |		Short_Literal	0x0
00d9 4814       |H   |		Short_Literal	0x14
00da 00e3       |    |		Load_Encached	Natural_Cache
00db 03f8       |    |		Declare_Type	Discrete,Constrained
00dc 4800       |H   |		Short_Literal	0x0
00dd 4814       |H   |		Short_Literal	0x14
00de 00e3       |    |		Load_Encached	Natural_Cache
00df 03f8       |    |		Declare_Type	Discrete,Constrained
00e0 4801       |H   |		Short_Literal	0x1
00e1 481e       |H   |		Short_Literal	0x1e
00e2 e24b       | K  |		Load	0x1,0x4b
00e3 029f 069b  |    |		Declare_Subprogram	INIT_0698,For_Call
00e5 4801       |H   |		Short_Literal	0x1
00e6 035d       | ]  |		Declare_Type	Array,Defined
00e7 00d8       |    |		Load_Top	At_Offset_0
00e8 0337       | 7  |		Declare_Variable	Array
00e9 00d8       |    |		Load_Top	At_Offset_0
00ea 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00eb 4800       |H   |		Short_Literal	0x0
00ec 481e       |H   |		Short_Literal	0x1e
00ed 00e3       |    |		Load_Encached	Natural_Cache
00ee 03f8       |    |		Declare_Type	Discrete,Constrained
00ef 4800       |H   |		Short_Literal	0x0
00f0 481e       |H   |		Short_Literal	0x1e
00f1 00e3       |    |		Load_Encached	Natural_Cache
00f2 03f8       |    |		Declare_Type	Discrete,Constrained
00f3 e004       |    |		Load	0x0,0x4
00f4 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
00f5 e003       |    |		Load	0x0,0x3
00f6 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00f7 e005       |    |		Load	0x0,0x5
00f8 e006       |    |		Load	0x0,0x6
00f9 e007       |    |		Load	0x0,0x7
00fa 00e2       |    |		Load_Encached	Integer_Cache
00fb 029f 06c3  |    |		Declare_Subprogram	INIT_06c0,For_Call
00fd 4806       |H   |		Short_Literal	0x6
00fe 032d       | -  |		Declare_Type	Record,Defined
00ff 4801       |H   |		Short_Literal	0x1
0100 4814       |H   |		Short_Literal	0x14
0101 00da       |    |		Load_Top	At_Offset_2
0102 029f 06d3  |    |		Declare_Subprogram	INIT_06d0,For_Call
0104 4801       |H   |		Short_Literal	0x1
0105 035d       | ]  |		Declare_Type	Array,Defined
0106 00d8       |    |		Load_Top	At_Offset_0
0107 0337       | 7  |		Declare_Variable	Array
0108 00d8       |    |		Load_Top	At_Offset_0
0109 1c00       |    |		Execute_Immediate	Run_Utility,0x0
010a 4800       |H   |		Short_Literal	0x0
010b 4814       |H   |		Short_Literal	0x14
010c 00e3       |    |		Load_Encached	Natural_Cache
010d 03f8       |    |		Declare_Type	Discrete,Constrained
010e 4800       |H   |		Short_Literal	0x0
010f 4814       |H   |		Short_Literal	0x14
0110 00e3       |    |		Load_Encached	Natural_Cache
0111 03f8       |    |		Declare_Type	Discrete,Constrained
0112 e004       |    |		Load	0x0,0x4
0113 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
0114 e003       |    |		Load	0x0,0x3
0115 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0116 e004       |    |		Load	0x0,0x4
0117 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0118 e004       |    |		Load	0x0,0x4
0119 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
011a e005       |    |		Load	0x0,0x5
011b 00e2       |    |		Load_Encached	Integer_Cache
011c 029f 06fb  |    |		Declare_Subprogram	INIT_06f8,For_Call
011e 4806       |H   |		Short_Literal	0x6
011f 032d       | -  |		Declare_Type	Record,Defined
0120 4801       |H   |		Short_Literal	0x1
0121 4814       |H   |		Short_Literal	0x14
0122 00da       |    |		Load_Top	At_Offset_2
0123 029f 070b  |    |		Declare_Subprogram	INIT_0708,For_Call
0125 4801       |H   |		Short_Literal	0x1
0126 035d       | ]  |		Declare_Type	Array,Defined
0127 00d8       |    |		Load_Top	At_Offset_0
0128 0337       | 7  |		Declare_Variable	Array
0129 00d8       |    |		Load_Top	At_Offset_0
012a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
012b 4800       |H   |		Short_Literal	0x0
012c 4814       |H   |		Short_Literal	0x14
012d 00e3       |    |		Load_Encached	Natural_Cache
012e 03f8       |    |		Declare_Type	Discrete,Constrained
012f 4800       |H   |		Short_Literal	0x0
0130 4814       |H   |		Short_Literal	0x14
0131 00e3       |    |		Load_Encached	Natural_Cache
0132 03f8       |    |		Declare_Type	Discrete,Constrained
0133 4801       |H   |		Short_Literal	0x1
0134 4be8       |K   |		Short_Literal	0x3e8
0135 00e5       |    |		Load_Encached	Long_Integer_Cache
0136 03f8       |    |		Declare_Type	Discrete,Constrained
0137 4800       |H   |		Short_Literal	0x0
0138 4be8       |K   |		Short_Literal	0x3e8
0139 00e5       |    |		Load_Encached	Long_Integer_Cache
013a 03f8       |    |		Declare_Type	Discrete,Constrained
013b 4801       |H   |		Short_Literal	0x1
013c 4be8       |K   |		Short_Literal	0x3e8
013d e008       |    |		Load	0x0,0x8
013e 029f 0733  |   3|		Declare_Subprogram	INIT_0730,For_Call
0140 4801       |H   |		Short_Literal	0x1
0141 035d       | ]  |		Declare_Type	Array,Defined
0142 00e5       |    |		Load_Encached	Long_Integer_Cache
0143 02a0       |    |		Declare_Subprogram	Null_Subprogram
0144 4801       |H   |		Short_Literal	0x1
0145 032d       | -  |		Declare_Type	Record,Defined
0146 00d9       |    |		Load_Top	At_Offset_1
0147 0337       | 7  |		Declare_Variable	Array
0148 00d8       |    |		Load_Top	At_Offset_0
0149 1c00       |    |		Execute_Immediate	Run_Utility,0x0
014a 00d9       |    |		Load_Top	At_Offset_1
014b 0322       | "  |		Declare_Variable	Record
014c e004       |    |		Load	0x0,0x4
014d 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
014e e009       |    |		Load	0x0,0x9
014f 00e3       |    |		Load_Encached	Natural_Cache
0150 e005       |    |		Load	0x0,0x5
0151 e006       |    |		Load	0x0,0x6
0152 e007       |    |		Load	0x0,0x7
0153 e003       |    |		Load	0x0,0x3
0154 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0155 00e2       |    |		Load_Encached	Integer_Cache
0156 029f 075b  |   [|		Declare_Subprogram	INIT_0758,For_Call
0158 4808       |H   |		Short_Literal	0x8
0159 032d       | -  |		Declare_Type	Record,Defined
015a 4801       |H   |		Short_Literal	0x1
015b 4990       |I   |		Short_Literal	0x190
015c 00da       |    |		Load_Top	At_Offset_2
015d 029f 076b  |   k|		Declare_Subprogram	INIT_0768,For_Call
015f 4801       |H   |		Short_Literal	0x1
0160 035d       | ]  |		Declare_Type	Array,Defined
0161 00d8       |    |		Load_Top	At_Offset_0
0162 0337       | 7  |		Declare_Variable	Array
0163 00d8       |    |		Load_Top	At_Offset_0
0164 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0165 4800       |H   |		Short_Literal	0x0
0166 4990       |I   |		Short_Literal	0x190
0167 00e3       |    |		Load_Encached	Natural_Cache
0168 03f8       |    |		Declare_Type	Discrete,Constrained
0169 4800       |H   |		Short_Literal	0x0
016a 4990       |I   |		Short_Literal	0x190
016b 00e3       |    |		Load_Encached	Natural_Cache
016c 03f8       |    |		Declare_Type	Discrete,Constrained
016d 4800       |H   |		Short_Literal	0x0
016e e002       |    |		Load	0x0,0x2
016f 0a05       |    |		Execute_Immediate	Plus,0x5
0170 e001       |    |		Load	0x0,0x1
0171 01d7       |    |		Execute	Vector,Field_Read
0172 02a0       |    |		Declare_Subprogram	Null_Subprogram
0173 038e       |    |		Declare_Type	Package,Defined
0174 e001       |    |		Load	0x0,0x1
0175 e002       |    |		Load	0x0,0x2
0176 0a04       |    |		Execute_Immediate	Plus,0x4
0177 e001       |    |		Load	0x0,0x1
0178 01d7       |    |		Execute	Vector,Field_Read
0179 e262       | b  |		Load	0x1,0x62
017a e261       | a  |		Load	0x1,0x61
017b 4804       |H   |		Short_Literal	0x4
017c e26b       | k  |		Load	0x1,0x6b
017d 020e       |    |		Execute	Module,Augment_Imports
017e 0387       |    |		Declare_Variable	Package
017f a00a       |    |		Store_Unchecked	0x0,0xa
0180 e00b       |    |		Load	0x0,0xb
0181 a00c       |    |		Store_Unchecked	0x0,0xc
0182 e006       |    |		Load	0x0,0x6
0183 e007       |    |		Load	0x0,0x7
0184 a00d       |    |		Store_Unchecked	0x0,0xd
0185 a00e       |    |		Store_Unchecked	0x0,0xe
0186 a00f       |    |		Store_Unchecked	0x0,0xf
0187 e010       |    |		Load	0x0,0x10
0188 a011       |    |		Store_Unchecked	0x0,0x11
0189 e012       |    |		Load	0x0,0x12
018a e004       |    |		Load	0x0,0x4
018b 480c       |H   |		Short_Literal	0xc
018c e26b       | k  |		Load	0x1,0x6b
018d 020e       |    |		Execute	Module,Augment_Imports
018e 00d8       |    |		Load_Top	At_Offset_0
018f 020f       |    |		Execute	Module,Activate
0190 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28
0191 00c7       |    |		Action	Elaborate_Subprogram
0192 4800       |H   |		Short_Literal	0x0
0193 e002       |    |		Load	0x0,0x2
0194 0a01       |    |		Execute_Immediate	Plus,0x1
0195 e001       |    |		Load	0x0,0x1
0196 01d7       |    |		Execute	Vector,Field_Read
0197 00f5       |    |		Load_Encached	Unused21
0198 037d       | }  |		Declare_Type	Task,Defined
0199 036f       | o  |		Declare_Variable	Task
019a 029d 0793  |    |		Declare_Subprogram	INIT_0790,For_Outer_Call
019c 029d 07b3  |    |		Declare_Subprogram	INIT_07b0,For_Outer_Call
019e 029d 07e3  |    |		Declare_Subprogram	INIT_07e0,For_Outer_Call
01a0 029d 0813  |    |		Declare_Subprogram	INIT_0810,For_Outer_Call
01a2 029d 0843  |   C|		Declare_Subprogram	INIT_0840,For_Outer_Call
01a4 029d 0853  |   S|		Declare_Subprogram	INIT_0850,For_Outer_Call
01a6 029d 0883  |    |		Declare_Subprogram	INIT_0880,For_Outer_Call
01a8 029d 08b3  |    |		Declare_Subprogram	INIT_08b0,For_Outer_Call
01aa 029d 08e3  |    |		Declare_Subprogram	INIT_08e0,For_Outer_Call
01ac 4800       |H   |		Short_Literal	0x0
01ad 0093 11db  |    |		push_full_address	INIT_11d8
01af 00f5       |    |		Load_Encached	Unused21
01b0 037d       | }  |		Declare_Type	Task,Defined
01b1 036f       | o  |		Declare_Variable	Task
01b2 e230       | 0  |		Load	0x1,0x30
01b3 e004       |    |		Load	0x0,0x4
01b4 a013       |    |		Store_Unchecked	0x0,0x13
01b5 e014       |    |		Load	0x0,0x14
01b6 e015       |    |		Load	0x0,0x15
01b7 a016       |    |		Store_Unchecked	0x0,0x16
01b8 e017       |    |		Load	0x0,0x17
01b9 e018       |    |		Load	0x0,0x18
01ba e019       |    |		Load	0x0,0x19
01bb e01a       |    |		Load	0x0,0x1a
01bc e01b       |    |		Load	0x0,0x1b
01bd e239       | 9  |		Load	0x1,0x39
01be 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26
01bf e01c       |    |		Load	0x0,0x1c
01c0 a01d       |    |		Store_Unchecked	0x0,0x1d
01c1 1d69       | i  |		Execute_Immediate	Reference_Lex_1,0x69
01c2 e268       | h  |		Load	0x1,0x68
01c3 a01e       |    |		Store_Unchecked	0x0,0x1e
01c4 a011       |    |		Store_Unchecked	0x0,0x11
01c5 a01f       |    |		Store_Unchecked	0x0,0x1f
01c6 a020       |    |		Store_Unchecked	0x0,0x20
01c7 1d51       | Q  |		Execute_Immediate	Reference_Lex_1,0x51
01c8 1d6d       | m  |		Execute_Immediate	Reference_Lex_1,0x6d
01c9 1d43       | C  |		Execute_Immediate	Reference_Lex_1,0x43
01ca 1d41       | A  |		Execute_Immediate	Reference_Lex_1,0x41
01cb 1d5f       | _  |		Execute_Immediate	Reference_Lex_1,0x5f
01cc 1d6e       | n  |		Execute_Immediate	Reference_Lex_1,0x6e
01cd 1d6f       | o  |		Execute_Immediate	Reference_Lex_1,0x6f
01ce 1d70       | p  |		Execute_Immediate	Reference_Lex_1,0x70
01cf 1d5a       | Z  |		Execute_Immediate	Reference_Lex_1,0x5a
01d0 1d72       | r  |		Execute_Immediate	Reference_Lex_1,0x72
01d1 1d73       | s  |		Execute_Immediate	Reference_Lex_1,0x73
01d2 1d74       | t  |		Execute_Immediate	Reference_Lex_1,0x74
01d3 1d47       | G  |		Execute_Immediate	Reference_Lex_1,0x47
01d4 a021       | !  |		Store_Unchecked	0x0,0x21
01d5 a022       | "  |		Store_Unchecked	0x0,0x22
01d6 a023       | #  |		Store_Unchecked	0x0,0x23
01d7 a024       | $  |		Store_Unchecked	0x0,0x24
01d8 e025       | %  |		Load	0x0,0x25
01d9 a026       | &  |		Store_Unchecked	0x0,0x26
01da a027       | '  |		Store_Unchecked	0x0,0x27
01db e212       |    |		Load	0x1,0x12
01dc 1d50       | P  |		Execute_Immediate	Reference_Lex_1,0x50
01dd e24d       | M  |		Load	0x1,0x4d
01de e210       |    |		Load	0x1,0x10
01df 1d54       | T  |		Execute_Immediate	Reference_Lex_1,0x54
01e0 e253       | S  |		Load	0x1,0x53
01e1 1d55       | U  |		Execute_Immediate	Reference_Lex_1,0x55
01e2 e211       |    |		Load	0x1,0x11
01e3 1d42       | B  |		Execute_Immediate	Reference_Lex_1,0x42
01e4 1d44       | D  |		Execute_Immediate	Reference_Lex_1,0x44
01e5 1d45       | E  |		Execute_Immediate	Reference_Lex_1,0x45
01e6 1d46       | F  |		Execute_Immediate	Reference_Lex_1,0x46
01e7 e028       | (  |		Load	0x0,0x28
01e8 e029       | )  |		Load	0x0,0x29
01e9 e010       |    |		Load	0x0,0x10
01ea a02a       | *  |		Store_Unchecked	0x0,0x2a
01eb a02b       | +  |		Store_Unchecked	0x0,0x2b
01ec e21b       |    |		Load	0x1,0x1b
01ed 1d48       | H  |		Execute_Immediate	Reference_Lex_1,0x48
01ee 1d49       | I  |		Execute_Immediate	Reference_Lex_1,0x49
01ef e24f       | O  |		Load	0x1,0x4f
01f0 1d59       | Y  |		Execute_Immediate	Reference_Lex_1,0x59
01f1 e258       | X  |		Load	0x1,0x58
01f2 1d5e       | ^  |		Execute_Immediate	Reference_Lex_1,0x5e
01f3 e25d       | ]  |		Load	0x1,0x5d
01f4 1d6a       | j  |		Execute_Immediate	Reference_Lex_1,0x6a
01f5 a02c       | ,  |		Store_Unchecked	0x0,0x2c
01f6 a02d       | -  |		Store_Unchecked	0x0,0x2d
01f7 e265       | e  |		Load	0x1,0x65
01f8 e264       | d  |		Load	0x1,0x64
01f9 a02e       | .  |		Store_Unchecked	0x0,0x2e
01fa a02f       | /  |		Store_Unchecked	0x0,0x2f
01fb e030       | 0  |		Load	0x0,0x30
01fc e031       | 1  |		Load	0x0,0x31
01fd e00b       |    |		Load	0x0,0xb
01fe a032       | 2  |		Store_Unchecked	0x0,0x32
01ff a033       | 3  |		Store_Unchecked	0x0,0x33
0200 a034       | 4  |		Store_Unchecked	0x0,0x34
0201 a035       | 5  |		Store_Unchecked	0x0,0x35
0202 a036       | 6  |		Store_Unchecked	0x0,0x36
0203 e037       | 7  |		Load	0x0,0x37
0204 a038       | 8  |		Store_Unchecked	0x0,0x38
0205 e217       |    |		Load	0x1,0x17
0206 e219       |    |		Load	0x1,0x19
0207 e21d       |    |		Load	0x1,0x1d
0208 4856       |HV  |		Short_Literal	0x56
0209 e26c       | l  |		Load	0x1,0x6c
020a 020e       |    |		Execute	Module,Augment_Imports
020b 0007       |    |		Action	Break_Optional
020c 029d 08f3  |    |		Declare_Subprogram	INIT_08f0,For_Outer_Call
020e 029d 092b  |   +|		Declare_Subprogram	INIT_0928,For_Outer_Call
0210 029d 094b  |   K|		Declare_Subprogram	INIT_0948,For_Outer_Call
0212 029d 099b  |    |		Declare_Subprogram	INIT_0998,For_Outer_Call
0214 029d 09c3  |    |		Declare_Subprogram	INIT_09c0,For_Outer_Call
0216 029d 09d3  |    |		Declare_Subprogram	INIT_09d0,For_Outer_Call
0218 029d 09e3  |    |		Declare_Subprogram	INIT_09e0,For_Outer_Call
021a e039       | 9  |		Load	0x0,0x39
021b e03a       | :  |		Load	0x0,0x3a
021c a03b       | ;  |		Store_Unchecked	0x0,0x3b
021d a03c       | <  |		Store_Unchecked	0x0,0x3c
021e a03d       | =  |		Store_Unchecked	0x0,0x3d
021f a03e       | >  |		Store_Unchecked	0x0,0x3e
0220 a03f       | ?  |		Store_Unchecked	0x0,0x3f
0221 e004       |    |		Load	0x0,0x4
0222 1d41       | A  |		Execute_Immediate	Reference_Lex_1,0x41
0223 1d50       | P  |		Execute_Immediate	Reference_Lex_1,0x50
0224 e24d       | M  |		Load	0x1,0x4d
0225 1d71       | q  |		Execute_Immediate	Reference_Lex_1,0x71
0226 1d75       | u  |		Execute_Immediate	Reference_Lex_1,0x75
0227 e26c       | l  |		Load	0x1,0x6c
0228 481d       |H   |		Short_Literal	0x1d
0229 480f       |H   |		Short_Literal	0xf
022a e276       | v  |		Load	0x1,0x76
022b 020e       |    |		Execute	Module,Augment_Imports
022c 0007       |    |		Action	Break_Optional
022d 029b 0a43  |   C|		Declare_Subprogram	INIT_0a40,For_Outer_Call,Unelaborated
022f 029d 0b83  |    |		Declare_Subprogram	INIT_0b80,For_Outer_Call
0231 1d2b       | +  |		Execute_Immediate	Reference_Lex_1,0x2b
0232 00c7       |    |		Action	Elaborate_Subprogram
0233 1d2c       | ,  |		Execute_Immediate	Reference_Lex_1,0x2c
0234 00c7       |    |		Action	Elaborate_Subprogram
0235 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29
0236 00c7       |    |		Action	Elaborate_Subprogram
0237 029d 0ba3  |    |		Declare_Subprogram	INIT_0ba0,For_Outer_Call
0239 029d 0bcb  |    |		Declare_Subprogram	INIT_0bc8,For_Outer_Call
023b 1d7e       | ~  |		Execute_Immediate	Reference_Lex_1,0x7e
023c 00c7       |    |		Action	Elaborate_Subprogram
023d 029d 0bf3  |    |		Declare_Subprogram	INIT_0bf0,For_Outer_Call
023f 029d 0c2b  |   +|		Declare_Subprogram	INIT_0c28,For_Outer_Call
0241 a040       | @  |		Store_Unchecked	0x0,0x40
0242 00c6       |    |		Action	Check_Subprogram_Elaborated
0243 00e1       |    |		Load_Encached	Boolean_Cache
0244 e004       |    |		Load	0x0,0x4
0245 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0246 1d83       |    |		Execute_Immediate	Reference_Lex_1,0x83
0247 4800       |H   |		Short_Literal	0x0
0248 0093 0000  |    |		push_full_address	0x0
024a 6055       |`U  |		Indirect_Literal	Discrete,0x2a0,{0x80000000, 0x00050000}
024b 0273       | s  |		Execute	Discrete,Plus
024c e014       |    |		Load	0x0,0x14
024d 0273       | s  |		Execute	Discrete,Plus
024e e041       | A  |		Load	0x0,0x41
024f 0273       | s  |		Execute	Discrete,Plus
0250 4800       |H   |		Short_Literal	0x0
0251 0007       |    |		Action	Break_Optional
0252 029d 0c43  |   C|		Declare_Subprogram	INIT_0c40,For_Outer_Call
0254 e002       |    |		Load	0x0,0x2
0255 0a03       |    |		Execute_Immediate	Plus,0x3
0256 e001       |    |		Load	0x0,0x1
0257 01d7       |    |		Execute	Vector,Field_Read
0258 02a5       |    |		Declare_Subprogram	For_Outer_Call,With_Address
0259 e004       |    |		Load	0x0,0x4
025a 194a       | J  |		Execute	Package,Field_Reference,Field_Number 0x4a
025b 00c6       |    |		Action	Check_Subprogram_Elaborated
025c 1d8b       |    |		Execute_Immediate	Reference_Lex_1,0x8b
025d e042       | B  |		Load	0x0,0x42
025e e043       | C  |		Load	0x0,0x43
025f 4800       |H   |		Short_Literal	0x0
0260 0007       |    |		Action	Break_Optional
0261 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25
0262 00c7       |    |		Action	Elaborate_Subprogram
0263 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27
0264 00c7       |    |		Action	Elaborate_Subprogram
0265 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26
0266 00c7       |    |		Action	Elaborate_Subprogram
0267 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
0268 00c7       |    |		Action	Elaborate_Subprogram
0269 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
026a 00c7       |    |		Action	Elaborate_Subprogram
026b 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
026c 00c7       |    |		Action	Elaborate_Subprogram
026d 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
026e 00c7       |    |		Action	Elaborate_Subprogram
026f 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
0270 00c7       |    |		Action	Elaborate_Subprogram
0271 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
0272 00c7       |    |		Action	Elaborate_Subprogram
0273 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
0274 00c7       |    |		Action	Elaborate_Subprogram
0275 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
0276 00c7       |    |		Action	Elaborate_Subprogram
0277 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
0278 00c7       |    |		Action	Elaborate_Subprogram
0279 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
027a 00c7       |    |		Action	Elaborate_Subprogram
027b 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f
027c 00c7       |    |		Action	Elaborate_Subprogram
027d 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
027e 00c7       |    |		Action	Elaborate_Subprogram
027f 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22
0280 00c7       |    |		Action	Elaborate_Subprogram
0281 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23
0282 00c7       |    |		Action	Elaborate_Subprogram
0283 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
0284 00c7       |    |		Action	Elaborate_Subprogram
0285 1d2a       | *  |		Execute_Immediate	Reference_Lex_1,0x2a
0286 00c7       |    |		Action	Elaborate_Subprogram
0287 1d2d       | -  |		Execute_Immediate	Reference_Lex_1,0x2d
0288 00c7       |    |		Action	Elaborate_Subprogram
0289 1d2e       | .  |		Execute_Immediate	Reference_Lex_1,0x2e
028a 00c7       |    |		Action	Elaborate_Subprogram
028b 1d2f       | /  |		Execute_Immediate	Reference_Lex_1,0x2f
028c 00c7       |    |		Action	Elaborate_Subprogram
028d			BODY_0008:
028d 00be       |    |		Action	Activate_Tasks
028e 00bc       |    |		Action	Signal_Activated
028f 00bb       |    |		Action	Signal_Completion
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0293       |    |		.CONST	0x0293								; Address of begin
0291 0004       |    |		.CONST	0x0004								; Address of exception handler
0292 0001       |    |		.CONST	0x0001								; Number of locals
0293			BODY_0290:
0293			INIT_0290:
0293 e5fa       |    |		Load	0x2,-0x6
0294 e5fb       |    |		Load	0x2,-0x5
0295 e5fc       |    |		Load	0x2,-0x4
0296 e5fd       |    |		Load	0x2,-0x3
0297 e5fe       |    |		Load	0x2,-0x2
0298 e5ff       |    |		Load	0x2,-0x1
0299 4806       |H   |		Short_Literal	0x6
029a e26c       | l  |		Load	0x1,0x6c
029b 170e       |    |		Execute	Task,Entry_Call,Field_Number 0xe
029c 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
029d 0000 0000  |    |		.XXX[0x3]
029f 0000       |    |
02a0 8000 0000  |    |		.LITERAL	{0x80000000, 0x00050000}
02a4 8000 0000  |    |		.LITERAL	{0x80000000, 0x000b0000}
02a8 8000 0000  |    |		.LITERAL	{0x80000000, 0x000a0000}
02ac 8000 0000  |    |		.LITERAL	{0x80000000, 0x00090000}
02b0 8000 0000  |    |		.LITERAL	{0x80000000, 0x00080000}
02b4 8000 0000  |    |		.LITERAL	{0x80000000, 0x00070000}
02b8 8000 0000  |    |		.LITERAL	{0x80000000, 0x00060000}
02bc 8000 0000  |    |		.LITERAL	{0x80000000, 0x00050000}
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02c3       |    |		.CONST	0x02c3								; Address of begin
02c1 0004       |    |		.CONST	0x0004								; Address of exception handler
02c2 0001       |    |		.CONST	0x0001								; Number of locals
02c3			BODY_02c0:
02c3			INIT_02c0:
02c3 00da       |    |		Load_Top	At_Offset_2
02c4 4801       |H   |		Short_Literal	0x1
02c5 e26c       | l  |		Load	0x1,0x6c
02c6 170f       |    |		Execute	Task,Entry_Call,Field_Number 0xf
02c7 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02c8 ; --------------------------------------------------------------------------------------
02c8 ; SUBPROGRAM
02c8 ; --------------------------------------------------------------------------------------
02c8 02cb       |    |		.CONST	0x02cb								; Address of begin
02c9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ca 0001       |    |		.CONST	0x0001								; Number of locals
02cb			BODY_02c8:
02cb			INIT_02c8:
02cb e5fd       |    |		Load	0x2,-0x3
02cc e5fe       |    |		Load	0x2,-0x2
02cd e5ff       |    |		Load	0x2,-0x1
02ce 4803       |H   |		Short_Literal	0x3
02cf e26c       | l  |		Load	0x1,0x6c
02d0 1710       |    |		Execute	Task,Entry_Call,Field_Number 0x10
02d1 00d1       |    |		Pop_Control	Pop_Count_1
02d2 c5fd       |    |		Store	0x2,-0x3
02d3 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02d4 0000 0000  |    |		.BLANK	0000[0x4]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02db       |    |		.CONST	0x02db								; Address of begin
02d9 0004       |    |		.CONST	0x0004								; Address of exception handler
02da 0001       |    |		.CONST	0x0001								; Number of locals
02db			BODY_02d8:
02db			INIT_02d8:
02db e5fb       |    |		Load	0x2,-0x5
02dc e5fc       |    |		Load	0x2,-0x4
02dd e5fd       |    |		Load	0x2,-0x3
02de e5fe       |    |		Load	0x2,-0x2
02df e5ff       |    |		Load	0x2,-0x1
02e0 4805       |H   |		Short_Literal	0x5
02e1 e26c       | l  |		Load	0x1,0x6c
02e2 1711       |    |		Execute	Task,Entry_Call,Field_Number 0x11
02e3 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
02e4 0000 0000  |    |		.BLANK	0000[0x4]
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02ed       |    |		.CONST	0x02ed								; Address of begin
02e9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ea 0002       |    |		.CONST	0x0002								; Number of locals
02eb			INIT_02e8:
02eb e004       |    |		Load	0x0,0x4
02ec 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
02ed			BODY_02e8:
02ed e5f9       |    |		Load	0x2,-0x7
02ee 6803       |h   |		Jump_Zero	0x2f2
02ef e011       |    |		Load	0x0,0x11
02f0 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
02f1 7802       |x   |		Jump	0x2f4
02f2 00db       |    |		Load_Top	At_Offset_3
02f3 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
02f4 e5f8       |    |		Load	0x2,-0x8
02f5 00d9       |    |		Load_Top	At_Offset_1
02f6 e5fa       |    |		Load	0x2,-0x6
02f7 e5fb       |    |		Load	0x2,-0x5
02f8 e5fc       |    |		Load	0x2,-0x4
02f9 e5fd       |    |		Load	0x2,-0x3
02fa e5fe       |    |		Load	0x2,-0x2
02fb e5ff       |    |		Load	0x2,-0x1
02fc 4808       |H   |		Short_Literal	0x8
02fd e26c       | l  |		Load	0x1,0x6c
02fe 1712       |    |		Execute	Task,Entry_Call,Field_Number 0x12
02ff 4508       |E   |		Exit_Suprogram	New_Top_Offset 0x8
0300 ; --------------------------------------------------------------------------------------
0300 ; SUBPROGRAM
0300 ; --------------------------------------------------------------------------------------
0300 0303       |    |		.CONST	0x0303								; Address of begin
0301 0004       |    |		.CONST	0x0004								; Address of exception handler
0302 0001       |    |		.CONST	0x0001								; Number of locals
0303			BODY_0300:
0303			INIT_0300:
0303 e5f9       |    |		Load	0x2,-0x7
0304 e5fa       |    |		Load	0x2,-0x6
0305 e5fb       |    |		Load	0x2,-0x5
0306 e5fc       |    |		Load	0x2,-0x4
0307 e5fd       |    |		Load	0x2,-0x3
0308 e5fe       |    |		Load	0x2,-0x2
0309 e5ff       |    |		Load	0x2,-0x1
030a 4807       |H   |		Short_Literal	0x7
030b e26c       | l  |		Load	0x1,0x6c
030c 1713       |    |		Execute	Task,Entry_Call,Field_Number 0x13
030d 4508       |E   |		Exit_Suprogram	New_Top_Offset 0x8
030e 0000 0000  |    |		.XXX[0x2]
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 0313       |    |		.CONST	0x0313								; Address of begin
0311 0004       |    |		.CONST	0x0004								; Address of exception handler
0312 0001       |    |		.CONST	0x0001								; Number of locals
0313			BODY_0310:
0313			INIT_0310:
0313 e5fd       |    |		Load	0x2,-0x3
0314 e5fe       |    |		Load	0x2,-0x2
0315 e5ff       |    |		Load	0x2,-0x1
0316 4803       |H   |		Short_Literal	0x3
0317 e26c       | l  |		Load	0x1,0x6c
0318 1714       |    |		Execute	Task,Entry_Call,Field_Number 0x14
0319 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
031a 0000 0000  |    |		.BLANK	0000[0x6]
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0323       | #  |		.CONST	0x0323								; Address of begin
0321 0004       |    |		.CONST	0x0004								; Address of exception handler
0322 0001       |    |		.CONST	0x0001								; Number of locals
0323			BODY_0320:
0323			INIT_0320:
0323 e5f8       |    |		Load	0x2,-0x8
0324 e5f9       |    |		Load	0x2,-0x7
0325 e5fa       |    |		Load	0x2,-0x6
0326 e5fb       |    |		Load	0x2,-0x5
0327 e5fc       |    |		Load	0x2,-0x4
0328 e5fd       |    |		Load	0x2,-0x3
0329 e5fe       |    |		Load	0x2,-0x2
032a e5ff       |    |		Load	0x2,-0x1
032b 4808       |H   |		Short_Literal	0x8
032c e26c       | l  |		Load	0x1,0x6c
032d 1715       |    |		Execute	Task,Entry_Call,Field_Number 0x15
032e 4509       |E   |		Exit_Suprogram	New_Top_Offset 0x9
032f 0000       |    |		.XXX[0x1]
0330 ; --------------------------------------------------------------------------------------
0330 ; SUBPROGRAM
0330 ; --------------------------------------------------------------------------------------
0330 0333       | 3  |		.CONST	0x0333								; Address of begin
0331 0004       |    |		.CONST	0x0004								; Address of exception handler
0332 0001       |    |		.CONST	0x0001								; Number of locals
0333			BODY_0330:
0333			INIT_0330:
0333 e5f9       |    |		Load	0x2,-0x7
0334 e5fa       |    |		Load	0x2,-0x6
0335 e5fb       |    |		Load	0x2,-0x5
0336 e5fc       |    |		Load	0x2,-0x4
0337 e5fd       |    |		Load	0x2,-0x3
0338 e5fe       |    |		Load	0x2,-0x2
0339 e5ff       |    |		Load	0x2,-0x1
033a 4807       |H   |		Short_Literal	0x7
033b e26c       | l  |		Load	0x1,0x6c
033c 1716       |    |		Execute	Task,Entry_Call,Field_Number 0x16
033d 4508       |E   |		Exit_Suprogram	New_Top_Offset 0x8
033e 0000 0000  |    |		.XXX[0x2]
0340 ; --------------------------------------------------------------------------------------
0340 ; SUBPROGRAM
0340 ; --------------------------------------------------------------------------------------
0340 0343       | C  |		.CONST	0x0343								; Address of begin
0341 0004       |    |		.CONST	0x0004								; Address of exception handler
0342 0001       |    |		.CONST	0x0001								; Number of locals
0343			BODY_0340:
0343			INIT_0340:
0343 00da       |    |		Load_Top	At_Offset_2
0344 4801       |H   |		Short_Literal	0x1
0345 e26c       | l  |		Load	0x1,0x6c
0346 1718       |    |		Execute	Task,Entry_Call,Field_Number 0x18
0347 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 034b       | K  |		.CONST	0x034b								; Address of begin
0349 0004       |    |		.CONST	0x0004								; Address of exception handler
034a 0001       |    |		.CONST	0x0001								; Number of locals
034b			BODY_0348:
034b			INIT_0348:
034b 00da       |    |		Load_Top	At_Offset_2
034c 4801       |H   |		Short_Literal	0x1
034d e26c       | l  |		Load	0x1,0x6c
034e 1717       |    |		Execute	Task,Entry_Call,Field_Number 0x17
034f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0350 ; --------------------------------------------------------------------------------------
0350 ; SUBPROGRAM
0350 ; --------------------------------------------------------------------------------------
0350 0353       | S  |		.CONST	0x0353								; Address of begin
0351 0004       |    |		.CONST	0x0004								; Address of exception handler
0352 0001       |    |		.CONST	0x0001								; Number of locals
0353			BODY_0350:
0353			INIT_0350:
0353 00da       |    |		Load_Top	At_Offset_2
0354 4801       |H   |		Short_Literal	0x1
0355 e26c       | l  |		Load	0x1,0x6c
0356 1719       |    |		Execute	Task,Entry_Call,Field_Number 0x19
0357 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0358 ; --------------------------------------------------------------------------------------
0358 ; SUBPROGRAM
0358 ; --------------------------------------------------------------------------------------
0358 035b       | [  |		.CONST	0x035b								; Address of begin
0359 0004       |    |		.CONST	0x0004								; Address of exception handler
035a 0001       |    |		.CONST	0x0001								; Number of locals
035b			BODY_0358:
035b			INIT_0358:
035b 4800       |H   |		Short_Literal	0x0
035c e26c       | l  |		Load	0x1,0x6c
035d 171a       |    |		Execute	Task,Entry_Call,Field_Number 0x1a
035e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
035f 0000       |    |		.XXX[0x1]
0360 ; --------------------------------------------------------------------------------------
0360 ; SUBPROGRAM
0360 ; --------------------------------------------------------------------------------------
0360 0363       | c  |		.CONST	0x0363								; Address of begin
0361 0004       |    |		.CONST	0x0004								; Address of exception handler
0362 0001       |    |		.CONST	0x0001								; Number of locals
0363			BODY_0360:
0363			INIT_0360:
0363 00db       |    |		Load_Top	At_Offset_3
0364 00db       |    |		Load_Top	At_Offset_3
0365 4802       |H   |		Short_Literal	0x2
0366 e26c       | l  |		Load	0x1,0x6c
0367 171b       |    |		Execute	Task,Entry_Call,Field_Number 0x1b
0368 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0369 0000 0000  |    |		.BLANK	0000[0x7]
0370 ; --------------------------------------------------------------------------------------
0370 ; SUBPROGRAM
0370 ; --------------------------------------------------------------------------------------
0370 0373       | s  |		.CONST	0x0373								; Address of begin
0371 0004       |    |		.CONST	0x0004								; Address of exception handler
0372 0001       |    |		.CONST	0x0001								; Number of locals
0373			BODY_0370:
0373			INIT_0370:
0373 e241       | A  |		Load	0x1,0x41
0374 6804       |h   |		Jump_Zero	0x379
0375 e242       | B  |		Load	0x1,0x42
0376 00db       |    |		Load_Top	At_Offset_3
0377 027f       |    |		Execute	Discrete,Equal
0378 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0379 4800       |H   |		Short_Literal	0x0
037a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
037b 0000 0000  |    |		.BLANK	0000[0x5]
0380 ; --------------------------------------------------------------------------------------
0380 ; SUBPROGRAM
0380 ; --------------------------------------------------------------------------------------
0380 0393       |    |		.CONST	0x0393								; Address of begin
0381 0004       |    |		.CONST	0x0004								; Address of exception handler
0382 0004       |    |		.CONST	0x0004								; Number of locals
0383			INIT_0380:
0383 e039       | 9  |		Load	0x0,0x39
0384 0322       | "  |		Declare_Variable	Record
0385 00d8       |    |		Load_Top	At_Offset_0
0386 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0387 e044       | D  |		Load	0x0,0x44
0388 00d9       |    |		Load_Top	At_Offset_1
0389 017d       | }  |		Execute	Record,Structure_Write
038a e004       |    |		Load	0x0,0x4
038b 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
038c 02c7       |    |		Declare_Variable	Any
038d e5ff       |    |		Load	0x2,-0x1
038e e01c       |    |		Load	0x0,0x1c
038f 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0390 a403       |    |		Store_Unchecked	0x2,0x3
0391 029f 0c63  |   c|		Declare_Subprogram	INIT_0c60,For_Call
0393			BODY_0380:
0393 8404       |    |		Call	0x2,0x4
0394 00d9       |    |		Load_Top	At_Offset_1
0395 1d8c       |    |		Execute_Immediate	Reference_Lex_1,0x8c
0396 1d8d       |    |		Execute_Immediate	Reference_Lex_1,0x8d
0397 e004       |    |		Load	0x0,0x4
0398 184a       | J  |		Execute	Package,Field_Execute,Field_Number 0x4a
0399 4800       |H   |		Short_Literal	0x0
039a e5ff       |    |		Load	0x2,-0x1
039b 8038       | 8  |		Call	0x0,0x38
039c 4800       |H   |		Short_Literal	0x0
039d 4800       |H   |		Short_Literal	0x0
039e e5ff       |    |		Load	0x2,-0x1
039f 8021       | !  |		Call	0x0,0x21
03a0 00da       |    |		Load_Top	At_Offset_2
03a1 e5ff       |    |		Load	0x2,-0x1
03a2 803e       | >  |		Call	0x0,0x3e
03a3 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
03a4 0000 0000  |    |		.BLANK	0000[0x4]
03a8 ; --------------------------------------------------------------------------------------
03a8 ; SUBPROGRAM
03a8 ; --------------------------------------------------------------------------------------
03a8 03ab       |    |		.CONST	0x03ab								; Address of begin
03a9 0004       |    |		.CONST	0x0004								; Address of exception handler
03aa 0001       |    |		.CONST	0x0001								; Number of locals
03ab			BODY_03a8:
03ab			INIT_03a8:
03ab 00da       |    |		Load_Top	At_Offset_2
03ac e01c       |    |		Load	0x0,0x1c
03ad 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
03ae e004       |    |		Load	0x0,0x4
03af 1843       | C  |		Execute	Package,Field_Execute,Field_Number 0x43
03b0 6802       |h   |		Jump_Zero	0x3b3
03b1 4800       |H   |		Short_Literal	0x0
03b2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03b3 4801       |H   |		Short_Literal	0x1
03b4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03b5 0000 0000  |    |		.XXX[0x3]
03b7 0000       |    |
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03bb       |    |		.CONST	0x03bb								; Address of begin
03b9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ba 0001       |    |		.CONST	0x0001								; Number of locals
03bb			BODY_03b8:
03bb			INIT_03b8:
03bb 00da       |    |		Load_Top	At_Offset_2
03bc 4801       |H   |		Short_Literal	0x1
03bd e26c       | l  |		Load	0x1,0x6c
03be 171d       |    |		Execute	Task,Entry_Call,Field_Number 0x1d
03bf 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
03c0 ; --------------------------------------------------------------------------------------
03c0 ; SUBPROGRAM
03c0 ; --------------------------------------------------------------------------------------
03c0 03c3       |    |		.CONST	0x03c3								; Address of begin
03c1 0004       |    |		.CONST	0x0004								; Address of exception handler
03c2 0001       |    |		.CONST	0x0001								; Number of locals
03c3			BODY_03c0:
03c3			INIT_03c0:
03c3 e5fa       |    |		Load	0x2,-0x6
03c4 e5fb       |    |		Load	0x2,-0x5
03c5 00e3       |    |		Load_Encached	Natural_Cache
03c6 e26b       | k  |		Load	0x1,0x6b
03c7 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03c8 0322       | "  |		Declare_Variable	Record
03c9 00d8       |    |		Load_Top	At_Offset_0
03ca 1c01       |    |		Execute_Immediate	Run_Utility,0x1
03cb e264       | d  |		Load	0x1,0x64
03cc e26b       | k  |		Load	0x1,0x6b
03cd 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03ce 3000       |0   |		Execute	Record,Field_Type,Field_Number 0x0
03cf 0119       |    |		Execute	Any,Check_In_Formal_Type
03d0 00d9       |    |		Load_Top	At_Offset_1
03d1 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
03d2 e265       | e  |		Load	0x1,0x65
03d3 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
03d4 0aff       |    |		Execute_Immediate	Plus,-0x1
03d5 4be8       |K   |		Short_Literal	0x3e8
03d6 026e       | n  |		Execute	Discrete,Modulo
03d7 0a01       |    |		Execute_Immediate	Plus,0x1
03d8 00d9       |    |		Load_Top	At_Offset_1
03d9 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
03da e265       | e  |		Load	0x1,0x65
03db 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
03dc 4be8       |K   |		Short_Literal	0x3e8
03dd 027d       | }  |		Execute	Discrete,Greater
03de 00d9       |    |		Load_Top	At_Offset_1
03df 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
03e0 e5fd       |    |		Load	0x2,-0x3
03e1 e5fe       |    |		Load	0x2,-0x2
03e2 e5ff       |    |		Load	0x2,-0x1
03e3 e26b       | k  |		Load	0x1,0x6b
03e4 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
03e5 c5fc       |    |		Store	0x2,-0x4
03e6 00d1       |    |		Pop_Control	Pop_Count_1
03e7 c5fa       |    |		Store	0x2,-0x6
03e8 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
03e9 0000 0000  |    |		.BLANK	0000[0x7]
03f0 ; --------------------------------------------------------------------------------------
03f0 ; SUBPROGRAM
03f0 ; --------------------------------------------------------------------------------------
03f0 03f3       |    |		.CONST	0x03f3								; Address of begin
03f1 0004       |    |		.CONST	0x0004								; Address of exception handler
03f2 0001       |    |		.CONST	0x0001								; Number of locals
03f3			BODY_03f0:
03f3			INIT_03f0:
03f3 e23a       | :  |		Load	0x1,0x3a
03f4 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
03f5 e23b       | ;  |		Load	0x1,0x3b
03f6 a5fe       |    |		Store_Unchecked	0x2,-0x2
03f7 e23c       | <  |		Load	0x1,0x3c
03f8 a5fd       |    |		Store_Unchecked	0x2,-0x3
03f9 e23d       | =  |		Load	0x1,0x3d
03fa a5fc       |    |		Store_Unchecked	0x2,-0x4
03fb 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03fc 0000 0000  |    |		.BLANK	0000[0x4]
0400 ; --------------------------------------------------------------------------------------
0400 ; SUBPROGRAM
0400 ; --------------------------------------------------------------------------------------
0400 0462       | b  |		.CONST	0x0462								; Address of begin
0401 0004       |    |		.CONST	0x0004								; Address of exception handler
0402 0025       | %  |		.CONST	0x0025								; Number of locals
0403			INIT_0400:
0403 029f 0c73  |   s|		Declare_Subprogram	INIT_0c70,For_Call
0405 029f 0c83  |    |		Declare_Subprogram	INIT_0c80,For_Call
0407 029f 0c9b  |    |		Declare_Subprogram	INIT_0c98,For_Call
0409 029f 0cb3  |    |		Declare_Subprogram	INIT_0cb0,For_Call
040b 029f 0ccb  |    |		Declare_Subprogram	INIT_0cc8,For_Call
040d 029f 0d1b  |    |		Declare_Subprogram	INIT_0d18,For_Call
040f 029f 0d33  |   3|		Declare_Subprogram	INIT_0d30,For_Call
0411 029f 0d4b  |   K|		Declare_Subprogram	INIT_0d48,For_Call
0413 029f 0d63  |   c|		Declare_Subprogram	INIT_0d60,For_Call
0415 a016       |    |		Store_Unchecked	0x0,0x16
0416 00c6       |    |		Action	Check_Subprogram_Elaborated
0417 00e2       |    |		Load_Encached	Integer_Cache
0418 00e2       |    |		Load_Encached	Integer_Cache
0419 4809       |H   |		Short_Literal	0x9
041a 4802       |H   |		Short_Literal	0x2
041b 0099       |    |		Action	Reference_Dynamic
041c 480a       |H   |		Short_Literal	0xa
041d 4802       |H   |		Short_Literal	0x2
041e 0099       |    |		Action	Reference_Dynamic
041f 0093 0000  |    |		push_full_address	0x0
0421 619e       |a   |		Indirect_Literal	Discrete,0x5c0,{0x80000000, 0x00030000}
0422 0273       | s  |		Execute	Discrete,Plus
0423 e014       |    |		Load	0x0,0x14
0424 0273       | s  |		Execute	Discrete,Plus
0425 e045       | E  |		Load	0x0,0x45
0426 0273       | s  |		Execute	Discrete,Plus
0427 4810       |H   |		Short_Literal	0x10
0428 0007       |    |		Action	Break_Optional
0429 029f 0d7b  |   {|		Declare_Subprogram	INIT_0d78,For_Call
042b 029f 0d93  |    |		Declare_Subprogram	INIT_0d90,For_Call
042d a016       |    |		Store_Unchecked	0x0,0x16
042e 00c6       |    |		Action	Check_Subprogram_Elaborated
042f 00e2       |    |		Load_Encached	Integer_Cache
0430 00e2       |    |		Load_Encached	Integer_Cache
0431 4811       |H   |		Short_Literal	0x11
0432 4802       |H   |		Short_Literal	0x2
0433 0099       |    |		Action	Reference_Dynamic
0434 4812       |H   |		Short_Literal	0x12
0435 4802       |H   |		Short_Literal	0x2
0436 0099       |    |		Action	Reference_Dynamic
0437 0093 0000  |    |		push_full_address	0x0
0439 6182       |a   |		Indirect_Literal	Discrete,0x5bc,{0x80000000, 0x00020000}
043a 0273       | s  |		Execute	Discrete,Plus
043b e014       |    |		Load	0x0,0x14
043c 0273       | s  |		Execute	Discrete,Plus
043d e046       | F  |		Load	0x0,0x46
043e 0273       | s  |		Execute	Discrete,Plus
043f 4818       |H   |		Short_Literal	0x18
0440 0007       |    |		Action	Break_Optional
0441 029f 0dab  |    |		Declare_Subprogram	INIT_0da8,For_Call
0443 029f 0dc3  |    |		Declare_Subprogram	INIT_0dc0,For_Call
0445 a016       |    |		Store_Unchecked	0x0,0x16
0446 00c6       |    |		Action	Check_Subprogram_Elaborated
0447 00e2       |    |		Load_Encached	Integer_Cache
0448 00e2       |    |		Load_Encached	Integer_Cache
0449 4819       |H   |		Short_Literal	0x19
044a 4802       |H   |		Short_Literal	0x2
044b 0099       |    |		Action	Reference_Dynamic
044c 481a       |H   |		Short_Literal	0x1a
044d 4802       |H   |		Short_Literal	0x2
044e 0099       |    |		Action	Reference_Dynamic
044f 0093 0000  |    |		push_full_address	0x0
0451 6166       |af  |		Indirect_Literal	Discrete,0x5b8,{0x80000000, 0x00010000}
0452 0273       | s  |		Execute	Discrete,Plus
0453 e014       |    |		Load	0x0,0x14
0454 0273       | s  |		Execute	Discrete,Plus
0455 e047       | G  |		Load	0x0,0x47
0456 0273       | s  |		Execute	Discrete,Plus
0457 4820       |H   |		Short_Literal	0x20
0458 029f 0ddb  |    |		Declare_Subprogram	INIT_0dd8,For_Call
045a 029f 0e1b  |    |		Declare_Subprogram	INIT_0e18,For_Call
045c 029f 0e5b  |   [|		Declare_Subprogram	INIT_0e58,For_Call
045e 029f 0ecb  |    |		Declare_Subprogram	INIT_0ec8,For_Call
0460 029f 0efb  |    |		Declare_Subprogram	INIT_0ef8,For_Call
0462			BODY_0400:
0462 e5ff       |    |		Load	0x2,-0x1
0463 00d8       |    |		Load_Top	At_Offset_0
0464 0c0c       |    |		Execute_Immediate	Greater_Equal,0xc
0465 7028       |p(  |		Jump_Nonzero	0x48e
0466 0aff       |    |		Execute_Immediate	Plus,-0x1
0467 460a       |F   |		Jump_Case	0xb
0468 792a       |y*  |		Jump	0x593								; case 0x0
0469 7826       |x&  |		Jump	0x490								; case 0x1
046a 7848       |xH  |		Jump	0x4b3								; case 0x2
046b 7875       |xu  |		Jump	0x4e1								; case 0x3
046c 7897       |x   |		Jump	0x504								; case 0x4
046d 78bd       |x   |		Jump	0x52b								; case 0x5
046e 78ca       |x   |		Jump	0x539								; case 0x6
046f 78da       |x   |		Jump	0x54a								; case 0x7
0470 78ea       |x   |		Jump	0x55b								; case 0x8
0471 78fa       |x   |		Jump	0x56c								; case 0x9
0472 7800       |x   |		Jump	0x473								; case 0xa
0473 0092 126b  |   k|		Action	Push_String_Extended,0x126b					; "Trace requests"
0475 8048       | H  |		Call	0x0,0x48
0476 8049       | I  |		Call	0x0,0x49
0477 8049       | I  |		Call	0x0,0x49
0478 00cf       |    |		Action	Mark_Auxiliary
0479 e259       | Y  |		Load	0x1,0x59
047a 4801       |H   |		Short_Literal	0x1
047b 0263       | c  |		Execute	Discrete,Above_Bound
047c 7003       |p   |		Jump_Nonzero	0x480
047d 8425       | %  |		Call	0x2,0x25
047e 00c8       |    |		Action	Pop_Auxiliary_Range
047f 3ffd       |?   |		Loop_Increasing	0x47d
0480 00ce       |    |		Action	Pop_Auxiliary
0481 e04a       | J  |		Load	0x0,0x4a
0482 6804       |h   |		Jump_Zero	0x487
0483 0092 126c  |   l|		Action	Push_String_Extended,0x126c					; "New task trace is on"
0485 8048       | H  |		Call	0x0,0x48
0486 8049       | I  |		Call	0x0,0x49
0487 e04b       | K  |		Load	0x0,0x4b
0488 692e       |i.  |		Jump_Zero	0x5b7
0489 0092 126d  |   m|		Action	Push_String_Extended,0x126d					; "Inform on task creation mode set"
048b 8048       | H  |		Call	0x0,0x48
048c 8049       | I  |		Call	0x0,0x49
048d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
048e 00d1       |    |		Pop_Control	Pop_Count_1
048f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0490 0092 126e  |   n|		Action	Push_String_Extended,0x126e					; "Global stop: "
0492 8048       | H  |		Call	0x0,0x48
0493 e241       | A  |		Load	0x1,0x41
0494 6809       |h   |		Jump_Zero	0x49e
0495 0092 126f  |   o|		Action	Push_String_Extended,0x126f					; "Aid: "
0497 e242       | B  |		Load	0x1,0x42
0498 00e0       |    |		Load_Encached	Standard_Cache
0499 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
049a 01cc       |    |		Execute	Vector,Catenate
049b 8048       | H  |		Call	0x0,0x48
049c 8049       | I  |		Call	0x0,0x49
049d 7804       |x   |		Jump	0x4a2
049e 0092 1270  |   p|		Action	Push_String_Extended,0x1270					; "none"
04a0 8048       | H  |		Call	0x0,0x48
04a1 8049       | I  |		Call	0x0,0x49
04a2 e02d       | -  |		Load	0x0,0x2d
04a3 6808       |h   |		Jump_Zero	0x4ac
04a4 0092 1271  |   q|		Action	Push_String_Extended,0x1271					; "New task stop, action ="
04a6 e02c       | ,  |		Load	0x0,0x2c
04a7 00e0       |    |		Load_Encached	Standard_Cache
04a8 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
04a9 01cc       |    |		Execute	Vector,Catenate
04aa 8048       | H  |		Call	0x0,0x48
04ab 8049       | I  |		Call	0x0,0x49
04ac e04c       | L  |		Load	0x0,0x4c
04ad 6909       |i   |		Jump_Zero	0x5b7
04ae 0092 1272  |   r|		Action	Push_String_Extended,0x1272					; "Holding initial registrants"
04b0 8048       | H  |		Call	0x0,0x48
04b1 8049       | I  |		Call	0x0,0x49
04b2 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
04b3 0092 1273  |   s|		Action	Push_String_Extended,0x1273					; "Global stepping: "
04b5 8048       | H  |		Call	0x0,0x48
04b6 e243       | C  |		Load	0x1,0x43
04b7 e011       |    |		Load	0x0,0x11
04b8 027f       |    |		Execute	Discrete,Equal
04b9 7021       |p!  |		Jump_Nonzero	0x4db
04ba 0092 1274  |   t|		Action	Push_String_Extended,0x1274					; "Task = "
04bc e243       | C  |		Load	0x1,0x43
04bd 804d       | M  |		Call	0x0,0x4d
04be 01cc       |    |		Execute	Vector,Catenate
04bf 0092 1275  |   u|		Action	Push_String_Extended,0x1275					; " Count = "
04c1 01cc       |    |		Execute	Vector,Catenate
04c2 e244       | D  |		Load	0x1,0x44
04c3 00e0       |    |		Load_Encached	Standard_Cache
04c4 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
04c5 01cc       |    |		Execute	Vector,Catenate
04c6 8048       | H  |		Call	0x0,0x48
04c7 8049       | I  |		Call	0x0,0x49
04c8 0092 1276  |   v|		Action	Push_String_Extended,0x1276					; "       Frame restriction = #"
04ca 8048       | H  |		Call	0x0,0x48
04cb 4820       |H   |		Short_Literal	0x20
04cc 4800       |H   |		Short_Literal	0x0
04cd 4810       |H   |		Short_Literal	0x10
04ce e245       | E  |		Load	0x1,0x45
04cf e04e       | N  |		Load	0x0,0x4e
04d0 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
04d1 0092 1277  |   w|		Action	Push_String_Extended,0x1277					; " Action = "
04d3 01cc       |    |		Execute	Vector,Catenate
04d4 e246       | F  |		Load	0x1,0x46
04d5 00e0       |    |		Load_Encached	Standard_Cache
04d6 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
04d7 01cc       |    |		Execute	Vector,Catenate
04d8 8048       | H  |		Call	0x0,0x48
04d9 8049       | I  |		Call	0x0,0x49
04da 7804       |x   |		Jump	0x4df
04db 0092 1270  |   p|		Action	Push_String_Extended,0x1270					; "none"
04dd 8048       | H  |		Call	0x0,0x48
04de 8049       | I  |		Call	0x0,0x49
04df 8049       | I  |		Call	0x0,0x49
04e0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
04e1 0092 1278  |   x|		Action	Push_String_Extended,0x1278					; "Instruction stepping: "
04e3 8048       | H  |		Call	0x0,0x48
04e4 e247       | G  |		Load	0x1,0x47
04e5 e011       |    |		Load	0x0,0x11
04e6 027f       |    |		Execute	Discrete,Equal
04e7 7016       |p   |		Jump_Nonzero	0x4fe
04e8 0092 1274  |   t|		Action	Push_String_Extended,0x1274					; "Task = "
04ea 8048       | H  |		Call	0x0,0x48
04eb e247       | G  |		Load	0x1,0x47
04ec 804d       | M  |		Call	0x0,0x4d
04ed 0092 1275  |   u|		Action	Push_String_Extended,0x1275					; " Count = "
04ef 01cc       |    |		Execute	Vector,Catenate
04f0 e248       | H  |		Load	0x1,0x48
04f1 00e0       |    |		Load_Encached	Standard_Cache
04f2 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
04f3 01cc       |    |		Execute	Vector,Catenate
04f4 0092 1277  |   w|		Action	Push_String_Extended,0x1277					; " Action = "
04f6 01cc       |    |		Execute	Vector,Catenate
04f7 e249       | I  |		Load	0x1,0x49
04f8 00e0       |    |		Load_Encached	Standard_Cache
04f9 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
04fa 01cc       |    |		Execute	Vector,Catenate
04fb 8048       | H  |		Call	0x0,0x48
04fc 8049       | I  |		Call	0x0,0x49
04fd 7804       |x   |		Jump	0x502
04fe 0092 1279  |   y|		Action	Push_String_Extended,0x1279					; "None"
0500 8048       | H  |		Call	0x0,0x48
0501 8049       | I  |		Call	0x0,0x49
0502 8049       | I  |		Call	0x0,0x49
0503 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0504 0092 127a  |   z|		Action	Push_String_Extended,0x127a					; "Breakpoints:"
0506 8048       | H  |		Call	0x0,0x48
0507 8049       | I  |		Call	0x0,0x49
0508 e23e       | >  |		Load	0x1,0x3e
0509 6808       |h   |		Jump_Zero	0x512
050a 0092 127b  |   {|		Action	Push_String_Extended,0x127b					; "  Accelerator load failures: "
050c e23e       | >  |		Load	0x1,0x3e
050d 00e0       |    |		Load_Encached	Standard_Cache
050e 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
050f 01cc       |    |		Execute	Vector,Catenate
0510 8048       | H  |		Call	0x0,0x48
0511 8049       | I  |		Call	0x0,0x49
0512 00cf       |    |		Action	Mark_Auxiliary
0513 e250       | P  |		Load	0x1,0x50
0514 4801       |H   |		Short_Literal	0x1
0515 0263       | c  |		Execute	Discrete,Above_Bound
0516 7003       |p   |		Jump_Nonzero	0x51a
0517 8421       | !  |		Call	0x2,0x21
0518 00c8       |    |		Action	Pop_Auxiliary_Range
0519 3ffd       |?   |		Loop_Increasing	0x517
051a 00c9       |    |		Action	Pop_Auxiliary_Loop
051b e254       | T  |		Load	0x1,0x54
051c 4801       |H   |		Short_Literal	0x1
051d 0263       | c  |		Execute	Discrete,Above_Bound
051e 7003       |p   |		Jump_Nonzero	0x522
051f 8422       | "  |		Call	0x2,0x22
0520 00c8       |    |		Action	Pop_Auxiliary_Range
0521 3ffd       |?   |		Loop_Increasing	0x51f
0522 00ce       |    |		Action	Pop_Auxiliary
0523 e04f       | O  |		Load	0x0,0x4f
0524 6804       |h   |		Jump_Zero	0x529
0525 0092 127c  |   ||		Action	Push_String_Extended,0x127c					; "Break on task creation mode set"
0527 8048       | H  |		Call	0x0,0x48
0528 8049       | I  |		Call	0x0,0x49
0529 8049       | I  |		Call	0x0,0x49
052a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
052b 0092 127d  |   }|		Action	Push_String_Extended,0x127d					; "Exception Requests:"
052d 8048       | H  |		Call	0x0,0x48
052e 8049       | I  |		Call	0x0,0x49
052f 00cf       |    |		Action	Mark_Auxiliary
0530 e269       | i  |		Load	0x1,0x69
0531 4801       |H   |		Short_Literal	0x1
0532 0263       | c  |		Execute	Discrete,Above_Bound
0533 7003       |p   |		Jump_Nonzero	0x537
0534 8423       | #  |		Call	0x2,0x23
0535 00c8       |    |		Action	Pop_Auxiliary_Range
0536 3ffd       |?   |		Loop_Increasing	0x534
0537 00ce       |    |		Action	Pop_Auxiliary
0538 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0539 e024       | $  |		Load	0x0,0x24
053a 00d8       |    |		Load_Top	At_Offset_0
053b e40b       |    |		Load	0x2,0xb
053c e40c       |    |		Load	0x2,0xc
053d 480d       |H   |		Short_Literal	0xd
053e 4802       |H   |		Short_Literal	0x2
053f 0099       |    |		Action	Reference_Dynamic
0540 480e       |H   |		Short_Literal	0xe
0541 4802       |H   |		Short_Literal	0x2
0542 0099       |    |		Action	Reference_Dynamic
0543 480f       |H   |		Short_Literal	0xf
0544 4802       |H   |		Short_Literal	0x2
0545 0099       |    |		Action	Reference_Dynamic
0546 8016       |    |		Call	0x0,0x16
0547 c024       | $  |		Store	0x0,0x24
0548 8049       | I  |		Call	0x0,0x49
0549 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
054a e024       | $  |		Load	0x0,0x24
054b 00d8       |    |		Load_Top	At_Offset_0
054c e413       |    |		Load	0x2,0x13
054d e414       |    |		Load	0x2,0x14
054e 4815       |H   |		Short_Literal	0x15
054f 4802       |H   |		Short_Literal	0x2
0550 0099       |    |		Action	Reference_Dynamic
0551 4816       |H   |		Short_Literal	0x16
0552 4802       |H   |		Short_Literal	0x2
0553 0099       |    |		Action	Reference_Dynamic
0554 4817       |H   |		Short_Literal	0x17
0555 4802       |H   |		Short_Literal	0x2
0556 0099       |    |		Action	Reference_Dynamic
0557 8016       |    |		Call	0x0,0x16
0558 c024       | $  |		Store	0x0,0x24
0559 8049       | I  |		Call	0x0,0x49
055a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
055b e024       | $  |		Load	0x0,0x24
055c 00d8       |    |		Load_Top	At_Offset_0
055d e41b       |    |		Load	0x2,0x1b
055e e41c       |    |		Load	0x2,0x1c
055f 481d       |H   |		Short_Literal	0x1d
0560 4802       |H   |		Short_Literal	0x2
0561 0099       |    |		Action	Reference_Dynamic
0562 481e       |H   |		Short_Literal	0x1e
0563 4802       |H   |		Short_Literal	0x2
0564 0099       |    |		Action	Reference_Dynamic
0565 481f       |H   |		Short_Literal	0x1f
0566 4802       |H   |		Short_Literal	0x2
0567 0099       |    |		Action	Reference_Dynamic
0568 8016       |    |		Call	0x0,0x16
0569 c024       | $  |		Store	0x0,0x24
056a 8049       | I  |		Call	0x0,0x49
056b 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
056c 0092 127e  |   ~|		Action	Push_String_Extended,0x127e					; "History requests and status"
056e 8048       | H  |		Call	0x0,0x48
056f 8049       | I  |		Call	0x0,0x49
0570 8049       | I  |		Call	0x0,0x49
0571 0092 127f  |    |		Action	Push_String_Extended,0x127f					; "Next_Index = "
0573 e265       | e  |		Load	0x1,0x65
0574 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0575 00e0       |    |		Load_Encached	Standard_Cache
0576 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0577 01cc       |    |		Execute	Vector,Catenate
0578 8048       | H  |		Call	0x0,0x48
0579 8049       | I  |		Call	0x0,0x49
057a 00cf       |    |		Action	Mark_Auxiliary
057b e25e       | ^  |		Load	0x1,0x5e
057c 4801       |H   |		Short_Literal	0x1
057d 0263       | c  |		Execute	Discrete,Above_Bound
057e 7011       |p   |		Jump_Nonzero	0x590
057f 00d8       |    |		Load_Top	At_Offset_0
0580 e25d       | ]  |		Load	0x1,0x5d
0581 01d5       |    |		Execute	Vector,Field_Reference
0582 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0583 e01e       |    |		Load	0x0,0x1e
0584 027e       | ~  |		Execute	Discrete,Not_Equal
0585 6808       |h   |		Jump_Zero	0x58e
0586 00d8       |    |		Load_Top	At_Offset_0
0587 00e0       |    |		Load_Encached	Standard_Cache
0588 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0589 0092 1280  |    |		Action	Push_String_Extended,0x1280					; ": Task : "
058b 01cc       |    |		Execute	Vector,Catenate
058c 8048       | H  |		Call	0x0,0x48
058d 8424       | $  |		Call	0x2,0x24
058e 00c8       |    |		Action	Pop_Auxiliary_Range
058f 3fef       |?   |		Loop_Increasing	0x57f
0590 00ce       |    |		Action	Pop_Auxiliary
0591 8049       | I  |		Call	0x0,0x49
0592 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0593 0092 1281  |    |		Action	Push_String_Extended,0x1281					; "Exception Cache (tasks propagating)"
0595 8048       | H  |		Call	0x0,0x48
0596 8049       | I  |		Call	0x0,0x49
0597 00cf       |    |		Action	Mark_Auxiliary
0598 4864       |Hd  |		Short_Literal	0x64
0599 4800       |H   |		Short_Literal	0x0
059a 0007       |    |		Action	Break_Optional
059b 00d8       |    |		Load_Top	At_Offset_0
059c e239       | 9  |		Load	0x1,0x39
059d 01d5       |    |		Execute	Vector,Field_Reference
059e 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
059f 6813       |h   |		Jump_Zero	0x5b3
05a0 00d8       |    |		Load_Top	At_Offset_0
05a1 e239       | 9  |		Load	0x1,0x39
05a2 01d5       |    |		Execute	Vector,Field_Reference
05a3 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
05a4 680e       |h   |		Jump_Zero	0x5b3
05a5 00d8       |    |		Load_Top	At_Offset_0
05a6 e239       | 9  |		Load	0x1,0x39
05a7 01d5       |    |		Execute	Vector,Field_Reference
05a8 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
05a9 804d       | M  |		Call	0x0,0x4d
05aa 00d9       |    |		Load_Top	At_Offset_1
05ab e239       | 9  |		Load	0x1,0x39
05ac 01d5       |    |		Execute	Vector,Field_Reference
05ad 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
05ae 00e0       |    |		Load_Encached	Standard_Cache
05af 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
05b0 01cc       |    |		Execute	Vector,Catenate
05b1 8048       | H  |		Call	0x0,0x48
05b2 8049       | I  |		Call	0x0,0x49
05b3 00c8       |    |		Action	Pop_Auxiliary_Range
05b4 3fe6       |?   |		Loop_Increasing	0x59b
05b5 00ce       |    |		Action	Pop_Auxiliary
05b6 8049       | I  |		Call	0x0,0x49
05b7 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
05b8 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
05bc 8000 0000  |    |		.LITERAL	{0x80000000, 0x00020000}
05c0 8000 0000  |    |		.LITERAL	{0x80000000, 0x00030000}
05c4 0000 0000  |    |		.BLANK	0000[0x4]
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 4800       |H   |		Short_Literal	0x0
05cc a241       | A  |		Store_Unchecked	0x1,0x41
05cd e011       |    |		Load	0x0,0x11
05ce a243       | C  |		Store_Unchecked	0x1,0x43
05cf e011       |    |		Load	0x0,0x11
05d0 a247       | G  |		Store_Unchecked	0x1,0x47
05d1 4800       |H   |		Short_Literal	0x0
05d2 a250       | P  |		Store_Unchecked	0x1,0x50
05d3 4800       |H   |		Short_Literal	0x0
05d4 a251       | Q  |		Store_Unchecked	0x1,0x51
05d5 4800       |H   |		Short_Literal	0x0
05d6 a254       | T  |		Store_Unchecked	0x1,0x54
05d7 4800       |H   |		Short_Literal	0x0
05d8 a255       | U  |		Store_Unchecked	0x1,0x55
05d9 4800       |H   |		Short_Literal	0x0
05da a259       | Y  |		Store_Unchecked	0x1,0x59
05db 4800       |H   |		Short_Literal	0x0
05dc a25a       | Z  |		Store_Unchecked	0x1,0x5a
05dd 4800       |H   |		Short_Literal	0x0
05de a269       | i  |		Store_Unchecked	0x1,0x69
05df 4800       |H   |		Short_Literal	0x0
05e0 a26a       | j  |		Store_Unchecked	0x1,0x6a
05e1 4800       |H   |		Short_Literal	0x0
05e2 a25e       | ^  |		Store_Unchecked	0x1,0x5e
05e3 4800       |H   |		Short_Literal	0x0
05e4 a25f       | _  |		Store_Unchecked	0x1,0x5f
05e5 4800       |H   |		Short_Literal	0x0
05e6 e265       | e  |		Load	0x1,0x65
05e7 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
05e8 00cf       |    |		Action	Mark_Auxiliary
05e9 e264       | d  |		Load	0x1,0x64
05ea 01d9       |    |		Execute	Vector,Reverse_Bounds
05eb 0007       |    |		Action	Break_Optional
05ec 802e       | .  |		Call	0x0,0x2e
05ed 00d9       |    |		Load_Top	At_Offset_1
05ee e264       | d  |		Load	0x1,0x64
05ef 01d6       |    |		Execute	Vector,Field_Write
05f0 00c8       |    |		Action	Pop_Auxiliary_Range
05f1 3ffa       |?   |		Loop_Increasing	0x5ec
05f2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
05f3 0000 0000  |    |		.BLANK	0000[0x5]
05f8 ; --------------------------------------------------------------------------------------
05f8 ; SUBPROGRAM
05f8 ; --------------------------------------------------------------------------------------
05f8 05fb       |    |		.CONST	0x05fb								; Address of begin
05f9 0004       |    |		.CONST	0x0004								; Address of exception handler
05fa 0001       |    |		.CONST	0x0001								; Number of locals
05fb			BODY_05f8:
05fb			INIT_05f8:
05fb 4800       |H   |		Short_Literal	0x0
05fc e26c       | l  |		Load	0x1,0x6c
05fd 1720       |    |		Execute	Task,Entry_Call,Field_Number 0x20
05fe 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
05ff 0000       |    |		.XXX[0x1]
0600 ; --------------------------------------------------------------------------------------
0600 ; SUBPROGRAM
0600 ; --------------------------------------------------------------------------------------
0600 0603       |    |		.CONST	0x0603								; Address of begin
0601 0004       |    |		.CONST	0x0004								; Address of exception handler
0602 0001       |    |		.CONST	0x0001								; Number of locals
0603			BODY_0600:
0603			INIT_0600:
0603 00da       |    |		Load_Top	At_Offset_2
0604 a23f       | ?  |		Store_Unchecked	0x1,0x3f
0605 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0606 0000 0000  |    |		.XXX[0x2]
0608 ; --------------------------------------------------------------------------------------
0608 ; SUBPROGRAM
0608 ; --------------------------------------------------------------------------------------
0608 060b       |    |		.CONST	0x060b								; Address of begin
0609 0004       |    |		.CONST	0x0004								; Address of exception handler
060a 0001       |    |		.CONST	0x0001								; Number of locals
060b			BODY_0608:
060b			INIT_0608:
060b e5fd       |    |		Load	0x2,-0x3
060c 00e3       |    |		Load_Encached	Natural_Cache
060d e5ff       |    |		Load	0x2,-0x1
060e 4803       |H   |		Short_Literal	0x3
060f e26c       | l  |		Load	0x1,0x6c
0610 1721       | !  |		Execute	Task,Entry_Call,Field_Number 0x21
0611 c5fe       |    |		Store	0x2,-0x2
0612 c5fd       |    |		Store	0x2,-0x3
0613 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0614 0000 0000  |    |		.BLANK	0000[0x4]
0618 ; --------------------------------------------------------------------------------------
0618 ; SUBPROGRAM
0618 ; --------------------------------------------------------------------------------------
0618 061b       |    |		.CONST	0x061b								; Address of begin
0619 0004       |    |		.CONST	0x0004								; Address of exception handler
061a 0001       |    |		.CONST	0x0001								; Number of locals
061b			BODY_0618:
061b			INIT_0618:
061b 4800       |H   |		Short_Literal	0x0
061c e276       | v  |		Load	0x1,0x76
061d 170e       |    |		Execute	Task,Entry_Call,Field_Number 0xe
061e 4800       |H   |		Short_Literal	0x0
061f e26c       | l  |		Load	0x1,0x6c
0620 1722       | "  |		Execute	Task,Entry_Call,Field_Number 0x22
0621 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0622 0000 0000  |    |		.BLANK	0000[0x6]
0628 ; --------------------------------------------------------------------------------------
0628 ; SUBPROGRAM
0628 ; --------------------------------------------------------------------------------------
0628 062b       | +  |		.CONST	0x062b								; Address of begin
0629 0004       |    |		.CONST	0x0004								; Address of exception handler
062a 0001       |    |		.CONST	0x0001								; Number of locals
062b			BODY_0628:
062b			INIT_0628:
062b 4607       |F   |		Jump_Case	0x8
062c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
062d 7807       |x   |		Jump	0x635								; case 0x1
062e 780a       |x   |		Jump	0x639								; case 0x2
062f 780e       |x   |		Jump	0x63e								; case 0x3
0630 7811       |x   |		Jump	0x642								; case 0x4
0631 7812       |x   |		Jump	0x644								; case 0x5
0632 7813       |x   |		Jump	0x646								; case 0x6
0633 7816       |x   |		Jump	0x64a								; case 0x7
0634 4302       |C   |		.XXX[0x1]
0635 00da       |    |		Load_Top	At_Offset_2
0636 0091 1267  |   g|		Action	Push_String_Extended_Indexed,0x1267				; "LOCAL_UNCONSTRAINED"
0638 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0639 00db       |    |		Load_Top	At_Offset_3
063a 00db       |    |		Load_Top	At_Offset_3
063b 00e0       |    |		Load_Encached	Standard_Cache
063c 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
063d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
063e 00da       |    |		Load_Top	At_Offset_2
063f 00e0       |    |		Load_Encached	Standard_Cache
0640 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0641 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0642 00db       |    |		Load_Top	At_Offset_3
0643 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0644 00db       |    |		Load_Top	At_Offset_3
0645 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0646 e240       | @  |		Load	0x1,0x40
0647 00dc       |    |		Load_Top	At_Offset_4
0648 0267       | g  |		Execute	Discrete,Predecessor
0649 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
064a e240       | @  |		Load	0x1,0x40
064b 00dc       |    |		Load_Top	At_Offset_4
064c 0268       | h  |		Execute	Discrete,Successor
064d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
064e 0000 0000  |    |		.XXX[0x2]
0650 ; --------------------------------------------------------------------------------------
0650 ; SUBPROGRAM
0650 ; --------------------------------------------------------------------------------------
0650 0653       | S  |		.CONST	0x0653								; Address of begin
0651 0004       |    |		.CONST	0x0004								; Address of exception handler
0652 0001       |    |		.CONST	0x0001								; Number of locals
0653			BODY_0650:
0653			INIT_0650:
0653 4601       |F   |		Jump_Case	0x2
0654 7801       |x   |		Jump	0x656								; case 0x0
0655 7804       |x   |		Jump	0x65a								; case 0x1
0656 00da       |    |		Load_Top	At_Offset_2
0657 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
0658 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0659 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
065a 00da       |    |		Load_Top	At_Offset_2
065b 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
065c 1c01       |    |		Execute_Immediate	Run_Utility,0x1
065d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
065e 0000 0000  |    |		.XXX[0x2]
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 4601       |F   |		Jump_Case	0x2
0664 7801       |x   |		Jump	0x666								; case 0x0
0665 7804       |x   |		Jump	0x66a								; case 0x1
0666 00da       |    |		Load_Top	At_Offset_2
0667 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0668 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0669 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
066a 00da       |    |		Load_Top	At_Offset_2
066b 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
066c 1c01       |    |		Execute_Immediate	Run_Utility,0x1
066d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
066e 0000 0000  |    |		.XXX[0x2]
0670 ; --------------------------------------------------------------------------------------
0670 ; SUBPROGRAM
0670 ; --------------------------------------------------------------------------------------
0670 0673       | s  |		.CONST	0x0673								; Address of begin
0671 0004       |    |		.CONST	0x0004								; Address of exception handler
0672 0001       |    |		.CONST	0x0001								; Number of locals
0673			BODY_0670:
0673			INIT_0670:
0673 4605       |F   |		Jump_Case	0x6
0674 7804       |x   |		Jump	0x679								; case 0x0
0675 7815       |x   |		Jump	0x68b								; case 0x1
0676 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
0677 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
0678 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
0679 00da       |    |		Load_Top	At_Offset_2						; case 0x5
067a 01d8       |    |		Execute	Vector,Element_Type
067b 0322       | "  |		Declare_Variable	Record
067c 00d8       |    |		Load_Top	At_Offset_0
067d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
067e 00db       |    |		Load_Top	At_Offset_3
067f 01dc       |    |		Execute	Vector,Last
0680 e5ff       |    |		Load	0x2,-0x1
0681 01dd       |    |		Execute	Vector,First
0682 0263       | c  |		Execute	Discrete,Above_Bound
0683 7006       |p   |		Jump_Nonzero	0x68a
0684 00da       |    |		Load_Top	At_Offset_2
0685 00d9       |    |		Load_Top	At_Offset_1
0686 e5ff       |    |		Load	0x2,-0x1
0687 01d6       |    |		Execute	Vector,Field_Write
0688 0a01       |    |		Execute_Immediate	Plus,0x1
0689 7ff8       |    |		Jump	0x682
068a 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
068b 00da       |    |		Load_Top	At_Offset_2
068c 01dc       |    |		Execute	Vector,Last
068d 00db       |    |		Load_Top	At_Offset_3
068e 01dd       |    |		Execute	Vector,First
068f 0263       | c  |		Execute	Discrete,Above_Bound
0690 7006       |p   |		Jump_Nonzero	0x697
0691 00d8       |    |		Load_Top	At_Offset_0
0692 e5ff       |    |		Load	0x2,-0x1
0693 01d7       |    |		Execute	Vector,Field_Read
0694 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0695 0a01       |    |		Execute_Immediate	Plus,0x1
0696 7ff8       |    |		Jump	0x68f
0697 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0698 ; --------------------------------------------------------------------------------------
0698 ; SUBPROGRAM
0698 ; --------------------------------------------------------------------------------------
0698 069b       |    |		.CONST	0x069b								; Address of begin
0699 0004       |    |		.CONST	0x0004								; Address of exception handler
069a 0001       |    |		.CONST	0x0001								; Number of locals
069b			BODY_0698:
069b			INIT_0698:
069b 4605       |F   |		Jump_Case	0x6
069c 7804       |x   |		Jump	0x6a1								; case 0x0
069d 7815       |x   |		Jump	0x6b3								; case 0x1
069e 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
069f 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
06a0 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
06a1 00da       |    |		Load_Top	At_Offset_2						; case 0x5
06a2 01d8       |    |		Execute	Vector,Element_Type
06a3 0322       | "  |		Declare_Variable	Record
06a4 00d8       |    |		Load_Top	At_Offset_0
06a5 1c00       |    |		Execute_Immediate	Run_Utility,0x0
06a6 00db       |    |		Load_Top	At_Offset_3
06a7 01dc       |    |		Execute	Vector,Last
06a8 e5ff       |    |		Load	0x2,-0x1
06a9 01dd       |    |		Execute	Vector,First
06aa 0263       | c  |		Execute	Discrete,Above_Bound
06ab 7006       |p   |		Jump_Nonzero	0x6b2
06ac 00da       |    |		Load_Top	At_Offset_2
06ad 00d9       |    |		Load_Top	At_Offset_1
06ae e5ff       |    |		Load	0x2,-0x1
06af 01d6       |    |		Execute	Vector,Field_Write
06b0 0a01       |    |		Execute_Immediate	Plus,0x1
06b1 7ff8       |    |		Jump	0x6aa
06b2 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
06b3 00da       |    |		Load_Top	At_Offset_2
06b4 01dc       |    |		Execute	Vector,Last
06b5 00db       |    |		Load_Top	At_Offset_3
06b6 01dd       |    |		Execute	Vector,First
06b7 0263       | c  |		Execute	Discrete,Above_Bound
06b8 7006       |p   |		Jump_Nonzero	0x6bf
06b9 00d8       |    |		Load_Top	At_Offset_0
06ba e5ff       |    |		Load	0x2,-0x1
06bb 01d7       |    |		Execute	Vector,Field_Read
06bc 1c01       |    |		Execute_Immediate	Run_Utility,0x1
06bd 0a01       |    |		Execute_Immediate	Plus,0x1
06be 7ff8       |    |		Jump	0x6b7
06bf 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
06c0 ; --------------------------------------------------------------------------------------
06c0 ; SUBPROGRAM
06c0 ; --------------------------------------------------------------------------------------
06c0 06c3       |    |		.CONST	0x06c3								; Address of begin
06c1 0004       |    |		.CONST	0x0004								; Address of exception handler
06c2 0001       |    |		.CONST	0x0001								; Number of locals
06c3			BODY_06c0:
06c3			INIT_06c0:
06c3 4601       |F   |		Jump_Case	0x2
06c4 7801       |x   |		Jump	0x6c6								; case 0x0
06c5 7804       |x   |		Jump	0x6ca								; case 0x1
06c6 00da       |    |		Load_Top	At_Offset_2
06c7 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
06c8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
06c9 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
06ca 00da       |    |		Load_Top	At_Offset_2
06cb 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
06cc 1c01       |    |		Execute_Immediate	Run_Utility,0x1
06cd 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
06ce 0000 0000  |    |		.XXX[0x2]
06d0 ; --------------------------------------------------------------------------------------
06d0 ; SUBPROGRAM
06d0 ; --------------------------------------------------------------------------------------
06d0 06d3       |    |		.CONST	0x06d3								; Address of begin
06d1 0004       |    |		.CONST	0x0004								; Address of exception handler
06d2 0001       |    |		.CONST	0x0001								; Number of locals
06d3			BODY_06d0:
06d3			INIT_06d0:
06d3 4605       |F   |		Jump_Case	0x6
06d4 7804       |x   |		Jump	0x6d9								; case 0x0
06d5 7815       |x   |		Jump	0x6eb								; case 0x1
06d6 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
06d7 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
06d8 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
06d9 00da       |    |		Load_Top	At_Offset_2						; case 0x5
06da 01d8       |    |		Execute	Vector,Element_Type
06db 0322       | "  |		Declare_Variable	Record
06dc 00d8       |    |		Load_Top	At_Offset_0
06dd 1c00       |    |		Execute_Immediate	Run_Utility,0x0
06de 00db       |    |		Load_Top	At_Offset_3
06df 01dc       |    |		Execute	Vector,Last
06e0 e5ff       |    |		Load	0x2,-0x1
06e1 01dd       |    |		Execute	Vector,First
06e2 0263       | c  |		Execute	Discrete,Above_Bound
06e3 7006       |p   |		Jump_Nonzero	0x6ea
06e4 00da       |    |		Load_Top	At_Offset_2
06e5 00d9       |    |		Load_Top	At_Offset_1
06e6 e5ff       |    |		Load	0x2,-0x1
06e7 01d6       |    |		Execute	Vector,Field_Write
06e8 0a01       |    |		Execute_Immediate	Plus,0x1
06e9 7ff8       |    |		Jump	0x6e2
06ea 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
06eb 00da       |    |		Load_Top	At_Offset_2
06ec 01dc       |    |		Execute	Vector,Last
06ed 00db       |    |		Load_Top	At_Offset_3
06ee 01dd       |    |		Execute	Vector,First
06ef 0263       | c  |		Execute	Discrete,Above_Bound
06f0 7006       |p   |		Jump_Nonzero	0x6f7
06f1 00d8       |    |		Load_Top	At_Offset_0
06f2 e5ff       |    |		Load	0x2,-0x1
06f3 01d7       |    |		Execute	Vector,Field_Read
06f4 1c01       |    |		Execute_Immediate	Run_Utility,0x1
06f5 0a01       |    |		Execute_Immediate	Plus,0x1
06f6 7ff8       |    |		Jump	0x6ef
06f7 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
06f8 ; --------------------------------------------------------------------------------------
06f8 ; SUBPROGRAM
06f8 ; --------------------------------------------------------------------------------------
06f8 06fb       |    |		.CONST	0x06fb								; Address of begin
06f9 0004       |    |		.CONST	0x0004								; Address of exception handler
06fa 0001       |    |		.CONST	0x0001								; Number of locals
06fb			BODY_06f8:
06fb			INIT_06f8:
06fb 4601       |F   |		Jump_Case	0x2
06fc 7801       |x   |		Jump	0x6fe								; case 0x0
06fd 7804       |x   |		Jump	0x702								; case 0x1
06fe 00da       |    |		Load_Top	At_Offset_2
06ff 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0700 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0701 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0702 00da       |    |		Load_Top	At_Offset_2
0703 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0704 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0705 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0706 0000 0000  |    |		.XXX[0x2]
0708 ; --------------------------------------------------------------------------------------
0708 ; SUBPROGRAM
0708 ; --------------------------------------------------------------------------------------
0708 070b       |    |		.CONST	0x070b								; Address of begin
0709 0004       |    |		.CONST	0x0004								; Address of exception handler
070a 0001       |    |		.CONST	0x0001								; Number of locals
070b			BODY_0708:
070b			INIT_0708:
070b 4605       |F   |		Jump_Case	0x6
070c 7804       |x   |		Jump	0x711								; case 0x0
070d 7815       |x   |		Jump	0x723								; case 0x1
070e 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
070f 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
0710 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
0711 00da       |    |		Load_Top	At_Offset_2						; case 0x5
0712 01d8       |    |		Execute	Vector,Element_Type
0713 0322       | "  |		Declare_Variable	Record
0714 00d8       |    |		Load_Top	At_Offset_0
0715 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0716 00db       |    |		Load_Top	At_Offset_3
0717 01dc       |    |		Execute	Vector,Last
0718 e5ff       |    |		Load	0x2,-0x1
0719 01dd       |    |		Execute	Vector,First
071a 0263       | c  |		Execute	Discrete,Above_Bound
071b 7006       |p   |		Jump_Nonzero	0x722
071c 00da       |    |		Load_Top	At_Offset_2
071d 00d9       |    |		Load_Top	At_Offset_1
071e e5ff       |    |		Load	0x2,-0x1
071f 01d6       |    |		Execute	Vector,Field_Write
0720 0a01       |    |		Execute_Immediate	Plus,0x1
0721 7ff8       |    |		Jump	0x71a
0722 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0723 00da       |    |		Load_Top	At_Offset_2
0724 01dc       |    |		Execute	Vector,Last
0725 00db       |    |		Load_Top	At_Offset_3
0726 01dd       |    |		Execute	Vector,First
0727 0263       | c  |		Execute	Discrete,Above_Bound
0728 7006       |p   |		Jump_Nonzero	0x72f
0729 00d8       |    |		Load_Top	At_Offset_0
072a e5ff       |    |		Load	0x2,-0x1
072b 01d7       |    |		Execute	Vector,Field_Read
072c 1c01       |    |		Execute_Immediate	Run_Utility,0x1
072d 0a01       |    |		Execute_Immediate	Plus,0x1
072e 7ff8       |    |		Jump	0x727
072f 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0730 ; --------------------------------------------------------------------------------------
0730 ; SUBPROGRAM
0730 ; --------------------------------------------------------------------------------------
0730 0733       | 3  |		.CONST	0x0733								; Address of begin
0731 0004       |    |		.CONST	0x0004								; Address of exception handler
0732 0001       |    |		.CONST	0x0001								; Number of locals
0733			BODY_0730:
0733			INIT_0730:
0733 4605       |F   |		Jump_Case	0x6
0734 7804       |x   |		Jump	0x739								; case 0x0
0735 7815       |x   |		Jump	0x74b								; case 0x1
0736 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
0737 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
0738 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
0739 00da       |    |		Load_Top	At_Offset_2						; case 0x5
073a 01d8       |    |		Execute	Vector,Element_Type
073b 0322       | "  |		Declare_Variable	Record
073c 00d8       |    |		Load_Top	At_Offset_0
073d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
073e 00db       |    |		Load_Top	At_Offset_3
073f 01dc       |    |		Execute	Vector,Last
0740 e5ff       |    |		Load	0x2,-0x1
0741 01dd       |    |		Execute	Vector,First
0742 0263       | c  |		Execute	Discrete,Above_Bound
0743 7006       |p   |		Jump_Nonzero	0x74a
0744 00da       |    |		Load_Top	At_Offset_2
0745 00d9       |    |		Load_Top	At_Offset_1
0746 e5ff       |    |		Load	0x2,-0x1
0747 01d6       |    |		Execute	Vector,Field_Write
0748 0a01       |    |		Execute_Immediate	Plus,0x1
0749 7ff8       |    |		Jump	0x742
074a 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
074b 00da       |    |		Load_Top	At_Offset_2
074c 01dc       |    |		Execute	Vector,Last
074d 00db       |    |		Load_Top	At_Offset_3
074e 01dd       |    |		Execute	Vector,First
074f 0263       | c  |		Execute	Discrete,Above_Bound
0750 7006       |p   |		Jump_Nonzero	0x757
0751 00d8       |    |		Load_Top	At_Offset_0
0752 e5ff       |    |		Load	0x2,-0x1
0753 01d7       |    |		Execute	Vector,Field_Read
0754 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0755 0a01       |    |		Execute_Immediate	Plus,0x1
0756 7ff8       |    |		Jump	0x74f
0757 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0758 ; --------------------------------------------------------------------------------------
0758 ; SUBPROGRAM
0758 ; --------------------------------------------------------------------------------------
0758 075b       | [  |		.CONST	0x075b								; Address of begin
0759 0004       |    |		.CONST	0x0004								; Address of exception handler
075a 0001       |    |		.CONST	0x0001								; Number of locals
075b			BODY_0758:
075b			INIT_0758:
075b 4601       |F   |		Jump_Case	0x2
075c 7801       |x   |		Jump	0x75e								; case 0x0
075d 7804       |x   |		Jump	0x762								; case 0x1
075e 00da       |    |		Load_Top	At_Offset_2
075f 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
0760 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0761 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0762 00da       |    |		Load_Top	At_Offset_2
0763 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
0764 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0765 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0766 0000 0000  |    |		.XXX[0x2]
0768 ; --------------------------------------------------------------------------------------
0768 ; SUBPROGRAM
0768 ; --------------------------------------------------------------------------------------
0768 076b       | k  |		.CONST	0x076b								; Address of begin
0769 0004       |    |		.CONST	0x0004								; Address of exception handler
076a 0001       |    |		.CONST	0x0001								; Number of locals
076b			BODY_0768:
076b			INIT_0768:
076b 4605       |F   |		Jump_Case	0x6
076c 7804       |x   |		Jump	0x771								; case 0x0
076d 7815       |x   |		Jump	0x783								; case 0x1
076e 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
076f 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
0770 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
0771 00da       |    |		Load_Top	At_Offset_2						; case 0x5
0772 01d8       |    |		Execute	Vector,Element_Type
0773 0322       | "  |		Declare_Variable	Record
0774 00d8       |    |		Load_Top	At_Offset_0
0775 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0776 00db       |    |		Load_Top	At_Offset_3
0777 01dc       |    |		Execute	Vector,Last
0778 e5ff       |    |		Load	0x2,-0x1
0779 01dd       |    |		Execute	Vector,First
077a 0263       | c  |		Execute	Discrete,Above_Bound
077b 7006       |p   |		Jump_Nonzero	0x782
077c 00da       |    |		Load_Top	At_Offset_2
077d 00d9       |    |		Load_Top	At_Offset_1
077e e5ff       |    |		Load	0x2,-0x1
077f 01d6       |    |		Execute	Vector,Field_Write
0780 0a01       |    |		Execute_Immediate	Plus,0x1
0781 7ff8       |    |		Jump	0x77a
0782 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0783 00da       |    |		Load_Top	At_Offset_2
0784 01dc       |    |		Execute	Vector,Last
0785 00db       |    |		Load_Top	At_Offset_3
0786 01dd       |    |		Execute	Vector,First
0787 0263       | c  |		Execute	Discrete,Above_Bound
0788 7006       |p   |		Jump_Nonzero	0x78f
0789 00d8       |    |		Load_Top	At_Offset_0
078a e5ff       |    |		Load	0x2,-0x1
078b 01d7       |    |		Execute	Vector,Field_Read
078c 1c01       |    |		Execute_Immediate	Run_Utility,0x1
078d 0a01       |    |		Execute_Immediate	Plus,0x1
078e 7ff8       |    |		Jump	0x787
078f 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0790 ; --------------------------------------------------------------------------------------
0790 ; SUBPROGRAM
0790 ; --------------------------------------------------------------------------------------
0790 0793       |    |		.CONST	0x0793								; Address of begin
0791 0004       |    |		.CONST	0x0004								; Address of exception handler
0792 0001       |    |		.CONST	0x0001								; Number of locals
0793			BODY_0790:
0793			INIT_0790:
0793 00cf       |    |		Action	Mark_Auxiliary
0794 e254       | T  |		Load	0x1,0x54
0795 4801       |H   |		Short_Literal	0x1
0796 0263       | c  |		Execute	Discrete,Above_Bound
0797 7012       |p   |		Jump_Nonzero	0x7aa
0798 00d8       |    |		Load_Top	At_Offset_0
0799 e253       | S  |		Load	0x1,0x53
079a 01d5       |    |		Execute	Vector,Field_Reference
079b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
079c e027       | '  |		Load	0x0,0x27
079d 027f       |    |		Execute	Discrete,Equal
079e 7009       |p   |		Jump_Nonzero	0x7a8
079f 00d8       |    |		Load_Top	At_Offset_0
07a0 e253       | S  |		Load	0x1,0x53
07a1 01d5       |    |		Execute	Vector,Field_Reference
07a2 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
07a3 e5ff       |    |		Load	0x2,-0x1
07a4 027f       |    |		Execute	Discrete,Equal
07a5 6802       |h   |		Jump_Zero	0x7a8
07a6 4801       |H   |		Short_Literal	0x1
07a7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07a8 00c8       |    |		Action	Pop_Auxiliary_Range
07a9 3fee       |?   |		Loop_Increasing	0x798
07aa 00ce       |    |		Action	Pop_Auxiliary
07ab 4800       |H   |		Short_Literal	0x0
07ac 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07ad 0000 0000  |    |		.XXX[0x3]
07af 0000       |    |
07b0 ; --------------------------------------------------------------------------------------
07b0 ; SUBPROGRAM
07b0 ; --------------------------------------------------------------------------------------
07b0 07b3       |    |		.CONST	0x07b3								; Address of begin
07b1 0004       |    |		.CONST	0x0004								; Address of exception handler
07b2 0001       |    |		.CONST	0x0001								; Number of locals
07b3			BODY_07b0:
07b3			INIT_07b0:
07b3 00cf       |    |		Action	Mark_Auxiliary
07b4 e25e       | ^  |		Load	0x1,0x5e
07b5 4801       |H   |		Short_Literal	0x1
07b6 0263       | c  |		Execute	Discrete,Above_Bound
07b7 701f       |p   |		Jump_Nonzero	0x7d7
07b8 00d8       |    |		Load_Top	At_Offset_0
07b9 e25d       | ]  |		Load	0x1,0x5d
07ba 01d5       |    |		Execute	Vector,Field_Reference
07bb 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
07bc e01e       |    |		Load	0x0,0x1e
07bd 027e       | ~  |		Execute	Discrete,Not_Equal
07be 6816       |h   |		Jump_Zero	0x7d5
07bf 00d8       |    |		Load_Top	At_Offset_0
07c0 e25d       | ]  |		Load	0x1,0x5d
07c1 01d5       |    |		Execute	Vector,Field_Reference
07c2 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
07c3 e5ff       |    |		Load	0x2,-0x1
07c4 027f       |    |		Execute	Discrete,Equal
07c5 7007       |p   |		Jump_Nonzero	0x7cd
07c6 00d8       |    |		Load_Top	At_Offset_0
07c7 e25d       | ]  |		Load	0x1,0x5d
07c8 01d5       |    |		Execute	Vector,Field_Reference
07c9 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
07ca e011       |    |		Load	0x0,0x11
07cb 027f       |    |		Execute	Discrete,Equal
07cc 6808       |h   |		Jump_Zero	0x7d5
07cd 00d8       |    |		Load_Top	At_Offset_0
07ce e25d       | ]  |		Load	0x1,0x5d
07cf 01d5       |    |		Execute	Vector,Field_Reference
07d0 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
07d1 0f09       |    |		Execute_Immediate	Equal,0x9
07d2 6802       |h   |		Jump_Zero	0x7d5
07d3 4801       |H   |		Short_Literal	0x1
07d4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07d5 00c8       |    |		Action	Pop_Auxiliary_Range
07d6 3fe1       |?   |		Loop_Increasing	0x7b8
07d7 00ce       |    |		Action	Pop_Auxiliary
07d8 4800       |H   |		Short_Literal	0x0
07d9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07da 0000 0000  |    |		.BLANK	0000[0x6]
07e0 ; --------------------------------------------------------------------------------------
07e0 ; SUBPROGRAM
07e0 ; --------------------------------------------------------------------------------------
07e0 07e3       |    |		.CONST	0x07e3								; Address of begin
07e1 0004       |    |		.CONST	0x0004								; Address of exception handler
07e2 0001       |    |		.CONST	0x0001								; Number of locals
07e3			BODY_07e0:
07e3			INIT_07e0:
07e3 00cf       |    |		Action	Mark_Auxiliary
07e4 e25e       | ^  |		Load	0x1,0x5e
07e5 4801       |H   |		Short_Literal	0x1
07e6 0263       | c  |		Execute	Discrete,Above_Bound
07e7 701e       |p   |		Jump_Nonzero	0x806
07e8 00d8       |    |		Load_Top	At_Offset_0
07e9 e25d       | ]  |		Load	0x1,0x5d
07ea 01d5       |    |		Execute	Vector,Field_Reference
07eb 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
07ec e01e       |    |		Load	0x0,0x1e
07ed 027e       | ~  |		Execute	Discrete,Not_Equal
07ee 6815       |h   |		Jump_Zero	0x804
07ef 00d8       |    |		Load_Top	At_Offset_0
07f0 e25d       | ]  |		Load	0x1,0x5d
07f1 01d5       |    |		Execute	Vector,Field_Reference
07f2 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
07f3 e5ff       |    |		Load	0x2,-0x1
07f4 027f       |    |		Execute	Discrete,Equal
07f5 7007       |p   |		Jump_Nonzero	0x7fd
07f6 00d8       |    |		Load_Top	At_Offset_0
07f7 e25d       | ]  |		Load	0x1,0x5d
07f8 01d5       |    |		Execute	Vector,Field_Reference
07f9 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
07fa e011       |    |		Load	0x0,0x11
07fb 027f       |    |		Execute	Discrete,Equal
07fc 6807       |h   |		Jump_Zero	0x804
07fd 00d8       |    |		Load_Top	At_Offset_0
07fe e25d       | ]  |		Load	0x1,0x5d
07ff 01d5       |    |		Execute	Vector,Field_Reference
0800 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0801 7002       |p   |		Jump_Nonzero	0x804
0802 4801       |H   |		Short_Literal	0x1
0803 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0804 00c8       |    |		Action	Pop_Auxiliary_Range
0805 3fe2       |?   |		Loop_Increasing	0x7e8
0806 00ce       |    |		Action	Pop_Auxiliary
0807 4800       |H   |		Short_Literal	0x0
0808 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0809 0000 0000  |    |		.BLANK	0000[0x7]
0810 ; --------------------------------------------------------------------------------------
0810 ; SUBPROGRAM
0810 ; --------------------------------------------------------------------------------------
0810 0813       |    |		.CONST	0x0813								; Address of begin
0811 0004       |    |		.CONST	0x0004								; Address of exception handler
0812 0001       |    |		.CONST	0x0001								; Number of locals
0813			BODY_0810:
0813			INIT_0810:
0813 00cf       |    |		Action	Mark_Auxiliary
0814 e25e       | ^  |		Load	0x1,0x5e
0815 4801       |H   |		Short_Literal	0x1
0816 0263       | c  |		Execute	Discrete,Above_Bound
0817 701f       |p   |		Jump_Nonzero	0x837
0818 00d8       |    |		Load_Top	At_Offset_0
0819 e25d       | ]  |		Load	0x1,0x5d
081a 01d5       |    |		Execute	Vector,Field_Reference
081b 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
081c e01e       |    |		Load	0x0,0x1e
081d 027e       | ~  |		Execute	Discrete,Not_Equal
081e 6816       |h   |		Jump_Zero	0x835
081f 00d8       |    |		Load_Top	At_Offset_0
0820 e25d       | ]  |		Load	0x1,0x5d
0821 01d5       |    |		Execute	Vector,Field_Reference
0822 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0823 e5ff       |    |		Load	0x2,-0x1
0824 027f       |    |		Execute	Discrete,Equal
0825 7007       |p   |		Jump_Nonzero	0x82d
0826 00d8       |    |		Load_Top	At_Offset_0
0827 e25d       | ]  |		Load	0x1,0x5d
0828 01d5       |    |		Execute	Vector,Field_Reference
0829 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
082a e011       |    |		Load	0x0,0x11
082b 027f       |    |		Execute	Discrete,Equal
082c 6808       |h   |		Jump_Zero	0x835
082d 00d8       |    |		Load_Top	At_Offset_0
082e e25d       | ]  |		Load	0x1,0x5d
082f 01d5       |    |		Execute	Vector,Field_Reference
0830 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0831 0f01       |    |		Execute_Immediate	Equal,0x1
0832 6802       |h   |		Jump_Zero	0x835
0833 4801       |H   |		Short_Literal	0x1
0834 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0835 00c8       |    |		Action	Pop_Auxiliary_Range
0836 3fe1       |?   |		Loop_Increasing	0x818
0837 00ce       |    |		Action	Pop_Auxiliary
0838 4800       |H   |		Short_Literal	0x0
0839 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
083a 0000 0000  |    |		.BLANK	0000[0x6]
0840 ; --------------------------------------------------------------------------------------
0840 ; SUBPROGRAM
0840 ; --------------------------------------------------------------------------------------
0840 0843       | C  |		.CONST	0x0843								; Address of begin
0841 0004       |    |		.CONST	0x0004								; Address of exception handler
0842 0001       |    |		.CONST	0x0001								; Number of locals
0843			BODY_0840:
0843			INIT_0840:
0843 00da       |    |		Load_Top	At_Offset_2
0844 826e       | n  |		Call	0x1,0x6e
0845 7008       |p   |		Jump_Nonzero	0x84e
0846 00da       |    |		Load_Top	At_Offset_2
0847 826f       | o  |		Call	0x1,0x6f
0848 7003       |p   |		Jump_Nonzero	0x84c
0849 00da       |    |		Load_Top	At_Offset_2
084a 8270       | p  |		Call	0x1,0x70
084b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
084c 4801       |H   |		Short_Literal	0x1
084d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
084e 4801       |H   |		Short_Literal	0x1
084f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0850 ; --------------------------------------------------------------------------------------
0850 ; SUBPROGRAM
0850 ; --------------------------------------------------------------------------------------
0850 0853       | S  |		.CONST	0x0853								; Address of begin
0851 0004       |    |		.CONST	0x0004								; Address of exception handler
0852 0001       |    |		.CONST	0x0001								; Number of locals
0853			BODY_0850:
0853			INIT_0850:
0853 00cf       |    |		Action	Mark_Auxiliary
0854 e259       | Y  |		Load	0x1,0x59
0855 4801       |H   |		Short_Literal	0x1
0856 0263       | c  |		Execute	Discrete,Above_Bound
0857 701f       |p   |		Jump_Nonzero	0x877
0858 00d8       |    |		Load_Top	At_Offset_0
0859 e258       | X  |		Load	0x1,0x58
085a 01d5       |    |		Execute	Vector,Field_Reference
085b 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
085c e01e       |    |		Load	0x0,0x1e
085d 027e       | ~  |		Execute	Discrete,Not_Equal
085e 6816       |h   |		Jump_Zero	0x875
085f 00d8       |    |		Load_Top	At_Offset_0
0860 e258       | X  |		Load	0x1,0x58
0861 01d5       |    |		Execute	Vector,Field_Reference
0862 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0863 e5ff       |    |		Load	0x2,-0x1
0864 027f       |    |		Execute	Discrete,Equal
0865 7007       |p   |		Jump_Nonzero	0x86d
0866 00d8       |    |		Load_Top	At_Offset_0
0867 e258       | X  |		Load	0x1,0x58
0868 01d5       |    |		Execute	Vector,Field_Reference
0869 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
086a e011       |    |		Load	0x0,0x11
086b 027f       |    |		Execute	Discrete,Equal
086c 6808       |h   |		Jump_Zero	0x875
086d 00d8       |    |		Load_Top	At_Offset_0
086e e258       | X  |		Load	0x1,0x58
086f 01d5       |    |		Execute	Vector,Field_Reference
0870 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0871 0f09       |    |		Execute_Immediate	Equal,0x9
0872 6802       |h   |		Jump_Zero	0x875
0873 4801       |H   |		Short_Literal	0x1
0874 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0875 00c8       |    |		Action	Pop_Auxiliary_Range
0876 3fe1       |?   |		Loop_Increasing	0x858
0877 00ce       |    |		Action	Pop_Auxiliary
0878 4800       |H   |		Short_Literal	0x0
0879 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
087a 0000 0000  |    |		.BLANK	0000[0x6]
0880 ; --------------------------------------------------------------------------------------
0880 ; SUBPROGRAM
0880 ; --------------------------------------------------------------------------------------
0880 0883       |    |		.CONST	0x0883								; Address of begin
0881 0004       |    |		.CONST	0x0004								; Address of exception handler
0882 0001       |    |		.CONST	0x0001								; Number of locals
0883			BODY_0880:
0883			INIT_0880:
0883 00cf       |    |		Action	Mark_Auxiliary
0884 e259       | Y  |		Load	0x1,0x59
0885 4801       |H   |		Short_Literal	0x1
0886 0263       | c  |		Execute	Discrete,Above_Bound
0887 701e       |p   |		Jump_Nonzero	0x8a6
0888 00d8       |    |		Load_Top	At_Offset_0
0889 e258       | X  |		Load	0x1,0x58
088a 01d5       |    |		Execute	Vector,Field_Reference
088b 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
088c e01e       |    |		Load	0x0,0x1e
088d 027e       | ~  |		Execute	Discrete,Not_Equal
088e 6815       |h   |		Jump_Zero	0x8a4
088f 00d8       |    |		Load_Top	At_Offset_0
0890 e258       | X  |		Load	0x1,0x58
0891 01d5       |    |		Execute	Vector,Field_Reference
0892 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0893 e5ff       |    |		Load	0x2,-0x1
0894 027f       |    |		Execute	Discrete,Equal
0895 7007       |p   |		Jump_Nonzero	0x89d
0896 00d8       |    |		Load_Top	At_Offset_0
0897 e258       | X  |		Load	0x1,0x58
0898 01d5       |    |		Execute	Vector,Field_Reference
0899 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
089a e011       |    |		Load	0x0,0x11
089b 027f       |    |		Execute	Discrete,Equal
089c 6807       |h   |		Jump_Zero	0x8a4
089d 00d8       |    |		Load_Top	At_Offset_0
089e e258       | X  |		Load	0x1,0x58
089f 01d5       |    |		Execute	Vector,Field_Reference
08a0 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
08a1 7002       |p   |		Jump_Nonzero	0x8a4
08a2 4801       |H   |		Short_Literal	0x1
08a3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08a4 00c8       |    |		Action	Pop_Auxiliary_Range
08a5 3fe2       |?   |		Loop_Increasing	0x888
08a6 00ce       |    |		Action	Pop_Auxiliary
08a7 4800       |H   |		Short_Literal	0x0
08a8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08a9 0000 0000  |    |		.BLANK	0000[0x7]
08b0 ; --------------------------------------------------------------------------------------
08b0 ; SUBPROGRAM
08b0 ; --------------------------------------------------------------------------------------
08b0 08b3       |    |		.CONST	0x08b3								; Address of begin
08b1 0004       |    |		.CONST	0x0004								; Address of exception handler
08b2 0001       |    |		.CONST	0x0001								; Number of locals
08b3			BODY_08b0:
08b3			INIT_08b0:
08b3 00cf       |    |		Action	Mark_Auxiliary
08b4 e259       | Y  |		Load	0x1,0x59
08b5 4801       |H   |		Short_Literal	0x1
08b6 0263       | c  |		Execute	Discrete,Above_Bound
08b7 701f       |p   |		Jump_Nonzero	0x8d7
08b8 00d8       |    |		Load_Top	At_Offset_0
08b9 e258       | X  |		Load	0x1,0x58
08ba 01d5       |    |		Execute	Vector,Field_Reference
08bb 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
08bc e01e       |    |		Load	0x0,0x1e
08bd 027e       | ~  |		Execute	Discrete,Not_Equal
08be 6816       |h   |		Jump_Zero	0x8d5
08bf 00d8       |    |		Load_Top	At_Offset_0
08c0 e258       | X  |		Load	0x1,0x58
08c1 01d5       |    |		Execute	Vector,Field_Reference
08c2 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
08c3 e5ff       |    |		Load	0x2,-0x1
08c4 027f       |    |		Execute	Discrete,Equal
08c5 7007       |p   |		Jump_Nonzero	0x8cd
08c6 00d8       |    |		Load_Top	At_Offset_0
08c7 e258       | X  |		Load	0x1,0x58
08c8 01d5       |    |		Execute	Vector,Field_Reference
08c9 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
08ca e011       |    |		Load	0x0,0x11
08cb 027f       |    |		Execute	Discrete,Equal
08cc 6808       |h   |		Jump_Zero	0x8d5
08cd 00d8       |    |		Load_Top	At_Offset_0
08ce e258       | X  |		Load	0x1,0x58
08cf 01d5       |    |		Execute	Vector,Field_Reference
08d0 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
08d1 0f01       |    |		Execute_Immediate	Equal,0x1
08d2 6802       |h   |		Jump_Zero	0x8d5
08d3 4801       |H   |		Short_Literal	0x1
08d4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08d5 00c8       |    |		Action	Pop_Auxiliary_Range
08d6 3fe1       |?   |		Loop_Increasing	0x8b8
08d7 00ce       |    |		Action	Pop_Auxiliary
08d8 4800       |H   |		Short_Literal	0x0
08d9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08da 0000 0000  |    |		.BLANK	0000[0x6]
08e0 ; --------------------------------------------------------------------------------------
08e0 ; SUBPROGRAM
08e0 ; --------------------------------------------------------------------------------------
08e0 08e3       |    |		.CONST	0x08e3								; Address of begin
08e1 0004       |    |		.CONST	0x0004								; Address of exception handler
08e2 0001       |    |		.CONST	0x0001								; Number of locals
08e3			BODY_08e0:
08e3			INIT_08e0:
08e3 00da       |    |		Load_Top	At_Offset_2
08e4 8272       | r  |		Call	0x1,0x72
08e5 7008       |p   |		Jump_Nonzero	0x8ee
08e6 00da       |    |		Load_Top	At_Offset_2
08e7 8273       | s  |		Call	0x1,0x73
08e8 7003       |p   |		Jump_Nonzero	0x8ec
08e9 00da       |    |		Load_Top	At_Offset_2
08ea 8274       | t  |		Call	0x1,0x74
08eb 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08ec 4801       |H   |		Short_Literal	0x1
08ed 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08ee 4801       |H   |		Short_Literal	0x1
08ef 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08f0 ; --------------------------------------------------------------------------------------
08f0 ; SUBPROGRAM
08f0 ; --------------------------------------------------------------------------------------
08f0 08fa       |    |		.CONST	0x08fa								; Address of begin
08f1 0916       |    |		.CONST	0x0916								; Address of exception handler
08f2 0003       |    |		.CONST	0x0003								; Number of locals
08f3			INIT_08f0:
08f3 e230       | 0  |		Load	0x1,0x30
08f4 0007       |    |		Action	Break_Optional
08f5 0093 0000  |    |		push_full_address	0x0
08f7 6028       |`(  |		Indirect_Literal	Discrete,0x920,{0x80000000, 0x00010000}
08f8 0273       | s  |		Execute	Discrete,Plus
08f9 0007       |    |		Action	Break_Optional
08fa			BODY_08f0:
08fa e5ff       |    |		Load	0x2,-0x1
08fb 8050       | P  |		Call	0x0,0x50
08fc 005a       | Z  |		Store_Top	Discrete,At_Offset_2
08fd 00d9       |    |		Load_Top	At_Offset_1
08fe e239       | 9  |		Load	0x1,0x39
08ff 01d5       |    |		Execute	Vector,Field_Reference
0900 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0901 e5ff       |    |		Load	0x2,-0x1
0902 027f       |    |		Execute	Discrete,Equal
0903 6810       |h   |		Jump_Zero	0x914
0904 4800       |H   |		Short_Literal	0x0
0905 00da       |    |		Load_Top	At_Offset_2
0906 e239       | 9  |		Load	0x1,0x39
0907 01d5       |    |		Execute	Vector,Field_Reference
0908 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0909 00d9       |    |		Load_Top	At_Offset_1
090a e239       | 9  |		Load	0x1,0x39
090b 01d5       |    |		Execute	Vector,Field_Reference
090c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
090d e5ff       |    |		Load	0x2,-0x1
090e 027f       |    |		Execute	Discrete,Equal
090f 6802       |h   |		Jump_Zero	0x912
0910 00d9       |    |		Load_Top	At_Offset_1
0911 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0912 00d8       |    |		Load_Top	At_Offset_0
0913 0257       | W  |		Execute	Discrete,Raise
0914 00d8       |    |		Load_Top	At_Offset_0
0915 0257       | W  |		Execute	Discrete,Raise
0916			TRAP_08f0:
0916 0007       |    |		Action	Break_Optional
0917 e230       | 0  |		Load	0x1,0x30
0918 e5ff       |    |		Load	0x2,-0x1
0919 4802       |H   |		Short_Literal	0x2
091a e26c       | l  |		Load	0x1,0x6c
091b 170d       |    |		Execute	Task,Entry_Call,Field_Number 0xd
091c 005b       | [  |		Store_Top	Discrete,At_Offset_3
091d 00da       |    |		Load_Top	At_Offset_2
091e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
091f 0000       |    |		.XXX[0x1]
0920 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
0924 0000 0000  |    |		.BLANK	0000[0x4]
0928 ; --------------------------------------------------------------------------------------
0928 ; SUBPROGRAM
0928 ; --------------------------------------------------------------------------------------
0928 092d       | -  |		.CONST	0x092d								; Address of begin
0929 0940       | @  |		.CONST	0x0940								; Address of exception handler
092a 0002       |    |		.CONST	0x0002								; Number of locals
092b			INIT_0928:
092b e230       | 0  |		Load	0x1,0x30
092c 0007       |    |		Action	Break_Optional
092d			BODY_0928:
092d 00db       |    |		Load_Top	At_Offset_3
092e 8050       | P  |		Call	0x0,0x50
092f 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0930 00d8       |    |		Load_Top	At_Offset_0
0931 e239       | 9  |		Load	0x1,0x39
0932 01d5       |    |		Execute	Vector,Field_Reference
0933 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0934 e5ff       |    |		Load	0x2,-0x1
0935 027f       |    |		Execute	Discrete,Equal
0936 6807       |h   |		Jump_Zero	0x93e
0937 4800       |H   |		Short_Literal	0x0
0938 00d9       |    |		Load_Top	At_Offset_1
0939 e239       | 9  |		Load	0x1,0x39
093a 01d5       |    |		Execute	Vector,Field_Reference
093b 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
093c 00d8       |    |		Load_Top	At_Offset_0
093d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
093e 4800       |H   |		Short_Literal	0x0
093f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0940			TRAP_0928:
0940 0007       |    |		Action	Break_Optional
0941 4800       |H   |		Short_Literal	0x0
0942 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0943 0000 0000  |    |		.BLANK	0000[0x5]
0948 ; --------------------------------------------------------------------------------------
0948 ; SUBPROGRAM
0948 ; --------------------------------------------------------------------------------------
0948 0956       | V  |		.CONST	0x0956								; Address of begin
0949 0004       |    |		.CONST	0x0004								; Address of exception handler
094a 0007       |    |		.CONST	0x0007								; Number of locals
094b			INIT_0948:
094b e006       |    |		Load	0x0,0x6
094c 0322       | "  |		Declare_Variable	Record
094d 00d8       |    |		Load_Top	At_Offset_0
094e 0322       | "  |		Declare_Variable	Record
094f 00e3       |    |		Load_Encached	Natural_Cache
0950 00e3       |    |		Load_Encached	Natural_Cache
0951 e5ff       |    |		Load	0x2,-0x1
0952 8051       | Q  |		Call	0x0,0x51
0953 00e3       |    |		Load_Encached	Natural_Cache
0954 03f1       |    |		Declare_Variable	Discrete,With_Value
0955 00e3       |    |		Load_Encached	Natural_Cache
0956			BODY_0948:
0956 e5ff       |    |		Load	0x2,-0x1
0957 e5fe       |    |		Load	0x2,-0x2
0958 017f       |    |		Execute	Record,Equal
0959 6802       |h   |		Jump_Zero	0x95c
095a 4801       |H   |		Short_Literal	0x1
095b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
095c 4801       |H   |		Short_Literal	0x1
095d 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
095e 4801       |H   |		Short_Literal	0x1
095f a404       |    |		Store_Unchecked	0x2,0x4
0960 e5fe       |    |		Load	0x2,-0x2
0961 8051       | Q  |		Call	0x0,0x51
0962 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0963 00cf       |    |		Action	Mark_Auxiliary
0964 00db       |    |		Load_Top	At_Offset_3
0965 00da       |    |		Load_Top	At_Offset_2
0966 027d       | }  |		Execute	Discrete,Greater
0967 7024       |p$  |		Jump_Nonzero	0x98c
0968 e404       |    |		Load	0x2,0x4
0969 00db       |    |		Load_Top	At_Offset_3
096a 027d       | }  |		Execute	Discrete,Greater
096b 7020       |p   |		Jump_Nonzero	0x98c
096c e404       |    |		Load	0x2,0x4
096d 00d8       |    |		Load_Top	At_Offset_0
096e 00e4       |    |		Load_Encached	Positive_Cache
096f 0260       | `  |		Execute	Discrete,In_Type
0970 7001       |p   |		Jump_Nonzero	0x972
0971 0801       |    |		Execute_Immediate	Raise,0x1
0972 e5ff       |    |		Load	0x2,-0x1
0973 8052       | R  |		Call	0x0,0x52
0974 e402       |    |		Load	0x2,0x2
0975 017d       | }  |		Execute	Record,Structure_Write
0976 00db       |    |		Load_Top	At_Offset_3
0977 00d8       |    |		Load_Top	At_Offset_0
0978 00e4       |    |		Load_Encached	Positive_Cache
0979 0260       | `  |		Execute	Discrete,In_Type
097a 7001       |p   |		Jump_Nonzero	0x97c
097b 0801       |    |		Execute_Immediate	Raise,0x1
097c e5fe       |    |		Load	0x2,-0x2
097d 8052       | R  |		Call	0x0,0x52
097e e403       |    |		Load	0x2,0x3
097f 017d       | }  |		Execute	Record,Structure_Write
0980 00db       |    |		Load_Top	At_Offset_3
0981 0a01       |    |		Execute_Immediate	Plus,0x1
0982 c405       |    |		Store	0x2,0x5
0983 e402       |    |		Load	0x2,0x2
0984 e403       |    |		Load	0x2,0x3
0985 017f       |    |		Execute	Record,Equal
0986 6803       |h   |		Jump_Zero	0x98a
0987 e404       |    |		Load	0x2,0x4
0988 0a01       |    |		Execute_Immediate	Plus,0x1
0989 c404       |    |		Store	0x2,0x4
098a 00c9       |    |		Action	Pop_Auxiliary_Loop
098b 7fd8       |    |		Jump	0x964
098c 00ce       |    |		Action	Pop_Auxiliary
098d 00db       |    |		Load_Top	At_Offset_3
098e 00da       |    |		Load_Top	At_Offset_2
098f 027d       | }  |		Execute	Discrete,Greater
0990 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0991 0000 0000  |    |		.BLANK	0000[0x7]
0998 ; --------------------------------------------------------------------------------------
0998 ; SUBPROGRAM
0998 ; --------------------------------------------------------------------------------------
0998 09a1       |    |		.CONST	0x09a1								; Address of begin
0999 0004       |    |		.CONST	0x0004								; Address of exception handler
099a 0004       |    |		.CONST	0x0004								; Number of locals
099b			INIT_0998:
099b 00e3       |    |		Load_Encached	Natural_Cache
099c 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
099d 00e3       |    |		Load_Encached	Natural_Cache
099e 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
099f 029f 0f33  |   3|		Declare_Subprogram	INIT_0f30,For_Call
09a1			BODY_0998:
09a1 e01e       |    |		Load	0x0,0x1e
09a2 a5fb       |    |		Store_Unchecked	0x2,-0x5
09a3 e01e       |    |		Load	0x0,0x1e
09a4 a5f9       |    |		Store_Unchecked	0x2,-0x7
09a5 00cf       |    |		Action	Mark_Auxiliary
09a6 e269       | i  |		Load	0x1,0x69
09a7 4801       |H   |		Short_Literal	0x1
09a8 0263       | c  |		Execute	Discrete,Above_Bound
09a9 7003       |p   |		Jump_Nonzero	0x9ad
09aa 8404       |    |		Call	0x2,0x4
09ab 00c8       |    |		Action	Pop_Auxiliary_Range
09ac 3ffd       |?   |		Loop_Increasing	0x9aa
09ad 00ce       |    |		Action	Pop_Auxiliary
09ae 00da       |    |		Load_Top	At_Offset_2
09af 680c       |h   |		Jump_Zero	0x9bc
09b0 00da       |    |		Load_Top	At_Offset_2
09b1 e268       | h  |		Load	0x1,0x68
09b2 01d5       |    |		Execute	Vector,Field_Reference
09b3 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
09b4 0f04       |    |		Execute_Immediate	Equal,0x4
09b5 6806       |h   |		Jump_Zero	0x9bc
09b6 00da       |    |		Load_Top	At_Offset_2
09b7 e268       | h  |		Load	0x1,0x68
09b8 01d5       |    |		Execute	Vector,Field_Reference
09b9 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
09ba a5fa       |    |		Store_Unchecked	0x2,-0x6
09bb 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
09bc e01e       |    |		Load	0x0,0x1e
09bd a5fa       |    |		Store_Unchecked	0x2,-0x6
09be 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
09bf 0000       |    |		.XXX[0x1]
09c0 ; --------------------------------------------------------------------------------------
09c0 ; SUBPROGRAM
09c0 ; --------------------------------------------------------------------------------------
09c0 09c3       |    |		.CONST	0x09c3								; Address of begin
09c1 0004       |    |		.CONST	0x0004								; Address of exception handler
09c2 0001       |    |		.CONST	0x0001								; Number of locals
09c3			BODY_09c0:
09c3			INIT_09c0:
09c3 00db       |    |		Load_Top	At_Offset_3
09c4 7003       |p   |		Jump_Nonzero	0x9c8
09c5 00da       |    |		Load_Top	At_Offset_2
09c6 8053       | S  |		Call	0x0,0x53
09c7 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
09c8 4800       |H   |		Short_Literal	0x0
09c9 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
09ca 0000 0000  |    |		.BLANK	0000[0x6]
09d0 ; --------------------------------------------------------------------------------------
09d0 ; SUBPROGRAM
09d0 ; --------------------------------------------------------------------------------------
09d0 09d3       |    |		.CONST	0x09d3								; Address of begin
09d1 0004       |    |		.CONST	0x0004								; Address of exception handler
09d2 0001       |    |		.CONST	0x0001								; Number of locals
09d3			BODY_09d0:
09d3			INIT_09d0:
09d3 00da       |    |		Load_Top	At_Offset_2
09d4 6003       |`   |		Indirect_Literal	Discrete,0x9d8,{0x00000000, 0x7fffffff}
09d5 8054       | T  |		Call	0x0,0x54
09d6 8055       | U  |		Call	0x0,0x55
09d7 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
09d8 0000 0000  |    |		.LITERAL	{0x00000000, 0x7fffffff}
09dc 0000 0000  |    |		.BLANK	0000[0x4]
09e0 ; --------------------------------------------------------------------------------------
09e0 ; SUBPROGRAM
09e0 ; --------------------------------------------------------------------------------------
09e0 09ea       |    |		.CONST	0x09ea								; Address of begin
09e1 0a31       | 1  |		.CONST	0x0a31								; Address of exception handler
09e2 0004       |    |		.CONST	0x0004								; Number of locals
09e3			INIT_09e0:
09e3 e039       | 9  |		Load	0x0,0x39
09e4 0322       | "  |		Declare_Variable	Record
09e5 00d8       |    |		Load_Top	At_Offset_0
09e6 1c00       |    |		Execute_Immediate	Run_Utility,0x0
09e7 e20d       |    |		Load	0x1,0xd
09e8 0337       | 7  |		Declare_Variable	Array
09e9 00e3       |    |		Load_Encached	Natural_Cache
09ea			BODY_09e0:
09ea e23d       | =  |		Load	0x1,0x3d
09eb 0a01       |    |		Execute_Immediate	Plus,0x1
09ec a23d       | =  |		Store_Unchecked	0x1,0x3d
09ed 00da       |    |		Load_Top	At_Offset_2
09ee e5fd       |    |		Load	0x2,-0x3
09ef 803c       | <  |		Call	0x0,0x3c
09f0 00d1       |    |		Pop_Control	Pop_Count_1
09f1 e5f7       |    |		Load	0x2,-0x9
09f2 e5fb       |    |		Load	0x2,-0x5
09f3 827b       | {  |		Call	0x1,0x7b
09f4 6807       |h   |		Jump_Zero	0x9fc
09f5 e5fd       |    |		Load	0x2,-0x3
09f6 e5fc       |    |		Load	0x2,-0x4
09f7 027f       |    |		Execute	Discrete,Equal
09f8 6803       |h   |		Jump_Zero	0x9fc
09f9 00da       |    |		Load_Top	At_Offset_2
09fa 827c       | |  |		Call	0x1,0x7c
09fb 00d1       |    |		Pop_Control	Pop_Count_1
09fc 00da       |    |		Load_Top	At_Offset_2
09fd e5fe       |    |		Load	0x2,-0x2
09fe 803d       | =  |		Call	0x0,0x3d
09ff 00d1       |    |		Pop_Control	Pop_Count_1
0a00 00da       |    |		Load_Top	At_Offset_2
0a01 8056       | V  |		Call	0x0,0x56
0a02 00d1       |    |		Pop_Control	Pop_Count_1
0a03 00da       |    |		Load_Top	At_Offset_2
0a04 8057       | W  |		Call	0x0,0x57
0a05 00d1       |    |		Pop_Control	Pop_Count_1
0a06 e5fa       |    |		Load	0x2,-0x6
0a07 e239       | 9  |		Load	0x1,0x39
0a08 01d5       |    |		Execute	Vector,Field_Reference
0a09 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0a0a e5ff       |    |		Load	0x2,-0x1
0a0b 8058       | X  |		Call	0x0,0x58
0a0c 4800       |H   |		Short_Literal	0x0
0a0d 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0a0e e5f9       |    |		Load	0x2,-0x7
0a0f e01e       |    |		Load	0x0,0x1e
0a10 027e       | ~  |		Execute	Discrete,Not_Equal
0a11 6807       |h   |		Jump_Zero	0xa19
0a12 00d8       |    |		Load_Top	At_Offset_0
0a13 0a01       |    |		Execute_Immediate	Plus,0x1
0a14 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0a15 e5f9       |    |		Load	0x2,-0x7
0a16 00d9       |    |		Load_Top	At_Offset_1
0a17 00db       |    |		Load_Top	At_Offset_3
0a18 01d6       |    |		Execute	Vector,Field_Write
0a19 e5f8       |    |		Load	0x2,-0x8
0a1a e01e       |    |		Load	0x0,0x1e
0a1b 027e       | ~  |		Execute	Discrete,Not_Equal
0a1c 6807       |h   |		Jump_Zero	0xa24
0a1d 00d8       |    |		Load_Top	At_Offset_0
0a1e 0a01       |    |		Execute_Immediate	Plus,0x1
0a1f 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0a20 e5f8       |    |		Load	0x2,-0x8
0a21 00d9       |    |		Load_Top	At_Offset_1
0a22 00db       |    |		Load_Top	At_Offset_3
0a23 01d6       |    |		Execute	Vector,Field_Write
0a24 00da       |    |		Load_Top	At_Offset_2
0a25 00d9       |    |		Load_Top	At_Offset_1
0a26 00d8       |    |		Load_Top	At_Offset_0
0a27 e20e       |    |		Load	0x1,0xe
0a28 0260       | `  |		Execute	Discrete,In_Type
0a29 7001       |p   |		Jump_Nonzero	0xa2b
0a2a 0801       |    |		Execute_Immediate	Raise,0x1
0a2b 00db       |    |		Load_Top	At_Offset_3
0a2c e5fb       |    |		Load	0x2,-0x5
0a2d 8059       | Y  |		Call	0x0,0x59
0a2e e5ff       |    |		Load	0x2,-0x1
0a2f 805a       | Z  |		Call	0x0,0x5a
0a30 450a       |E   |		Exit_Suprogram	New_Top_Offset 0xa
0a31			TRAP_09e0:
0a31 0007       |    |		Action	Break_Optional
0a32 e23f       | ?  |		Load	0x1,0x3f
0a33 6806       |h   |		Jump_Zero	0xa3a
0a34 0092 1282  |    |		Action	Push_String_Extended,0x1282					; "Process_Action: exception: "
0a36 e03a       | :  |		Load	0x0,0x3a
0a37 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0a38 01cc       |    |		Execute	Vector,Catenate
0a39 803b       | ;  |		Call	0x0,0x3b
0a3a 450a       |E   |		Exit_Suprogram	New_Top_Offset 0xa
0a3b 0000 0000  |    |		.BLANK	0000[0x5]
0a40 ; --------------------------------------------------------------------------------------
0a40 ; SUBPROGRAM
0a40 ; --------------------------------------------------------------------------------------
0a40 0a6a       | j  |		.CONST	0x0a6a								; Address of begin
0a41 0b75       | u  |		.CONST	0x0b75								; Address of exception handler
0a42 0011       |    |		.CONST	0x0011								; Number of locals
0a43			INIT_0a40:
0a43 e20d       |    |		Load	0x1,0xd
0a44 0337       | 7  |		Declare_Variable	Array
0a45 e20e       |    |		Load	0x1,0xe
0a46 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0a47 00e2       |    |		Load_Encached	Integer_Cache
0a48 e039       | 9  |		Load	0x0,0x39
0a49 0322       | "  |		Declare_Variable	Record
0a4a 00d8       |    |		Load_Top	At_Offset_0
0a4b 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0a4c 00e1       |    |		Load_Encached	Boolean_Cache
0a4d 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0a4e 00e2       |    |		Load_Encached	Integer_Cache
0a4f 029f 0f83  |    |		Declare_Subprogram	INIT_0f80,For_Call
0a51 029f 0fab  |    |		Declare_Subprogram	INIT_0fa8,For_Call
0a53 029f 0ff3  |    |		Declare_Subprogram	INIT_0ff0,For_Call
0a55 a013       |    |		Store_Unchecked	0x0,0x13
0a56 00c6       |    |		Action	Check_Subprogram_Elaborated
0a57 00e2       |    |		Load_Encached	Integer_Cache
0a58 480a       |H   |		Short_Literal	0xa
0a59 4802       |H   |		Short_Literal	0x2
0a5a 0099       |    |		Action	Reference_Dynamic
0a5b 4800       |H   |		Short_Literal	0x0
0a5c 0093 0000  |    |		push_full_address	0x0
0a5e 6119       |a   |		Indirect_Literal	Discrete,0xb78,{0x80000000, 0x00060000}
0a5f 0273       | s  |		Execute	Discrete,Plus
0a60 e014       |    |		Load	0x0,0x14
0a61 0273       | s  |		Execute	Discrete,Plus
0a62 e05b       | [  |		Load	0x0,0x5b
0a63 0273       | s  |		Execute	Discrete,Plus
0a64 480f       |H   |		Short_Literal	0xf
0a65 0007       |    |		Action	Break_Optional
0a66 029f 100b  |    |		Declare_Subprogram	INIT_1008,For_Call
0a68 029f 101b  |    |		Declare_Subprogram	INIT_1018,For_Call
0a6a			BODY_0a40:
0a6a e5fd       |    |		Load	0x2,-0x3
0a6b 8408       |    |		Call	0x2,0x8
0a6c e405       |    |		Load	0x2,0x5
0a6d e5fc       |    |		Load	0x2,-0x4
0a6e 803c       | <  |		Call	0x0,0x3c
0a6f 00d1       |    |		Pop_Control	Pop_Count_1
0a70 e405       |    |		Load	0x2,0x5
0a71 e5fe       |    |		Load	0x2,-0x2
0a72 803d       | =  |		Call	0x0,0x3d
0a73 00d1       |    |		Pop_Control	Pop_Count_1
0a74 e405       |    |		Load	0x2,0x5
0a75 8056       | V  |		Call	0x0,0x56
0a76 00d1       |    |		Pop_Control	Pop_Count_1
0a77 e405       |    |		Load	0x2,0x5
0a78 8057       | W  |		Call	0x0,0x57
0a79 00d1       |    |		Pop_Control	Pop_Count_1
0a7a 00cf       |    |		Action	Mark_Auxiliary
0a7b e250       | P  |		Load	0x1,0x50
0a7c 4801       |H   |		Short_Literal	0x1
0a7d 0263       | c  |		Execute	Discrete,Above_Bound
0a7e 704b       |pK  |		Jump_Nonzero	0xaca
0a7f 00d8       |    |		Load_Top	At_Offset_0
0a80 e24d       | M  |		Load	0x1,0x4d
0a81 01d7       |    |		Execute	Vector,Field_Read
0a82 e5fc       |    |		Load	0x2,-0x4
0a83 027f       |    |		Execute	Discrete,Equal
0a84 6843       |hC  |		Jump_Zero	0xac8
0a85 00d8       |    |		Load_Top	At_Offset_0
0a86 e24f       | O  |		Load	0x1,0x4f
0a87 01d5       |    |		Execute	Vector,Field_Reference
0a88 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
0a89 e05c       | \  |		Load	0x0,0x5c
0a8a 017f       |    |		Execute	Record,Equal
0a8b 7008       |p   |		Jump_Nonzero	0xa94
0a8c e405       |    |		Load	0x2,0x5
0a8d 805d       | ]  |		Call	0x0,0x5d
0a8e 00d9       |    |		Load_Top	At_Offset_1
0a8f e24f       | O  |		Load	0x1,0x4f
0a90 01d5       |    |		Execute	Vector,Field_Reference
0a91 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
0a92 8279       | y  |		Call	0x1,0x79
0a93 6834       |h4  |		Jump_Zero	0xac8
0a94 e5fd       |    |		Load	0x2,-0x3
0a95 00d9       |    |		Load_Top	At_Offset_1
0a96 e24f       | O  |		Load	0x1,0x4f
0a97 01d5       |    |		Execute	Vector,Field_Reference
0a98 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0a99 027f       |    |		Execute	Discrete,Equal
0a9a 6808       |h   |		Jump_Zero	0xaa3
0a9b 00d8       |    |		Load_Top	At_Offset_0
0a9c e24f       | O  |		Load	0x1,0x4f
0a9d 01d5       |    |		Execute	Vector,Field_Reference
0a9e 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0a9f 8408       |    |		Call	0x2,0x8
0aa0 00d8       |    |		Load_Top	At_Offset_0
0aa1 8410       |    |		Call	0x2,0x10
0aa2 7825       |x%  |		Jump	0xac8
0aa3 e406       |    |		Load	0x2,0x6
0aa4 7004       |p   |		Jump_Nonzero	0xaa9
0aa5 e5fd       |    |		Load	0x2,-0x3
0aa6 e01e       |    |		Load	0x0,0x1e
0aa7 027f       |    |		Execute	Discrete,Equal
0aa8 681f       |h   |		Jump_Zero	0xac8
0aa9 00d8       |    |		Load_Top	At_Offset_0
0aaa e24f       | O  |		Load	0x1,0x4f
0aab 01d5       |    |		Execute	Vector,Field_Reference
0aac 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0aad 0e01       |    |		Execute_Immediate	Not_Equal,0x1
0aae 7005       |p   |		Jump_Nonzero	0xab4
0aaf 00d8       |    |		Load_Top	At_Offset_0
0ab0 e24f       | O  |		Load	0x1,0x4f
0ab1 01d5       |    |		Execute	Vector,Field_Reference
0ab2 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0ab3 680f       |h   |		Jump_Zero	0xac3
0ab4 00e2       |    |		Load_Encached	Integer_Cache
0ab5 00d9       |    |		Load_Top	At_Offset_1
0ab6 4802       |H   |		Short_Literal	0x2
0ab7 e26c       | l  |		Load	0x1,0x6c
0ab8 171e       |    |		Execute	Task,Entry_Call,Field_Number 0x1e
0ab9 c407       |    |		Store	0x2,0x7
0aba e407       |    |		Load	0x2,0x7
0abb e01e       |    |		Load	0x0,0x1e
0abc 027e       | ~  |		Execute	Discrete,Not_Equal
0abd 680a       |h   |		Jump_Zero	0xac8
0abe e407       |    |		Load	0x2,0x7
0abf 8408       |    |		Call	0x2,0x8
0ac0 00d8       |    |		Load_Top	At_Offset_0
0ac1 8410       |    |		Call	0x2,0x10
0ac2 7805       |x   |		Jump	0xac8
0ac3 00d8       |    |		Load_Top	At_Offset_0
0ac4 e24f       | O  |		Load	0x1,0x4f
0ac5 01d5       |    |		Execute	Vector,Field_Reference
0ac6 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0ac7 8408       |    |		Call	0x2,0x8
0ac8 00c8       |    |		Action	Pop_Auxiliary_Range
0ac9 3fb5       |?   |		Loop_Increasing	0xa7f
0aca 00c9       |    |		Action	Pop_Auxiliary_Loop
0acb e254       | T  |		Load	0x1,0x54
0acc 4801       |H   |		Short_Literal	0x1
0acd 0263       | c  |		Execute	Discrete,Above_Bound
0ace 7051       |pQ  |		Jump_Nonzero	0xb20
0acf 00d8       |    |		Load_Top	At_Offset_0
0ad0 e253       | S  |		Load	0x1,0x53
0ad1 01d5       |    |		Execute	Vector,Field_Reference
0ad2 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0ad3 e5fc       |    |		Load	0x2,-0x4
0ad4 027f       |    |		Execute	Discrete,Equal
0ad5 6848       |hH  |		Jump_Zero	0xb1e
0ad6 e5ff       |    |		Load	0x2,-0x1
0ad7 00d9       |    |		Load_Top	At_Offset_1
0ad8 e253       | S  |		Load	0x1,0x53
0ad9 01d5       |    |		Execute	Vector,Field_Reference
0ada 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0adb 027f       |    |		Execute	Discrete,Equal
0adc 6841       |hA  |		Jump_Zero	0xb1e
0add 00d8       |    |		Load_Top	At_Offset_0
0ade e253       | S  |		Load	0x1,0x53
0adf 01d5       |    |		Execute	Vector,Field_Reference
0ae0 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0ae1 e05c       | \  |		Load	0x0,0x5c
0ae2 017f       |    |		Execute	Record,Equal
0ae3 7008       |p   |		Jump_Nonzero	0xaec
0ae4 e405       |    |		Load	0x2,0x5
0ae5 805d       | ]  |		Call	0x0,0x5d
0ae6 00d9       |    |		Load_Top	At_Offset_1
0ae7 e253       | S  |		Load	0x1,0x53
0ae8 01d5       |    |		Execute	Vector,Field_Reference
0ae9 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0aea 8279       | y  |		Call	0x1,0x79
0aeb 6832       |h2  |		Jump_Zero	0xb1e
0aec e406       |    |		Load	0x2,0x6
0aed 7007       |p   |		Jump_Nonzero	0xaf5
0aee 00d8       |    |		Load_Top	At_Offset_0
0aef e253       | S  |		Load	0x1,0x53
0af0 01d5       |    |		Execute	Vector,Field_Reference
0af1 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0af2 e5fd       |    |		Load	0x2,-0x3
0af3 027f       |    |		Execute	Discrete,Equal
0af4 6829       |h)  |		Jump_Zero	0xb1e
0af5 00d8       |    |		Load_Top	At_Offset_0
0af6 e253       | S  |		Load	0x1,0x53
0af7 01d5       |    |		Execute	Vector,Field_Reference
0af8 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0af9 0f01       |    |		Execute_Immediate	Equal,0x1
0afa 681a       |h   |		Jump_Zero	0xb15
0afb 00d8       |    |		Load_Top	At_Offset_0
0afc e253       | S  |		Load	0x1,0x53
0afd 01d5       |    |		Execute	Vector,Field_Reference
0afe 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0aff a404       |    |		Store_Unchecked	0x2,0x4
0b00 00d8       |    |		Load_Top	At_Offset_0
0b01 e253       | S  |		Load	0x1,0x53
0b02 01d5       |    |		Execute	Vector,Field_Reference
0b03 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0b04 6805       |h   |		Jump_Zero	0xb0a
0b05 e404       |    |		Load	0x2,0x4
0b06 4801       |H   |		Short_Literal	0x1
0b07 e26c       | l  |		Load	0x1,0x6c
0b08 171c       |    |		Execute	Task,Entry_Call,Field_Number 0x1c
0b09 7808       |x   |		Jump	0xb12
0b0a 00d8       |    |		Load_Top	At_Offset_0
0b0b e253       | S  |		Load	0x1,0x53
0b0c 01d5       |    |		Execute	Vector,Field_Reference
0b0d 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0b0e 00d9       |    |		Load_Top	At_Offset_1
0b0f e253       | S  |		Load	0x1,0x53
0b10 01d5       |    |		Execute	Vector,Field_Reference
0b11 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0b12 e404       |    |		Load	0x2,0x4
0b13 8408       |    |		Call	0x2,0x8
0b14 7809       |x   |		Jump	0xb1e
0b15 00d8       |    |		Load_Top	At_Offset_0
0b16 e253       | S  |		Load	0x1,0x53
0b17 01d5       |    |		Execute	Vector,Field_Reference
0b18 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0b19 0aff       |    |		Execute_Immediate	Plus,-0x1
0b1a 00d9       |    |		Load_Top	At_Offset_1
0b1b e253       | S  |		Load	0x1,0x53
0b1c 01d5       |    |		Execute	Vector,Field_Reference
0b1d 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0b1e 00c8       |    |		Action	Pop_Auxiliary_Range
0b1f 3faf       |?   |		Loop_Increasing	0xacf
0b20 00ce       |    |		Action	Pop_Auxiliary
0b21 e241       | A  |		Load	0x1,0x41
0b22 6805       |h   |		Jump_Zero	0xb28
0b23 e5fc       |    |		Load	0x2,-0x4
0b24 805e       | ^  |		Call	0x0,0x5e
0b25 6802       |h   |		Jump_Zero	0xb28
0b26 e242       | B  |		Load	0x1,0x42
0b27 8408       |    |		Call	0x2,0x8
0b28 e243       | C  |		Load	0x1,0x43
0b29 e5ff       |    |		Load	0x2,-0x1
0b2a 027f       |    |		Execute	Discrete,Equal
0b2b 681e       |h   |		Jump_Zero	0xb4a
0b2c e5fe       |    |		Load	0x2,-0x2
0b2d e004       |    |		Load	0x0,0x4
0b2e 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
0b2f e245       | E  |		Load	0x1,0x45
0b30 027c       | |  |		Execute	Discrete,Less
0b31 6818       |h   |		Jump_Zero	0xb4a
0b32 e5fc       |    |		Load	0x2,-0x4
0b33 805e       | ^  |		Call	0x0,0x5e
0b34 6815       |h   |		Jump_Zero	0xb4a
0b35 e5fd       |    |		Load	0x2,-0x3
0b36 e246       | F  |		Load	0x1,0x46
0b37 027f       |    |		Execute	Discrete,Equal
0b38 7002       |p   |		Jump_Nonzero	0xb3b
0b39 e406       |    |		Load	0x2,0x6
0b3a 680f       |h   |		Jump_Zero	0xb4a
0b3b e244       | D  |		Load	0x1,0x44
0b3c 0f01       |    |		Execute_Immediate	Equal,0x1
0b3d 6809       |h   |		Jump_Zero	0xb47
0b3e e011       |    |		Load	0x0,0x11
0b3f a243       | C  |		Store_Unchecked	0x1,0x43
0b40 e246       | F  |		Load	0x1,0x46
0b41 8408       |    |		Call	0x2,0x8
0b42 e5ff       |    |		Load	0x2,-0x1
0b43 4801       |H   |		Short_Literal	0x1
0b44 e26c       | l  |		Load	0x1,0x6c
0b45 171d       |    |		Execute	Task,Entry_Call,Field_Number 0x1d
0b46 7803       |x   |		Jump	0xb4a
0b47 e244       | D  |		Load	0x1,0x44
0b48 0aff       |    |		Execute_Immediate	Plus,-0x1
0b49 c244       | D  |		Store	0x1,0x44
0b4a e5ff       |    |		Load	0x2,-0x1
0b4b e247       | G  |		Load	0x1,0x47
0b4c 027f       |    |		Execute	Discrete,Equal
0b4d 6815       |h   |		Jump_Zero	0xb63
0b4e e5fd       |    |		Load	0x2,-0x3
0b4f e249       | I  |		Load	0x1,0x49
0b50 027f       |    |		Execute	Discrete,Equal
0b51 7002       |p   |		Jump_Nonzero	0xb54
0b52 e406       |    |		Load	0x2,0x6
0b53 680f       |h   |		Jump_Zero	0xb63
0b54 e248       | H  |		Load	0x1,0x48
0b55 0f01       |    |		Execute_Immediate	Equal,0x1
0b56 6809       |h   |		Jump_Zero	0xb60
0b57 e011       |    |		Load	0x0,0x11
0b58 a247       | G  |		Store_Unchecked	0x1,0x47
0b59 e249       | I  |		Load	0x1,0x49
0b5a 8408       |    |		Call	0x2,0x8
0b5b e5ff       |    |		Load	0x2,-0x1
0b5c 4801       |H   |		Short_Literal	0x1
0b5d e26c       | l  |		Load	0x1,0x6c
0b5e 171d       |    |		Execute	Task,Entry_Call,Field_Number 0x1d
0b5f 7803       |x   |		Jump	0xb63
0b60 e248       | H  |		Load	0x1,0x48
0b61 0aff       |    |		Execute_Immediate	Plus,-0x1
0b62 c248       | H  |		Store	0x1,0x48
0b63 e024       | $  |		Load	0x0,0x24
0b64 e5ff       |    |		Load	0x2,-0x1
0b65 e40b       |    |		Load	0x2,0xb
0b66 480c       |H   |		Short_Literal	0xc
0b67 4802       |H   |		Short_Literal	0x2
0b68 0099       |    |		Action	Reference_Dynamic
0b69 e40d       |    |		Load	0x2,0xd
0b6a 480e       |H   |		Short_Literal	0xe
0b6b 4802       |H   |		Short_Literal	0x2
0b6c 0099       |    |		Action	Reference_Dynamic
0b6d 8013       |    |		Call	0x0,0x13
0b6e c024       | $  |		Store	0x0,0x24
0b6f e405       |    |		Load	0x2,0x5
0b70 e403       |    |		Load	0x2,0x3
0b71 e402       |    |		Load	0x2,0x2
0b72 e5ff       |    |		Load	0x2,-0x1
0b73 805f       | _  |		Call	0x0,0x5f
0b74 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0b75			TRAP_0a40:
0b75 0007       |    |		Action	Break_Optional
0b76 8411       |    |		Call	0x2,0x11
0b77 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0b78 8000 0000  |    |		.LITERAL	{0x80000000, 0x00060000}
0b7c 0000 0000  |    |		.BLANK	0000[0x4]
0b80 ; --------------------------------------------------------------------------------------
0b80 ; SUBPROGRAM
0b80 ; --------------------------------------------------------------------------------------
0b80 0b86       |    |		.CONST	0x0b86								; Address of begin
0b81 0b92       |    |		.CONST	0x0b92								; Address of exception handler
0b82 0003       |    |		.CONST	0x0003								; Number of locals
0b83			INIT_0b80:
0b83 00e1       |    |		Load_Encached	Boolean_Cache
0b84 029f 103b  |   ;|		Declare_Subprogram	INIT_1038,For_Call
0b86			BODY_0b80:
0b86 00e1       |    |		Load_Encached	Boolean_Cache
0b87 e5fd       |    |		Load	0x2,-0x3
0b88 e5fe       |    |		Load	0x2,-0x2
0b89 e5ff       |    |		Load	0x2,-0x1
0b8a 4804       |H   |		Short_Literal	0x4
0b8b e276       | v  |		Load	0x1,0x76
0b8c 170d       |    |		Execute	Task,Entry_Call,Field_Number 0xd
0b8d 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0b8e 00d9       |    |		Load_Top	At_Offset_1
0b8f 6801       |h   |		Jump_Zero	0xb91
0b90 8403       |    |		Call	0x2,0x3
0b91 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0b92			TRAP_0b80:
0b92 0007       |    |		Action	Break_Optional
0b93 0092 1283  |    |		Action	Push_String_Extended,0x1283					; "Creation_Register:"
0b95 e03a       | :  |		Load	0x0,0x3a
0b96 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0b97 01cc       |    |		Execute	Vector,Catenate
0b98 803b       | ;  |		Call	0x0,0x3b
0b99 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0b9a 0000 0000  |    |		.BLANK	0000[0x6]
0ba0 ; --------------------------------------------------------------------------------------
0ba0 ; SUBPROGRAM
0ba0 ; --------------------------------------------------------------------------------------
0ba0 0ba5       |    |		.CONST	0x0ba5								; Address of begin
0ba1 0004       |    |		.CONST	0x0004								; Address of exception handler
0ba2 0002       |    |		.CONST	0x0002								; Number of locals
0ba3			INIT_0ba0:
0ba3 e004       |    |		Load	0x0,0x4
0ba4 1b25       | %  |		Execute	Package,Field_Read,Field_Number 0x25
0ba5			BODY_0ba0:
0ba5 e004       |    |		Load	0x0,0x4
0ba6 1b51       | Q  |		Execute	Package,Field_Read,Field_Number 0x51
0ba7 00e3       |    |		Load_Encached	Natural_Cache
0ba8 e004       |    |		Load	0x0,0x4
0ba9 1b25       | %  |		Execute	Package,Field_Read,Field_Number 0x25
0baa e004       |    |		Load	0x0,0x4
0bab 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0bac e004       |    |		Load	0x0,0x4
0bad 1b25       | %  |		Execute	Package,Field_Read,Field_Number 0x25
0bae e5ff       |    |		Load	0x2,-0x1
0baf 0a02       |    |		Execute_Immediate	Plus,0x2
0bb0 00d8       |    |		Load_Top	At_Offset_0
0bb1 00e3       |    |		Load_Encached	Natural_Cache
0bb2 0260       | `  |		Execute	Discrete,In_Type
0bb3 7001       |p   |		Jump_Nonzero	0xbb5
0bb4 0801       |    |		Execute_Immediate	Raise,0x1
0bb5 e01c       |    |		Load	0x0,0x1c
0bb6 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
0bb7 e004       |    |		Load	0x0,0x4
0bb8 183a       | :  |		Execute	Package,Field_Execute,Field_Number 0x3a
0bb9 e01c       |    |		Load	0x0,0x1c
0bba 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0bbb e004       |    |		Load	0x0,0x4
0bbc 1853       | S  |		Execute	Package,Field_Execute,Field_Number 0x53
0bbd c402       |    |		Store	0x2,0x2
0bbe c236       | 6  |		Store	0x1,0x36
0bbf c233       | 3  |		Store	0x1,0x33
0bc0 c234       | 4  |		Store	0x1,0x34
0bc1 c235       | 5  |		Store	0x1,0x35
0bc2 00d8       |    |		Load_Top	At_Offset_0
0bc3 e004       |    |		Load	0x0,0x4
0bc4 1836       | 6  |		Execute	Package,Field_Execute,Field_Number 0x36
0bc5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0bc6 0000 0000  |    |		.XXX[0x2]
0bc8 ; --------------------------------------------------------------------------------------
0bc8 ; SUBPROGRAM
0bc8 ; --------------------------------------------------------------------------------------
0bc8 0bcf       |    |		.CONST	0x0bcf								; Address of begin
0bc9 0004       |    |		.CONST	0x0004								; Address of exception handler
0bca 0002       |    |		.CONST	0x0002								; Number of locals
0bcb			INIT_0bc8:
0bcb e039       | 9  |		Load	0x0,0x39
0bcc 0322       | "  |		Declare_Variable	Record
0bcd 00d8       |    |		Load_Top	At_Offset_0
0bce 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0bcf			BODY_0bc8:
0bcf 00d8       |    |		Load_Top	At_Offset_0
0bd0 e5fe       |    |		Load	0x2,-0x2
0bd1 803c       | <  |		Call	0x0,0x3c
0bd2 00d1       |    |		Pop_Control	Pop_Count_1
0bd3 00d8       |    |		Load_Top	At_Offset_0
0bd4 8056       | V  |		Call	0x0,0x56
0bd5 00d1       |    |		Pop_Control	Pop_Count_1
0bd6 00d8       |    |		Load_Top	At_Offset_0
0bd7 e5ff       |    |		Load	0x2,-0x1
0bd8 0a01       |    |		Execute_Immediate	Plus,0x1
0bd9 00d8       |    |		Load_Top	At_Offset_0
0bda 00e3       |    |		Load_Encached	Natural_Cache
0bdb 0260       | `  |		Execute	Discrete,In_Type
0bdc 7001       |p   |		Jump_Nonzero	0xbde
0bdd 0801       |    |		Execute_Immediate	Raise,0x1
0bde 8280       |    |		Call	0x1,0x80
0bdf 803d       | =  |		Call	0x0,0x3d
0be0 00d1       |    |		Pop_Control	Pop_Count_1
0be1 00d8       |    |		Load_Top	At_Offset_0
0be2 8057       | W  |		Call	0x0,0x57
0be3 00d1       |    |		Pop_Control	Pop_Count_1
0be4 00d8       |    |		Load_Top	At_Offset_0
0be5 805d       | ]  |		Call	0x0,0x5d
0be6 e5fd       |    |		Load	0x2,-0x3
0be7 017d       | }  |		Execute	Record,Structure_Write
0be8 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0be9 0000 0000  |    |		.BLANK	0000[0x7]
0bf0 ; --------------------------------------------------------------------------------------
0bf0 ; SUBPROGRAM
0bf0 ; --------------------------------------------------------------------------------------
0bf0 0bf5       |    |		.CONST	0x0bf5								; Address of begin
0bf1 0004       |    |		.CONST	0x0004								; Address of exception handler
0bf2 0002       |    |		.CONST	0x0002								; Number of locals
0bf3			INIT_0bf0:
0bf3 029f 105b  |   [|		Declare_Subprogram	INIT_1058,For_Call
0bf5			BODY_0bf0:
0bf5 e5fe       |    |		Load	0x2,-0x2
0bf6 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0bf7 6805       |h   |		Jump_Zero	0xbfd
0bf8 e5fd       |    |		Load	0x2,-0x3
0bf9 805e       | ^  |		Call	0x0,0x5e
0bfa 6802       |h   |		Jump_Zero	0xbfd
0bfb 4801       |H   |		Short_Literal	0x1
0bfc 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0bfd e5fe       |    |		Load	0x2,-0x2
0bfe 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
0bff 6812       |h   |		Jump_Zero	0xc12
0c00 e5fe       |    |		Load	0x2,-0x2
0c01 3c0c       |<   |		Execute	Record,Field_Read,Field_Number 0xc
0c02 601d       |`   |		Indirect_Literal	Discrete,0xc20,{0x00000000, 0x000fffff}
0c03 027e       | ~  |		Execute	Discrete,Not_Equal
0c04 7008       |p   |		Jump_Nonzero	0xc0d
0c05 4803       |H   |		Short_Literal	0x3
0c06 8280       |    |		Call	0x1,0x80
0c07 e004       |    |		Load	0x0,0x4
0c08 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
0c09 e5fe       |    |		Load	0x2,-0x2
0c0a 3c0c       |<   |		Execute	Record,Field_Read,Field_Number 0xc
0c0b 027c       | |  |		Execute	Discrete,Less
0c0c 6805       |h   |		Jump_Zero	0xc12
0c0d e5fd       |    |		Load	0x2,-0x3
0c0e 805e       | ^  |		Call	0x0,0x5e
0c0f 6802       |h   |		Jump_Zero	0xc12
0c10 4801       |H   |		Short_Literal	0x1
0c11 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0c12 e5fe       |    |		Load	0x2,-0x2
0c13 3c0e       |<   |		Execute	Record,Field_Read,Field_Number 0xe
0c14 6809       |h   |		Jump_Zero	0xc1e
0c15 00cf       |    |		Action	Mark_Auxiliary
0c16 e259       | Y  |		Load	0x1,0x59
0c17 4801       |H   |		Short_Literal	0x1
0c18 0263       | c  |		Execute	Discrete,Above_Bound
0c19 7003       |p   |		Jump_Nonzero	0xc1d
0c1a 8402       |    |		Call	0x2,0x2
0c1b 00c8       |    |		Action	Pop_Auxiliary_Range
0c1c 3ffd       |?   |		Loop_Increasing	0xc1a
0c1d 00ce       |    |		Action	Pop_Auxiliary
0c1e 4800       |H   |		Short_Literal	0x0
0c1f 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0c20 0000 0000  |    |		.LITERAL	{0x00000000, 0x000fffff}
0c24 0000 0000  |    |		.BLANK	0000[0x4]
0c28 ; --------------------------------------------------------------------------------------
0c28 ; SUBPROGRAM
0c28 ; --------------------------------------------------------------------------------------
0c28 0c2b       | +  |		.CONST	0x0c2b								; Address of begin
0c29 0004       |    |		.CONST	0x0004								; Address of exception handler
0c2a 0001       |    |		.CONST	0x0001								; Number of locals
0c2b			BODY_0c28:
0c2b			INIT_0c28:
0c2b e5fd       |    |		Load	0x2,-0x3
0c2c e004       |    |		Load	0x0,0x4
0c2d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0c2e 00d9       |    |		Load_Top	At_Offset_1
0c2f 00d0       |    |		Action	Swap_Control
0c30 0260       | `  |		Execute	Discrete,In_Type
0c31 7001       |p   |		Jump_Nonzero	0xc33
0c32 0801       |    |		Execute_Immediate	Raise,0x1
0c33 e5fe       |    |		Load	0x2,-0x2
0c34 e5ff       |    |		Load	0x2,-0x1
0c35 e025       | %  |		Load	0x0,0x25
0c36 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0c37 00d9       |    |		Load_Top	At_Offset_1
0c38 00d0       |    |		Action	Swap_Control
0c39 0260       | `  |		Execute	Discrete,In_Type
0c3a 7001       |p   |		Jump_Nonzero	0xc3c
0c3b 0801       |    |		Execute_Immediate	Raise,0x1
0c3c 8282       |    |		Call	0x1,0x82
0c3d 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0c3e 0000 0000  |    |		.XXX[0x2]
0c40 ; --------------------------------------------------------------------------------------
0c40 ; SUBPROGRAM
0c40 ; --------------------------------------------------------------------------------------
0c40 0c46       | F  |		.CONST	0x0c46								; Address of begin
0c41 0004       |    |		.CONST	0x0004								; Address of exception handler
0c42 0002       |    |		.CONST	0x0002								; Number of locals
0c43			INIT_0c40:
0c43 e004       |    |		Load	0x0,0x4
0c44 1b5a       | Z  |		Execute	Package,Field_Read,Field_Number 0x5a
0c45 0322       | "  |		Declare_Variable	Record
0c46			BODY_0c40:
0c46 00db       |    |		Load_Top	At_Offset_3
0c47 e004       |    |		Load	0x0,0x4
0c48 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
0c49 0a01       |    |		Execute_Immediate	Plus,0x1
0c4a e004       |    |		Load	0x0,0x4
0c4b 1b29       | )  |		Execute	Package,Field_Read,Field_Number 0x29
0c4c 00d9       |    |		Load_Top	At_Offset_1
0c4d 00d0       |    |		Action	Swap_Control
0c4e 0260       | `  |		Execute	Discrete,In_Type
0c4f 7001       |p   |		Jump_Nonzero	0xc51
0c50 0801       |    |		Execute_Immediate	Raise,0x1
0c51 e5ff       |    |		Load	0x2,-0x1
0c52 e004       |    |		Load	0x0,0x4
0c53 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
0c54 e01c       |    |		Load	0x0,0x1c
0c55 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0c56 e004       |    |		Load	0x0,0x4
0c57 185b       | [  |		Execute	Package,Field_Execute,Field_Number 0x5b
0c58 00d9       |    |		Load_Top	At_Offset_1
0c59 017d       | }  |		Execute	Record,Structure_Write
0c5a 4822       |H"  |		Short_Literal	0x22
0c5b 00d9       |    |		Load_Top	At_Offset_1
0c5c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0c5d e01c       |    |		Load	0x0,0x1c
0c5e 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0c5f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0c60 ; --------------------------------------------------------------------------------------
0c60 ; SUBPROGRAM
0c60 ; --------------------------------------------------------------------------------------
0c60 0c63       | c  |		.CONST	0x0c63								; Address of begin
0c61 0c68       | h  |		.CONST	0x0c68								; Address of exception handler
0c62 0001       |    |		.CONST	0x0001								; Number of locals
0c63			BODY_0c60:
0c63			INIT_0c60:
0c63 e403       |    |		Load	0x2,0x3
0c64 00d8       |    |		Load_Top	At_Offset_0
0c65 e004       |    |		Load	0x0,0x4
0c66 1849       | I  |		Execute	Package,Field_Execute,Field_Number 0x49
0c67 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0c68			TRAP_0c60:
0c68 0007       |    |		Action	Break_Optional
0c69 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0c6a 0000 0000  |    |		.BLANK	0000[0x6]
0c70 ; --------------------------------------------------------------------------------------
0c70 ; SUBPROGRAM
0c70 ; --------------------------------------------------------------------------------------
0c70 0c73       | s  |		.CONST	0x0c73								; Address of begin
0c71 0004       |    |		.CONST	0x0004								; Address of exception handler
0c72 0001       |    |		.CONST	0x0001								; Number of locals
0c73			BODY_0c70:
0c73			INIT_0c70:
0c73 00da       |    |		Load_Top	At_Offset_2
0c74 00d8       |    |		Load_Top	At_Offset_0
0c75 00e2       |    |		Load_Encached	Integer_Cache
0c76 0260       | `  |		Execute	Discrete,In_Type
0c77 7001       |p   |		Jump_Nonzero	0xc79
0c78 0801       |    |		Execute_Immediate	Raise,0x1
0c79 00e0       |    |		Load_Encached	Standard_Cache
0c7a 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0c7b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0c7c 0000 0000  |    |		.BLANK	0000[0x4]
0c80 ; --------------------------------------------------------------------------------------
0c80 ; SUBPROGRAM
0c80 ; --------------------------------------------------------------------------------------
0c80 0c83       |    |		.CONST	0x0c83								; Address of begin
0c81 0004       |    |		.CONST	0x0004								; Address of exception handler
0c82 0001       |    |		.CONST	0x0001								; Number of locals
0c83			BODY_0c80:
0c83			INIT_0c80:
0c83 00da       |    |		Load_Top	At_Offset_2
0c84 e05c       | \  |		Load	0x0,0x5c
0c85 017f       |    |		Execute	Record,Equal
0c86 6803       |h   |		Jump_Zero	0xc8a
0c87 0092 1284  |    |		Action	Push_String_Extended,0x1284					; " [any inst]"
0c89 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0c8a 0092 1285  |    |		Action	Push_String_Extended,0x1285					; " ["
0c8c 00db       |    |		Load_Top	At_Offset_3
0c8d 8060       | `  |		Call	0x0,0x60
0c8e 01cc       |    |		Execute	Vector,Catenate
0c8f 0092 1286  |    |		Action	Push_String_Extended,0x1286					; "]"
0c91 01cc       |    |		Execute	Vector,Catenate
0c92 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0c93 0000 0000  |    |		.BLANK	0000[0x5]
0c98 ; --------------------------------------------------------------------------------------
0c98 ; SUBPROGRAM
0c98 ; --------------------------------------------------------------------------------------
0c98 0c9b       |    |		.CONST	0x0c9b								; Address of begin
0c99 0004       |    |		.CONST	0x0004								; Address of exception handler
0c9a 0001       |    |		.CONST	0x0001								; Number of locals
0c9b			BODY_0c98:
0c9b			INIT_0c98:
0c9b 00da       |    |		Load_Top	At_Offset_2
0c9c e061       | a  |		Load	0x0,0x61
0c9d 017f       |    |		Execute	Record,Equal
0c9e 6803       |h   |		Jump_Zero	0xca2
0c9f 0092 1287  |    |		Action	Push_String_Extended,0x1287					; " [any sub]"
0ca1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0ca2 0092 1285  |    |		Action	Push_String_Extended,0x1285					; " ["
0ca4 00db       |    |		Load_Top	At_Offset_3
0ca5 8062       | b  |		Call	0x0,0x62
0ca6 01cc       |    |		Execute	Vector,Catenate
0ca7 0092 1286  |    |		Action	Push_String_Extended,0x1286					; "]"
0ca9 01cc       |    |		Execute	Vector,Catenate
0caa 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0cab 0000 0000  |    |		.BLANK	0000[0x5]
0cb0 ; --------------------------------------------------------------------------------------
0cb0 ; SUBPROGRAM
0cb0 ; --------------------------------------------------------------------------------------
0cb0 0cb3       |    |		.CONST	0x0cb3								; Address of begin
0cb1 0004       |    |		.CONST	0x0004								; Address of exception handler
0cb2 0001       |    |		.CONST	0x0001								; Number of locals
0cb3			BODY_0cb0:
0cb3			INIT_0cb0:
0cb3 00da       |    |		Load_Top	At_Offset_2
0cb4 e063       | c  |		Load	0x0,0x63
0cb5 027f       |    |		Execute	Discrete,Equal
0cb6 6803       |h   |		Jump_Zero	0xcba
0cb7 0092 1288  |    |		Action	Push_String_Extended,0x1288					; " [any stmt]"
0cb9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0cba 0092 1285  |    |		Action	Push_String_Extended,0x1285					; " ["
0cbc 00db       |    |		Load_Top	At_Offset_3
0cbd 8064       | d  |		Call	0x0,0x64
0cbe 01cc       |    |		Execute	Vector,Catenate
0cbf 0092 1286  |    |		Action	Push_String_Extended,0x1286					; "]"
0cc1 01cc       |    |		Execute	Vector,Catenate
0cc2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0cc3 0000 0000  |    |		.BLANK	0000[0x5]
0cc8 ; --------------------------------------------------------------------------------------
0cc8 ; SUBPROGRAM
0cc8 ; --------------------------------------------------------------------------------------
0cc8 0ccb       |    |		.CONST	0x0ccb								; Address of begin
0cc9 0004       |    |		.CONST	0x0004								; Address of exception handler
0cca 0001       |    |		.CONST	0x0001								; Number of locals
0ccb			BODY_0cc8:
0ccb			INIT_0cc8:
0ccb 00db       |    |		Load_Top	At_Offset_3
0ccc 3c0e       |<   |		Execute	Record,Field_Read,Field_Number 0xe
0ccd 7009       |p   |		Jump_Nonzero	0xcd7
0cce 00db       |    |		Load_Top	At_Offset_3
0ccf 3c0f       |<   |		Execute	Record,Field_Read,Field_Number 0xf
0cd0 7006       |p   |		Jump_Nonzero	0xcd7
0cd1 00db       |    |		Load_Top	At_Offset_3
0cd2 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0cd3 7003       |p   |		Jump_Nonzero	0xcd7
0cd4 00db       |    |		Load_Top	At_Offset_3
0cd5 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
0cd6 683c       |h<  |		Jump_Zero	0xd13
0cd7 00da       |    |		Load_Top	At_Offset_2
0cd8 804d       | M  |		Call	0x0,0x4d
0cd9 0092 1289  |    |		Action	Push_String_Extended,0x1289					; ": "
0cdb 01cc       |    |		Execute	Vector,Catenate
0cdc 8048       | H  |		Call	0x0,0x48
0cdd 00db       |    |		Load_Top	At_Offset_3
0cde 3c0e       |<   |		Execute	Record,Field_Read,Field_Number 0xe
0cdf 6803       |h   |		Jump_Zero	0xce3
0ce0 0092 128a  |    |		Action	Push_String_Extended,0x128a					; " Tracing"
0ce2 8048       | H  |		Call	0x0,0x48
0ce3 00db       |    |		Load_Top	At_Offset_3
0ce4 3c0f       |<   |		Execute	Record,Field_Read,Field_Number 0xf
0ce5 6803       |h   |		Jump_Zero	0xce9
0ce6 0092 128b  |    |		Action	Push_String_Extended,0x128b					; " Exc Tracing"
0ce8 8048       | H  |		Call	0x0,0x48
0ce9 00db       |    |		Load_Top	At_Offset_3
0cea 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0ceb 6808       |h   |		Jump_Zero	0xcf4
0cec 0092 128c  |    |		Action	Push_String_Extended,0x128c					; " Stop, action="
0cee e7fe       |    |		Load	0x3,-0x2
0cef 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
0cf0 00e0       |    |		Load_Encached	Standard_Cache
0cf1 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0cf2 01cc       |    |		Execute	Vector,Catenate
0cf3 8048       | H  |		Call	0x0,0x48
0cf4 00db       |    |		Load_Top	At_Offset_3
0cf5 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
0cf6 681b       |h   |		Jump_Zero	0xd12
0cf7 0092 128d  |    |		Action	Push_String_Extended,0x128d					; " Stepping: "
0cf9 e7fe       |    |		Load	0x3,-0x2
0cfa 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
0cfb 00e0       |    |		Load_Encached	Standard_Cache
0cfc 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0cfd 01cc       |    |		Execute	Vector,Catenate
0cfe 0092 128e  |    |		Action	Push_String_Extended,0x128e					; " level=#"
0d00 01cc       |    |		Execute	Vector,Catenate
0d01 4820       |H   |		Short_Literal	0x20
0d02 4800       |H   |		Short_Literal	0x0
0d03 4810       |H   |		Short_Literal	0x10
0d04 e7fe       |    |		Load	0x3,-0x2
0d05 3c0c       |<   |		Execute	Record,Field_Read,Field_Number 0xc
0d06 e04e       | N  |		Load	0x0,0x4e
0d07 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0d08 01cc       |    |		Execute	Vector,Catenate
0d09 0092 128f  |    |		Action	Push_String_Extended,0x128f					; " action="
0d0b 01cc       |    |		Execute	Vector,Catenate
0d0c e7fe       |    |		Load	0x3,-0x2
0d0d 3c0d       |<   |		Execute	Record,Field_Read,Field_Number 0xd
0d0e 00e0       |    |		Load_Encached	Standard_Cache
0d0f 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0d10 01cc       |    |		Execute	Vector,Catenate
0d11 8048       | H  |		Call	0x0,0x48
0d12 8049       | I  |		Call	0x0,0x49
0d13 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0d14 0000 0000  |    |		.BLANK	0000[0x4]
0d18 ; --------------------------------------------------------------------------------------
0d18 ; SUBPROGRAM
0d18 ; --------------------------------------------------------------------------------------
0d18 0d1b       |    |		.CONST	0x0d1b								; Address of begin
0d19 0004       |    |		.CONST	0x0004								; Address of exception handler
0d1a 0001       |    |		.CONST	0x0001								; Number of locals
0d1b			BODY_0d18:
0d1b			INIT_0d18:
0d1b 00da       |    |		Load_Top	At_Offset_2
0d1c 804d       | M  |		Call	0x0,0x4d
0d1d 0092 1290  |    |		Action	Push_String_Extended,0x1290					; " DB mask= "
0d1f 01cc       |    |		Execute	Vector,Catenate
0d20 4820       |H   |		Short_Literal	0x20
0d21 4800       |H   |		Short_Literal	0x0
0d22 4810       |H   |		Short_Literal	0x10
0d23 e7fe       |    |		Load	0x3,-0x2
0d24 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0d25 e04e       | N  |		Load	0x0,0x4e
0d26 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0d27 01cc       |    |		Execute	Vector,Catenate
0d28 8048       | H  |		Call	0x0,0x48
0d29 8049       | I  |		Call	0x0,0x49
0d2a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0d2b 0000 0000  |    |		.BLANK	0000[0x5]
0d30 ; --------------------------------------------------------------------------------------
0d30 ; SUBPROGRAM
0d30 ; --------------------------------------------------------------------------------------
0d30 0d33       | 3  |		.CONST	0x0d33								; Address of begin
0d31 0004       |    |		.CONST	0x0004								; Address of exception handler
0d32 0001       |    |		.CONST	0x0001								; Number of locals
0d33			BODY_0d30:
0d33			INIT_0d30:
0d33 00da       |    |		Load_Top	At_Offset_2
0d34 804d       | M  |		Call	0x0,0x4d
0d35 0092 1291  |    |		Action	Push_String_Extended,0x1291					; " exc info:"
0d37 01cc       |    |		Execute	Vector,Catenate
0d38 e7fe       |    |		Load	0x3,-0x2
0d39 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0d3a e01c       |    |		Load	0x0,0x1c
0d3b 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0d3c 01cc       |    |		Execute	Vector,Catenate
0d3d 0092 1292  |    |		Action	Push_String_Extended,0x1292					; " "
0d3f 01cc       |    |		Execute	Vector,Catenate
0d40 e7fe       |    |		Load	0x3,-0x2
0d41 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0d42 e01c       |    |		Load	0x0,0x1c
0d43 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0d44 01cc       |    |		Execute	Vector,Catenate
0d45 8048       | H  |		Call	0x0,0x48
0d46 8049       | I  |		Call	0x0,0x49
0d47 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0d48 ; --------------------------------------------------------------------------------------
0d48 ; SUBPROGRAM
0d48 ; --------------------------------------------------------------------------------------
0d48 0d4b       | K  |		.CONST	0x0d4b								; Address of begin
0d49 0004       |    |		.CONST	0x0004								; Address of exception handler
0d4a 0001       |    |		.CONST	0x0001								; Number of locals
0d4b			BODY_0d48:
0d4b			INIT_0d48:
0d4b e7fd       |    |		Load	0x3,-0x3
0d4c 00e2       |    |		Load_Encached	Integer_Cache
0d4d 025e       | ^  |		Execute	Discrete,Convert
0d4e e7fe       |    |		Load	0x3,-0x2
0d4f e7ff       |    |		Load	0x3,-0x1
0d50 e025       | %  |		Load	0x0,0x25
0d51 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0d52 00d9       |    |		Load_Top	At_Offset_1
0d53 00d0       |    |		Action	Swap_Control
0d54 0260       | `  |		Execute	Discrete,In_Type
0d55 7001       |p   |		Jump_Nonzero	0xd57
0d56 0801       |    |		Execute_Immediate	Raise,0x1
0d57 8406       |    |		Call	0x2,0x6
0d58 00d1       |    |		Pop_Control	Pop_Count_1
0d59 c7fd       |    |		Store	0x3,-0x3
0d5a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0d5b 0000 0000  |    |		.BLANK	0000[0x5]
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 e7fd       |    |		Load	0x3,-0x3
0d64 00d8       |    |		Load_Top	At_Offset_0
0d65 00e2       |    |		Load_Encached	Integer_Cache
0d66 0260       | `  |		Execute	Discrete,In_Type
0d67 7001       |p   |		Jump_Nonzero	0xd69
0d68 0801       |    |		Execute_Immediate	Raise,0x1
0d69 e7fe       |    |		Load	0x3,-0x2
0d6a e7ff       |    |		Load	0x3,-0x1
0d6b e025       | %  |		Load	0x0,0x25
0d6c 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0d6d 00d9       |    |		Load_Top	At_Offset_1
0d6e 00d0       |    |		Action	Swap_Control
0d6f 0260       | `  |		Execute	Discrete,In_Type
0d70 7001       |p   |		Jump_Nonzero	0xd72
0d71 0801       |    |		Execute_Immediate	Raise,0x1
0d72 8065       | e  |		Call	0x0,0x65
0d73 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0d74 0000 0000  |    |		.BLANK	0000[0x4]
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 e7fd       |    |		Load	0x3,-0x3
0d7c 00e2       |    |		Load_Encached	Integer_Cache
0d7d 025e       | ^  |		Execute	Discrete,Convert
0d7e e7fe       |    |		Load	0x3,-0x2
0d7f e7ff       |    |		Load	0x3,-0x1
0d80 e025       | %  |		Load	0x0,0x25
0d81 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0d82 00d9       |    |		Load_Top	At_Offset_1
0d83 00d0       |    |		Action	Swap_Control
0d84 0260       | `  |		Execute	Discrete,In_Type
0d85 7001       |p   |		Jump_Nonzero	0xd87
0d86 0801       |    |		Execute_Immediate	Raise,0x1
0d87 8407       |    |		Call	0x2,0x7
0d88 00d1       |    |		Pop_Control	Pop_Count_1
0d89 c7fd       |    |		Store	0x3,-0x3
0d8a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0d8b 0000 0000  |    |		.BLANK	0000[0x5]
0d90 ; --------------------------------------------------------------------------------------
0d90 ; SUBPROGRAM
0d90 ; --------------------------------------------------------------------------------------
0d90 0d93       |    |		.CONST	0x0d93								; Address of begin
0d91 0004       |    |		.CONST	0x0004								; Address of exception handler
0d92 0001       |    |		.CONST	0x0001								; Number of locals
0d93			BODY_0d90:
0d93			INIT_0d90:
0d93 e7fd       |    |		Load	0x3,-0x3
0d94 00d8       |    |		Load_Top	At_Offset_0
0d95 00e2       |    |		Load_Encached	Integer_Cache
0d96 0260       | `  |		Execute	Discrete,In_Type
0d97 7001       |p   |		Jump_Nonzero	0xd99
0d98 0801       |    |		Execute_Immediate	Raise,0x1
0d99 e7fe       |    |		Load	0x3,-0x2
0d9a e7ff       |    |		Load	0x3,-0x1
0d9b e025       | %  |		Load	0x0,0x25
0d9c 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0d9d 00d9       |    |		Load_Top	At_Offset_1
0d9e 00d0       |    |		Action	Swap_Control
0d9f 0260       | `  |		Execute	Discrete,In_Type
0da0 7001       |p   |		Jump_Nonzero	0xda2
0da1 0801       |    |		Execute_Immediate	Raise,0x1
0da2 8065       | e  |		Call	0x0,0x65
0da3 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
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 e7fd       |    |		Load	0x3,-0x3
0dac 00e2       |    |		Load_Encached	Integer_Cache
0dad 025e       | ^  |		Execute	Discrete,Convert
0dae e7fe       |    |		Load	0x3,-0x2
0daf e7ff       |    |		Load	0x3,-0x1
0db0 e025       | %  |		Load	0x0,0x25
0db1 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0db2 00d9       |    |		Load_Top	At_Offset_1
0db3 00d0       |    |		Action	Swap_Control
0db4 0260       | `  |		Execute	Discrete,In_Type
0db5 7001       |p   |		Jump_Nonzero	0xdb7
0db6 0801       |    |		Execute_Immediate	Raise,0x1
0db7 8408       |    |		Call	0x2,0x8
0db8 00d1       |    |		Pop_Control	Pop_Count_1
0db9 c7fd       |    |		Store	0x3,-0x3
0dba 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0dbb 0000 0000  |    |		.BLANK	0000[0x5]
0dc0 ; --------------------------------------------------------------------------------------
0dc0 ; SUBPROGRAM
0dc0 ; --------------------------------------------------------------------------------------
0dc0 0dc3       |    |		.CONST	0x0dc3								; Address of begin
0dc1 0004       |    |		.CONST	0x0004								; Address of exception handler
0dc2 0001       |    |		.CONST	0x0001								; Number of locals
0dc3			BODY_0dc0:
0dc3			INIT_0dc0:
0dc3 e7fd       |    |		Load	0x3,-0x3
0dc4 00d8       |    |		Load_Top	At_Offset_0
0dc5 00e2       |    |		Load_Encached	Integer_Cache
0dc6 0260       | `  |		Execute	Discrete,In_Type
0dc7 7001       |p   |		Jump_Nonzero	0xdc9
0dc8 0801       |    |		Execute_Immediate	Raise,0x1
0dc9 e7fe       |    |		Load	0x3,-0x2
0dca e7ff       |    |		Load	0x3,-0x1
0dcb e025       | %  |		Load	0x0,0x25
0dcc 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0dcd 00d9       |    |		Load_Top	At_Offset_1
0dce 00d0       |    |		Action	Swap_Control
0dcf 0260       | `  |		Execute	Discrete,In_Type
0dd0 7001       |p   |		Jump_Nonzero	0xdd2
0dd1 0801       |    |		Execute_Immediate	Raise,0x1
0dd2 8065       | e  |		Call	0x0,0x65
0dd3 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0dd4 0000 0000  |    |		.BLANK	0000[0x4]
0dd8 ; --------------------------------------------------------------------------------------
0dd8 ; SUBPROGRAM
0dd8 ; --------------------------------------------------------------------------------------
0dd8 0de3       |    |		.CONST	0x0de3								; Address of begin
0dd9 0004       |    |		.CONST	0x0004								; Address of exception handler
0dda 0003       |    |		.CONST	0x0003								; Number of locals
0ddb			INIT_0dd8:
0ddb e428       | (  |		Load	0x2,0x28
0ddc e24d       | M  |		Load	0x1,0x4d
0ddd 01d5       |    |		Execute	Vector,Field_Reference
0dde 0007       |    |		Action	Break_Optional
0ddf e428       | (  |		Load	0x2,0x28
0de0 e24f       | O  |		Load	0x1,0x4f
0de1 01d5       |    |		Execute	Vector,Field_Reference
0de2 0007       |    |		Action	Break_Optional
0de3			BODY_0dd8:
0de3 00d9       |    |		Load_Top	At_Offset_1
0de4 e027       | '  |		Load	0x0,0x27
0de5 027f       |    |		Execute	Discrete,Equal
0de6 702a       |p*  |		Jump_Nonzero	0xe11
0de7 0092 1293  |    |		Action	Push_String_Extended,0x1293					; "Task=all, Pc="
0de9 00da       |    |		Load_Top	At_Offset_2
0dea e01c       |    |		Load	0x0,0x1c
0deb 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0dec 01cc       |    |		Execute	Vector,Catenate
0ded 0092 1294  |    |		Action	Push_String_Extended,0x1294					; " Id="
0def 01cc       |    |		Execute	Vector,Catenate
0df0 00d9       |    |		Load_Top	At_Offset_1
0df1 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0df2 00e0       |    |		Load_Encached	Standard_Cache
0df3 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0df4 01cc       |    |		Execute	Vector,Catenate
0df5 0092 1295  |    |		Action	Push_String_Extended,0x1295					; "  "
0df7 01cc       |    |		Execute	Vector,Catenate
0df8 00d9       |    |		Load_Top	At_Offset_1
0df9 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0dfa 00e0       |    |		Load_Encached	Standard_Cache
0dfb 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0dfc 01cc       |    |		Execute	Vector,Catenate
0dfd 0092 1296  |    |		Action	Push_String_Extended,0x1296					; " /"
0dff 01cc       |    |		Execute	Vector,Catenate
0e00 00d9       |    |		Load_Top	At_Offset_1
0e01 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0e02 00e0       |    |		Load_Encached	Standard_Cache
0e03 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0e04 01cc       |    |		Execute	Vector,Catenate
0e05 8048       | H  |		Call	0x0,0x48
0e06 00d8       |    |		Load_Top	At_Offset_0
0e07 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0e08 6803       |h   |		Jump_Zero	0xe0c
0e09 0092 1297  |    |		Action	Push_String_Extended,0x1297					; "  T"
0e0b 8048       | H  |		Call	0x0,0x48
0e0c 00d8       |    |		Load_Top	At_Offset_0
0e0d 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
0e0e 8403       |    |		Call	0x2,0x3
0e0f 8048       | H  |		Call	0x0,0x48
0e10 8049       | I  |		Call	0x0,0x49
0e11 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0e12 0000 0000  |    |		.BLANK	0000[0x6]
0e18 ; --------------------------------------------------------------------------------------
0e18 ; SUBPROGRAM
0e18 ; --------------------------------------------------------------------------------------
0e18 0e1f       |    |		.CONST	0x0e1f								; Address of begin
0e19 0004       |    |		.CONST	0x0004								; Address of exception handler
0e1a 0002       |    |		.CONST	0x0002								; Number of locals
0e1b			INIT_0e18:
0e1b e428       | (  |		Load	0x2,0x28
0e1c e253       | S  |		Load	0x1,0x53
0e1d 01d5       |    |		Execute	Vector,Field_Reference
0e1e 0007       |    |		Action	Break_Optional
0e1f			BODY_0e18:
0e1f 00d8       |    |		Load_Top	At_Offset_0
0e20 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0e21 e027       | '  |		Load	0x0,0x27
0e22 027f       |    |		Execute	Discrete,Equal
0e23 7032       |p2  |		Jump_Nonzero	0xe56
0e24 0092 1298  |    |		Action	Push_String_Extended,0x1298					; "Task: "
0e26 00d9       |    |		Load_Top	At_Offset_1
0e27 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0e28 804d       | M  |		Call	0x0,0x4d
0e29 01cc       |    |		Execute	Vector,Catenate
0e2a 0092 1299  |    |		Action	Push_String_Extended,0x1299					; " Pc="
0e2c 01cc       |    |		Execute	Vector,Catenate
0e2d 00d9       |    |		Load_Top	At_Offset_1
0e2e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0e2f e01c       |    |		Load	0x0,0x1c
0e30 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0e31 01cc       |    |		Execute	Vector,Catenate
0e32 0092 1294  |    |		Action	Push_String_Extended,0x1294					; " Id="
0e34 01cc       |    |		Execute	Vector,Catenate
0e35 00d9       |    |		Load_Top	At_Offset_1
0e36 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0e37 00e0       |    |		Load_Encached	Standard_Cache
0e38 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0e39 01cc       |    |		Execute	Vector,Catenate
0e3a 0092 1295  |    |		Action	Push_String_Extended,0x1295					; "  "
0e3c 01cc       |    |		Execute	Vector,Catenate
0e3d 00d9       |    |		Load_Top	At_Offset_1
0e3e 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0e3f 00e0       |    |		Load_Encached	Standard_Cache
0e40 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0e41 01cc       |    |		Execute	Vector,Catenate
0e42 0092 1296  |    |		Action	Push_String_Extended,0x1296					; " /"
0e44 01cc       |    |		Execute	Vector,Catenate
0e45 00d9       |    |		Load_Top	At_Offset_1
0e46 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0e47 00e0       |    |		Load_Encached	Standard_Cache
0e48 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0e49 01cc       |    |		Execute	Vector,Catenate
0e4a 8048       | H  |		Call	0x0,0x48
0e4b 00d8       |    |		Load_Top	At_Offset_0
0e4c 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0e4d 6803       |h   |		Jump_Zero	0xe51
0e4e 0092 1297  |    |		Action	Push_String_Extended,0x1297					; "  T"
0e50 8048       | H  |		Call	0x0,0x48
0e51 00d8       |    |		Load_Top	At_Offset_0
0e52 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0e53 8403       |    |		Call	0x2,0x3
0e54 8048       | H  |		Call	0x0,0x48
0e55 8049       | I  |		Call	0x0,0x49
0e56 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0e57 0000       |    |		.XXX[0x1]
0e58 ; --------------------------------------------------------------------------------------
0e58 ; SUBPROGRAM
0e58 ; --------------------------------------------------------------------------------------
0e58 0e5f       | _  |		.CONST	0x0e5f								; Address of begin
0e59 0004       |    |		.CONST	0x0004								; Address of exception handler
0e5a 0002       |    |		.CONST	0x0002								; Number of locals
0e5b			INIT_0e58:
0e5b e428       | (  |		Load	0x2,0x28
0e5c e268       | h  |		Load	0x1,0x68
0e5d 01d5       |    |		Execute	Vector,Field_Reference
0e5e 0007       |    |		Action	Break_Optional
0e5f			BODY_0e58:
0e5f 00d8       |    |		Load_Top	At_Offset_0
0e60 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0e61 e01e       |    |		Load	0x0,0x1e
0e62 027e       | ~  |		Execute	Discrete,Not_Equal
0e63 685e       |h^  |		Jump_Zero	0xec2
0e64 e428       | (  |		Load	0x2,0x28
0e65 00e0       |    |		Load_Encached	Standard_Cache
0e66 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0e67 0092 1289  |    |		Action	Push_String_Extended,0x1289					; ": "
0e69 01cc       |    |		Execute	Vector,Catenate
0e6a 0092 129a  |    |		Action	Push_String_Extended,0x129a					; "Id="
0e6c 01cc       |    |		Execute	Vector,Catenate
0e6d 00d9       |    |		Load_Top	At_Offset_1
0e6e 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0e6f 00e0       |    |		Load_Encached	Standard_Cache
0e70 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0e71 01cc       |    |		Execute	Vector,Catenate
0e72 0092 1295  |    |		Action	Push_String_Extended,0x1295					; "  "
0e74 01cc       |    |		Execute	Vector,Catenate
0e75 8048       | H  |		Call	0x0,0x48
0e76 00d8       |    |		Load_Top	At_Offset_0
0e77 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0e78 e011       |    |		Load	0x0,0x11
0e79 027f       |    |		Execute	Discrete,Equal
0e7a 6804       |h   |		Jump_Zero	0xe7f
0e7b 0092 129b  |    |		Action	Push_String_Extended,0x129b					; "all"
0e7d 8048       | H  |		Call	0x0,0x48
0e7e 7804       |x   |		Jump	0xe83
0e7f 00d8       |    |		Load_Top	At_Offset_0
0e80 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0e81 804d       | M  |		Call	0x0,0x4d
0e82 8048       | H  |		Call	0x0,0x48
0e83 0092 129c  |    |		Action	Push_String_Extended,0x129c					; " Pri="
0e85 00d9       |    |		Load_Top	At_Offset_1
0e86 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0e87 00e0       |    |		Load_Encached	Standard_Cache
0e88 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0e89 01cc       |    |		Execute	Vector,Catenate
0e8a 8048       | H  |		Call	0x0,0x48
0e8b 0092 129d  |    |		Action	Push_String_Extended,0x129d					; " Action= "
0e8d 8048       | H  |		Call	0x0,0x48
0e8e 00d8       |    |		Load_Top	At_Offset_0
0e8f 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0e90 4605       |F   |		Jump_Case	0x6
0e91 7815       |x   |		Jump	0xea7								; case 0x0
0e92 7804       |x   |		Jump	0xe97								; case 0x1
0e93 7817       |x   |		Jump	0xeab								; case 0x2
0e94 780a       |x   |		Jump	0xe9f								; case 0x3
0e95 780d       |x   |		Jump	0xea3								; case 0x4
0e96 7800       |x   |		Jump	0xe97								; case 0x5
0e97 00d8       |    |		Load_Top	At_Offset_0
0e98 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0e99 e003       |    |		Load	0x0,0x3
0e9a 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0e9b 011c       |    |		Execute	Any,Convert_Unchecked
0e9c 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0e9d 8048       | H  |		Call	0x0,0x48
0e9e 780f       |x   |		Jump	0xeae
0e9f 0092 129e  |    |		Action	Push_String_Extended,0x129e					; "Propagate"
0ea1 8048       | H  |		Call	0x0,0x48
0ea2 780b       |x   |		Jump	0xeae
0ea3 0092 129f  |    |		Action	Push_String_Extended,0x129f					; "Catch"
0ea5 8048       | H  |		Call	0x0,0x48
0ea6 7807       |x   |		Jump	0xeae
0ea7 0092 12a0  |    |		Action	Push_String_Extended,0x12a0					; "History"
0ea9 8048       | H  |		Call	0x0,0x48
0eaa 7803       |x   |		Jump	0xeae
0eab 0092 12a1  |    |		Action	Push_String_Extended,0x12a1					; "Trace"
0ead 8048       | H  |		Call	0x0,0x48
0eae 0092 12a2  |    |		Action	Push_String_Extended,0x12a2					; " Exc= "
0eb0 00d9       |    |		Load_Top	At_Offset_1
0eb1 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0eb2 8066       | f  |		Call	0x0,0x66
0eb3 01cc       |    |		Execute	Vector,Catenate
0eb4 00d9       |    |		Load_Top	At_Offset_1
0eb5 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
0eb6 8403       |    |		Call	0x2,0x3
0eb7 01cc       |    |		Execute	Vector,Catenate
0eb8 00d9       |    |		Load_Top	At_Offset_1
0eb9 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0eba 8404       |    |		Call	0x2,0x4
0ebb 01cc       |    |		Execute	Vector,Catenate
0ebc 00d9       |    |		Load_Top	At_Offset_1
0ebd 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0ebe 8405       |    |		Call	0x2,0x5
0ebf 01cc       |    |		Execute	Vector,Catenate
0ec0 8048       | H  |		Call	0x0,0x48
0ec1 8049       | I  |		Call	0x0,0x49
0ec2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0ec3 0000 0000  |    |		.BLANK	0000[0x5]
0ec8 ; --------------------------------------------------------------------------------------
0ec8 ; SUBPROGRAM
0ec8 ; --------------------------------------------------------------------------------------
0ec8 0ecf       |    |		.CONST	0x0ecf								; Address of begin
0ec9 0004       |    |		.CONST	0x0004								; Address of exception handler
0eca 0002       |    |		.CONST	0x0002								; Number of locals
0ecb			INIT_0ec8:
0ecb e428       | (  |		Load	0x2,0x28
0ecc e25d       | ]  |		Load	0x1,0x5d
0ecd 01d5       |    |		Execute	Vector,Field_Reference
0ece 0007       |    |		Action	Break_Optional
0ecf			BODY_0ec8:
0ecf 00d8       |    |		Load_Top	At_Offset_0
0ed0 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0ed1 804d       | M  |		Call	0x0,0x4d
0ed2 0092 1285  |    |		Action	Push_String_Extended,0x1285					; " ["
0ed4 01cc       |    |		Execute	Vector,Catenate
0ed5 00d9       |    |		Load_Top	At_Offset_1
0ed6 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0ed7 e003       |    |		Load	0x0,0x3
0ed8 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0ed9 011c       |    |		Execute	Any,Convert_Unchecked
0eda 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0edb 01cc       |    |		Execute	Vector,Catenate
0edc 0092 1286  |    |		Action	Push_String_Extended,0x1286					; "]"
0ede 01cc       |    |		Execute	Vector,Catenate
0edf 00d9       |    |		Load_Top	At_Offset_1
0ee0 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0ee1 8403       |    |		Call	0x2,0x3
0ee2 01cc       |    |		Execute	Vector,Catenate
0ee3 0092 12a3  |    |		Action	Push_String_Extended,0x12a3					; " Low = "
0ee5 01cc       |    |		Execute	Vector,Catenate
0ee6 00d9       |    |		Load_Top	At_Offset_1
0ee7 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0ee8 e01c       |    |		Load	0x0,0x1c
0ee9 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0eea 01cc       |    |		Execute	Vector,Catenate
0eeb 0092 12a4  |    |		Action	Push_String_Extended,0x12a4					; " High = "
0eed 01cc       |    |		Execute	Vector,Catenate
0eee 00d9       |    |		Load_Top	At_Offset_1
0eef 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0ef0 e01c       |    |		Load	0x0,0x1c
0ef1 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0ef2 01cc       |    |		Execute	Vector,Catenate
0ef3 8048       | H  |		Call	0x0,0x48
0ef4 8049       | I  |		Call	0x0,0x49
0ef5 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0ef6 0000 0000  |    |		.XXX[0x2]
0ef8 ; --------------------------------------------------------------------------------------
0ef8 ; SUBPROGRAM
0ef8 ; --------------------------------------------------------------------------------------
0ef8 0eff       |    |		.CONST	0x0eff								; Address of begin
0ef9 0004       |    |		.CONST	0x0004								; Address of exception handler
0efa 0002       |    |		.CONST	0x0002								; Number of locals
0efb			INIT_0ef8:
0efb e428       | (  |		Load	0x2,0x28
0efc e258       | X  |		Load	0x1,0x58
0efd 01d5       |    |		Execute	Vector,Field_Reference
0efe 0007       |    |		Action	Break_Optional
0eff			BODY_0ef8:
0eff 00d8       |    |		Load_Top	At_Offset_0
0f00 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0f01 e01e       |    |		Load	0x0,0x1e
0f02 027e       | ~  |		Execute	Discrete,Not_Equal
0f03 682a       |h*  |		Jump_Zero	0xf2e
0f04 e428       | (  |		Load	0x2,0x28
0f05 00e0       |    |		Load_Encached	Standard_Cache
0f06 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0f07 0092 1289  |    |		Action	Push_String_Extended,0x1289					; ": "
0f09 01cc       |    |		Execute	Vector,Catenate
0f0a 8048       | H  |		Call	0x0,0x48
0f0b 00d8       |    |		Load_Top	At_Offset_0
0f0c 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0f0d e003       |    |		Load	0x0,0x3
0f0e 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0f0f 011c       |    |		Execute	Any,Convert_Unchecked
0f10 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0f11 8048       | H  |		Call	0x0,0x48
0f12 0092 12a5  |    |		Action	Push_String_Extended,0x12a5					; " Action="
0f14 00d9       |    |		Load_Top	At_Offset_1
0f15 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0f16 00e0       |    |		Load_Encached	Standard_Cache
0f17 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0f18 01cc       |    |		Execute	Vector,Catenate
0f19 0092 1295  |    |		Action	Push_String_Extended,0x1295					; "  "
0f1b 01cc       |    |		Execute	Vector,Catenate
0f1c 00d9       |    |		Load_Top	At_Offset_1
0f1d 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0f1e 804d       | M  |		Call	0x0,0x4d
0f1f 01cc       |    |		Execute	Vector,Catenate
0f20 00d9       |    |		Load_Top	At_Offset_1
0f21 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
0f22 8403       |    |		Call	0x2,0x3
0f23 01cc       |    |		Execute	Vector,Catenate
0f24 00d9       |    |		Load_Top	At_Offset_1
0f25 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
0f26 8404       |    |		Call	0x2,0x4
0f27 01cc       |    |		Execute	Vector,Catenate
0f28 00d9       |    |		Load_Top	At_Offset_1
0f29 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0f2a 8405       |    |		Call	0x2,0x5
0f2b 01cc       |    |		Execute	Vector,Catenate
0f2c 8048       | H  |		Call	0x0,0x48
0f2d 8049       | I  |		Call	0x0,0x49
0f2e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0f2f 0000       |    |		.XXX[0x1]
0f30 ; --------------------------------------------------------------------------------------
0f30 ; SUBPROGRAM
0f30 ; --------------------------------------------------------------------------------------
0f30 0f38       | 8  |		.CONST	0x0f38								; Address of begin
0f31 0004       |    |		.CONST	0x0004								; Address of exception handler
0f32 0003       |    |		.CONST	0x0003								; Number of locals
0f33			INIT_0f30:
0f33 e407       |    |		Load	0x2,0x7
0f34 e268       | h  |		Load	0x1,0x68
0f35 01d5       |    |		Execute	Vector,Field_Reference
0f36 029f 1083  |    |		Declare_Subprogram	INIT_1080,For_Call
0f38			BODY_0f30:
0f38 00d9       |    |		Load_Top	At_Offset_1
0f39 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0f3a e01e       |    |		Load	0x0,0x1e
0f3b 027e       | ~  |		Execute	Discrete,Not_Equal
0f3c 683e       |h>  |		Jump_Zero	0xf7b
0f3d 00d9       |    |		Load_Top	At_Offset_1
0f3e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0f3f e011       |    |		Load	0x0,0x11
0f40 027f       |    |		Execute	Discrete,Equal
0f41 7005       |p   |		Jump_Nonzero	0xf47
0f42 00d9       |    |		Load_Top	At_Offset_1
0f43 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0f44 e5fe       |    |		Load	0x2,-0x2
0f45 027f       |    |		Execute	Discrete,Equal
0f46 6834       |h4  |		Jump_Zero	0xf7b
0f47 00d9       |    |		Load_Top	At_Offset_1
0f48 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0f49 8067       | g  |		Call	0x0,0x67
0f4a 7006       |p   |		Jump_Nonzero	0xf51
0f4b 00d9       |    |		Load_Top	At_Offset_1
0f4c 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0f4d 8068       | h  |		Call	0x0,0x68
0f4e e5ff       |    |		Load	0x2,-0x1
0f4f 8069       | i  |		Call	0x0,0x69
0f50 682a       |h*  |		Jump_Zero	0xf7b
0f51 00d9       |    |		Load_Top	At_Offset_1
0f52 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0f53 e061       | a  |		Load	0x0,0x61
0f54 017f       |    |		Execute	Record,Equal
0f55 6824       |h$  |		Jump_Zero	0xf7a
0f56 00d9       |    |		Load_Top	At_Offset_1
0f57 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0f58 e063       | c  |		Load	0x0,0x63
0f59 027f       |    |		Execute	Discrete,Equal
0f5a 681f       |h   |		Jump_Zero	0xf7a
0f5b 00d9       |    |		Load_Top	At_Offset_1
0f5c 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
0f5d e05c       | \  |		Load	0x0,0x5c
0f5e 017f       |    |		Execute	Record,Equal
0f5f 681a       |h   |		Jump_Zero	0xf7a
0f60 00d9       |    |		Load_Top	At_Offset_1
0f61 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0f62 0f02       |    |		Execute_Immediate	Equal,0x2
0f63 6804       |h   |		Jump_Zero	0xf68
0f64 00d9       |    |		Load_Top	At_Offset_1
0f65 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0f66 a5fb       |    |		Store_Unchecked	0x2,-0x5
0f67 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0f68 00d9       |    |		Load_Top	At_Offset_1
0f69 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0f6a 7004       |p   |		Jump_Nonzero	0xf6f
0f6b 00d9       |    |		Load_Top	At_Offset_1
0f6c 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0f6d a5f9       |    |		Store_Unchecked	0x2,-0x7
0f6e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0f6f 00d9       |    |		Load_Top	At_Offset_1
0f70 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0f71 e403       |    |		Load	0x2,0x3
0f72 027d       | }  |		Execute	Discrete,Greater
0f73 6805       |h   |		Jump_Zero	0xf79
0f74 00d9       |    |		Load_Top	At_Offset_1
0f75 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0f76 a403       |    |		Store_Unchecked	0x2,0x3
0f77 e407       |    |		Load	0x2,0x7
0f78 a402       |    |		Store_Unchecked	0x2,0x2
0f79 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0f7a 8603       |    |		Call	0x3,0x3
0f7b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0f7c 0000 0000  |    |		.BLANK	0000[0x4]
0f80 ; --------------------------------------------------------------------------------------
0f80 ; SUBPROGRAM
0f80 ; --------------------------------------------------------------------------------------
0f80 0f83       |    |		.CONST	0x0f83								; Address of begin
0f81 0004       |    |		.CONST	0x0004								; Address of exception handler
0f82 0001       |    |		.CONST	0x0001								; Number of locals
0f83			BODY_0f80:
0f83			INIT_0f80:
0f83 00da       |    |		Load_Top	At_Offset_2
0f84 e01e       |    |		Load	0x0,0x1e
0f85 027f       |    |		Execute	Discrete,Equal
0f86 6801       |h   |		Jump_Zero	0xf88
0f87 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0f88 00cf       |    |		Action	Mark_Auxiliary
0f89 e403       |    |		Load	0x2,0x3
0f8a 4801       |H   |		Short_Literal	0x1
0f8b 0263       | c  |		Execute	Discrete,Above_Bound
0f8c 700b       |p   |		Jump_Nonzero	0xf98
0f8d 00d8       |    |		Load_Top	At_Offset_0
0f8e e402       |    |		Load	0x2,0x2
0f8f 01d7       |    |		Execute	Vector,Field_Read
0f90 e7ff       |    |		Load	0x3,-0x1
0f91 027f       |    |		Execute	Discrete,Equal
0f92 6803       |h   |		Jump_Zero	0xf96
0f93 4801       |H   |		Short_Literal	0x1
0f94 a406       |    |		Store_Unchecked	0x2,0x6
0f95 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0f96 00c8       |    |		Action	Pop_Auxiliary_Range
0f97 3ff5       |?   |		Loop_Increasing	0xf8d
0f98 00ce       |    |		Action	Pop_Auxiliary
0f99 e403       |    |		Load	0x2,0x3
0f9a 0d28       | (  |		Execute_Immediate	Less,0x28
0f9b 6808       |h   |		Jump_Zero	0xfa4
0f9c e403       |    |		Load	0x2,0x3
0f9d 0a01       |    |		Execute_Immediate	Plus,0x1
0f9e c403       |    |		Store	0x2,0x3
0f9f 00da       |    |		Load_Top	At_Offset_2
0fa0 e403       |    |		Load	0x2,0x3
0fa1 e402       |    |		Load	0x2,0x2
0fa2 01d6       |    |		Execute	Vector,Field_Write
0fa3 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0fa4 0092 12a6  |    |		Action	Push_String_Extended,0x12a6					; "Action buffer overflow"
0fa6 803b       | ;  |		Call	0x0,0x3b
0fa7 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0fa8 ; --------------------------------------------------------------------------------------
0fa8 ; SUBPROGRAM
0fa8 ; --------------------------------------------------------------------------------------
0fa8 0fad       |    |		.CONST	0x0fad								; Address of begin
0fa9 0004       |    |		.CONST	0x0004								; Address of exception handler
0faa 0002       |    |		.CONST	0x0002								; Number of locals
0fab			INIT_0fa8:
0fab 029f 10b3  |    |		Declare_Subprogram	INIT_10b0,For_Call
0fad			BODY_0fa8:
0fad e7fe       |    |		Load	0x3,-0x2
0fae 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0faf 6806       |h   |		Jump_Zero	0xfb6
0fb0 e5fc       |    |		Load	0x2,-0x4
0fb1 805e       | ^  |		Call	0x0,0x5e
0fb2 6803       |h   |		Jump_Zero	0xfb6
0fb3 e7fe       |    |		Load	0x3,-0x2
0fb4 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
0fb5 8408       |    |		Call	0x2,0x8
0fb6 e7fe       |    |		Load	0x3,-0x2
0fb7 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
0fb8 6829       |h)  |		Jump_Zero	0xfe2
0fb9 e5fe       |    |		Load	0x2,-0x2
0fba e004       |    |		Load	0x0,0x4
0fbb 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
0fbc e7fe       |    |		Load	0x3,-0x2
0fbd 3c0c       |<   |		Execute	Record,Field_Read,Field_Number 0xc
0fbe 027c       | |  |		Execute	Discrete,Less
0fbf 6822       |h"  |		Jump_Zero	0xfe2
0fc0 e5fc       |    |		Load	0x2,-0x4
0fc1 805e       | ^  |		Call	0x0,0x5e
0fc2 681f       |h   |		Jump_Zero	0xfe2
0fc3 e7fe       |    |		Load	0x3,-0x2
0fc4 3c0d       |<   |		Execute	Record,Field_Read,Field_Number 0xd
0fc5 e5fd       |    |		Load	0x2,-0x3
0fc6 027f       |    |		Execute	Discrete,Equal
0fc7 7006       |p   |		Jump_Nonzero	0xfce
0fc8 e406       |    |		Load	0x2,0x6
0fc9 7004       |p   |		Jump_Nonzero	0xfce
0fca e5fd       |    |		Load	0x2,-0x3
0fcb e01e       |    |		Load	0x0,0x1e
0fcc 027f       |    |		Execute	Discrete,Equal
0fcd 6814       |h   |		Jump_Zero	0xfe2
0fce e7fe       |    |		Load	0x3,-0x2
0fcf 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
0fd0 0f01       |    |		Execute_Immediate	Equal,0x1
0fd1 680b       |h   |		Jump_Zero	0xfdd
0fd2 4800       |H   |		Short_Literal	0x0
0fd3 e7fe       |    |		Load	0x3,-0x2
0fd4 380b       |8   |		Execute	Record,Field_Write,Field_Number 0xb
0fd5 e7fe       |    |		Load	0x3,-0x2
0fd6 3c0d       |<   |		Execute	Record,Field_Read,Field_Number 0xd
0fd7 8408       |    |		Call	0x2,0x8
0fd8 00db       |    |		Load_Top	At_Offset_3
0fd9 4801       |H   |		Short_Literal	0x1
0fda e26c       | l  |		Load	0x1,0x6c
0fdb 171d       |    |		Execute	Task,Entry_Call,Field_Number 0x1d
0fdc 7805       |x   |		Jump	0xfe2
0fdd e7fe       |    |		Load	0x3,-0x2
0fde 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
0fdf 0aff       |    |		Execute_Immediate	Plus,-0x1
0fe0 e7fe       |    |		Load	0x3,-0x2
0fe1 380b       |8   |		Execute	Record,Field_Write,Field_Number 0xb
0fe2 e7fe       |    |		Load	0x3,-0x2
0fe3 3c0e       |<   |		Execute	Record,Field_Read,Field_Number 0xe
0fe4 6809       |h   |		Jump_Zero	0xfee
0fe5 00cf       |    |		Action	Mark_Auxiliary
0fe6 e259       | Y  |		Load	0x1,0x59
0fe7 4801       |H   |		Short_Literal	0x1
0fe8 0263       | c  |		Execute	Discrete,Above_Bound
0fe9 7003       |p   |		Jump_Nonzero	0xfed
0fea 8602       |    |		Call	0x3,0x2
0feb 00c8       |    |		Action	Pop_Auxiliary_Range
0fec 3ffd       |?   |		Loop_Increasing	0xfea
0fed 00ce       |    |		Action	Pop_Auxiliary
0fee 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0fef 0000       |    |		.XXX[0x1]
0ff0 ; --------------------------------------------------------------------------------------
0ff0 ; SUBPROGRAM
0ff0 ; --------------------------------------------------------------------------------------
0ff0 0ff3       |    |		.CONST	0x0ff3								; Address of begin
0ff1 0004       |    |		.CONST	0x0004								; Address of exception handler
0ff2 0001       |    |		.CONST	0x0001								; Number of locals
0ff3			BODY_0ff0:
0ff3			INIT_0ff0:
0ff3 e7fd       |    |		Load	0x3,-0x3
0ff4 00e2       |    |		Load_Encached	Integer_Cache
0ff5 025e       | ^  |		Execute	Discrete,Convert
0ff6 e7fe       |    |		Load	0x3,-0x2
0ff7 e7ff       |    |		Load	0x3,-0x1
0ff8 e025       | %  |		Load	0x0,0x25
0ff9 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0ffa 00d9       |    |		Load_Top	At_Offset_1
0ffb 00d0       |    |		Action	Swap_Control
0ffc 0260       | `  |		Execute	Discrete,In_Type
0ffd 7001       |p   |		Jump_Nonzero	0xfff
0ffe 0801       |    |		Execute_Immediate	Raise,0x1
0fff 8409       |    |		Call	0x2,0x9
1000 00d1       |    |		Pop_Control	Pop_Count_1
1001 c7fd       |    |		Store	0x3,-0x3
1002 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
1003 0000 0000  |    |		.BLANK	0000[0x5]
1008 ; --------------------------------------------------------------------------------------
1008 ; SUBPROGRAM
1008 ; --------------------------------------------------------------------------------------
1008 100b       |    |		.CONST	0x100b								; Address of begin
1009 0004       |    |		.CONST	0x0004								; Address of exception handler
100a 0001       |    |		.CONST	0x0001								; Number of locals
100b			BODY_1008:
100b			INIT_1008:
100b 00da       |    |		Load_Top	At_Offset_2
100c e24f       | O  |		Load	0x1,0x4f
100d 01d5       |    |		Execute	Vector,Field_Reference
100e 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
100f 6804       |h   |		Jump_Zero	0x1014
1010 00da       |    |		Load_Top	At_Offset_2
1011 4801       |H   |		Short_Literal	0x1
1012 e26c       | l  |		Load	0x1,0x6c
1013 171f       |    |		Execute	Task,Entry_Call,Field_Number 0x1f
1014 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
1015 0000 0000  |    |		.XXX[0x3]
1017 0000       |    |
1018 ; --------------------------------------------------------------------------------------
1018 ; SUBPROGRAM
1018 ; --------------------------------------------------------------------------------------
1018 101b       |    |		.CONST	0x101b								; Address of begin
1019 1035       | 5  |		.CONST	0x1035								; Address of exception handler
101a 0001       |    |		.CONST	0x0001								; Number of locals
101b			BODY_1018:
101b			INIT_1018:
101b e23f       | ?  |		Load	0x1,0x3f
101c 6817       |h   |		Jump_Zero	0x1034
101d 0092 1282  |    |		Action	Push_String_Extended,0x1282					; "Process_Action: exception: "
101f e03a       | :  |		Load	0x0,0x3a
1020 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
1021 01cc       |    |		Execute	Vector,Catenate
1022 803b       | ;  |		Call	0x0,0x3b
1023 00cf       |    |		Action	Mark_Auxiliary
1024 e403       |    |		Load	0x2,0x3
1025 4801       |H   |		Short_Literal	0x1
1026 0263       | c  |		Execute	Discrete,Above_Bound
1027 700b       |p   |		Jump_Nonzero	0x1033
1028 0092 12a7  |    |		Action	Push_String_Extended,0x12a7					; "Aid= "
102a 00d9       |    |		Load_Top	At_Offset_1
102b e402       |    |		Load	0x2,0x2
102c 01d7       |    |		Execute	Vector,Field_Read
102d 00e0       |    |		Load_Encached	Standard_Cache
102e 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
102f 01cc       |    |		Execute	Vector,Catenate
1030 803b       | ;  |		Call	0x0,0x3b
1031 00c8       |    |		Action	Pop_Auxiliary_Range
1032 3ff5       |?   |		Loop_Increasing	0x1028
1033 00ce       |    |		Action	Pop_Auxiliary
1034 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
1035			TRAP_1018:
1035 0007       |    |		Action	Break_Optional
1036 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
1037 0000       |    |		.XXX[0x1]
1038 ; --------------------------------------------------------------------------------------
1038 ; SUBPROGRAM
1038 ; --------------------------------------------------------------------------------------
1038 103f       | ?  |		.CONST	0x103f								; Address of begin
1039 0004       |    |		.CONST	0x0004								; Address of exception handler
103a 0002       |    |		.CONST	0x0002								; Number of locals
103b			INIT_1038:
103b e039       | 9  |		Load	0x0,0x39
103c 0322       | "  |		Declare_Variable	Record
103d 00d8       |    |		Load_Top	At_Offset_0
103e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
103f			BODY_1038:
103f 00d8       |    |		Load_Top	At_Offset_0
1040 e5fe       |    |		Load	0x2,-0x2
1041 803c       | <  |		Call	0x0,0x3c
1042 00d1       |    |		Pop_Control	Pop_Count_1
1043 00d8       |    |		Load_Top	At_Offset_0
1044 e5fd       |    |		Load	0x2,-0x3
1045 803d       | =  |		Call	0x0,0x3d
1046 00d1       |    |		Pop_Control	Pop_Count_1
1047 00d8       |    |		Load_Top	At_Offset_0
1048 e5ff       |    |		Load	0x2,-0x1
1049 806a       | j  |		Call	0x0,0x6a
104a 00d1       |    |		Pop_Control	Pop_Count_1
104b e5fe       |    |		Load	0x2,-0x2
104c e01e       |    |		Load	0x0,0x1e
104d e5fd       |    |		Load	0x2,-0x3
104e e5ff       |    |		Load	0x2,-0x1
104f 827e       | ~  |		Call	0x1,0x7e
1050 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
1051 0000 0000  |    |		.BLANK	0000[0x7]
1058 ; --------------------------------------------------------------------------------------
1058 ; SUBPROGRAM
1058 ; --------------------------------------------------------------------------------------
1058 1060       | `  |		.CONST	0x1060								; Address of begin
1059 0004       |    |		.CONST	0x0004								; Address of exception handler
105a 0003       |    |		.CONST	0x0003								; Number of locals
105b			INIT_1058:
105b e405       |    |		Load	0x2,0x5
105c e258       | X  |		Load	0x1,0x58
105d 01d5       |    |		Execute	Vector,Field_Reference
105e 029f 10fb  |    |		Declare_Subprogram	INIT_10f8,For_Call
1060			BODY_1058:
1060 00d9       |    |		Load_Top	At_Offset_1
1061 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
1062 e011       |    |		Load	0x0,0x11
1063 027f       |    |		Execute	Discrete,Equal
1064 7005       |p   |		Jump_Nonzero	0x106a
1065 00d9       |    |		Load_Top	At_Offset_1
1066 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
1067 e5ff       |    |		Load	0x2,-0x1
1068 027f       |    |		Execute	Discrete,Equal
1069 6814       |h   |		Jump_Zero	0x107e
106a 00d9       |    |		Load_Top	At_Offset_1
106b 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
106c e061       | a  |		Load	0x0,0x61
106d 017e       | ~  |		Execute	Record,Not_Equal
106e 700a       |p   |		Jump_Nonzero	0x1079
106f 00d9       |    |		Load_Top	At_Offset_1
1070 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
1071 e063       | c  |		Load	0x0,0x63
1072 027e       | ~  |		Execute	Discrete,Not_Equal
1073 7005       |p   |		Jump_Nonzero	0x1079
1074 00d9       |    |		Load_Top	At_Offset_1
1075 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
1076 e05c       | \  |		Load	0x0,0x5c
1077 017e       | ~  |		Execute	Record,Not_Equal
1078 6802       |h   |		Jump_Zero	0x107b
1079 8603       |    |		Call	0x3,0x3
107a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
107b 4801       |H   |		Short_Literal	0x1
107c 00cb       |    |		Action	Pop_Block_With_Result
107d 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
107e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
107f 0000       |    |		.XXX[0x1]
1080 ; --------------------------------------------------------------------------------------
1080 ; SUBPROGRAM
1080 ; --------------------------------------------------------------------------------------
1080 1092       |    |		.CONST	0x1092								; Address of begin
1081 0004       |    |		.CONST	0x0004								; Address of exception handler
1082 0007       |    |		.CONST	0x0007								; Number of locals
1083			INIT_1080:
1083 e039       | 9  |		Load	0x0,0x39
1084 0322       | "  |		Declare_Variable	Record
1085 00d8       |    |		Load_Top	At_Offset_0
1086 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1087 e005       |    |		Load	0x0,0x5
1088 0322       | "  |		Declare_Variable	Record
1089 00d8       |    |		Load_Top	At_Offset_0
108a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
108b 00e1       |    |		Load_Encached	Boolean_Cache
108c 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
108d e006       |    |		Load	0x0,0x6
108e 0322       | "  |		Declare_Variable	Record
108f e007       |    |		Load	0x0,0x7
1090 029f 112b  |   +|		Declare_Subprogram	INIT_1128,For_Call
1092			BODY_1080:
1092 e802       |    |		Load	0x4,0x2
1093 e5fd       |    |		Load	0x2,-0x3
1094 803c       | <  |		Call	0x0,0x3c
1095 00d1       |    |		Pop_Control	Pop_Count_1
1096 e802       |    |		Load	0x4,0x2
1097 8056       | V  |		Call	0x0,0x56
1098 00d1       |    |		Pop_Control	Pop_Count_1
1099 e802       |    |		Load	0x4,0x2
109a 806b       | k  |		Call	0x0,0x6b
109b 00db       |    |		Load_Top	At_Offset_3
109c 017d       | }  |		Execute	Record,Structure_Write
109d e802       |    |		Load	0x4,0x2
109e 806c       | l  |		Call	0x0,0x6c
109f 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
10a0 00cf       |    |		Action	Mark_Auxiliary
10a1 e269       | i  |		Load	0x1,0x69
10a2 e407       |    |		Load	0x2,0x7
10a3 0263       | c  |		Execute	Discrete,Above_Bound
10a4 7003       |p   |		Jump_Nonzero	0x10a8
10a5 8807       |    |		Call	0x4,0x7
10a6 00c8       |    |		Action	Pop_Auxiliary_Range
10a7 3ffd       |?   |		Loop_Increasing	0x10a5
10a8 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
10a9 0000 0000  |    |		.BLANK	0000[0x7]
10b0 ; --------------------------------------------------------------------------------------
10b0 ; SUBPROGRAM
10b0 ; --------------------------------------------------------------------------------------
10b0 10b7       |    |		.CONST	0x10b7								; Address of begin
10b1 0004       |    |		.CONST	0x0004								; Address of exception handler
10b2 0002       |    |		.CONST	0x0002								; Number of locals
10b3			INIT_10b0:
10b3 e605       |    |		Load	0x3,0x5
10b4 e258       | X  |		Load	0x1,0x58
10b5 01d5       |    |		Execute	Vector,Field_Reference
10b6 0007       |    |		Action	Break_Optional
10b7			BODY_10b0:
10b7 00d8       |    |		Load_Top	At_Offset_0
10b8 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
10b9 e011       |    |		Load	0x0,0x11
10ba 027f       |    |		Execute	Discrete,Equal
10bb 7005       |p   |		Jump_Nonzero	0x10c1
10bc 00d8       |    |		Load_Top	At_Offset_0
10bd 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
10be e7ff       |    |		Load	0x3,-0x1
10bf 027f       |    |		Execute	Discrete,Equal
10c0 6831       |h1  |		Jump_Zero	0x10f2
10c1 00d8       |    |		Load_Top	At_Offset_0
10c2 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
10c3 e061       | a  |		Load	0x0,0x61
10c4 017f       |    |		Execute	Record,Equal
10c5 7006       |p   |		Jump_Nonzero	0x10cc
10c6 00d8       |    |		Load_Top	At_Offset_0
10c7 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
10c8 e405       |    |		Load	0x2,0x5
10c9 806b       | k  |		Call	0x0,0x6b
10ca 017f       |    |		Execute	Record,Equal
10cb 6826       |h&  |		Jump_Zero	0x10f2
10cc 00d8       |    |		Load_Top	At_Offset_0
10cd 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
10ce e063       | c  |		Load	0x0,0x63
10cf 027f       |    |		Execute	Discrete,Equal
10d0 7006       |p   |		Jump_Nonzero	0x10d7
10d1 00d8       |    |		Load_Top	At_Offset_0
10d2 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
10d3 e405       |    |		Load	0x2,0x5
10d4 806c       | l  |		Call	0x0,0x6c
10d5 027f       |    |		Execute	Discrete,Equal
10d6 681b       |h   |		Jump_Zero	0x10f2
10d7 00d8       |    |		Load_Top	At_Offset_0
10d8 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
10d9 e05c       | \  |		Load	0x0,0x5c
10da 017f       |    |		Execute	Record,Equal
10db 7006       |p   |		Jump_Nonzero	0x10e2
10dc e405       |    |		Load	0x2,0x5
10dd 805d       | ]  |		Call	0x0,0x5d
10de 00d9       |    |		Load_Top	At_Offset_1
10df 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
10e0 8279       | y  |		Call	0x1,0x79
10e1 6810       |h   |		Jump_Zero	0x10f2
10e2 00d8       |    |		Load_Top	At_Offset_0
10e3 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
10e4 0f09       |    |		Execute_Immediate	Equal,0x9
10e5 7009       |p   |		Jump_Nonzero	0x10ef
10e6 00d8       |    |		Load_Top	At_Offset_0
10e7 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
10e8 7003       |p   |		Jump_Nonzero	0x10ec
10e9 e405       |    |		Load	0x2,0x5
10ea 806d       | m  |		Call	0x0,0x6d
10eb 7003       |p   |		Jump_Nonzero	0x10ef
10ec e405       |    |		Load	0x2,0x5
10ed 806e       | n  |		Call	0x0,0x6e
10ee 6803       |h   |		Jump_Zero	0x10f2
10ef 00d8       |    |		Load_Top	At_Offset_0
10f0 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
10f1 8408       |    |		Call	0x2,0x8
10f2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
10f3 0000 0000  |    |		.BLANK	0000[0x5]
10f8 ; --------------------------------------------------------------------------------------
10f8 ; SUBPROGRAM
10f8 ; --------------------------------------------------------------------------------------
10f8 110a       |    |		.CONST	0x110a								; Address of begin
10f9 0004       |    |		.CONST	0x0004								; Address of exception handler
10fa 0007       |    |		.CONST	0x0007								; Number of locals
10fb			INIT_10f8:
10fb e006       |    |		Load	0x0,0x6
10fc 0322       | "  |		Declare_Variable	Record
10fd 00e2       |    |		Load_Encached	Integer_Cache
10fe 00e1       |    |		Load_Encached	Boolean_Cache
10ff 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
1100 e005       |    |		Load	0x0,0x5
1101 0322       | "  |		Declare_Variable	Record
1102 00d8       |    |		Load_Top	At_Offset_0
1103 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1104 e039       | 9  |		Load	0x0,0x39
1105 0322       | "  |		Declare_Variable	Record
1106 00d8       |    |		Load_Top	At_Offset_0
1107 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1108 029f 119b  |    |		Declare_Subprogram	INIT_1198,For_Call
110a			BODY_10f8:
110a 00d9       |    |		Load_Top	At_Offset_1
110b e5fd       |    |		Load	0x2,-0x3
110c 803c       | <  |		Call	0x0,0x3c
110d 00d1       |    |		Pop_Control	Pop_Count_1
110e 00d9       |    |		Load_Top	At_Offset_1
110f 8056       | V  |		Call	0x0,0x56
1110 00d1       |    |		Pop_Control	Pop_Count_1
1111 00d9       |    |		Load_Top	At_Offset_1
1112 806b       | k  |		Call	0x0,0x6b
1113 e802       |    |		Load	0x4,0x2
1114 017d       | }  |		Execute	Record,Structure_Write
1115 00d9       |    |		Load_Top	At_Offset_1
1116 806c       | l  |		Call	0x0,0x6c
1117 a803       |    |		Store_Unchecked	0x4,0x3
1118 00cf       |    |		Action	Mark_Auxiliary
1119 e259       | Y  |		Load	0x1,0x59
111a e405       |    |		Load	0x2,0x5
111b 0263       | c  |		Execute	Discrete,Above_Bound
111c 7003       |p   |		Jump_Nonzero	0x1120
111d 8807       |    |		Call	0x4,0x7
111e 00c8       |    |		Action	Pop_Auxiliary_Range
111f 3ffd       |?   |		Loop_Increasing	0x111d
1120 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
1121 0000 0000  |    |		.BLANK	0000[0x7]
1128 ; --------------------------------------------------------------------------------------
1128 ; SUBPROGRAM
1128 ; --------------------------------------------------------------------------------------
1128 112f       | /  |		.CONST	0x112f								; Address of begin
1129 0004       |    |		.CONST	0x0004								; Address of exception handler
112a 0002       |    |		.CONST	0x0002								; Number of locals
112b			INIT_1128:
112b e80a       |    |		Load	0x4,0xa
112c e268       | h  |		Load	0x1,0x68
112d 01d5       |    |		Execute	Vector,Field_Reference
112e 0007       |    |		Action	Break_Optional
112f			BODY_1128:
112f 00d8       |    |		Load_Top	At_Offset_0
1130 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
1131 e01e       |    |		Load	0x0,0x1e
1132 027e       | ~  |		Execute	Discrete,Not_Equal
1133 6863       |hc  |		Jump_Zero	0x1197
1134 00d8       |    |		Load_Top	At_Offset_0
1135 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
1136 e011       |    |		Load	0x0,0x11
1137 027f       |    |		Execute	Discrete,Equal
1138 7005       |p   |		Jump_Nonzero	0x113e
1139 00d8       |    |		Load_Top	At_Offset_0
113a 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
113b e5fe       |    |		Load	0x2,-0x2
113c 027f       |    |		Execute	Discrete,Equal
113d 6859       |hY  |		Jump_Zero	0x1197
113e 00d8       |    |		Load_Top	At_Offset_0
113f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
1140 8067       | g  |		Call	0x0,0x67
1141 7006       |p   |		Jump_Nonzero	0x1148
1142 00d8       |    |		Load_Top	At_Offset_0
1143 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
1144 8068       | h  |		Call	0x0,0x68
1145 e5ff       |    |		Load	0x2,-0x1
1146 8069       | i  |		Call	0x0,0x69
1147 684f       |hO  |		Jump_Zero	0x1197
1148 00d8       |    |		Load_Top	At_Offset_0
1149 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
114a e061       | a  |		Load	0x0,0x61
114b 017f       |    |		Execute	Record,Equal
114c 7005       |p   |		Jump_Nonzero	0x1152
114d 00d8       |    |		Load_Top	At_Offset_0
114e 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
114f e805       |    |		Load	0x4,0x5
1150 017f       |    |		Execute	Record,Equal
1151 6845       |hE  |		Jump_Zero	0x1197
1152 00d8       |    |		Load_Top	At_Offset_0
1153 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
1154 e063       | c  |		Load	0x0,0x63
1155 027f       |    |		Execute	Discrete,Equal
1156 7005       |p   |		Jump_Nonzero	0x115c
1157 00d8       |    |		Load_Top	At_Offset_0
1158 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
1159 e806       |    |		Load	0x4,0x6
115a 027f       |    |		Execute	Discrete,Equal
115b 683b       |h;  |		Jump_Zero	0x1197
115c 00d8       |    |		Load_Top	At_Offset_0
115d 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
115e e05c       | \  |		Load	0x0,0x5c
115f 017f       |    |		Execute	Record,Equal
1160 6813       |h   |		Jump_Zero	0x1174
1161 00d8       |    |		Load_Top	At_Offset_0
1162 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
1163 0f02       |    |		Execute_Immediate	Equal,0x2
1164 6804       |h   |		Jump_Zero	0x1169
1165 00d8       |    |		Load_Top	At_Offset_0
1166 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
1167 a5fb       |    |		Store_Unchecked	0x2,-0x5
1168 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
1169 00d8       |    |		Load_Top	At_Offset_0
116a 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
116b e403       |    |		Load	0x2,0x3
116c 027d       | }  |		Execute	Discrete,Greater
116d 6805       |h   |		Jump_Zero	0x1173
116e 00d8       |    |		Load_Top	At_Offset_0
116f 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
1170 a403       |    |		Store_Unchecked	0x2,0x3
1171 e407       |    |		Load	0x2,0x7
1172 a402       |    |		Store_Unchecked	0x2,0x2
1173 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
1174 e804       |    |		Load	0x4,0x4
1175 700a       |p   |		Jump_Nonzero	0x1180
1176 e802       |    |		Load	0x4,0x2
1177 e5fc       |    |		Load	0x2,-0x4
1178 803d       | =  |		Call	0x0,0x3d
1179 00d1       |    |		Pop_Control	Pop_Count_1
117a e803       |    |		Load	0x4,0x3
117b e802       |    |		Load	0x4,0x2
117c 806f       | o  |		Call	0x0,0x6f
117d 00d2       |    |		Pop_Control	Pop_Count_2
117e 4801       |H   |		Short_Literal	0x1
117f a804       |    |		Store_Unchecked	0x4,0x4
1180 e803       |    |		Load	0x4,0x3
1181 00d9       |    |		Load_Top	At_Offset_1
1182 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
1183 8279       | y  |		Call	0x1,0x79
1184 6812       |h   |		Jump_Zero	0x1197
1185 00d8       |    |		Load_Top	At_Offset_0
1186 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
1187 0f02       |    |		Execute_Immediate	Equal,0x2
1188 6804       |h   |		Jump_Zero	0x118d
1189 00d8       |    |		Load_Top	At_Offset_0
118a 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
118b a5fb       |    |		Store_Unchecked	0x2,-0x5
118c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
118d 00d8       |    |		Load_Top	At_Offset_0
118e 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
118f e403       |    |		Load	0x2,0x3
1190 027d       | }  |		Execute	Discrete,Greater
1191 6805       |h   |		Jump_Zero	0x1197
1192 00d8       |    |		Load_Top	At_Offset_0
1193 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
1194 a403       |    |		Store_Unchecked	0x2,0x3
1195 e407       |    |		Load	0x2,0x7
1196 a402       |    |		Store_Unchecked	0x2,0x2
1197 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
1198 ; --------------------------------------------------------------------------------------
1198 ; SUBPROGRAM
1198 ; --------------------------------------------------------------------------------------
1198 119f       |    |		.CONST	0x119f								; Address of begin
1199 0004       |    |		.CONST	0x0004								; Address of exception handler
119a 0002       |    |		.CONST	0x0002								; Number of locals
119b			INIT_1198:
119b e80a       |    |		Load	0x4,0xa
119c e258       | X  |		Load	0x1,0x58
119d 01d5       |    |		Execute	Vector,Field_Reference
119e 0007       |    |		Action	Break_Optional
119f			BODY_1198:
119f 00d8       |    |		Load_Top	At_Offset_0
11a0 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
11a1 7003       |p   |		Jump_Nonzero	0x11a5
11a2 e5fd       |    |		Load	0x2,-0x3
11a3 805e       | ^  |		Call	0x0,0x5e
11a4 6830       |h0  |		Jump_Zero	0x11d5
11a5 00d8       |    |		Load_Top	At_Offset_0
11a6 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
11a7 e061       | a  |		Load	0x0,0x61
11a8 017f       |    |		Execute	Record,Equal
11a9 7005       |p   |		Jump_Nonzero	0x11af
11aa 00d8       |    |		Load_Top	At_Offset_0
11ab 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
11ac e802       |    |		Load	0x4,0x2
11ad 017f       |    |		Execute	Record,Equal
11ae 6826       |h&  |		Jump_Zero	0x11d5
11af 00d8       |    |		Load_Top	At_Offset_0
11b0 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
11b1 e063       | c  |		Load	0x0,0x63
11b2 027f       |    |		Execute	Discrete,Equal
11b3 7005       |p   |		Jump_Nonzero	0x11b9
11b4 00d8       |    |		Load_Top	At_Offset_0
11b5 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
11b6 e803       |    |		Load	0x4,0x3
11b7 027f       |    |		Execute	Discrete,Equal
11b8 681c       |h   |		Jump_Zero	0x11d5
11b9 00d8       |    |		Load_Top	At_Offset_0
11ba 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
11bb e05c       | \  |		Load	0x0,0x5c
11bc 017f       |    |		Execute	Record,Equal
11bd 6805       |h   |		Jump_Zero	0x11c3
11be 4801       |H   |		Short_Literal	0x1
11bf 00cb       |    |		Action	Pop_Block_With_Result
11c0 00cb       |    |		Action	Pop_Block_With_Result
11c1 00cb       |    |		Action	Pop_Block_With_Result
11c2 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
11c3 e804       |    |		Load	0x4,0x4
11c4 7006       |p   |		Jump_Nonzero	0x11cb
11c5 e805       |    |		Load	0x4,0x5
11c6 e806       |    |		Load	0x4,0x6
11c7 806f       | o  |		Call	0x0,0x6f
11c8 00d2       |    |		Pop_Control	Pop_Count_2
11c9 4801       |H   |		Short_Literal	0x1
11ca a804       |    |		Store_Unchecked	0x4,0x4
11cb e805       |    |		Load	0x4,0x5
11cc 00d9       |    |		Load_Top	At_Offset_1
11cd 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
11ce 8279       | y  |		Call	0x1,0x79
11cf 6805       |h   |		Jump_Zero	0x11d5
11d0 4801       |H   |		Short_Literal	0x1
11d1 00cb       |    |		Action	Pop_Block_With_Result
11d2 00cb       |    |		Action	Pop_Block_With_Result
11d3 00cb       |    |		Action	Pop_Block_With_Result
11d4 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
11d5 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
11d6 0000 0000  |    |		.XXX[0x2]
11d8 ; --------------------------------------------------------------------------------------
11d8 ; SUBPROGRAM
11d8 ; --------------------------------------------------------------------------------------
11d8 11e9       |    |		.CONST	0x11e9								; Address of begin
11d9 0004       |    |		.CONST	0x0004								; Address of exception handler
11da 0011       |    |		.CONST	0x0011								; Number of locals
11db			INIT_11d8:
11db 4804       |H   |		Short_Literal	0x4
11dc 02cb       |    |		Declare_Variable	Entry
11dd 4800       |H   |		Short_Literal	0x0
11de 02cb       |    |		Declare_Variable	Entry
11df 00bf       |    |		Action	Accept_Activation
11e0 e001       |    |		Load	0x0,0x1
11e1 0322       | "  |		Declare_Variable	Record
11e2 00d8       |    |		Load_Top	At_Offset_0
11e3 1c00       |    |		Execute_Immediate	Run_Utility,0x0
11e4 00e1       |    |		Load_Encached	Boolean_Cache
11e5 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
11e6 029f 11fb  |    |		Declare_Subprogram	INIT_11f8,For_Call
11e8 00bc       |    |		Action	Signal_Activated
11e9			BODY_11d8:
11e9 0092 12a8  |    |		Action	Push_String_Extended,0x12a8					; "Control.Inner.Creator"
11eb e002       |    |		Load	0x0,0x2
11ec 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
11ed 00cf       |    |		Action	Mark_Auxiliary
11ee 7802       |x   |		Jump	0x11f1
11ef 8211       |    |		Call	0x1,0x11
11f0 00c9       |    |		Action	Pop_Auxiliary_Loop
11f1 00da       |    |		Load_Top	At_Offset_2
11f2 77fc       |w   |		Jump_Nonzero	0x11ef
11f3 00ce       |    |		Action	Pop_Auxiliary
11f4 00bb       |    |		Action	Signal_Completion
11f5 0000 0000  |    |		.XXX[0x3]
11f7 0000       |    |
11f8 ; --------------------------------------------------------------------------------------
11f8 ; SUBPROGRAM
11f8 ; --------------------------------------------------------------------------------------
11f8 1204       |    |		.CONST	0x1204								; Address of begin
11f9 120d       |    |		.CONST	0x120d								; Address of exception handler
11fa 0002       |    |		.CONST	0x0002								; Number of locals
11fb			INIT_11f8:
11fb 480e 4a43  |H JC|		Declare_Variable	Select	0x000, 0x002,
11fd 480d 4a44  |H JD|				[0x000]: 0x000 = 0x0000,
11ff 4800 4800  |H H |				[0x00d]: 0x244 = 0x1220,
1201 4800 4802  |H H |				[0x00e]: 0x243 = 0x1218
1203 02cf       |    |
1204			BODY_11f8:
1204 00cf       |    |		Action	Mark_Auxiliary
1205 7804       |x   |		Jump	0x120a
1206 00d9       |    |		Load_Top	At_Offset_1
1207 013f       | ?  |		Execute	Select,Rendezvous
1208 00d1       |    |		Pop_Control	Pop_Count_1
1209 00c9       |    |		Action	Pop_Auxiliary_Loop
120a e210       |    |		Load	0x1,0x10
120b 77fa       |w   |		Jump_Nonzero	0x1206
120c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
120d			TRAP_11f8:
120d 0007       |    |		Action	Break_Optional
120e 0092 12a9  |    |		Action	Push_String_Extended,0x12a9					; "Creator: exception:"
1210 e002       |    |		Load	0x0,0x2
1211 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
1212 01cc       |    |		Execute	Vector,Catenate
1213 8003       |    |		Call	0x0,0x3
1214 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
1215 0000 0000  |    |		.XXX[0x3]
1217 0000       |    |
1218 ; --------------------------------------------------------------------------------------
1218 ; SUBPROGRAM
1218 ; See instruction 0x02cf at 0x11fb, index=0xe
1218 ; --------------------------------------------------------------------------------------
1218 121b       |    |		.CONST	0x121b								; Address of begin
1219 0004       |    |		.CONST	0x0004								; Address of exception handler
121a 0001       |    |		.CONST	0x0001								; Number of locals
121b			BODY_1218:
121b			INIT_1218:
121b 4800       |H   |		Short_Literal	0x0
121c a210       |    |		Store_Unchecked	0x1,0x10
121d 4100       |A   |		End_Rendezvous	0x0
121e 0000 0000  |    |		.XXX[0x2]
1220 ; --------------------------------------------------------------------------------------
1220 ; SUBPROGRAM
1220 ; See instruction 0x02cf at 0x11fb, index=0xd
1220 ; --------------------------------------------------------------------------------------
1220 1223       | #  |		.CONST	0x1223								; Address of begin
1221 0004       |    |		.CONST	0x0004								; Address of exception handler
1222 0001       |    |		.CONST	0x0001								; Number of locals
1223			BODY_1220:
1223			INIT_1220:
1223 029f 122b  |   +|		Declare_Subprogram	INIT_1228,For_Call
1225 8602       |    |		Call	0x3,0x2
1226 4101       |A   |		End_Rendezvous	0x1
1227 0000       |    |		.XXX[0x1]
1228 ; --------------------------------------------------------------------------------------
1228 ; SUBPROGRAM
1228 ; --------------------------------------------------------------------------------------
1228 122b       | +  |		.CONST	0x122b								; Address of begin
1229 0004       |    |		.CONST	0x0004								; Address of exception handler
122a 0001       |    |		.CONST	0x0001								; Number of locals
122b			BODY_1228:
122b			INIT_1228:
122b 4800       |H   |		Short_Literal	0x0
122c a7fb       |    |		Store_Unchecked	0x3,-0x5
122d e20f       |    |		Load	0x1,0xf
122e e7fd       |    |		Load	0x3,-0x3
122f 8004       |    |		Call	0x0,0x4
1230 00d1       |    |		Pop_Control	Pop_Count_1
1231 e20f       |    |		Load	0x1,0xf
1232 e7fc       |    |		Load	0x3,-0x4
1233 8005       |    |		Call	0x0,0x5
1234 00d1       |    |		Pop_Control	Pop_Count_1
1235 e20f       |    |		Load	0x1,0xf
1236 e7fe       |    |		Load	0x3,-0x2
1237 8006       |    |		Call	0x0,0x6
1238 00d1       |    |		Pop_Control	Pop_Count_1
1239 8007       |    |		Call	0x0,0x7
123a 6807       |h   |		Jump_Zero	0x1242
123b e7fe       |    |		Load	0x3,-0x2
123c e008       |    |		Load	0x0,0x8
123d 183c       | <  |		Execute	Package,Field_Execute,Field_Number 0x3c
123e 7003       |p   |		Jump_Nonzero	0x1242
123f 4801       |H   |		Short_Literal	0x1
1240 a7fb       |    |		Store_Unchecked	0x3,-0x5
1241 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
1242 e009       |    |		Load	0x0,0x9
1243 6803       |h   |		Jump_Zero	0x1247
1244 4801       |H   |		Short_Literal	0x1
1245 a7fb       |    |		Store_Unchecked	0x3,-0x5
1246 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
1247 00cf       |    |		Action	Mark_Auxiliary
1248 e00a       |    |		Load	0x0,0xa
1249 4801       |H   |		Short_Literal	0x1
124a 0263       | c  |		Execute	Discrete,Above_Bound
124b 700c       |p   |		Jump_Nonzero	0x1258
124c e7fd       |    |		Load	0x3,-0x3
124d 00d9       |    |		Load_Top	At_Offset_1
124e e00b       |    |		Load	0x0,0xb
124f 01d7       |    |		Execute	Vector,Field_Read
1250 027f       |    |		Execute	Discrete,Equal
1251 6804       |h   |		Jump_Zero	0x1256
1252 4801       |H   |		Short_Literal	0x1
1253 a7fb       |    |		Store_Unchecked	0x3,-0x5
1254 00d2       |    |		Pop_Control	Pop_Count_2
1255 7802       |x   |		Jump	0x1258
1256 00c8       |    |		Action	Pop_Auxiliary_Range
1257 3ff4       |?   |		Loop_Increasing	0x124c
1258 00ce       |    |		Action	Pop_Auxiliary
1259 e7fe       |    |		Load	0x3,-0x2
125a 800c       |    |		Call	0x0,0xc
125b 7003       |p   |		Jump_Nonzero	0x125f
125c e7fe       |    |		Load	0x3,-0x2
125d 800d       |    |		Call	0x0,0xd
125e 6802       |h   |		Jump_Zero	0x1261
125f 4801       |H   |		Short_Literal	0x1
1260 a7fb       |    |		Store_Unchecked	0x3,-0x5
1261 e7fe       |    |		Load	0x3,-0x2
1262 4801       |H   |		Short_Literal	0x1
1263 e00e       |    |		Load	0x0,0xe
1264 e00f       |    |		Load	0x0,0xf
1265 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
1266 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
1267 ; --------------------------------------------------------------------------------------
1267 ; STRING TABLE
1267 ; --------------------------------------------------------------------------------------
1267 0088       |    |		.STRTAB	0x0088->0x12ab							; "LOCAL_UNCONSTRAINED"
1268 0099       |    |		.STRTAB	0x0099->0x12b4							; "LOCAL_CONSTRAINED"
1269 00a8       |    |		.STRTAB	0x00a8->0x12bd							; "GLOBAL_UNCONSTRAINED"
126a 00ba       |    |		.STRTAB	0x00ba->0x12c7							; "GLOBAL_CONSTRAINED"
126b 00ca       |    |		.STRTAB	0x00ca->0x12d0							; "Trace requests"
126c 00d6       |    |		.STRTAB	0x00d6->0x12d7							; "New task trace is on"
126d 00e8       |    |		.STRTAB	0x00e8->0x12e1							; "Inform on task creation mode set"
126e 0106       |    |		.STRTAB	0x0106->0x12f1							; "Global stop: "
126f 0111       |    |		.STRTAB	0x0111->0x12f7							; "Aid: "
1270 0114       |    |		.STRTAB	0x0114->0x12fa							; "none"
1271 0116       |    |		.STRTAB	0x0116->0x12fc							; "New task stop, action ="
1272 012b       | +  |		.STRTAB	0x012b->0x1307							; "Holding initial registrants"
1273 0144       | D  |		.STRTAB	0x0144->0x1315							; "Global stepping: "
1274 0153       | S  |		.STRTAB	0x0153->0x131d							; "Task = "
1275 0158       | X  |		.STRTAB	0x0158->0x1321							; " Count = "
1276 015f       | _  |		.STRTAB	0x015f->0x1325							; "       Frame restriction = #"
1277 0179       | y  |		.STRTAB	0x0179->0x1333							; " Action = "
1278 0181       |    |		.STRTAB	0x0181->0x1338							; "Instruction stepping: "
1279 0195       |    |		.STRTAB	0x0195->0x1343							; "None"
127a 0197       |    |		.STRTAB	0x0197->0x1345							; "Breakpoints:"
127b 01a1       |    |		.STRTAB	0x01a1->0x134b							; "  Accelerator load failures: "
127c 01bc       |    |		.STRTAB	0x01bc->0x135a							; "Break on task creation mode set"
127d 01d9       |    |		.STRTAB	0x01d9->0x1369							; "Exception Requests:"
127e 01ea       |    |		.STRTAB	0x01ea->0x1373							; "History requests and status"
127f 0203       |    |		.STRTAB	0x0203->0x1380							; "Next_Index = "
1280 020e       |    |		.STRTAB	0x020e->0x1387							; ": Task : "
1281 0215       |    |		.STRTAB	0x0215->0x138b							; "Exception Cache (tasks propagating)"
1282 0236       | 6  |		.STRTAB	0x0236->0x139d							; "Process_Action: exception: "
1283 024f       | O  |		.STRTAB	0x024f->0x13aa							; "Creation_Register:"
1284 025f       | _  |		.STRTAB	0x025f->0x13b3							; " [any inst]"
1285 0268       | h  |		.STRTAB	0x0268->0x13b9							; " ["
1286 0268       | h  |		.STRTAB	0x0268->0x13ba							; "]"
1287 0267       | g  |		.STRTAB	0x0267->0x13ba							; " [any sub]"
1288 026f       | o  |		.STRTAB	0x026f->0x13bf							; " [any stmt]"
1289 0278       | x  |		.STRTAB	0x0278->0x13c5							; ": "
128a 0278       | x  |		.STRTAB	0x0278->0x13c6							; " Tracing"
128b 027e       | ~  |		.STRTAB	0x027e->0x13ca							; " Exc Tracing"
128c 0288       |    |		.STRTAB	0x0288->0x13d0							; " Stop, action="
128d 0294       |    |		.STRTAB	0x0294->0x13d7							; " Stepping: "
128e 029d       |    |		.STRTAB	0x029d->0x13dc							; " level=#"
128f 02a3       |    |		.STRTAB	0x02a3->0x13e0							; " action="
1290 02a9       |    |		.STRTAB	0x02a9->0x13e4							; " DB mask= "
1291 02b1       |    |		.STRTAB	0x02b1->0x13e9							; " exc info:"
1292 02b9       |    |		.STRTAB	0x02b9->0x13ee							; " "
1293 02b8       |    |		.STRTAB	0x02b8->0x13ef							; "Task=all, Pc="
1294 02c3       |    |		.STRTAB	0x02c3->0x13f5							; " Id="
1295 02c5       |    |		.STRTAB	0x02c5->0x13f7							; "  "
1296 02c5       |    |		.STRTAB	0x02c5->0x13f8							; " /"
1297 02c5       |    |		.STRTAB	0x02c5->0x13f9							; "  T"
1298 02c6       |    |		.STRTAB	0x02c6->0x13fb							; "Task: "
1299 02ca       |    |		.STRTAB	0x02ca->0x13fe							; " Pc="
129a 02cc       |    |		.STRTAB	0x02cc->0x1400							; "Id="
129b 02cd       |    |		.STRTAB	0x02cd->0x1401							; "all"
129c 02ce       |    |		.STRTAB	0x02ce->0x1403							; " Pri="
129d 02d1       |    |		.STRTAB	0x02d1->0x1405							; " Action= "
129e 02d8       |    |		.STRTAB	0x02d8->0x140a							; "Propagate"
129f 02df       |    |		.STRTAB	0x02df->0x140e							; "Catch"
12a0 02e2       |    |		.STRTAB	0x02e2->0x1411							; "History"
12a1 02e7       |    |		.STRTAB	0x02e7->0x1414							; "Trace"
12a2 02ea       |    |		.STRTAB	0x02ea->0x1417							; " Exc= "
12a3 02ee       |    |		.STRTAB	0x02ee->0x141a							; " Low = "
12a4 02f3       |    |		.STRTAB	0x02f3->0x141d							; " High = "
12a5 02f9       |    |		.STRTAB	0x02f9->0x1421							; " Action="
12a6 02ff       |    |		.STRTAB	0x02ff->0x1425							; "Action buffer overflow"
12a7 0313       |    |		.STRTAB	0x0313->0x1430							; "Aid= "
12a8 0316       |    |		.STRTAB	0x0316->0x1433							; "Control.Inner.Creator"
12a9 0329       | )  |		.STRTAB	0x0329->0x143d							; "Creator: exception:"
12aa 033a       | :  |		.STREND 0x033a->0x1447
12ab 4c4f 4341  |LOCA|		.STRTAB_STRINGS
1447 0000       |    |		.XXX[0x1]
1448 ; --------------------------------------------------------------------------------------
1448 ; Debug Table
1448 ; --------------------------------------------------------------------------------------
1448 0004 0012  |    |		.DEBUG4	0x0004,0x0012,0x8a8c,0x0000,0x0001,0x0000
144e 0000 0000  |    |		.BLANK	0000[0x1b2]