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

⟦826a261d9⟧

    Length: 6144 (0x1800)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_06e8fd

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 0b78       | x  |		.CONST	0x0b78								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0000       |    |		.CONST	0x0000								; Offset to segment table (only in elab segments)
0007 8007       |    |		.CONST	0x8007								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; SUBPROGRAM
0008 ; See instruction 0x02cf at 0x87b, index=0x0
0008 ; --------------------------------------------------------------------------------------
0008 01de       |    |		.CONST	0x01de								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0078       | x  |		.CONST	0x0078								; Number of locals
000b			INIT_0008:
000b			INIT_0008:
000b 4802       |H   |		Short_Literal	0x2
000c 02cb       |    |		Declare_Variable	Entry
000d 4806       |H   |		Short_Literal	0x6
000e 02cb       |    |		Declare_Variable	Entry
000f 4801       |H   |		Short_Literal	0x1
0010 02cb       |    |		Declare_Variable	Entry
0011 4803       |H   |		Short_Literal	0x3
0012 02cb       |    |		Declare_Variable	Entry
0013 4805       |H   |		Short_Literal	0x5
0014 02cb       |    |		Declare_Variable	Entry
0015 4808       |H   |		Short_Literal	0x8
0016 02cb       |    |		Declare_Variable	Entry
0017 4807       |H   |		Short_Literal	0x7
0018 02cb       |    |		Declare_Variable	Entry
0019 4803       |H   |		Short_Literal	0x3
001a 02cb       |    |		Declare_Variable	Entry
001b 4808       |H   |		Short_Literal	0x8
001c 02cb       |    |		Declare_Variable	Entry
001d 4807       |H   |		Short_Literal	0x7
001e 02cb       |    |		Declare_Variable	Entry
001f 4801       |H   |		Short_Literal	0x1
0020 02cb       |    |		Declare_Variable	Entry
0021 4801       |H   |		Short_Literal	0x1
0022 02cb       |    |		Declare_Variable	Entry
0023 4801       |H   |		Short_Literal	0x1
0024 02cb       |    |		Declare_Variable	Entry
0025 4800       |H   |		Short_Literal	0x0
0026 02cb       |    |		Declare_Variable	Entry
0027 4802       |H   |		Short_Literal	0x2
0028 02cb       |    |		Declare_Variable	Entry
0029 4801       |H   |		Short_Literal	0x1
002a 02cb       |    |		Declare_Variable	Entry
002b 4801       |H   |		Short_Literal	0x1
002c 02cb       |    |		Declare_Variable	Entry
002d 4802       |H   |		Short_Literal	0x2
002e 02cb       |    |		Declare_Variable	Entry
002f 4800       |H   |		Short_Literal	0x0
0030 02cb       |    |		Declare_Variable	Entry
0031 4803       |H   |		Short_Literal	0x3
0032 02cb       |    |		Declare_Variable	Entry
0033 00bf       |    |		Action	Accept_Activation
0034 0092 0b67  |   g|		Action	Push_String_Extended,0xb67					; "Action not found"
0036 0093 0000  |    |		push_full_address	0x0
0038 61ff       |a   |		Indirect_Literal	Discrete,0x238,{0x80000000, 0x00010000}
0039 0273       | s  |		Execute	Discrete,Plus
003a 0007       |    |		Action	Break_Optional
003b 0093 0000  |    |		push_full_address	0x0
003d 61f6       |a   |		Indirect_Literal	Discrete,0x234,{0x80000000, 0x00020000}
003e 0273       | s  |		Execute	Discrete,Plus
003f 0007       |    |		Action	Break_Optional
0040 e001       |    |		Load	0x0,0x1
0041 0007       |    |		Action	Break_Optional
0042 029d 01fb  |    |		Declare_Subprogram	INIT_01f8,For_Outer_Call
0044 029d 0243  |   C|		Declare_Subprogram	INIT_0240,For_Outer_Call
0046 029d 027b  |   {|		Declare_Subprogram	INIT_0278,For_Outer_Call
0048 029d 02ab  |    |		Declare_Subprogram	INIT_02a8,For_Outer_Call
004a e002       |    |		Load	0x0,0x2
004b 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
004c 0337       | 7  |		Declare_Variable	Array
004d 4801       |H   |		Short_Literal	0x1
004e 4801       |H   |		Short_Literal	0x1
004f 00da       |    |		Load_Top	At_Offset_2
0050 01d6       |    |		Execute	Vector,Field_Write
0051 4801       |H   |		Short_Literal	0x1
0052 4802       |H   |		Short_Literal	0x2
0053 00da       |    |		Load_Top	At_Offset_2
0054 01d6       |    |		Execute	Vector,Field_Write
0055 4801       |H   |		Short_Literal	0x1
0056 4803       |H   |		Short_Literal	0x3
0057 00da       |    |		Load_Top	At_Offset_2
0058 01d6       |    |		Execute	Vector,Field_Write
0059 4801       |H   |		Short_Literal	0x1
005a 4809       |H   |		Short_Literal	0x9
005b 00da       |    |		Load_Top	At_Offset_2
005c 01d6       |    |		Execute	Vector,Field_Write
005d 4801       |H   |		Short_Literal	0x1
005e 4804       |H   |		Short_Literal	0x4
005f 00da       |    |		Load_Top	At_Offset_2
0060 01d6       |    |		Execute	Vector,Field_Write
0061 4801       |H   |		Short_Literal	0x1
0062 4805       |H   |		Short_Literal	0x5
0063 00da       |    |		Load_Top	At_Offset_2
0064 01d6       |    |		Execute	Vector,Field_Write
0065 4801       |H   |		Short_Literal	0x1
0066 4806       |H   |		Short_Literal	0x6
0067 00da       |    |		Load_Top	At_Offset_2
0068 01d6       |    |		Execute	Vector,Field_Write
0069 4801       |H   |		Short_Literal	0x1
006a 4807       |H   |		Short_Literal	0x7
006b 00da       |    |		Load_Top	At_Offset_2
006c 01d6       |    |		Execute	Vector,Field_Write
006d 4800       |H   |		Short_Literal	0x0
006e 4800       |H   |		Short_Literal	0x0
006f 00da       |    |		Load_Top	At_Offset_2
0070 01d6       |    |		Execute	Vector,Field_Write
0071 4800       |H   |		Short_Literal	0x0
0072 4808       |H   |		Short_Literal	0x8
0073 00da       |    |		Load_Top	At_Offset_2
0074 01d6       |    |		Execute	Vector,Field_Write
0075 480f       |H   |		Short_Literal	0xf
0076 480a       |H   |		Short_Literal	0xa
0077 4800       |H   |		Short_Literal	0x0
0078 00d9       |    |		Load_Top	At_Offset_1
0079 e229       | )  |		Load	0x1,0x29
007a 01d6       |    |		Execute	Vector,Field_Write
007b 3ffb       |?   |		Loop_Increasing	0x77
007c e002       |    |		Load	0x0,0x2
007d 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
007e 01c3       |    |		Execute	Vector,Check_In_Type
007f e002       |    |		Load	0x0,0x2
0080 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0081 e002       |    |		Load	0x0,0x2
0082 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
0083 03f1       |    |		Declare_Variable	Discrete,With_Value
0084 e002       |    |		Load	0x0,0x2
0085 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0086 0337       | 7  |		Declare_Variable	Array
0087 4801       |H   |		Short_Literal	0x1
0088 4803       |H   |		Short_Literal	0x3
0089 00da       |    |		Load_Top	At_Offset_2
008a 01d6       |    |		Execute	Vector,Field_Write
008b 4802       |H   |		Short_Literal	0x2
008c 4800       |H   |		Short_Literal	0x0
008d 4800       |H   |		Short_Literal	0x0
008e 00d9       |    |		Load_Top	At_Offset_1
008f e22a       | *  |		Load	0x1,0x2a
0090 01d6       |    |		Execute	Vector,Field_Write
0091 3ffb       |?   |		Loop_Increasing	0x8d
0092 480f       |H   |		Short_Literal	0xf
0093 4804       |H   |		Short_Literal	0x4
0094 4800       |H   |		Short_Literal	0x0
0095 00d9       |    |		Load_Top	At_Offset_1
0096 e22a       | *  |		Load	0x1,0x2a
0097 01d6       |    |		Execute	Vector,Field_Write
0098 3ffb       |?   |		Loop_Increasing	0x94
0099 e002       |    |		Load	0x0,0x2
009a 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
009b 01c3       |    |		Execute	Vector,Check_In_Type
009c e002       |    |		Load	0x0,0x2
009d 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
009e e002       |    |		Load	0x0,0x2
009f 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
00a0 03f1       |    |		Declare_Variable	Discrete,With_Value
00a1 e002       |    |		Load	0x0,0x2
00a2 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
00a3 0337       | 7  |		Declare_Variable	Array
00a4 4801       |H   |		Short_Literal	0x1
00a5 4801       |H   |		Short_Literal	0x1
00a6 00da       |    |		Load_Top	At_Offset_2
00a7 01d6       |    |		Execute	Vector,Field_Write
00a8 4801       |H   |		Short_Literal	0x1
00a9 4802       |H   |		Short_Literal	0x2
00aa 00da       |    |		Load_Top	At_Offset_2
00ab 01d6       |    |		Execute	Vector,Field_Write
00ac 4801       |H   |		Short_Literal	0x1
00ad 4803       |H   |		Short_Literal	0x3
00ae 00da       |    |		Load_Top	At_Offset_2
00af 01d6       |    |		Execute	Vector,Field_Write
00b0 4801       |H   |		Short_Literal	0x1
00b1 4809       |H   |		Short_Literal	0x9
00b2 00da       |    |		Load_Top	At_Offset_2
00b3 01d6       |    |		Execute	Vector,Field_Write
00b4 4801       |H   |		Short_Literal	0x1
00b5 4804       |H   |		Short_Literal	0x4
00b6 00da       |    |		Load_Top	At_Offset_2
00b7 01d6       |    |		Execute	Vector,Field_Write
00b8 4801       |H   |		Short_Literal	0x1
00b9 4805       |H   |		Short_Literal	0x5
00ba 00da       |    |		Load_Top	At_Offset_2
00bb 01d6       |    |		Execute	Vector,Field_Write
00bc 4801       |H   |		Short_Literal	0x1
00bd 4806       |H   |		Short_Literal	0x6
00be 00da       |    |		Load_Top	At_Offset_2
00bf 01d6       |    |		Execute	Vector,Field_Write
00c0 4801       |H   |		Short_Literal	0x1
00c1 4807       |H   |		Short_Literal	0x7
00c2 00da       |    |		Load_Top	At_Offset_2
00c3 01d6       |    |		Execute	Vector,Field_Write
00c4 4801       |H   |		Short_Literal	0x1
00c5 4808       |H   |		Short_Literal	0x8
00c6 00da       |    |		Load_Top	At_Offset_2
00c7 01d6       |    |		Execute	Vector,Field_Write
00c8 4800       |H   |		Short_Literal	0x0
00c9 4800       |H   |		Short_Literal	0x0
00ca 00da       |    |		Load_Top	At_Offset_2
00cb 01d6       |    |		Execute	Vector,Field_Write
00cc 480f       |H   |		Short_Literal	0xf
00cd 480a       |H   |		Short_Literal	0xa
00ce 4800       |H   |		Short_Literal	0x0
00cf 00d9       |    |		Load_Top	At_Offset_1
00d0 e22b       | +  |		Load	0x1,0x2b
00d1 01d6       |    |		Execute	Vector,Field_Write
00d2 3ffb       |?   |		Loop_Increasing	0xce
00d3 e002       |    |		Load	0x0,0x2
00d4 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
00d5 01c3       |    |		Execute	Vector,Check_In_Type
00d6 e002       |    |		Load	0x0,0x2
00d7 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
00d8 e002       |    |		Load	0x0,0x2
00d9 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
00da 03f1       |    |		Declare_Variable	Discrete,With_Value
00db e002       |    |		Load	0x0,0x2
00dc 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
00dd 0337       | 7  |		Declare_Variable	Array
00de 4801       |H   |		Short_Literal	0x1
00df 480d       |H   |		Short_Literal	0xd
00e0 00da       |    |		Load_Top	At_Offset_2
00e1 01d6       |    |		Execute	Vector,Field_Write
00e2 480c       |H   |		Short_Literal	0xc
00e3 4800       |H   |		Short_Literal	0x0
00e4 4800       |H   |		Short_Literal	0x0
00e5 00d9       |    |		Load_Top	At_Offset_1
00e6 e22c       | ,  |		Load	0x1,0x2c
00e7 01d6       |    |		Execute	Vector,Field_Write
00e8 3ffb       |?   |		Loop_Increasing	0xe4
00e9 4800       |H   |		Short_Literal	0x0
00ea 480e       |H   |		Short_Literal	0xe
00eb 00da       |    |		Load_Top	At_Offset_2
00ec 01d6       |    |		Execute	Vector,Field_Write
00ed 4800       |H   |		Short_Literal	0x0
00ee 480f       |H   |		Short_Literal	0xf
00ef 00da       |    |		Load_Top	At_Offset_2
00f0 01d6       |    |		Execute	Vector,Field_Write
00f1 e002       |    |		Load	0x0,0x2
00f2 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
00f3 01c3       |    |		Execute	Vector,Check_In_Type
00f4 e002       |    |		Load	0x0,0x2
00f5 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
00f6 e002       |    |		Load	0x0,0x2
00f7 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
00f8 03f1       |    |		Declare_Variable	Discrete,With_Value
00f9 e002       |    |		Load	0x0,0x2
00fa 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
00fb 0337       | 7  |		Declare_Variable	Array
00fc 4801       |H   |		Short_Literal	0x1
00fd 480e       |H   |		Short_Literal	0xe
00fe 00da       |    |		Load_Top	At_Offset_2
00ff 01d6       |    |		Execute	Vector,Field_Write
0100 4801       |H   |		Short_Literal	0x1
0101 480d       |H   |		Short_Literal	0xd
0102 00da       |    |		Load_Top	At_Offset_2
0103 01d6       |    |		Execute	Vector,Field_Write
0104 480c       |H   |		Short_Literal	0xc
0105 4800       |H   |		Short_Literal	0x0
0106 4800       |H   |		Short_Literal	0x0
0107 00d9       |    |		Load_Top	At_Offset_1
0108 e22d       | -  |		Load	0x1,0x2d
0109 01d6       |    |		Execute	Vector,Field_Write
010a 3ffb       |?   |		Loop_Increasing	0x106
010b 4800       |H   |		Short_Literal	0x0
010c 480f       |H   |		Short_Literal	0xf
010d 00da       |    |		Load_Top	At_Offset_2
010e 01d6       |    |		Execute	Vector,Field_Write
010f e002       |    |		Load	0x0,0x2
0110 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0111 01c3       |    |		Execute	Vector,Check_In_Type
0112 e002       |    |		Load	0x0,0x2
0113 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0114 e002       |    |		Load	0x0,0x2
0115 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
0116 03f1       |    |		Declare_Variable	Discrete,With_Value
0117 e002       |    |		Load	0x0,0x2
0118 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0119 0337       | 7  |		Declare_Variable	Array
011a 4801       |H   |		Short_Literal	0x1
011b 480f       |H   |		Short_Literal	0xf
011c 00da       |    |		Load_Top	At_Offset_2
011d 01d6       |    |		Execute	Vector,Field_Write
011e 480e       |H   |		Short_Literal	0xe
011f 4800       |H   |		Short_Literal	0x0
0120 4800       |H   |		Short_Literal	0x0
0121 00d9       |    |		Load_Top	At_Offset_1
0122 e22e       | .  |		Load	0x1,0x2e
0123 01d6       |    |		Execute	Vector,Field_Write
0124 3ffb       |?   |		Loop_Increasing	0x120
0125 e002       |    |		Load	0x0,0x2
0126 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0127 01c3       |    |		Execute	Vector,Check_In_Type
0128 e002       |    |		Load	0x0,0x2
0129 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
012a e002       |    |		Load	0x0,0x2
012b 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
012c 03f1       |    |		Declare_Variable	Discrete,With_Value
012d 029d 02b3  |    |		Declare_Subprogram	INIT_02b0,For_Outer_Call
012f 029d 033b  |   ;|		Declare_Subprogram	INIT_0338,For_Outer_Call
0131 029d 034b  |   K|		Declare_Subprogram	INIT_0348,For_Outer_Call
0133 a003       |    |		Store_Unchecked	0x0,0x3
0134 00c6       |    |		Action	Check_Subprogram_Elaborated
0135 00e2       |    |		Load_Encached	Integer_Cache
0136 1d31       | 1  |		Execute_Immediate	Reference_Lex_1,0x31
0137 4800       |H   |		Short_Literal	0x0
0138 0093 0000  |    |		push_full_address	0x0
013a 60f5       |`   |		Indirect_Literal	Discrete,0x230,{0x80000000, 0x00060000}
013b 0273       | s  |		Execute	Discrete,Plus
013c e004       |    |		Load	0x0,0x4
013d 0273       | s  |		Execute	Discrete,Plus
013e e005       |    |		Load	0x0,0x5
013f 0273       | s  |		Execute	Discrete,Plus
0140 4800       |H   |		Short_Literal	0x0
0141 0007       |    |		Action	Break_Optional
0142 029d 034b  |   K|		Declare_Subprogram	INIT_0348,For_Outer_Call
0144 029d 0363  |   c|		Declare_Subprogram	INIT_0360,For_Outer_Call
0146 a006       |    |		Store_Unchecked	0x0,0x6
0147 00c6       |    |		Action	Check_Subprogram_Elaborated
0148 00e2       |    |		Load_Encached	Integer_Cache
0149 00e2       |    |		Load_Encached	Integer_Cache
014a 1d37       | 7  |		Execute_Immediate	Reference_Lex_1,0x37
014b 1d38       | 8  |		Execute_Immediate	Reference_Lex_1,0x38
014c 0093 0000  |    |		push_full_address	0x0
014e 60dd       |`   |		Indirect_Literal	Discrete,0x22c,{0x80000000, 0x00050000}
014f 0273       | s  |		Execute	Discrete,Plus
0150 e004       |    |		Load	0x0,0x4
0151 0273       | s  |		Execute	Discrete,Plus
0152 e007       |    |		Load	0x0,0x7
0153 0273       | s  |		Execute	Discrete,Plus
0154 4800       |H   |		Short_Literal	0x0
0155 0007       |    |		Action	Break_Optional
0156 029d 037b  |   {|		Declare_Subprogram	INIT_0378,For_Outer_Call
0158 029d 0393  |    |		Declare_Subprogram	INIT_0390,For_Outer_Call
015a 029d 03f3  |    |		Declare_Subprogram	INIT_03f0,For_Outer_Call
015c 029d 0403  |    |		Declare_Subprogram	INIT_0400,For_Outer_Call
015e 029d 0413  |    |		Declare_Subprogram	INIT_0410,For_Outer_Call
0160 029d 043b  |   ;|		Declare_Subprogram	INIT_0438,For_Outer_Call
0162 029d 044b  |   K|		Declare_Subprogram	INIT_0448,For_Outer_Call
0164 029d 048b  |    |		Declare_Subprogram	INIT_0488,For_Outer_Call
0166 029d 04a3  |    |		Declare_Subprogram	INIT_04a0,For_Outer_Call
0168 029d 04c3  |    |		Declare_Subprogram	INIT_04c0,For_Outer_Call
016a 029d 04db  |    |		Declare_Subprogram	INIT_04d8,For_Outer_Call
016c 029d 0553  |   S|		Declare_Subprogram	INIT_0550,For_Outer_Call
016e 029d 0563  |   c|		Declare_Subprogram	INIT_0560,For_Outer_Call
0170 029d 057b  |   {|		Declare_Subprogram	INIT_0578,For_Outer_Call
0172 029d 0593  |    |		Declare_Subprogram	INIT_0590,For_Outer_Call
0174 029d 05cb  |    |		Declare_Subprogram	INIT_05c8,For_Outer_Call
0176 029d 0603  |    |		Declare_Subprogram	INIT_0600,For_Outer_Call
0178 029d 0643  |   C|		Declare_Subprogram	INIT_0640,For_Outer_Call
017a 029d 066b  |   k|		Declare_Subprogram	INIT_0668,For_Outer_Call
017c 029d 0363  |   c|		Declare_Subprogram	INIT_0360,For_Outer_Call
017e a006       |    |		Store_Unchecked	0x0,0x6
017f 00c6       |    |		Action	Check_Subprogram_Elaborated
0180 00e2       |    |		Load_Encached	Integer_Cache
0181 00e2       |    |		Load_Encached	Integer_Cache
0182 1d51       | Q  |		Execute_Immediate	Reference_Lex_1,0x51
0183 1d52       | R  |		Execute_Immediate	Reference_Lex_1,0x52
0184 0093 0000  |    |		push_full_address	0x0
0186 60a1       |`   |		Indirect_Literal	Discrete,0x228,{0x80000000, 0x00040000}
0187 0273       | s  |		Execute	Discrete,Plus
0188 e004       |    |		Load	0x0,0x4
0189 0273       | s  |		Execute	Discrete,Plus
018a e008       |    |		Load	0x0,0x8
018b 0273       | s  |		Execute	Discrete,Plus
018c 4800       |H   |		Short_Literal	0x0
018d 0007       |    |		Action	Break_Optional
018e 029d 066b  |   k|		Declare_Subprogram	INIT_0668,For_Outer_Call
0190 a003       |    |		Store_Unchecked	0x0,0x3
0191 00c6       |    |		Action	Check_Subprogram_Elaborated
0192 00e2       |    |		Load_Encached	Integer_Cache
0193 1d59       | Y  |		Execute_Immediate	Reference_Lex_1,0x59
0194 4800       |H   |		Short_Literal	0x0
0195 0093 0000  |    |		push_full_address	0x0
0197 608c       |`   |		Indirect_Literal	Discrete,0x224,{0x80000000, 0x00030000}
0198 0273       | s  |		Execute	Discrete,Plus
0199 e004       |    |		Load	0x0,0x4
019a 0273       | s  |		Execute	Discrete,Plus
019b e009       |    |		Load	0x0,0x9
019c 0273       | s  |		Execute	Discrete,Plus
019d 4800       |H   |		Short_Literal	0x0
019e 0007       |    |		Action	Break_Optional
019f 029d 0683  |    |		Declare_Subprogram	INIT_0680,For_Outer_Call
01a1 029d 069b  |    |		Declare_Subprogram	INIT_0698,For_Outer_Call
01a3 029d 06c3  |    |		Declare_Subprogram	INIT_06c0,For_Outer_Call
01a5 029d 06d3  |    |		Declare_Subprogram	INIT_06d0,For_Outer_Call
01a7 029d 0363  |   c|		Declare_Subprogram	INIT_0360,For_Outer_Call
01a9 a006       |    |		Store_Unchecked	0x0,0x6
01aa 00c6       |    |		Action	Check_Subprogram_Elaborated
01ab 00e2       |    |		Load_Encached	Integer_Cache
01ac 00e2       |    |		Load_Encached	Integer_Cache
01ad 1d62       | b  |		Execute_Immediate	Reference_Lex_1,0x62
01ae 1d63       | c  |		Execute_Immediate	Reference_Lex_1,0x63
01af 0093 0000  |    |		push_full_address	0x0
01b1 606e       |`n  |		Indirect_Literal	Discrete,0x220,{0x80000000, 0x00020000}
01b2 0273       | s  |		Execute	Discrete,Plus
01b3 e004       |    |		Load	0x0,0x4
01b4 0273       | s  |		Execute	Discrete,Plus
01b5 e00a       |    |		Load	0x0,0xa
01b6 0273       | s  |		Execute	Discrete,Plus
01b7 4800       |H   |		Short_Literal	0x0
01b8 0007       |    |		Action	Break_Optional
01b9 029d 06eb  |    |		Declare_Subprogram	INIT_06e8,For_Outer_Call
01bb 029d 0723  |   #|		Declare_Subprogram	INIT_0720,For_Outer_Call
01bd 029d 078b  |    |		Declare_Subprogram	INIT_0788,For_Outer_Call
01bf 029d 079b  |    |		Declare_Subprogram	INIT_0798,For_Outer_Call
01c1 a003       |    |		Store_Unchecked	0x0,0x3
01c2 00c6       |    |		Action	Check_Subprogram_Elaborated
01c3 e001       |    |		Load	0x0,0x1
01c4 1d6d       | m  |		Execute_Immediate	Reference_Lex_1,0x6d
01c5 4800       |H   |		Short_Literal	0x0
01c6 0093 0000  |    |		push_full_address	0x0
01c8 6053       |`S  |		Indirect_Literal	Discrete,0x21c,{0x80000000, 0x00010000}
01c9 0273       | s  |		Execute	Discrete,Plus
01ca e004       |    |		Load	0x0,0x4
01cb 0273       | s  |		Execute	Discrete,Plus
01cc e00b       |    |		Load	0x0,0xb
01cd 0273       | s  |		Execute	Discrete,Plus
01ce 4800       |H   |		Short_Literal	0x0
01cf 0007       |    |		Action	Break_Optional
01d0 029d 07b3  |    |		Declare_Subprogram	INIT_07b0,For_Outer_Call
01d2 029d 07cb  |    |		Declare_Subprogram	INIT_07c8,For_Outer_Call
01d4 029d 07e3  |    |		Declare_Subprogram	INIT_07e0,For_Outer_Call
01d6 029d 0803  |    |		Declare_Subprogram	INIT_0800,For_Outer_Call
01d8 481f       |H   |		Short_Literal	0x1f
01d9 0299 0873  |   s|		Declare_Subprogram	INIT_0870,For_Accept
01db 029f 087b  |   {|		Declare_Subprogram	INIT_0878,For_Call
01dd 00bc       |    |		Action	Signal_Activated
01de			BODY_0008:
01de			BODY_0008:
01de 1d77       | w  |		Execute_Immediate	Reference_Lex_1,0x77
01df 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f
01e0 0137       | 7  |		Execute	Entry,Rendezvous
01e1 00cf       |    |		Action	Mark_Auxiliary
01e2 4864       |Hd  |		Short_Literal	0x64
01e3 4801       |H   |		Short_Literal	0x1
01e4 0007       |    |		Action	Break_Optional
01e5 4800       |H   |		Short_Literal	0x0
01e6 00d9       |    |		Load_Top	At_Offset_1
01e7 e00c       |    |		Load	0x0,0xc
01e8 01d5       |    |		Execute	Vector,Field_Reference
01e9 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
01ea 00c8       |    |		Action	Pop_Auxiliary_Range
01eb 3ff9       |?   |		Loop_Increasing	0x1e5
01ec 00ce       |    |		Action	Pop_Auxiliary
01ed 4801       |H   |		Short_Literal	0x1
01ee a224       | $  |		Store_Unchecked	0x1,0x24
01ef 00cf       |    |		Action	Mark_Auxiliary
01f0 8278       | x  |		Call	0x1,0x78
01f1 00c9       |    |		Action	Pop_Auxiliary_Loop
01f2 7ffd       |    |		Jump	0x1f0
01f3 0000 0000  |    |		.BLANK	0000[0x5]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01fb       |    |		.CONST	0x01fb								; Address of begin
01f9 0217       |    |		.CONST	0x0217								; Address of exception handler
01fa 0001       |    |		.CONST	0x0001								; Number of locals
01fb			BODY_01f8:
01fb			INIT_01f8:
01fb 00db       |    |		Load_Top	At_Offset_3
01fc e002       |    |		Load	0x0,0x2
01fd 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
01fe e5fd       |    |		Load	0x2,-0x3
01ff 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0200 00da       |    |		Load_Top	At_Offset_2
0201 800d       |    |		Call	0x0,0xd
0202 7007       |p   |		Jump_Nonzero	0x20a
0203 00db       |    |		Load_Top	At_Offset_3
0204 00db       |    |		Load_Top	At_Offset_3
0205 e00e       |    |		Load	0x0,0xe
0206 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0207 e002       |    |		Load	0x0,0x2
0208 1847       | G  |		Execute	Package,Field_Execute,Field_Number 0x47
0209 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
020a 4801       |H   |		Short_Literal	0x1
020b 00db       |    |		Load_Top	At_Offset_3
020c 800f       |    |		Call	0x0,0xf
020d 00da       |    |		Load_Top	At_Offset_2
020e 800d       |    |		Call	0x0,0xd
020f 7006       |p   |		Jump_Nonzero	0x216
0210 00db       |    |		Load_Top	At_Offset_3
0211 00db       |    |		Load_Top	At_Offset_3
0212 e00e       |    |		Load	0x0,0xe
0213 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0214 e002       |    |		Load	0x0,0x2
0215 1847       | G  |		Execute	Package,Field_Execute,Field_Number 0x47
0216 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0217			TRAP_01f8:
0217 0007       |    |		Action	Break_Optional
0218 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0219 0000 0000  |    |		.XXX[0x3]
021b 0000       |    |
021c 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
0220 8000 0000  |    |		.LITERAL	{0x80000000, 0x00020000}
0224 8000 0000  |    |		.LITERAL	{0x80000000, 0x00030000}
0228 8000 0000  |    |		.LITERAL	{0x80000000, 0x00040000}
022c 8000 0000  |    |		.LITERAL	{0x80000000, 0x00050000}
0230 8000 0000  |    |		.LITERAL	{0x80000000, 0x00060000}
0234 8000 0000  |    |		.LITERAL	{0x80000000, 0x00020000}
0238 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
023c 0000 0000  |    |		.BLANK	0000[0x4]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0243       | C  |		.CONST	0x0243								; Address of begin
0241 0004       |    |		.CONST	0x0004								; Address of exception handler
0242 0001       |    |		.CONST	0x0001								; Number of locals
0243			BODY_0240:
0243			INIT_0240:
0243 00cf       |    |		Action	Mark_Auxiliary
0244 e010       |    |		Load	0x0,0x10
0245 4801       |H   |		Short_Literal	0x1
0246 0263       | c  |		Execute	Discrete,Above_Bound
0247 7026       |p&  |		Jump_Nonzero	0x26e
0248 00d8       |    |		Load_Top	At_Offset_0
0249 e011       |    |		Load	0x0,0x11
024a 01d5       |    |		Execute	Vector,Field_Reference
024b 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
024c e012       |    |		Load	0x0,0x12
024d 027e       | ~  |		Execute	Discrete,Not_Equal
024e 681d       |h   |		Jump_Zero	0x26c
024f 00d8       |    |		Load_Top	At_Offset_0
0250 e011       |    |		Load	0x0,0x11
0251 01d5       |    |		Execute	Vector,Field_Reference
0252 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0253 e013       |    |		Load	0x0,0x13
0254 027f       |    |		Execute	Discrete,Equal
0255 7007       |p   |		Jump_Nonzero	0x25d
0256 00d8       |    |		Load_Top	At_Offset_0
0257 e011       |    |		Load	0x0,0x11
0258 01d5       |    |		Execute	Vector,Field_Reference
0259 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
025a e5ff       |    |		Load	0x2,-0x1
025b 027f       |    |		Execute	Discrete,Equal
025c 680f       |h   |		Jump_Zero	0x26c
025d 00d8       |    |		Load_Top	At_Offset_0
025e e011       |    |		Load	0x0,0x11
025f 01d5       |    |		Execute	Vector,Field_Reference
0260 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0261 8014       |    |		Call	0x0,0x14
0262 027f       |    |		Execute	Discrete,Equal
0263 7006       |p   |		Jump_Nonzero	0x26a
0264 00d8       |    |		Load_Top	At_Offset_0
0265 e011       |    |		Load	0x0,0x11
0266 01d5       |    |		Execute	Vector,Field_Reference
0267 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0268 8015       |    |		Call	0x0,0x15
0269 7002       |p   |		Jump_Nonzero	0x26c
026a 4801       |H   |		Short_Literal	0x1
026b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
026c 00c8       |    |		Action	Pop_Auxiliary_Range
026d 3fda       |?   |		Loop_Increasing	0x248
026e 00ce       |    |		Action	Pop_Auxiliary
026f 4800       |H   |		Short_Literal	0x0
0270 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0271 0000 0000  |    |		.BLANK	0000[0x7]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 027b       | {  |		.CONST	0x027b								; Address of begin
0279 0004       |    |		.CONST	0x0004								; Address of exception handler
027a 0001       |    |		.CONST	0x0001								; Number of locals
027b			BODY_0278:
027b			INIT_0278:
027b 00cf       |    |		Action	Mark_Auxiliary
027c e010       |    |		Load	0x0,0x10
027d 4801       |H   |		Short_Literal	0x1
027e 0263       | c  |		Execute	Discrete,Above_Bound
027f 701f       |p   |		Jump_Nonzero	0x29f
0280 00d8       |    |		Load_Top	At_Offset_0
0281 e011       |    |		Load	0x0,0x11
0282 01d5       |    |		Execute	Vector,Field_Reference
0283 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0284 e012       |    |		Load	0x0,0x12
0285 027e       | ~  |		Execute	Discrete,Not_Equal
0286 6816       |h   |		Jump_Zero	0x29d
0287 00d8       |    |		Load_Top	At_Offset_0
0288 e011       |    |		Load	0x0,0x11
0289 01d5       |    |		Execute	Vector,Field_Reference
028a 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
028b e013       |    |		Load	0x0,0x13
028c 027f       |    |		Execute	Discrete,Equal
028d 7007       |p   |		Jump_Nonzero	0x295
028e 00d8       |    |		Load_Top	At_Offset_0
028f e011       |    |		Load	0x0,0x11
0290 01d5       |    |		Execute	Vector,Field_Reference
0291 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0292 e5ff       |    |		Load	0x2,-0x1
0293 027f       |    |		Execute	Discrete,Equal
0294 6808       |h   |		Jump_Zero	0x29d
0295 00d8       |    |		Load_Top	At_Offset_0
0296 e011       |    |		Load	0x0,0x11
0297 01d5       |    |		Execute	Vector,Field_Reference
0298 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0299 8015       |    |		Call	0x0,0x15
029a 6802       |h   |		Jump_Zero	0x29d
029b 4801       |H   |		Short_Literal	0x1
029c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
029d 00c8       |    |		Action	Pop_Auxiliary_Range
029e 3fe1       |?   |		Loop_Increasing	0x280
029f 00ce       |    |		Action	Pop_Auxiliary
02a0 4800       |H   |		Short_Literal	0x0
02a1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02a2 0000 0000  |    |		.BLANK	0000[0x6]
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02ab       |    |		.CONST	0x02ab								; Address of begin
02a9 0004       |    |		.CONST	0x0004								; Address of exception handler
02aa 0001       |    |		.CONST	0x0001								; Number of locals
02ab			BODY_02a8:
02ab			INIT_02a8:
02ab e5ff       |    |		Load	0x2,-0x1
02ac e5fe       |    |		Load	0x2,-0x2
02ad 0278       | x  |		Execute	Discrete,Or
02ae 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
02af 0831       | 1  |		.XXX[0x1]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02bb       |    |		.CONST	0x02bb								; Address of begin
02b1 0327       | '  |		.CONST	0x0327								; Address of exception handler
02b2 0005       |    |		.CONST	0x0005								; Number of locals
02b3			INIT_02b0:
02b3 e22e       | .  |		Load	0x1,0x2e
02b4 0007       |    |		Action	Break_Optional
02b5 00e1       |    |		Load_Encached	Boolean_Cache
02b6 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
02b7 00e1       |    |		Load_Encached	Boolean_Cache
02b8 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
02b9 029f 08b3  |    |		Declare_Subprogram	INIT_08b0,For_Call
02bb			BODY_02b0:
02bb e5ff       |    |		Load	0x2,-0x1
02bc 8016       |    |		Call	0x0,0x16
02bd e5fe       |    |		Load	0x2,-0x2
02be 380e       |8   |		Execute	Record,Field_Write,Field_Number 0xe
02bf e017       |    |		Load	0x0,0x17
02c0 6804       |h   |		Jump_Zero	0x2c5
02c1 e229       | )  |		Load	0x1,0x29
02c2 4801       |H   |		Short_Literal	0x1
02c3 4801       |H   |		Short_Literal	0x1
02c4 8405       |    |		Call	0x2,0x5
02c5 e5ff       |    |		Load	0x2,-0x1
02c6 8018       |    |		Call	0x0,0x18
02c7 6804       |h   |		Jump_Zero	0x2cc
02c8 e229       | )  |		Load	0x1,0x29
02c9 4800       |H   |		Short_Literal	0x0
02ca 4801       |H   |		Short_Literal	0x1
02cb 8405       |    |		Call	0x2,0x5
02cc e5ff       |    |		Load	0x2,-0x1
02cd e019       |    |		Load	0x0,0x19
02ce 027f       |    |		Execute	Discrete,Equal
02cf 6804       |h   |		Jump_Zero	0x2d4
02d0 e229       | )  |		Load	0x1,0x29
02d1 4801       |H   |		Short_Literal	0x1
02d2 4800       |H   |		Short_Literal	0x0
02d3 8405       |    |		Call	0x2,0x5
02d4 e01a       |    |		Load	0x0,0x1a
02d5 6804       |h   |		Jump_Zero	0x2da
02d6 e229       | )  |		Load	0x1,0x29
02d7 4801       |H   |		Short_Literal	0x1
02d8 4800       |H   |		Short_Literal	0x0
02d9 8405       |    |		Call	0x2,0x5
02da e5ff       |    |		Load	0x2,-0x1
02db 801b       |    |		Call	0x0,0x1b
02dc 6804       |h   |		Jump_Zero	0x2e1
02dd e22a       | *  |		Load	0x1,0x2a
02de 4801       |H   |		Short_Literal	0x1
02df 4800       |H   |		Short_Literal	0x0
02e0 8405       |    |		Call	0x2,0x5
02e1 e5ff       |    |		Load	0x2,-0x1
02e2 801c       |    |		Call	0x0,0x1c
02e3 6804       |h   |		Jump_Zero	0x2e8
02e4 e229       | )  |		Load	0x1,0x29
02e5 4801       |H   |		Short_Literal	0x1
02e6 4800       |H   |		Short_Literal	0x0
02e7 8405       |    |		Call	0x2,0x5
02e8 e5fe       |    |		Load	0x2,-0x2
02e9 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
02ea 6804       |h   |		Jump_Zero	0x2ef
02eb e229       | )  |		Load	0x1,0x29
02ec 4800       |H   |		Short_Literal	0x0
02ed 4800       |H   |		Short_Literal	0x0
02ee 8405       |    |		Call	0x2,0x5
02ef e5fe       |    |		Load	0x2,-0x2
02f0 3c0e       |<   |		Execute	Record,Field_Read,Field_Number 0xe
02f1 6804       |h   |		Jump_Zero	0x2f6
02f2 e229       | )  |		Load	0x1,0x29
02f3 4800       |H   |		Short_Literal	0x0
02f4 4800       |H   |		Short_Literal	0x0
02f5 8405       |    |		Call	0x2,0x5
02f6 e5fe       |    |		Load	0x2,-0x2
02f7 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
02f8 6804       |h   |		Jump_Zero	0x2fd
02f9 e229       | )  |		Load	0x1,0x29
02fa 4800       |H   |		Short_Literal	0x0
02fb 4800       |H   |		Short_Literal	0x0
02fc 8405       |    |		Call	0x2,0x5
02fd e5ff       |    |		Load	0x2,-0x1
02fe e01d       |    |		Load	0x0,0x1d
02ff 027f       |    |		Execute	Discrete,Equal
0300 6804       |h   |		Jump_Zero	0x305
0301 e22b       | +  |		Load	0x1,0x2b
0302 4801       |H   |		Short_Literal	0x1
0303 4800       |H   |		Short_Literal	0x0
0304 8405       |    |		Call	0x2,0x5
0305 e5fe       |    |		Load	0x2,-0x2
0306 3c0f       |<   |		Execute	Record,Field_Read,Field_Number 0xf
0307 6804       |h   |		Jump_Zero	0x30c
0308 e22d       | -  |		Load	0x1,0x2d
0309 4801       |H   |		Short_Literal	0x1
030a 4801       |H   |		Short_Literal	0x1
030b 8405       |    |		Call	0x2,0x5
030c e5ff       |    |		Load	0x2,-0x1
030d 8226       | &  |		Call	0x1,0x26
030e 6804       |h   |		Jump_Zero	0x313
030f e22d       | -  |		Load	0x1,0x2d
0310 4801       |H   |		Short_Literal	0x1
0311 4801       |H   |		Short_Literal	0x1
0312 8405       |    |		Call	0x2,0x5
0313 e5ff       |    |		Load	0x2,-0x1
0314 8227       | '  |		Call	0x1,0x27
0315 6804       |h   |		Jump_Zero	0x31a
0316 e22c       | ,  |		Load	0x1,0x2c
0317 4801       |H   |		Short_Literal	0x1
0318 4801       |H   |		Short_Literal	0x1
0319 8405       |    |		Call	0x2,0x5
031a e5fe       |    |		Load	0x2,-0x2
031b e402       |    |		Load	0x2,0x2
031c e002       |    |		Load	0x0,0x2
031d 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
031e e5ff       |    |		Load	0x2,-0x1
031f 8225       | %  |		Call	0x1,0x25
0320 00d1       |    |		Pop_Control	Pop_Count_1
0321 00d9       |    |		Load_Top	At_Offset_1
0322 00db       |    |		Load_Top	At_Offset_3
0323 e5ff       |    |		Load	0x2,-0x1
0324 801e       |    |		Call	0x0,0x1e
0325 801f       |    |		Call	0x0,0x1f
0326 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0327			TRAP_02b0:
0327 0007       |    |		Action	Break_Optional
0328 e5ff       |    |		Load	0x2,-0x1
0329 e002       |    |		Load	0x0,0x2
032a 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
032b 7004       |p   |		Jump_Nonzero	0x330
032c 4800       |H   |		Short_Literal	0x0
032d 4802       |H   |		Short_Literal	0x2
032e e5ff       |    |		Load	0x2,-0x1
032f 8020       |    |		Call	0x0,0x20
0330 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0331 0000 0000  |    |		.BLANK	0000[0x7]
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 033b       | ;  |		.CONST	0x033b								; Address of begin
0339 0004       |    |		.CONST	0x0004								; Address of exception handler
033a 0001       |    |		.CONST	0x0001								; Number of locals
033b			BODY_0338:
033b			INIT_0338:
033b e021       | !  |		Load	0x0,0x21
033c e5fe       |    |		Load	0x2,-0x2
033d e5ff       |    |		Load	0x2,-0x1
033e 822f       | /  |		Call	0x1,0x2f
033f 00d1       |    |		Pop_Control	Pop_Count_1
0340 c021       | !  |		Store	0x0,0x21
0341 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0342 0000 0000  |    |		.BLANK	0000[0x6]
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
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			BODY_0348:
034b			INIT_0348:
034b			INIT_0348:
034b e5fd       |    |		Load	0x2,-0x3
034c 00e2       |    |		Load_Encached	Integer_Cache
034d 025e       | ^  |		Execute	Discrete,Convert
034e e5fe       |    |		Load	0x2,-0x2
034f e5ff       |    |		Load	0x2,-0x1
0350 e022       | "  |		Load	0x0,0x22
0351 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0352 00d9       |    |		Load_Top	At_Offset_1
0353 00d0       |    |		Action	Swap_Control
0354 0260       | `  |		Execute	Discrete,In_Type
0355 7001       |p   |		Jump_Nonzero	0x357
0356 0801       |    |		Execute_Immediate	Raise,0x1
0357 822f       | /  |		Call	0x1,0x2f
0358 00d1       |    |		Pop_Control	Pop_Count_1
0359 c5fd       |    |		Store	0x2,-0x3
035a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
035b 0000 0000  |    |		.BLANK	0000[0x5]
0360 ; --------------------------------------------------------------------------------------
0360 ; SUBPROGRAM
0360 ; SUBPROGRAM
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			BODY_0360:
0363			BODY_0360:
0363			INIT_0360:
0363			INIT_0360:
0363			INIT_0360:
0363 e5fd       |    |		Load	0x2,-0x3
0364 00d8       |    |		Load_Top	At_Offset_0
0365 00e2       |    |		Load_Encached	Integer_Cache
0366 0260       | `  |		Execute	Discrete,In_Type
0367 7001       |p   |		Jump_Nonzero	0x369
0368 0801       |    |		Execute_Immediate	Raise,0x1
0369 e5fe       |    |		Load	0x2,-0x2
036a e5ff       |    |		Load	0x2,-0x1
036b e022       | "  |		Load	0x0,0x22
036c 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
036d 00d9       |    |		Load_Top	At_Offset_1
036e 00d0       |    |		Action	Swap_Control
036f 0260       | `  |		Execute	Discrete,In_Type
0370 7001       |p   |		Jump_Nonzero	0x372
0371 0801       |    |		Execute_Immediate	Raise,0x1
0372 8023       | #  |		Call	0x0,0x23
0373 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0374 0000 0000  |    |		.BLANK	0000[0x4]
0378 ; --------------------------------------------------------------------------------------
0378 ; SUBPROGRAM
0378 ; --------------------------------------------------------------------------------------
0378 037d       | }  |		.CONST	0x037d								; Address of begin
0379 0004       |    |		.CONST	0x0004								; Address of exception handler
037a 0002       |    |		.CONST	0x0002								; Number of locals
037b			INIT_0378:
037b 029f 08c3  |    |		Declare_Subprogram	INIT_08c0,For_Call
037d			BODY_0378:
037d 00db       |    |		Load_Top	At_Offset_3
037e e013       |    |		Load	0x0,0x13
037f 027f       |    |		Execute	Discrete,Equal
0380 680a       |h   |		Jump_Zero	0x38b
0381 e021       | !  |		Load	0x0,0x21
0382 00d8       |    |		Load_Top	At_Offset_0
0383 e239       | 9  |		Load	0x1,0x39
0384 e23a       | :  |		Load	0x1,0x3a
0385 1d3b       | ;  |		Execute_Immediate	Reference_Lex_1,0x3b
0386 1d3c       | <  |		Execute_Immediate	Reference_Lex_1,0x3c
0387 1d3d       | =  |		Execute_Immediate	Reference_Lex_1,0x3d
0388 8006       |    |		Call	0x0,0x6
0389 c021       | !  |		Store	0x0,0x21
038a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
038b 8402       |    |		Call	0x2,0x2
038c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
038d 0000 0000  |    |		.XXX[0x3]
038f 0000       |    |
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 0397       |    |		.CONST	0x0397								; Address of begin
0391 0004       |    |		.CONST	0x0004								; Address of exception handler
0392 0003       |    |		.CONST	0x0003								; Number of locals
0393			INIT_0390:
0393 029f 08d3  |    |		Declare_Subprogram	INIT_08d0,For_Call
0395 029f 08fb  |    |		Declare_Subprogram	INIT_08f8,For_Call
0397			BODY_0390:
0397 e5fe       |    |		Load	0x2,-0x2
0398 e024       | $  |		Load	0x0,0x24
0399 027f       |    |		Execute	Discrete,Equal
039a 6802       |h   |		Jump_Zero	0x39d
039b e025       | %  |		Load	0x0,0x25
039c 0257       | W  |		Execute	Discrete,Raise
039d e5ff       |    |		Load	0x2,-0x1
039e e013       |    |		Load	0x0,0x13
039f 027f       |    |		Execute	Discrete,Equal
03a0 6826       |h&  |		Jump_Zero	0x3c7
03a1 00cf       |    |		Action	Mark_Auxiliary
03a2 e026       | &  |		Load	0x0,0x26
03a3 4801       |H   |		Short_Literal	0x1
03a4 0263       | c  |		Execute	Discrete,Above_Bound
03a5 700d       |p   |		Jump_Nonzero	0x3b3
03a6 00d8       |    |		Load_Top	At_Offset_0
03a7 e027       | '  |		Load	0x0,0x27
03a8 01d7       |    |		Execute	Vector,Field_Read
03a9 e024       | $  |		Load	0x0,0x24
03aa 027f       |    |		Execute	Discrete,Equal
03ab 6805       |h   |		Jump_Zero	0x3b1
03ac 00d8       |    |		Load_Top	At_Offset_0
03ad 8402       |    |		Call	0x2,0x2
03ae e013       |    |		Load	0x0,0x13
03af 823f       | ?  |		Call	0x1,0x3f
03b0 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
03b1 00c8       |    |		Action	Pop_Auxiliary_Range
03b2 3ff3       |?   |		Loop_Increasing	0x3a6
03b3 00ce       |    |		Action	Pop_Auxiliary
03b4 e017       |    |		Load	0x0,0x17
03b5 0f14       |    |		Execute_Immediate	Equal,0x14
03b6 6802       |h   |		Jump_Zero	0x3b9
03b7 e028       | (  |		Load	0x0,0x28
03b8 0257       | W  |		Execute	Discrete,Raise
03b9 e026       | &  |		Load	0x0,0x26
03ba 0a01       |    |		Execute_Immediate	Plus,0x1
03bb 00d8       |    |		Load_Top	At_Offset_0
03bc 00e3       |    |		Load_Encached	Natural_Cache
03bd 0260       | `  |		Execute	Discrete,In_Type
03be 7001       |p   |		Jump_Nonzero	0x3c0
03bf 0801       |    |		Execute_Immediate	Raise,0x1
03c0 8402       |    |		Call	0x2,0x2
03c1 e026       | &  |		Load	0x0,0x26
03c2 0a01       |    |		Execute_Immediate	Plus,0x1
03c3 c026       | &  |		Store	0x0,0x26
03c4 e013       |    |		Load	0x0,0x13
03c5 823f       | ?  |		Call	0x1,0x3f
03c6 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
03c7 00cf       |    |		Action	Mark_Auxiliary
03c8 e029       | )  |		Load	0x0,0x29
03c9 4801       |H   |		Short_Literal	0x1
03ca 0263       | c  |		Execute	Discrete,Above_Bound
03cb 700e       |p   |		Jump_Nonzero	0x3da
03cc 00d8       |    |		Load_Top	At_Offset_0
03cd e02a       | *  |		Load	0x0,0x2a
03ce 01d5       |    |		Execute	Vector,Field_Reference
03cf 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
03d0 e024       | $  |		Load	0x0,0x24
03d1 027f       |    |		Execute	Discrete,Equal
03d2 6805       |h   |		Jump_Zero	0x3d8
03d3 00d8       |    |		Load_Top	At_Offset_0
03d4 8403       |    |		Call	0x2,0x3
03d5 e5ff       |    |		Load	0x2,-0x1
03d6 823f       | ?  |		Call	0x1,0x3f
03d7 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
03d8 00c8       |    |		Action	Pop_Auxiliary_Range
03d9 3ff2       |?   |		Loop_Increasing	0x3cc
03da 00ce       |    |		Action	Pop_Auxiliary
03db e02b       | +  |		Load	0x0,0x2b
03dc 0f1e       |    |		Execute_Immediate	Equal,0x1e
03dd 6802       |h   |		Jump_Zero	0x3e0
03de e02c       | ,  |		Load	0x0,0x2c
03df 0257       | W  |		Execute	Discrete,Raise
03e0 e029       | )  |		Load	0x0,0x29
03e1 0a01       |    |		Execute_Immediate	Plus,0x1
03e2 00d8       |    |		Load_Top	At_Offset_0
03e3 00e3       |    |		Load_Encached	Natural_Cache
03e4 0260       | `  |		Execute	Discrete,In_Type
03e5 7001       |p   |		Jump_Nonzero	0x3e7
03e6 0801       |    |		Execute_Immediate	Raise,0x1
03e7 8403       |    |		Call	0x2,0x3
03e8 e029       | )  |		Load	0x0,0x29
03e9 0a01       |    |		Execute_Immediate	Plus,0x1
03ea c029       | )  |		Store	0x0,0x29
03eb e5ff       |    |		Load	0x2,-0x1
03ec 823f       | ?  |		Call	0x1,0x3f
03ed 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
03ee 0000 0000  |    |		.XXX[0x2]
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 00da       |    |		Load_Top	At_Offset_2
03f4 c02d       | -  |		Store	0x0,0x2d
03f5 4801       |H   |		Short_Literal	0x1
03f6 c01a       |    |		Store	0x0,0x1a
03f7 e013       |    |		Load	0x0,0x13
03f8 823f       | ?  |		Call	0x1,0x3f
03f9 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
03fa 0000 0000  |    |		.BLANK	0000[0x6]
0400 ; --------------------------------------------------------------------------------------
0400 ; SUBPROGRAM
0400 ; --------------------------------------------------------------------------------------
0400 0403       |    |		.CONST	0x0403								; Address of begin
0401 0004       |    |		.CONST	0x0004								; Address of exception handler
0402 0001       |    |		.CONST	0x0001								; Number of locals
0403			BODY_0400:
0403			INIT_0400:
0403 00db       |    |		Load_Top	At_Offset_3
0404 e5fd       |    |		Load	0x2,-0x3
0405 380a       |8   |		Execute	Record,Field_Write,Field_Number 0xa
0406 4801       |H   |		Short_Literal	0x1
0407 e5fd       |    |		Load	0x2,-0x3
0408 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
0409 e5fd       |    |		Load	0x2,-0x3
040a 00db       |    |		Load_Top	At_Offset_3
040b 8230       | 0  |		Call	0x1,0x30
040c 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
040d 0000 0000  |    |		.XXX[0x3]
040f 0000       |    |
0410 ; --------------------------------------------------------------------------------------
0410 ; SUBPROGRAM
0410 ; --------------------------------------------------------------------------------------
0410 0413       |    |		.CONST	0x0413								; Address of begin
0411 0004       |    |		.CONST	0x0004								; Address of exception handler
0412 0001       |    |		.CONST	0x0001								; Number of locals
0413			BODY_0410:
0413			INIT_0410:
0413 e019       |    |		Load	0x0,0x19
0414 e013       |    |		Load	0x0,0x13
0415 027f       |    |		Execute	Discrete,Equal
0416 7004       |p   |		Jump_Nonzero	0x41b
0417 e019       |    |		Load	0x0,0x19
0418 00db       |    |		Load_Top	At_Offset_3
0419 027f       |    |		Execute	Discrete,Equal
041a 680e       |h   |		Jump_Zero	0x429
041b e013       |    |		Load	0x0,0x13
041c c019       |    |		Store	0x0,0x19
041d 00db       |    |		Load_Top	At_Offset_3
041e c02e       | .  |		Store	0x0,0x2e
041f e5fd       |    |		Load	0x2,-0x3
0420 c02f       | /  |		Store	0x0,0x2f
0421 e5fc       |    |		Load	0x2,-0x4
0422 c030       | 0  |		Store	0x0,0x30
0423 4800       |H   |		Short_Literal	0x0
0424 e5fb       |    |		Load	0x2,-0x5
0425 380b       |8   |		Execute	Record,Field_Write,Field_Number 0xb
0426 00da       |    |		Load_Top	At_Offset_2
0427 c019       |    |		Store	0x0,0x19
0428 7809       |x   |		Jump	0x432
0429 e5fd       |    |		Load	0x2,-0x3
042a e5fb       |    |		Load	0x2,-0x5
042b 380c       |8   |		Execute	Record,Field_Write,Field_Number 0xc
042c e5fc       |    |		Load	0x2,-0x4
042d e5fb       |    |		Load	0x2,-0x5
042e 380d       |8   |		Execute	Record,Field_Write,Field_Number 0xd
042f 00db       |    |		Load_Top	At_Offset_3
0430 e5fb       |    |		Load	0x2,-0x5
0431 380b       |8   |		Execute	Record,Field_Write,Field_Number 0xb
0432 e5fb       |    |		Load	0x2,-0x5
0433 00db       |    |		Load_Top	At_Offset_3
0434 8230       | 0  |		Call	0x1,0x30
0435 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0436 0000 0000  |    |		.XXX[0x2]
0438 ; --------------------------------------------------------------------------------------
0438 ; SUBPROGRAM
0438 ; --------------------------------------------------------------------------------------
0438 043f       | ?  |		.CONST	0x043f								; Address of begin
0439 0004       |    |		.CONST	0x0004								; Address of exception handler
043a 0003       |    |		.CONST	0x0003								; Number of locals
043b			INIT_0438:
043b 029f 092b  |   +|		Declare_Subprogram	INIT_0928,For_Call
043d 029f 0953  |   S|		Declare_Subprogram	INIT_0950,For_Call
043f			BODY_0438:
043f 8403       |    |		Call	0x2,0x3
0440 4801       |H   |		Short_Literal	0x1
0441 e5f8       |    |		Load	0x2,-0x8
0442 380e       |8   |		Execute	Record,Field_Write,Field_Number 0xe
0443 e5f8       |    |		Load	0x2,-0x8
0444 e5ff       |    |		Load	0x2,-0x1
0445 8230       | 0  |		Call	0x1,0x30
0446 4508       |E   |		Exit_Suprogram	New_Top_Offset 0x8
0447 0000       |    |		.XXX[0x1]
0448 ; --------------------------------------------------------------------------------------
0448 ; SUBPROGRAM
0448 ; --------------------------------------------------------------------------------------
0448 0456       | V  |		.CONST	0x0456								; Address of begin
0449 0004       |    |		.CONST	0x0004								; Address of exception handler
044a 0005       |    |		.CONST	0x0005								; Number of locals
044b			INIT_0448:
044b e031       | 1  |		Load	0x0,0x31
044c 0337       | 7  |		Declare_Variable	Array
044d e032       | 2  |		Load	0x0,0x32
044e 00d9       |    |		Load_Top	At_Offset_1
044f 01d4       |    |		Execute	Vector,Structure_Write
0450 00e3       |    |		Load_Encached	Natural_Cache
0451 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0452 029f 098b  |    |		Declare_Subprogram	INIT_0988,For_Call
0454 029f 09bb  |    |		Declare_Subprogram	INIT_09b8,For_Call
0456			BODY_0448:
0456 e5fc       |    |		Load	0x2,-0x4
0457 e033       | 3  |		Load	0x0,0x33
0458 017f       |    |		Execute	Record,Equal
0459 6801       |h   |		Jump_Zero	0x45b
045a 781e       |x   |		Jump	0x479
045b e5fb       |    |		Load	0x2,-0x5
045c 0f00       |    |		Execute_Immediate	Equal,0x0
045d 680b       |h   |		Jump_Zero	0x469
045e 00e3       |    |		Load_Encached	Natural_Cache
045f e402       |    |		Load	0x2,0x2
0460 e5fc       |    |		Load	0x2,-0x4
0461 e5fa       |    |		Load	0x2,-0x6
0462 8034       | 4  |		Call	0x0,0x34
0463 00d1       |    |		Pop_Control	Pop_Count_1
0464 005b       | [  |		Store_Top	Discrete,At_Offset_3
0465 00da       |    |		Load_Top	At_Offset_2
0466 7012       |p   |		Jump_Nonzero	0x479
0467 e025       | %  |		Load	0x0,0x25
0468 0257       | W  |		Execute	Discrete,Raise
0469 e5fb       |    |		Load	0x2,-0x5
046a e5fc       |    |		Load	0x2,-0x4
046b e5fa       |    |		Load	0x2,-0x6
046c 8035       | 5  |		Call	0x0,0x35
046d 4801       |H   |		Short_Literal	0x1
046e e402       |    |		Load	0x2,0x2
046f 01d5       |    |		Execute	Vector,Field_Reference
0470 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0471 4801       |H   |		Short_Literal	0x1
0472 e402       |    |		Load	0x2,0x2
0473 01d5       |    |		Execute	Vector,Field_Reference
0474 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0475 4801       |H   |		Short_Literal	0x1
0476 e402       |    |		Load	0x2,0x2
0477 01d5       |    |		Execute	Vector,Field_Reference
0478 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0479 00da       |    |		Load_Top	At_Offset_2
047a 7002       |p   |		Jump_Nonzero	0x47d
047b 4801       |H   |		Short_Literal	0x1
047c 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
047d 8405       |    |		Call	0x2,0x5
047e e5ff       |    |		Load	0x2,-0x1
047f 823f       | ?  |		Call	0x1,0x3f
0480 4508       |E   |		Exit_Suprogram	New_Top_Offset 0x8
0481 0000 0000  |    |		.BLANK	0000[0x7]
0488 ; --------------------------------------------------------------------------------------
0488 ; SUBPROGRAM
0488 ; --------------------------------------------------------------------------------------
0488 048b       |    |		.CONST	0x048b								; Address of begin
0489 0004       |    |		.CONST	0x0004								; Address of exception handler
048a 0001       |    |		.CONST	0x0001								; Number of locals
048b			BODY_0488:
048b			INIT_0488:
048b e01d       |    |		Load	0x0,0x1d
048c e013       |    |		Load	0x0,0x13
048d 027f       |    |		Execute	Discrete,Equal
048e 7006       |p   |		Jump_Nonzero	0x495
048f e01d       |    |		Load	0x0,0x1d
0490 00db       |    |		Load_Top	At_Offset_3
0491 027f       |    |		Execute	Discrete,Equal
0492 7002       |p   |		Jump_Nonzero	0x495
0493 e036       | 6  |		Load	0x0,0x36
0494 0257       | W  |		Execute	Discrete,Raise
0495 00db       |    |		Load_Top	At_Offset_3
0496 c037       | 7  |		Store	0x0,0x37
0497 e5fd       |    |		Load	0x2,-0x3
0498 c038       | 8  |		Store	0x0,0x38
0499 00da       |    |		Load_Top	At_Offset_2
049a c01d       |    |		Store	0x0,0x1d
049b 00da       |    |		Load_Top	At_Offset_2
049c 823f       | ?  |		Call	0x1,0x3f
049d 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
049e 0000 0000  |    |		.XXX[0x2]
04a0 ; --------------------------------------------------------------------------------------
04a0 ; SUBPROGRAM
04a0 ; --------------------------------------------------------------------------------------
04a0 04a7       |    |		.CONST	0x04a7								; Address of begin
04a1 0004       |    |		.CONST	0x0004								; Address of exception handler
04a2 0003       |    |		.CONST	0x0003								; Number of locals
04a3			INIT_04a0:
04a3 029f 0a0b  |    |		Declare_Subprogram	INIT_0a08,For_Call
04a5 029f 0a3b  |   ;|		Declare_Subprogram	INIT_0a38,For_Call
04a7			BODY_04a0:
04a7 00cf       |    |		Action	Mark_Auxiliary
04a8 e010       |    |		Load	0x0,0x10
04a9 4801       |H   |		Short_Literal	0x1
04aa 0263       | c  |		Execute	Discrete,Above_Bound
04ab 700b       |p   |		Jump_Nonzero	0x4b7
04ac 00d8       |    |		Load_Top	At_Offset_0
04ad e011       |    |		Load	0x0,0x11
04ae 01d5       |    |		Execute	Vector,Field_Reference
04af 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
04b0 e5f8       |    |		Load	0x2,-0x8
04b1 027f       |    |		Execute	Discrete,Equal
04b2 6802       |h   |		Jump_Zero	0x4b5
04b3 e222       | "  |		Load	0x1,0x22
04b4 0257       | W  |		Execute	Discrete,Raise
04b5 00c8       |    |		Action	Pop_Auxiliary_Range
04b6 3ff5       |?   |		Loop_Increasing	0x4ac
04b7 00ce       |    |		Action	Pop_Auxiliary
04b8 8403       |    |		Call	0x2,0x3
04b9 e5ff       |    |		Load	0x2,-0x1
04ba 823f       | ?  |		Call	0x1,0x3f
04bb 4509       |E   |		Exit_Suprogram	New_Top_Offset 0x9
04bc 0000 0000  |    |		.BLANK	0000[0x4]
04c0 ; --------------------------------------------------------------------------------------
04c0 ; SUBPROGRAM
04c0 ; --------------------------------------------------------------------------------------
04c0 04c3       |    |		.CONST	0x04c3								; Address of begin
04c1 0004       |    |		.CONST	0x0004								; Address of exception handler
04c2 0001       |    |		.CONST	0x0001								; Number of locals
04c3			BODY_04c0:
04c3			INIT_04c0:
04c3 e5f9       |    |		Load	0x2,-0x7
04c4 e5fa       |    |		Load	0x2,-0x6
04c5 600a       |`   |		Indirect_Literal	Discrete,0x4d0,{0x00000000, 0x7fffffff}
04c6 e5fb       |    |		Load	0x2,-0x5
04c7 e5fc       |    |		Load	0x2,-0x4
04c8 e5fd       |    |		Load	0x2,-0x3
04c9 e5fe       |    |		Load	0x2,-0x2
04ca e5ff       |    |		Load	0x2,-0x1
04cb 8247       | G  |		Call	0x1,0x47
04cc 4508       |E   |		Exit_Suprogram	New_Top_Offset 0x8
04cd 0000 0000  |    |		.XXX[0x3]
04cf 0000       |    |
04d0 0000 0000  |    |		.LITERAL	{0x00000000, 0x7fffffff}
04d4 0000 0000  |    |		.BLANK	0000[0x4]
04d8 ; --------------------------------------------------------------------------------------
04d8 ; SUBPROGRAM
04d8 ; --------------------------------------------------------------------------------------
04d8 04dd       |    |		.CONST	0x04dd								; Address of begin
04d9 0004       |    |		.CONST	0x0004								; Address of exception handler
04da 0002       |    |		.CONST	0x0002								; Number of locals
04db			INIT_04d8:
04db 00e1       |    |		Load_Encached	Boolean_Cache
04dc 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
04dd			BODY_04d8:
04dd 00cf       |    |		Action	Mark_Auxiliary
04de e026       | &  |		Load	0x0,0x26
04df 4801       |H   |		Short_Literal	0x1
04e0 0263       | c  |		Execute	Discrete,Above_Bound
04e1 702d       |p-  |		Jump_Nonzero	0x50f
04e2 00d8       |    |		Load_Top	At_Offset_0
04e3 e027       | '  |		Load	0x0,0x27
04e4 01d7       |    |		Execute	Vector,Field_Read
04e5 e024       | $  |		Load	0x0,0x24
04e6 027f       |    |		Execute	Discrete,Equal
04e7 7025       |p%  |		Jump_Nonzero	0x50d
04e8 00d8       |    |		Load_Top	At_Offset_0
04e9 e039       | 9  |		Load	0x0,0x39
04ea 01d5       |    |		Execute	Vector,Field_Reference
04eb 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
04ec e5ff       |    |		Load	0x2,-0x1
04ed 027f       |    |		Execute	Discrete,Equal
04ee 681e       |h   |		Jump_Zero	0x50d
04ef e024       | $  |		Load	0x0,0x24
04f0 00d9       |    |		Load_Top	At_Offset_1
04f1 e027       | '  |		Load	0x0,0x27
04f2 01d6       |    |		Execute	Vector,Field_Write
04f3 e017       |    |		Load	0x0,0x17
04f4 0aff       |    |		Execute_Immediate	Plus,-0x1
04f5 c017       |    |		Store	0x0,0x17
04f6 4801       |H   |		Short_Literal	0x1
04f7 a402       |    |		Store_Unchecked	0x2,0x2
04f8 00d8       |    |		Load_Top	At_Offset_0
04f9 e026       | &  |		Load	0x0,0x26
04fa 027f       |    |		Execute	Discrete,Equal
04fb 6811       |h   |		Jump_Zero	0x50d
04fc 00cf       |    |		Action	Mark_Auxiliary
04fd e026       | &  |		Load	0x0,0x26
04fe 0aff       |    |		Execute_Immediate	Plus,-0x1
04ff c026       | &  |		Store	0x0,0x26
0500 e026       | &  |		Load	0x0,0x26
0501 6808       |h   |		Jump_Zero	0x50a
0502 e026       | &  |		Load	0x0,0x26
0503 e027       | '  |		Load	0x0,0x27
0504 01d7       |    |		Execute	Vector,Field_Read
0505 e024       | $  |		Load	0x0,0x24
0506 027f       |    |		Execute	Discrete,Equal
0507 6802       |h   |		Jump_Zero	0x50a
0508 00c9       |    |		Action	Pop_Auxiliary_Loop
0509 7ff3       |    |		Jump	0x4fd
050a 00ce       |    |		Action	Pop_Auxiliary
050b 00d2       |    |		Pop_Control	Pop_Count_2
050c 7802       |x   |		Jump	0x50f
050d 00c8       |    |		Action	Pop_Auxiliary_Range
050e 3fd3       |?   |		Loop_Increasing	0x4e2
050f 00c9       |    |		Action	Pop_Auxiliary_Loop
0510 e029       | )  |		Load	0x0,0x29
0511 4801       |H   |		Short_Literal	0x1
0512 0263       | c  |		Execute	Discrete,Above_Bound
0513 7031       |p1  |		Jump_Nonzero	0x545
0514 00d8       |    |		Load_Top	At_Offset_0
0515 e02a       | *  |		Load	0x0,0x2a
0516 01d5       |    |		Execute	Vector,Field_Reference
0517 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0518 e024       | $  |		Load	0x0,0x24
0519 027f       |    |		Execute	Discrete,Equal
051a 7028       |p(  |		Jump_Nonzero	0x543
051b 00d8       |    |		Load_Top	At_Offset_0
051c e02a       | *  |		Load	0x0,0x2a
051d 01d5       |    |		Execute	Vector,Field_Reference
051e 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
051f e5ff       |    |		Load	0x2,-0x1
0520 027f       |    |		Execute	Discrete,Equal
0521 6821       |h!  |		Jump_Zero	0x543
0522 e024       | $  |		Load	0x0,0x24
0523 00d9       |    |		Load_Top	At_Offset_1
0524 e02a       | *  |		Load	0x0,0x2a
0525 01d5       |    |		Execute	Vector,Field_Reference
0526 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0527 e02b       | +  |		Load	0x0,0x2b
0528 0aff       |    |		Execute_Immediate	Plus,-0x1
0529 c02b       | +  |		Store	0x0,0x2b
052a 00d8       |    |		Load_Top	At_Offset_0
052b e029       | )  |		Load	0x0,0x29
052c 027f       |    |		Execute	Discrete,Equal
052d 6810       |h   |		Jump_Zero	0x53e
052e 00cf       |    |		Action	Mark_Auxiliary
052f e029       | )  |		Load	0x0,0x29
0530 0aff       |    |		Execute_Immediate	Plus,-0x1
0531 c029       | )  |		Store	0x0,0x29
0532 e029       | )  |		Load	0x0,0x29
0533 6809       |h   |		Jump_Zero	0x53d
0534 e029       | )  |		Load	0x0,0x29
0535 e02a       | *  |		Load	0x0,0x2a
0536 01d5       |    |		Execute	Vector,Field_Reference
0537 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0538 e024       | $  |		Load	0x0,0x24
0539 027f       |    |		Execute	Discrete,Equal
053a 6802       |h   |		Jump_Zero	0x53d
053b 00c9       |    |		Action	Pop_Auxiliary_Loop
053c 7ff2       |    |		Jump	0x52f
053d 00ce       |    |		Action	Pop_Auxiliary
053e 00d8       |    |		Load_Top	At_Offset_0
053f e02a       | *  |		Load	0x0,0x2a
0540 01d5       |    |		Execute	Vector,Field_Reference
0541 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0542 823f       | ?  |		Call	0x1,0x3f
0543 00c8       |    |		Action	Pop_Auxiliary_Range
0544 3fcf       |?   |		Loop_Increasing	0x514
0545 00ce       |    |		Action	Pop_Auxiliary
0546 00d8       |    |		Load_Top	At_Offset_0
0547 6804       |h   |		Jump_Zero	0x54c
0548 e017       |    |		Load	0x0,0x17
0549 7002       |p   |		Jump_Nonzero	0x54c
054a e013       |    |		Load	0x0,0x13
054b 823f       | ?  |		Call	0x1,0x3f
054c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
054d 0000 0000  |    |		.XXX[0x3]
054f 0000       |    |
0550 ; --------------------------------------------------------------------------------------
0550 ; SUBPROGRAM
0550 ; --------------------------------------------------------------------------------------
0550 0553       | S  |		.CONST	0x0553								; Address of begin
0551 0004       |    |		.CONST	0x0004								; Address of exception handler
0552 0001       |    |		.CONST	0x0001								; Number of locals
0553			BODY_0550:
0553			INIT_0550:
0553 e02d       | -  |		Load	0x0,0x2d
0554 00db       |    |		Load_Top	At_Offset_3
0555 027f       |    |		Execute	Discrete,Equal
0556 6806       |h   |		Jump_Zero	0x55d
0557 4800       |H   |		Short_Literal	0x0
0558 c01a       |    |		Store	0x0,0x1a
0559 e012       |    |		Load	0x0,0x12
055a c02d       | -  |		Store	0x0,0x2d
055b e013       |    |		Load	0x0,0x13
055c 823f       | ?  |		Call	0x1,0x3f
055d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
055e 0000 0000  |    |		.XXX[0x2]
0560 ; --------------------------------------------------------------------------------------
0560 ; SUBPROGRAM
0560 ; --------------------------------------------------------------------------------------
0560 0565       | e  |		.CONST	0x0565								; Address of begin
0561 0004       |    |		.CONST	0x0004								; Address of exception handler
0562 0002       |    |		.CONST	0x0002								; Number of locals
0563			INIT_0560:
0563 e002       |    |		Load	0x0,0x2
0564 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
0565			BODY_0560:
0565 e019       |    |		Load	0x0,0x19
0566 e013       |    |		Load	0x0,0x13
0567 027f       |    |		Execute	Discrete,Equal
0568 700c       |p   |		Jump_Nonzero	0x575
0569 e030       | 0  |		Load	0x0,0x30
056a e5ff       |    |		Load	0x2,-0x1
056b 027f       |    |		Execute	Discrete,Equal
056c 6808       |h   |		Jump_Zero	0x575
056d e019       |    |		Load	0x0,0x19
056e 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
056f e013       |    |		Load	0x0,0x13
0570 c019       |    |		Store	0x0,0x19
0571 e012       |    |		Load	0x0,0x12
0572 c030       | 0  |		Store	0x0,0x30
0573 00d8       |    |		Load_Top	At_Offset_0
0574 823f       | ?  |		Call	0x1,0x3f
0575 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0576 0000 0000  |    |		.XXX[0x2]
0578 ; --------------------------------------------------------------------------------------
0578 ; SUBPROGRAM
0578 ; --------------------------------------------------------------------------------------
0578 057d       | }  |		.CONST	0x057d								; Address of begin
0579 0004       |    |		.CONST	0x0004								; Address of exception handler
057a 0002       |    |		.CONST	0x0002								; Number of locals
057b			INIT_0578:
057b e002       |    |		Load	0x0,0x2
057c 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
057d			BODY_0578:
057d e01d       |    |		Load	0x0,0x1d
057e e013       |    |		Load	0x0,0x13
057f 027f       |    |		Execute	Discrete,Equal
0580 700c       |p   |		Jump_Nonzero	0x58d
0581 00db       |    |		Load_Top	At_Offset_3
0582 e038       | 8  |		Load	0x0,0x38
0583 027e       | ~  |		Execute	Discrete,Not_Equal
0584 6802       |h   |		Jump_Zero	0x587
0585 e223       | #  |		Load	0x1,0x23
0586 0257       | W  |		Execute	Discrete,Raise
0587 e01d       |    |		Load	0x0,0x1d
0588 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0589 e013       |    |		Load	0x0,0x13
058a c01d       |    |		Store	0x0,0x1d
058b 00d8       |    |		Load_Top	At_Offset_0
058c 823f       | ?  |		Call	0x1,0x3f
058d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
058e 0000 0000  |    |		.XXX[0x2]
0590 ; --------------------------------------------------------------------------------------
0590 ; SUBPROGRAM
0590 ; --------------------------------------------------------------------------------------
0590 0593       |    |		.CONST	0x0593								; Address of begin
0591 0004       |    |		.CONST	0x0004								; Address of exception handler
0592 0001       |    |		.CONST	0x0001								; Number of locals
0593			BODY_0590:
0593			INIT_0590:
0593 00cf       |    |		Action	Mark_Auxiliary
0594 e03a       | :  |		Load	0x0,0x3a
0595 4801       |H   |		Short_Literal	0x1
0596 0263       | c  |		Execute	Discrete,Above_Bound
0597 702a       |p*  |		Jump_Nonzero	0x5c2
0598 00d8       |    |		Load_Top	At_Offset_0
0599 e03b       | ;  |		Load	0x0,0x3b
059a 01d5       |    |		Execute	Vector,Field_Reference
059b 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
059c e5ff       |    |		Load	0x2,-0x1
059d 027f       |    |		Execute	Discrete,Equal
059e 6821       |h!  |		Jump_Zero	0x5c0
059f e012       |    |		Load	0x0,0x12
05a0 00d9       |    |		Load_Top	At_Offset_1
05a1 e03b       | ;  |		Load	0x0,0x3b
05a2 01d5       |    |		Execute	Vector,Field_Reference
05a3 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
05a4 e03c       | <  |		Load	0x0,0x3c
05a5 0aff       |    |		Execute_Immediate	Plus,-0x1
05a6 c03c       | <  |		Store	0x0,0x3c
05a7 00d8       |    |		Load_Top	At_Offset_0
05a8 e03a       | :  |		Load	0x0,0x3a
05a9 027f       |    |		Execute	Discrete,Equal
05aa 6810       |h   |		Jump_Zero	0x5bb
05ab 00cf       |    |		Action	Mark_Auxiliary
05ac e03a       | :  |		Load	0x0,0x3a
05ad 0aff       |    |		Execute_Immediate	Plus,-0x1
05ae c03a       | :  |		Store	0x0,0x3a
05af e03a       | :  |		Load	0x0,0x3a
05b0 6809       |h   |		Jump_Zero	0x5ba
05b1 e03a       | :  |		Load	0x0,0x3a
05b2 e03b       | ;  |		Load	0x0,0x3b
05b3 01d5       |    |		Execute	Vector,Field_Reference
05b4 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
05b5 e012       |    |		Load	0x0,0x12
05b6 027e       | ~  |		Execute	Discrete,Not_Equal
05b7 7002       |p   |		Jump_Nonzero	0x5ba
05b8 00c9       |    |		Action	Pop_Auxiliary_Loop
05b9 7ff2       |    |		Jump	0x5ac
05ba 00ce       |    |		Action	Pop_Auxiliary
05bb 00d8       |    |		Load_Top	At_Offset_0
05bc e03b       | ;  |		Load	0x0,0x3b
05bd 01d5       |    |		Execute	Vector,Field_Reference
05be 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
05bf 823f       | ?  |		Call	0x1,0x3f
05c0 00c8       |    |		Action	Pop_Auxiliary_Range
05c1 3fd6       |?   |		Loop_Increasing	0x598
05c2 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
05c3 0000 0000  |    |		.BLANK	0000[0x5]
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 00cf       |    |		Action	Mark_Auxiliary
05cc e03d       | =  |		Load	0x0,0x3d
05cd 4801       |H   |		Short_Literal	0x1
05ce 0263       | c  |		Execute	Discrete,Above_Bound
05cf 702a       |p*  |		Jump_Nonzero	0x5fa
05d0 00d8       |    |		Load_Top	At_Offset_0
05d1 e03e       | >  |		Load	0x0,0x3e
05d2 01d5       |    |		Execute	Vector,Field_Reference
05d3 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
05d4 e5ff       |    |		Load	0x2,-0x1
05d5 027f       |    |		Execute	Discrete,Equal
05d6 6821       |h!  |		Jump_Zero	0x5f8
05d7 e012       |    |		Load	0x0,0x12
05d8 00d9       |    |		Load_Top	At_Offset_1
05d9 e03e       | >  |		Load	0x0,0x3e
05da 01d5       |    |		Execute	Vector,Field_Reference
05db 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
05dc e03f       | ?  |		Load	0x0,0x3f
05dd 0aff       |    |		Execute_Immediate	Plus,-0x1
05de c03f       | ?  |		Store	0x0,0x3f
05df 00d8       |    |		Load_Top	At_Offset_0
05e0 e03d       | =  |		Load	0x0,0x3d
05e1 027f       |    |		Execute	Discrete,Equal
05e2 6810       |h   |		Jump_Zero	0x5f3
05e3 00cf       |    |		Action	Mark_Auxiliary
05e4 e03d       | =  |		Load	0x0,0x3d
05e5 0aff       |    |		Execute_Immediate	Plus,-0x1
05e6 c03d       | =  |		Store	0x0,0x3d
05e7 e03d       | =  |		Load	0x0,0x3d
05e8 6809       |h   |		Jump_Zero	0x5f2
05e9 e03d       | =  |		Load	0x0,0x3d
05ea e03e       | >  |		Load	0x0,0x3e
05eb 01d5       |    |		Execute	Vector,Field_Reference
05ec 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
05ed e012       |    |		Load	0x0,0x12
05ee 027e       | ~  |		Execute	Discrete,Not_Equal
05ef 7002       |p   |		Jump_Nonzero	0x5f2
05f0 00c9       |    |		Action	Pop_Auxiliary_Loop
05f1 7ff2       |    |		Jump	0x5e4
05f2 00ce       |    |		Action	Pop_Auxiliary
05f3 00d8       |    |		Load_Top	At_Offset_0
05f4 e03e       | >  |		Load	0x0,0x3e
05f5 01d5       |    |		Execute	Vector,Field_Reference
05f6 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
05f7 823f       | ?  |		Call	0x1,0x3f
05f8 00c8       |    |		Action	Pop_Auxiliary_Range
05f9 3fd6       |?   |		Loop_Increasing	0x5d0
05fa 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
05fb 0000 0000  |    |		.BLANK	0000[0x5]
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 00cf       |    |		Action	Mark_Auxiliary
0604 e010       |    |		Load	0x0,0x10
0605 4801       |H   |		Short_Literal	0x1
0606 0263       | c  |		Execute	Discrete,Above_Bound
0607 7031       |p1  |		Jump_Nonzero	0x639
0608 00d8       |    |		Load_Top	At_Offset_0
0609 e011       |    |		Load	0x0,0x11
060a 01d5       |    |		Execute	Vector,Field_Reference
060b 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
060c e012       |    |		Load	0x0,0x12
060d 027e       | ~  |		Execute	Discrete,Not_Equal
060e 6828       |h(  |		Jump_Zero	0x637
060f 00d8       |    |		Load_Top	At_Offset_0
0610 e011       |    |		Load	0x0,0x11
0611 01d5       |    |		Execute	Vector,Field_Reference
0612 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0613 e5ff       |    |		Load	0x2,-0x1
0614 027f       |    |		Execute	Discrete,Equal
0615 6821       |h!  |		Jump_Zero	0x637
0616 e012       |    |		Load	0x0,0x12
0617 00d9       |    |		Load_Top	At_Offset_1
0618 e011       |    |		Load	0x0,0x11
0619 01d5       |    |		Execute	Vector,Field_Reference
061a 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
061b e040       | @  |		Load	0x0,0x40
061c 0aff       |    |		Execute_Immediate	Plus,-0x1
061d c040       | @  |		Store	0x0,0x40
061e 00d8       |    |		Load_Top	At_Offset_0
061f e010       |    |		Load	0x0,0x10
0620 027f       |    |		Execute	Discrete,Equal
0621 6810       |h   |		Jump_Zero	0x632
0622 00cf       |    |		Action	Mark_Auxiliary
0623 e010       |    |		Load	0x0,0x10
0624 0aff       |    |		Execute_Immediate	Plus,-0x1
0625 c010       |    |		Store	0x0,0x10
0626 e010       |    |		Load	0x0,0x10
0627 6809       |h   |		Jump_Zero	0x631
0628 e010       |    |		Load	0x0,0x10
0629 e011       |    |		Load	0x0,0x11
062a 01d5       |    |		Execute	Vector,Field_Reference
062b 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
062c e012       |    |		Load	0x0,0x12
062d 027e       | ~  |		Execute	Discrete,Not_Equal
062e 7002       |p   |		Jump_Nonzero	0x631
062f 00c9       |    |		Action	Pop_Auxiliary_Loop
0630 7ff2       |    |		Jump	0x623
0631 00ce       |    |		Action	Pop_Auxiliary
0632 00d8       |    |		Load_Top	At_Offset_0
0633 e011       |    |		Load	0x0,0x11
0634 01d5       |    |		Execute	Vector,Field_Reference
0635 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0636 823f       | ?  |		Call	0x1,0x3f
0637 00c8       |    |		Action	Pop_Auxiliary_Range
0638 3fcf       |?   |		Loop_Increasing	0x608
0639 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
063a 0000 0000  |    |		.BLANK	0000[0x6]
0640 ; --------------------------------------------------------------------------------------
0640 ; SUBPROGRAM
0640 ; --------------------------------------------------------------------------------------
0640 0643       | C  |		.CONST	0x0643								; Address of begin
0641 0004       |    |		.CONST	0x0004								; Address of exception handler
0642 0001       |    |		.CONST	0x0001								; Number of locals
0643			BODY_0640:
0643			INIT_0640:
0643 00db       |    |		Load_Top	At_Offset_3
0644 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0645 680e       |h   |		Jump_Zero	0x654
0646 00db       |    |		Load_Top	At_Offset_3
0647 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
0648 e5fd       |    |		Load	0x2,-0x3
0649 027f       |    |		Execute	Discrete,Equal
064a 6809       |h   |		Jump_Zero	0x654
064b 4800       |H   |		Short_Literal	0x0
064c e5fe       |    |		Load	0x2,-0x2
064d 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
064e e021       | !  |		Load	0x0,0x21
064f e5fe       |    |		Load	0x2,-0x2
0650 e5ff       |    |		Load	0x2,-0x1
0651 822f       | /  |		Call	0x1,0x2f
0652 00d1       |    |		Pop_Control	Pop_Count_1
0653 c021       | !  |		Store	0x0,0x21
0654 00db       |    |		Load_Top	At_Offset_3
0655 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
0656 680e       |h   |		Jump_Zero	0x665
0657 00db       |    |		Load_Top	At_Offset_3
0658 3c0d       |<   |		Execute	Record,Field_Read,Field_Number 0xd
0659 e5fd       |    |		Load	0x2,-0x3
065a 027f       |    |		Execute	Discrete,Equal
065b 6809       |h   |		Jump_Zero	0x665
065c 4800       |H   |		Short_Literal	0x0
065d e5fe       |    |		Load	0x2,-0x2
065e 380b       |8   |		Execute	Record,Field_Write,Field_Number 0xb
065f e021       | !  |		Load	0x0,0x21
0660 e5fe       |    |		Load	0x2,-0x2
0661 e5ff       |    |		Load	0x2,-0x1
0662 822f       | /  |		Call	0x1,0x2f
0663 00d1       |    |		Pop_Control	Pop_Count_1
0664 c021       | !  |		Store	0x0,0x21
0665 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0666 0000 0000  |    |		.XXX[0x2]
0668 ; --------------------------------------------------------------------------------------
0668 ; SUBPROGRAM
0668 ; SUBPROGRAM
0668 ; --------------------------------------------------------------------------------------
0668 066b       | k  |		.CONST	0x066b								; Address of begin
0669 0004       |    |		.CONST	0x0004								; Address of exception handler
066a 0001       |    |		.CONST	0x0001								; Number of locals
066b			BODY_0668:
066b			BODY_0668:
066b			INIT_0668:
066b			INIT_0668:
066b e5fd       |    |		Load	0x2,-0x3
066c 00e2       |    |		Load_Encached	Integer_Cache
066d 025e       | ^  |		Execute	Discrete,Convert
066e e5fe       |    |		Load	0x2,-0x2
066f e5ff       |    |		Load	0x2,-0x1
0670 e022       | "  |		Load	0x0,0x22
0671 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0672 00d9       |    |		Load_Top	At_Offset_1
0673 00d0       |    |		Action	Swap_Control
0674 0260       | `  |		Execute	Discrete,In_Type
0675 7001       |p   |		Jump_Nonzero	0x677
0676 0801       |    |		Execute_Immediate	Raise,0x1
0677 8250       | P  |		Call	0x1,0x50
0678 00d1       |    |		Pop_Control	Pop_Count_1
0679 c5fd       |    |		Store	0x2,-0x3
067a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
067b 0000 0000  |    |		.BLANK	0000[0x5]
0680 ; --------------------------------------------------------------------------------------
0680 ; SUBPROGRAM
0680 ; --------------------------------------------------------------------------------------
0680 0686       |    |		.CONST	0x0686								; Address of begin
0681 068f       |    |		.CONST	0x068f								; Address of exception handler
0682 0002       |    |		.CONST	0x0002								; Number of locals
0683			INIT_0680:
0683 00db       |    |		Load_Top	At_Offset_3
0684 00e2       |    |		Load_Encached	Integer_Cache
0685 03f1       |    |		Declare_Variable	Discrete,With_Value
0686			BODY_0680:
0686 00d8       |    |		Load_Top	At_Offset_0
0687 e5ff       |    |		Load	0x2,-0x1
0688 e25a       | Z  |		Load	0x1,0x5a
0689 1d5b       | [  |		Execute_Immediate	Reference_Lex_1,0x5b
068a e25c       | \  |		Load	0x1,0x5c
068b 1d5d       | ]  |		Execute_Immediate	Reference_Lex_1,0x5d
068c 8003       |    |		Call	0x0,0x3
068d 0059       | Y  |		Store_Top	Discrete,At_Offset_1
068e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
068f			TRAP_0680:
068f 0007       |    |		Action	Break_Optional
0690 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0691 0000 0000  |    |		.BLANK	0000[0x7]
0698 ; --------------------------------------------------------------------------------------
0698 ; SUBPROGRAM
0698 ; --------------------------------------------------------------------------------------
0698 06a0       |    |		.CONST	0x06a0								; Address of begin
0699 0004       |    |		.CONST	0x0004								; Address of exception handler
069a 0003       |    |		.CONST	0x0003								; Number of locals
069b			INIT_0698:
069b 00da       |    |		Load_Top	At_Offset_2
069c 00e2       |    |		Load_Encached	Integer_Cache
069d 03f1       |    |		Declare_Variable	Discrete,With_Value
069e 029f 0a63  |   c|		Declare_Subprogram	INIT_0a60,For_Call
06a0			BODY_0698:
06a0 e041       | A  |		Load	0x0,0x41
06a1 e5ff       |    |		Load	0x2,-0x1
06a2 027f       |    |		Execute	Discrete,Equal
06a3 6804       |h   |		Jump_Zero	0x6a8
06a4 4800       |H   |		Short_Literal	0x0
06a5 c042       | B  |		Store	0x0,0x42
06a6 e012       |    |		Load	0x0,0x12
06a7 c041       | A  |		Store	0x0,0x41
06a8 e5ff       |    |		Load	0x2,-0x1
06a9 8249       | I  |		Call	0x1,0x49
06aa e5ff       |    |		Load	0x2,-0x1
06ab 824a       | J  |		Call	0x1,0x4a
06ac e5ff       |    |		Load	0x2,-0x1
06ad 824b       | K  |		Call	0x1,0x4b
06ae 8403       |    |		Call	0x2,0x3
06af e5ff       |    |		Load	0x2,-0x1
06b0 824f       | O  |		Call	0x1,0x4f
06b1 e5ff       |    |		Load	0x2,-0x1
06b2 824d       | M  |		Call	0x1,0x4d
06b3 e5ff       |    |		Load	0x2,-0x1
06b4 824e       | N  |		Call	0x1,0x4e
06b5 00d9       |    |		Load_Top	At_Offset_1
06b6 e021       | !  |		Load	0x0,0x21
06b7 e253       | S  |		Load	0x1,0x53
06b8 e254       | T  |		Load	0x1,0x54
06b9 1d55       | U  |		Execute_Immediate	Reference_Lex_1,0x55
06ba 1d56       | V  |		Execute_Immediate	Reference_Lex_1,0x56
06bb 1d57       | W  |		Execute_Immediate	Reference_Lex_1,0x57
06bc 8006       |    |		Call	0x0,0x6
06bd 005a       | Z  |		Store_Top	Discrete,At_Offset_2
06be 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
06bf 0000       |    |		.XXX[0x1]
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 4800       |H   |		Short_Literal	0x0
06c4 e5fe       |    |		Load	0x2,-0x2
06c5 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
06c6 4800       |H   |		Short_Literal	0x0
06c7 e5fe       |    |		Load	0x2,-0x2
06c8 380b       |8   |		Execute	Record,Field_Write,Field_Number 0xb
06c9 4800       |H   |		Short_Literal	0x0
06ca e5fe       |    |		Load	0x2,-0x2
06cb 380e       |8   |		Execute	Record,Field_Write,Field_Number 0xe
06cc 4800       |H   |		Short_Literal	0x0
06cd e5fe       |    |		Load	0x2,-0x2
06ce 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
06cf 4502       |E   |		Exit_Suprogram	New_Top_Offset 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 e5fd       |    |		Load	0x2,-0x3
06d4 00e2       |    |		Load_Encached	Integer_Cache
06d5 025e       | ^  |		Execute	Discrete,Convert
06d6 e5fe       |    |		Load	0x2,-0x2
06d7 e5ff       |    |		Load	0x2,-0x1
06d8 e022       | "  |		Load	0x0,0x22
06d9 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
06da 00d9       |    |		Load_Top	At_Offset_1
06db 00d0       |    |		Action	Swap_Control
06dc 0260       | `  |		Execute	Discrete,In_Type
06dd 7001       |p   |		Jump_Nonzero	0x6df
06de 0801       |    |		Execute_Immediate	Raise,0x1
06df 8261       | a  |		Call	0x1,0x61
06e0 00d1       |    |		Pop_Control	Pop_Count_1
06e1 c5fd       |    |		Store	0x2,-0x3
06e2 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
06e3 0000 0000  |    |		.BLANK	0000[0x5]
06e8 ; --------------------------------------------------------------------------------------
06e8 ; SUBPROGRAM
06e8 ; --------------------------------------------------------------------------------------
06e8 06eb       |    |		.CONST	0x06eb								; Address of begin
06e9 0004       |    |		.CONST	0x0004								; Address of exception handler
06ea 0001       |    |		.CONST	0x0001								; Number of locals
06eb			BODY_06e8:
06eb			INIT_06e8:
06eb 4800       |H   |		Short_Literal	0x0
06ec c01a       |    |		Store	0x0,0x1a
06ed e013       |    |		Load	0x0,0x13
06ee c019       |    |		Store	0x0,0x19
06ef e013       |    |		Load	0x0,0x13
06f0 c01d       |    |		Store	0x0,0x1d
06f1 4800       |H   |		Short_Literal	0x0
06f2 c029       | )  |		Store	0x0,0x29
06f3 4800       |H   |		Short_Literal	0x0
06f4 c02b       | +  |		Store	0x0,0x2b
06f5 4800       |H   |		Short_Literal	0x0
06f6 c026       | &  |		Store	0x0,0x26
06f7 4800       |H   |		Short_Literal	0x0
06f8 c017       |    |		Store	0x0,0x17
06f9 4800       |H   |		Short_Literal	0x0
06fa c03a       | :  |		Store	0x0,0x3a
06fb 4800       |H   |		Short_Literal	0x0
06fc c03c       | <  |		Store	0x0,0x3c
06fd 4800       |H   |		Short_Literal	0x0
06fe c010       |    |		Store	0x0,0x10
06ff 4800       |H   |		Short_Literal	0x0
0700 c040       | @  |		Store	0x0,0x40
0701 4800       |H   |		Short_Literal	0x0
0702 c03d       | =  |		Store	0x0,0x3d
0703 4800       |H   |		Short_Literal	0x0
0704 c03f       | ?  |		Store	0x0,0x3f
0705 4800       |H   |		Short_Literal	0x0
0706 e043       | C  |		Load	0x0,0x43
0707 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0708 00cf       |    |		Action	Mark_Auxiliary
0709 e044       | D  |		Load	0x0,0x44
070a 01d9       |    |		Execute	Vector,Reverse_Bounds
070b 0007       |    |		Action	Break_Optional
070c 8045       | E  |		Call	0x0,0x45
070d 00d9       |    |		Load_Top	At_Offset_1
070e e044       | D  |		Load	0x0,0x44
070f 01d6       |    |		Execute	Vector,Field_Write
0710 00c8       |    |		Action	Pop_Auxiliary_Range
0711 3ffa       |?   |		Loop_Increasing	0x70c
0712 00ce       |    |		Action	Pop_Auxiliary
0713 e021       | !  |		Load	0x0,0x21
0714 00d8       |    |		Load_Top	At_Offset_0
0715 e264       | d  |		Load	0x1,0x64
0716 e265       | e  |		Load	0x1,0x65
0717 1d66       | f  |		Execute_Immediate	Reference_Lex_1,0x66
0718 1d67       | g  |		Execute_Immediate	Reference_Lex_1,0x67
0719 1d68       | h  |		Execute_Immediate	Reference_Lex_1,0x68
071a 8006       |    |		Call	0x0,0x6
071b c021       | !  |		Store	0x0,0x21
071c 8046       | F  |		Call	0x0,0x46
071d 823f       | ?  |		Call	0x1,0x3f
071e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
071f 0000       |    |		.XXX[0x1]
0720 ; --------------------------------------------------------------------------------------
0720 ; SUBPROGRAM
0720 ; --------------------------------------------------------------------------------------
0720 0729       | )  |		.CONST	0x0729								; Address of begin
0721 0004       |    |		.CONST	0x0004								; Address of exception handler
0722 0003       |    |		.CONST	0x0003								; Number of locals
0723			INIT_0720:
0723 e047       | G  |		Load	0x0,0x47
0724 0322       | "  |		Declare_Variable	Record
0725 00d8       |    |		Load_Top	At_Offset_0
0726 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0727 e048       | H  |		Load	0x0,0x48
0728 0007       |    |		Action	Break_Optional
0729			BODY_0720:
0729 e5fd       |    |		Load	0x2,-0x3
072a e049       | I  |		Load	0x0,0x49
072b 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
072c c5fd       |    |		Store	0x2,-0x3
072d e5ff       |    |		Load	0x2,-0x1
072e e030       | 0  |		Load	0x0,0x30
072f 027f       |    |		Execute	Discrete,Equal
0730 6803       |h   |		Jump_Zero	0x734
0731 e02e       | .  |		Load	0x0,0x2e
0732 a5fe       |    |		Store_Unchecked	0x2,-0x2
0733 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0734 e5ff       |    |		Load	0x2,-0x1
0735 e038       | 8  |		Load	0x0,0x38
0736 027f       |    |		Execute	Discrete,Equal
0737 6803       |h   |		Jump_Zero	0x73b
0738 e037       | 7  |		Load	0x0,0x37
0739 a5fe       |    |		Store_Unchecked	0x2,-0x2
073a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
073b 00cf       |    |		Action	Mark_Auxiliary
073c e026       | &  |		Load	0x0,0x26
073d 4801       |H   |		Short_Literal	0x1
073e 0263       | c  |		Execute	Discrete,Above_Bound
073f 700f       |p   |		Jump_Nonzero	0x74f
0740 e5ff       |    |		Load	0x2,-0x1
0741 00d9       |    |		Load_Top	At_Offset_1
0742 e039       | 9  |		Load	0x0,0x39
0743 01d5       |    |		Execute	Vector,Field_Reference
0744 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0745 027f       |    |		Execute	Discrete,Equal
0746 6806       |h   |		Jump_Zero	0x74d
0747 00d8       |    |		Load_Top	At_Offset_0
0748 e039       | 9  |		Load	0x0,0x39
0749 01d5       |    |		Execute	Vector,Field_Reference
074a 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
074b a5fe       |    |		Store_Unchecked	0x2,-0x2
074c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
074d 00c8       |    |		Action	Pop_Auxiliary_Range
074e 3ff1       |?   |		Loop_Increasing	0x740
074f 00c9       |    |		Action	Pop_Auxiliary_Loop
0750 e029       | )  |		Load	0x0,0x29
0751 4801       |H   |		Short_Literal	0x1
0752 0263       | c  |		Execute	Discrete,Above_Bound
0753 700f       |p   |		Jump_Nonzero	0x763
0754 e5ff       |    |		Load	0x2,-0x1
0755 00d9       |    |		Load_Top	At_Offset_1
0756 e02a       | *  |		Load	0x0,0x2a
0757 01d5       |    |		Execute	Vector,Field_Reference
0758 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0759 027f       |    |		Execute	Discrete,Equal
075a 6806       |h   |		Jump_Zero	0x761
075b 00d8       |    |		Load_Top	At_Offset_0
075c e02a       | *  |		Load	0x0,0x2a
075d 01d5       |    |		Execute	Vector,Field_Reference
075e 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
075f a5fe       |    |		Store_Unchecked	0x2,-0x2
0760 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0761 00c8       |    |		Action	Pop_Auxiliary_Range
0762 3ff1       |?   |		Loop_Increasing	0x754
0763 00ce       |    |		Action	Pop_Auxiliary
0764 e048       | H  |		Load	0x0,0x48
0765 804a       | J  |		Call	0x0,0x4a
0766 0039       | 9  |		Store_Top	Access,At_Offset_1
0767 00cf       |    |		Action	Mark_Auxiliary
0768 7812       |x   |		Jump	0x77b
0769 00d9       |    |		Load_Top	At_Offset_1
076a 804b       | K  |		Call	0x0,0x4b
076b 804c       | L  |		Call	0x0,0x4c
076c 00db       |    |		Load_Top	At_Offset_3
076d 017d       | }  |		Execute	Record,Structure_Write
076e e5ff       |    |		Load	0x2,-0x1
076f 00db       |    |		Load_Top	At_Offset_3
0770 3c0d       |<   |		Execute	Record,Field_Read,Field_Number 0xd
0771 027f       |    |		Execute	Discrete,Equal
0772 6804       |h   |		Jump_Zero	0x777
0773 00da       |    |		Load_Top	At_Offset_2
0774 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
0775 a5fe       |    |		Store_Unchecked	0x2,-0x2
0776 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0777 00d9       |    |		Load_Top	At_Offset_1
0778 804d       | M  |		Call	0x0,0x4d
0779 003a       | :  |		Store_Top	Access,At_Offset_2
077a 00c9       |    |		Action	Pop_Auxiliary_Loop
077b 00d9       |    |		Load_Top	At_Offset_1
077c 804e       | N  |		Call	0x0,0x4e
077d 6feb       |o   |		Jump_Zero	0x769
077e 00ce       |    |		Action	Pop_Auxiliary
077f 4800       |H   |		Short_Literal	0x0
0780 a5fe       |    |		Store_Unchecked	0x2,-0x2
0781 e5fd       |    |		Load	0x2,-0x3
0782 e221       | !  |		Load	0x1,0x21
0783 e049       | I  |		Load	0x0,0x49
0784 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0785 c5fd       |    |		Store	0x2,-0x3
0786 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0787 0000       |    |		.XXX[0x1]
0788 ; --------------------------------------------------------------------------------------
0788 ; SUBPROGRAM
0788 ; --------------------------------------------------------------------------------------
0788 078b       |    |		.CONST	0x078b								; Address of begin
0789 0004       |    |		.CONST	0x0004								; Address of exception handler
078a 0001       |    |		.CONST	0x0001								; Number of locals
078b			BODY_0788:
078b			INIT_0788:
078b 00db       |    |		Load_Top	At_Offset_3
078c 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
078d e5fd       |    |		Load	0x2,-0x3
078e e00c       |    |		Load	0x0,0xc
078f 01d5       |    |		Execute	Vector,Field_Reference
0790 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0791 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0792 0000 0000  |    |		.BLANK	0000[0x6]
0798 ; --------------------------------------------------------------------------------------
0798 ; SUBPROGRAM
0798 ; --------------------------------------------------------------------------------------
0798 079b       |    |		.CONST	0x079b								; Address of begin
0799 0004       |    |		.CONST	0x0004								; Address of exception handler
079a 0001       |    |		.CONST	0x0001								; Number of locals
079b			BODY_0798:
079b			INIT_0798:
079b e5fd       |    |		Load	0x2,-0x3
079c e001       |    |		Load	0x0,0x1
079d 025e       | ^  |		Execute	Discrete,Convert
079e e5fe       |    |		Load	0x2,-0x2
079f e5ff       |    |		Load	0x2,-0x1
07a0 e022       | "  |		Load	0x0,0x22
07a1 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
07a2 00d9       |    |		Load_Top	At_Offset_1
07a3 00d0       |    |		Action	Swap_Control
07a4 0260       | `  |		Execute	Discrete,In_Type
07a5 7001       |p   |		Jump_Nonzero	0x7a7
07a6 0801       |    |		Execute_Immediate	Raise,0x1
07a7 826c       | l  |		Call	0x1,0x6c
07a8 00d1       |    |		Pop_Control	Pop_Count_1
07a9 c5fd       |    |		Store	0x2,-0x3
07aa 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
07ab 0000 0000  |    |		.BLANK	0000[0x5]
07b0 ; --------------------------------------------------------------------------------------
07b0 ; SUBPROGRAM
07b0 ; --------------------------------------------------------------------------------------
07b0 07b6       |    |		.CONST	0x07b6								; Address of begin
07b1 07c2       |    |		.CONST	0x07c2								; Address of exception handler
07b2 0002       |    |		.CONST	0x0002								; Number of locals
07b3			INIT_07b0:
07b3 00da       |    |		Load_Top	At_Offset_2
07b4 e001       |    |		Load	0x0,0x1
07b5 03f1       |    |		Declare_Variable	Discrete,With_Value
07b6			BODY_07b0:
07b6 00d8       |    |		Load_Top	At_Offset_0
07b7 e5ff       |    |		Load	0x2,-0x1
07b8 e00c       |    |		Load	0x0,0xc
07b9 01d5       |    |		Execute	Vector,Field_Reference
07ba 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
07bb e26e       | n  |		Load	0x1,0x6e
07bc 1d6f       | o  |		Execute_Immediate	Reference_Lex_1,0x6f
07bd e270       | p  |		Load	0x1,0x70
07be 1d71       | q  |		Execute_Immediate	Reference_Lex_1,0x71
07bf 8003       |    |		Call	0x0,0x3
07c0 0059       | Y  |		Store_Top	Discrete,At_Offset_1
07c1 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
07c2			TRAP_07b0:
07c2 e04f       | O  |		Load	0x0,0x4f
07c3 010f       |    |		Execute	Exception,Equal
07c4 6801       |h   |		Jump_Zero	0x7c6
07c5 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
07c6 0100       |    |		Execute	Exception,Raise
07c7 0000       |    |		.XXX[0x1]
07c8 ; --------------------------------------------------------------------------------------
07c8 ; SUBPROGRAM
07c8 ; --------------------------------------------------------------------------------------
07c8 07cb       |    |		.CONST	0x07cb								; Address of begin
07c9 0004       |    |		.CONST	0x0004								; Address of exception handler
07ca 0001       |    |		.CONST	0x0001								; Number of locals
07cb			BODY_07c8:
07cb			INIT_07c8:
07cb 00da       |    |		Load_Top	At_Offset_2
07cc e5fe       |    |		Load	0x2,-0x2
07cd e00c       |    |		Load	0x0,0xc
07ce 01d5       |    |		Execute	Vector,Field_Reference
07cf 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
07d0 4801       |H   |		Short_Literal	0x1
07d1 e5fe       |    |		Load	0x2,-0x2
07d2 e00c       |    |		Load	0x0,0xc
07d3 01d5       |    |		Execute	Vector,Field_Reference
07d4 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
07d5 4800       |H   |		Short_Literal	0x0
07d6 e5fe       |    |		Load	0x2,-0x2
07d7 e00c       |    |		Load	0x0,0xc
07d8 01d5       |    |		Execute	Vector,Field_Reference
07d9 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
07da 00db       |    |		Load_Top	At_Offset_3
07db 8273       | s  |		Call	0x1,0x73
07dc 00db       |    |		Load_Top	At_Offset_3
07dd 00db       |    |		Load_Top	At_Offset_3
07de 8050       | P  |		Call	0x0,0x50
07df 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
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 4864       |Hd  |		Short_Literal	0x64
07e5 4801       |H   |		Short_Literal	0x1
07e6 0007       |    |		Action	Break_Optional
07e7 00d8       |    |		Load_Top	At_Offset_0
07e8 e00c       |    |		Load	0x0,0xc
07e9 01d5       |    |		Execute	Vector,Field_Reference
07ea 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
07eb 0d0f       |    |		Execute_Immediate	Less,0xf
07ec 6809       |h   |		Jump_Zero	0x7f6
07ed 00d8       |    |		Load_Top	At_Offset_0
07ee e00c       |    |		Load	0x0,0xc
07ef 01d5       |    |		Execute	Vector,Field_Reference
07f0 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
07f1 0a01       |    |		Execute_Immediate	Plus,0x1
07f2 00d9       |    |		Load_Top	At_Offset_1
07f3 e00c       |    |		Load	0x0,0xc
07f4 01d5       |    |		Execute	Vector,Field_Reference
07f5 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
07f6 00c8       |    |		Action	Pop_Auxiliary_Range
07f7 3fef       |?   |		Loop_Increasing	0x7e7
07f8 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
07f9 0000 0000  |    |		.BLANK	0000[0x7]
0800 ; --------------------------------------------------------------------------------------
0800 ; SUBPROGRAM
0800 ; --------------------------------------------------------------------------------------
0800 0806       |    |		.CONST	0x0806								; Address of begin
0801 0862       | b  |		.CONST	0x0862								; Address of exception handler
0802 0003       |    |		.CONST	0x0003								; Number of locals
0803			INIT_0800:
0803 00e2       |    |		Load_Encached	Integer_Cache
0804 e002       |    |		Load	0x0,0x2
0805 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
0806			BODY_0800:
0806 00cf       |    |		Action	Mark_Auxiliary
0807 4864       |Hd  |		Short_Literal	0x64
0808 4801       |H   |		Short_Literal	0x1
0809 0007       |    |		Action	Break_Optional
080a 00d8       |    |		Load_Top	At_Offset_0
080b e00c       |    |		Load	0x0,0xc
080c 01d5       |    |		Execute	Vector,Field_Reference
080d 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
080e 7005       |p   |		Jump_Nonzero	0x814
080f 00d8       |    |		Load_Top	At_Offset_0
0810 e5ff       |    |		Load	0x2,-0x1
0811 8274       | t  |		Call	0x1,0x74
0812 00d8       |    |		Load_Top	At_Offset_0
0813 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0814 00d8       |    |		Load_Top	At_Offset_0
0815 e00c       |    |		Load	0x0,0xc
0816 01d5       |    |		Execute	Vector,Field_Reference
0817 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0818 a403       |    |		Store_Unchecked	0x2,0x3
0819 00db       |    |		Load_Top	At_Offset_3
081a e002       |    |		Load	0x0,0x2
081b 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
081c 7005       |p   |		Jump_Nonzero	0x822
081d 00d8       |    |		Load_Top	At_Offset_0
081e e5ff       |    |		Load	0x2,-0x1
081f 8274       | t  |		Call	0x1,0x74
0820 00d8       |    |		Load_Top	At_Offset_0
0821 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0822 00db       |    |		Load_Top	At_Offset_3
0823 e002       |    |		Load	0x0,0x2
0824 1842       | B  |		Execute	Package,Field_Execute,Field_Number 0x42
0825 0b0d       |    |		Execute_Immediate	Case_Compare,0xd
0826 7003       |p   |		Jump_Nonzero	0x82a
0827 0f07       |    |		Execute_Immediate	Equal,0x7
0828 7002       |p   |		Jump_Nonzero	0x82b
0829 7809       |x   |		Jump	0x833
082a 00d1       |    |		Pop_Control	Pop_Count_1
082b 4800       |H   |		Short_Literal	0x0
082c e403       |    |		Load	0x2,0x3
082d 8050       | P  |		Call	0x0,0x50
082e 00d8       |    |		Load_Top	At_Offset_0
082f e5ff       |    |		Load	0x2,-0x1
0830 8274       | t  |		Call	0x1,0x74
0831 00d8       |    |		Load_Top	At_Offset_0
0832 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0833 00c8       |    |		Action	Pop_Auxiliary_Range
0834 3fd5       |?   |		Loop_Increasing	0x80a
0835 00ce       |    |		Action	Pop_Auxiliary
0836 4800       |H   |		Short_Literal	0x0
0837 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0838 00cf       |    |		Action	Mark_Auxiliary
0839 e224       | $  |		Load	0x1,0x24
083a 4864       |Hd  |		Short_Literal	0x64
083b 026e       | n  |		Execute	Discrete,Modulo
083c 0a01       |    |		Execute_Immediate	Plus,0x1
083d c224       | $  |		Store	0x1,0x24
083e e224       | $  |		Load	0x1,0x24
083f e00c       |    |		Load	0x0,0xc
0840 01d5       |    |		Execute	Vector,Field_Reference
0841 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0842 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0843 e224       | $  |		Load	0x1,0x24
0844 e00c       |    |		Load	0x0,0xc
0845 01d5       |    |		Execute	Vector,Field_Reference
0846 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0847 680d       |h   |		Jump_Zero	0x855
0848 e5ff       |    |		Load	0x2,-0x1
0849 e224       | $  |		Load	0x1,0x24
084a e00c       |    |		Load	0x0,0xc
084b 01d5       |    |		Execute	Vector,Field_Reference
084c 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
084d 4800       |H   |		Short_Literal	0x0
084e 00da       |    |		Load_Top	At_Offset_2
084f 8050       | P  |		Call	0x0,0x50
0850 e224       | $  |		Load	0x1,0x24
0851 e5ff       |    |		Load	0x2,-0x1
0852 8274       | t  |		Call	0x1,0x74
0853 e224       | $  |		Load	0x1,0x24
0854 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0855 00da       |    |		Load_Top	At_Offset_2
0856 0a01       |    |		Execute_Immediate	Plus,0x1
0857 005b       | [  |		Store_Top	Discrete,At_Offset_3
0858 00da       |    |		Load_Top	At_Offset_2
0859 0cc9       |    |		Execute_Immediate	Greater_Equal,-0x37
085a 6805       |h   |		Jump_Zero	0x860
085b 8275       | u  |		Call	0x1,0x75
085c 600b       |`   |		Indirect_Literal	Discrete,0x868,{0x00000000, 0x00002000}
085d 00ba       |    |		Action	Initiate_Delay
085e 4800       |H   |		Short_Literal	0x0
085f 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0860 00c9       |    |		Action	Pop_Auxiliary_Loop
0861 7fd7       |    |		Jump	0x839
0862			TRAP_0800:
0862 0007       |    |		Action	Break_Optional
0863 4800       |H   |		Short_Literal	0x0
0864 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0865 0000 0000  |    |		.XXX[0x3]
0867 0000       |    |
0868 0000 0000  |    |		.LITERAL	{0x00000000, 0x00002000}
086c 0000 0000  |    |		.BLANK	0000[0x4]
0870 ; --------------------------------------------------------------------------------------
0870 ; SUBPROGRAM
0870 ; --------------------------------------------------------------------------------------
0870 0873       | s  |		.CONST	0x0873								; Address of begin
0871 0004       |    |		.CONST	0x0004								; Address of exception handler
0872 0001       |    |		.CONST	0x0001								; Number of locals
0873			BODY_0870:
0873			INIT_0870:
0873 4100       |A   |		End_Rendezvous	0x0
0874 0000 0000  |    |		.BLANK	0000[0x4]
0878 ; --------------------------------------------------------------------------------------
0878 ; SUBPROGRAM
0878 ; --------------------------------------------------------------------------------------
0878 08a8       |    |		.CONST	0x08a8								; Address of begin
0879 08ae       |    |		.CONST	0x08ae								; Address of exception handler
087a 0002       |    |		.CONST	0x0002								; Number of locals
087b			INIT_0878:
087b 4820 494d  |H IM|		Declare_Variable	Select	0x000, 0x014,
087d 481f 494f  |H IO|				[0x000]: 0x001 = 0x0008,
087f 481e 4950  |H IP|				[0x00d]: 0x16c = 0x0b60,
0881 481d 4956  |H IV|				[0x00e]: 0x16a = 0x0b50,
0883 481c 4957  |H IW|				[0x00f]: 0x169 = 0x0b48,
0885 481b 4958  |H IX|				[0x010]: 0x168 = 0x0b40,
0887 481a 4959  |H IY|				[0x011]: 0x166 = 0x0b30,
0889 4819 495a  |H IZ|				[0x012]: 0x164 = 0x0b20,
088b 4818 495b  |H I[|				[0x013]: 0x162 = 0x0b10,
088d 4817 495c  |H I\|				[0x014]: 0x161 = 0x0b08,
088f 4816 495d  |H I]|				[0x015]: 0x15f = 0x0af8,
0891 4815 495f  |H I_|				[0x016]: 0x15d = 0x0ae8,
0893 4814 4961  |H Ia|				[0x017]: 0x15c = 0x0ae0,
0895 4813 4962  |H Ib|				[0x018]: 0x15b = 0x0ad8,
0897 4812 4964  |H Id|				[0x019]: 0x15a = 0x0ad0,
0899 4811 4966  |H If|				[0x01a]: 0x159 = 0x0ac8,
089b 4810 4968  |H Ih|				[0x01b]: 0x158 = 0x0ac0,
089d 480f 4969  |H Ii|				[0x01c]: 0x157 = 0x0ab8,
089f 480e 496a  |H Ij|				[0x01d]: 0x156 = 0x0ab0,
08a1 480d 496c  |H Il|				[0x01e]: 0x150 = 0x0a80,
08a3 4800 4801  |H H |				[0x01f]: 0x14f = 0x0a78,
08a5 4800 4814  |H H |				[0x020]: 0x14d = 0x0a68
08a7 02cf       |    |
08a8			BODY_0878:
08a8 00cf       |    |		Action	Mark_Auxiliary
08a9 00d9       |    |		Load_Top	At_Offset_1
08aa 013f       | ?  |		Execute	Select,Rendezvous
08ab 00d1       |    |		Pop_Control	Pop_Count_1
08ac 00c9       |    |		Action	Pop_Auxiliary_Loop
08ad 7ffb       |    |		Jump	0x8a9
08ae			TRAP_0878:
08ae 0007       |    |		Action	Break_Optional
08af 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
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 00da       |    |		Load_Top	At_Offset_2
08b4 e403       |    |		Load	0x2,0x3
08b5 0279       | y  |		Execute	Discrete,And
08b6 a403       |    |		Store_Unchecked	0x2,0x3
08b7 e404       |    |		Load	0x2,0x4
08b8 e7fe       |    |		Load	0x3,-0x2
08b9 0279       | y  |		Execute	Discrete,And
08ba a404       |    |		Store_Unchecked	0x2,0x4
08bb e7fd       |    |		Load	0x3,-0x3
08bc e402       |    |		Load	0x2,0x2
08bd 8228       | (  |		Call	0x1,0x28
08be a402       |    |		Store_Unchecked	0x2,0x2
08bf 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
08c0 ; --------------------------------------------------------------------------------------
08c0 ; SUBPROGRAM
08c0 ; --------------------------------------------------------------------------------------
08c0 08c3       |    |		.CONST	0x08c3								; Address of begin
08c1 08cc       |    |		.CONST	0x08cc								; Address of exception handler
08c2 0001       |    |		.CONST	0x0001								; Number of locals
08c3			BODY_08c0:
08c3			INIT_08c0:
08c3 e021       | !  |		Load	0x0,0x21
08c4 e5ff       |    |		Load	0x2,-0x1
08c5 e232       | 2  |		Load	0x1,0x32
08c6 1d33       | 3  |		Execute_Immediate	Reference_Lex_1,0x33
08c7 e234       | 4  |		Load	0x1,0x34
08c8 1d35       | 5  |		Execute_Immediate	Reference_Lex_1,0x35
08c9 8003       |    |		Call	0x0,0x3
08ca c021       | !  |		Store	0x0,0x21
08cb 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
08cc			TRAP_08c0:
08cc 0007       |    |		Action	Break_Optional
08cd 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
08ce 0000 0000  |    |		.XXX[0x2]
08d0 ; --------------------------------------------------------------------------------------
08d0 ; SUBPROGRAM
08d0 ; --------------------------------------------------------------------------------------
08d0 08d3       |    |		.CONST	0x08d3								; Address of begin
08d1 0004       |    |		.CONST	0x0004								; Address of exception handler
08d2 0001       |    |		.CONST	0x0001								; Number of locals
08d3			BODY_08d0:
08d3			INIT_08d0:
08d3 e5fc       |    |		Load	0x2,-0x4
08d4 00db       |    |		Load_Top	At_Offset_3
08d5 e039       | 9  |		Load	0x0,0x39
08d6 01d5       |    |		Execute	Vector,Field_Reference
08d7 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
08d8 e5fc       |    |		Load	0x2,-0x4
08d9 00db       |    |		Load_Top	At_Offset_3
08da e039       | 9  |		Load	0x0,0x39
08db 01d5       |    |		Execute	Vector,Field_Reference
08dc 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
08dd e5fd       |    |		Load	0x2,-0x3
08de 00db       |    |		Load_Top	At_Offset_3
08df e039       | 9  |		Load	0x0,0x39
08e0 01d5       |    |		Execute	Vector,Field_Reference
08e1 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
08e2 e5fa       |    |		Load	0x2,-0x6
08e3 00db       |    |		Load_Top	At_Offset_3
08e4 e039       | 9  |		Load	0x0,0x39
08e5 01d5       |    |		Execute	Vector,Field_Reference
08e6 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
08e7 e5fb       |    |		Load	0x2,-0x5
08e8 00db       |    |		Load_Top	At_Offset_3
08e9 e039       | 9  |		Load	0x0,0x39
08ea 01d5       |    |		Execute	Vector,Field_Reference
08eb 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
08ec e5fe       |    |		Load	0x2,-0x2
08ed 00db       |    |		Load_Top	At_Offset_3
08ee e027       | '  |		Load	0x0,0x27
08ef 01d6       |    |		Execute	Vector,Field_Write
08f0 e017       |    |		Load	0x0,0x17
08f1 0a01       |    |		Execute_Immediate	Plus,0x1
08f2 c017       |    |		Store	0x0,0x17
08f3 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
08f4 0000 0000  |    |		.BLANK	0000[0x4]
08f8 ; --------------------------------------------------------------------------------------
08f8 ; SUBPROGRAM
08f8 ; --------------------------------------------------------------------------------------
08f8 08fb       |    |		.CONST	0x08fb								; Address of begin
08f9 0004       |    |		.CONST	0x0004								; Address of exception handler
08fa 0001       |    |		.CONST	0x0001								; Number of locals
08fb			BODY_08f8:
08fb			INIT_08f8:
08fb e5ff       |    |		Load	0x2,-0x1
08fc 00db       |    |		Load_Top	At_Offset_3
08fd e02a       | *  |		Load	0x0,0x2a
08fe 01d5       |    |		Execute	Vector,Field_Reference
08ff 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0900 e5fc       |    |		Load	0x2,-0x4
0901 00db       |    |		Load_Top	At_Offset_3
0902 e02a       | *  |		Load	0x0,0x2a
0903 01d5       |    |		Execute	Vector,Field_Reference
0904 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0905 e5fc       |    |		Load	0x2,-0x4
0906 00db       |    |		Load_Top	At_Offset_3
0907 e02a       | *  |		Load	0x0,0x2a
0908 01d5       |    |		Execute	Vector,Field_Reference
0909 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
090a e5fd       |    |		Load	0x2,-0x3
090b 00db       |    |		Load_Top	At_Offset_3
090c e02a       | *  |		Load	0x0,0x2a
090d 01d5       |    |		Execute	Vector,Field_Reference
090e 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
090f e5fa       |    |		Load	0x2,-0x6
0910 00db       |    |		Load_Top	At_Offset_3
0911 e02a       | *  |		Load	0x0,0x2a
0912 01d5       |    |		Execute	Vector,Field_Reference
0913 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0914 e5fb       |    |		Load	0x2,-0x5
0915 00db       |    |		Load_Top	At_Offset_3
0916 e02a       | *  |		Load	0x0,0x2a
0917 01d5       |    |		Execute	Vector,Field_Reference
0918 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
0919 e5fe       |    |		Load	0x2,-0x2
091a 00db       |    |		Load_Top	At_Offset_3
091b e02a       | *  |		Load	0x0,0x2a
091c 01d5       |    |		Execute	Vector,Field_Reference
091d 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
091e e02b       | +  |		Load	0x0,0x2b
091f 0a01       |    |		Execute_Immediate	Plus,0x1
0920 c02b       | +  |		Store	0x0,0x2b
0921 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0922 0000 0000  |    |		.BLANK	0000[0x6]
0928 ; --------------------------------------------------------------------------------------
0928 ; SUBPROGRAM
0928 ; --------------------------------------------------------------------------------------
0928 092b       | +  |		.CONST	0x092b								; Address of begin
0929 0004       |    |		.CONST	0x0004								; Address of exception handler
092a 0001       |    |		.CONST	0x0001								; Number of locals
092b			BODY_0928:
092b			INIT_0928:
092b e5f9       |    |		Load	0x2,-0x7
092c 00db       |    |		Load_Top	At_Offset_3
092d e03b       | ;  |		Load	0x0,0x3b
092e 01d5       |    |		Execute	Vector,Field_Reference
092f 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0930 e5fe       |    |		Load	0x2,-0x2
0931 00db       |    |		Load_Top	At_Offset_3
0932 e03b       | ;  |		Load	0x0,0x3b
0933 01d5       |    |		Execute	Vector,Field_Reference
0934 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0935 e5fd       |    |		Load	0x2,-0x3
0936 00db       |    |		Load_Top	At_Offset_3
0937 e03b       | ;  |		Load	0x0,0x3b
0938 01d5       |    |		Execute	Vector,Field_Reference
0939 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
093a e5fc       |    |		Load	0x2,-0x4
093b 00db       |    |		Load_Top	At_Offset_3
093c e03b       | ;  |		Load	0x0,0x3b
093d 01d5       |    |		Execute	Vector,Field_Reference
093e 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
093f e5fb       |    |		Load	0x2,-0x5
0940 00db       |    |		Load_Top	At_Offset_3
0941 e03b       | ;  |		Load	0x0,0x3b
0942 01d5       |    |		Execute	Vector,Field_Reference
0943 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0944 e5fa       |    |		Load	0x2,-0x6
0945 00db       |    |		Load_Top	At_Offset_3
0946 e03b       | ;  |		Load	0x0,0x3b
0947 01d5       |    |		Execute	Vector,Field_Reference
0948 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0949 e03c       | <  |		Load	0x0,0x3c
094a 0a01       |    |		Execute_Immediate	Plus,0x1
094b c03c       | <  |		Store	0x0,0x3c
094c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
094d 0000 0000  |    |		.XXX[0x3]
094f 0000       |    |
0950 ; --------------------------------------------------------------------------------------
0950 ; SUBPROGRAM
0950 ; --------------------------------------------------------------------------------------
0950 0953       | S  |		.CONST	0x0953								; Address of begin
0951 0004       |    |		.CONST	0x0004								; Address of exception handler
0952 0001       |    |		.CONST	0x0001								; Number of locals
0953			BODY_0950:
0953			INIT_0950:
0953 00cf       |    |		Action	Mark_Auxiliary
0954 e03a       | :  |		Load	0x0,0x3a
0955 4801       |H   |		Short_Literal	0x1
0956 0263       | c  |		Execute	Discrete,Above_Bound
0957 700a       |p   |		Jump_Nonzero	0x962
0958 00d8       |    |		Load_Top	At_Offset_0
0959 e03b       | ;  |		Load	0x0,0x3b
095a 01d5       |    |		Execute	Vector,Field_Reference
095b 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
095c e5fa       |    |		Load	0x2,-0x6
095d 027f       |    |		Execute	Discrete,Equal
095e 6801       |h   |		Jump_Zero	0x960
095f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0960 00c8       |    |		Action	Pop_Auxiliary_Range
0961 3ff6       |?   |		Loop_Increasing	0x958
0962 00c9       |    |		Action	Pop_Auxiliary_Loop
0963 e03a       | :  |		Load	0x0,0x3a
0964 4801       |H   |		Short_Literal	0x1
0965 0263       | c  |		Execute	Discrete,Above_Bound
0966 700c       |p   |		Jump_Nonzero	0x973
0967 00d8       |    |		Load_Top	At_Offset_0
0968 e03b       | ;  |		Load	0x0,0x3b
0969 01d5       |    |		Execute	Vector,Field_Reference
096a 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
096b e012       |    |		Load	0x0,0x12
096c 027f       |    |		Execute	Discrete,Equal
096d 6803       |h   |		Jump_Zero	0x971
096e 00d8       |    |		Load_Top	At_Offset_0
096f 8402       |    |		Call	0x2,0x2
0970 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0971 00c8       |    |		Action	Pop_Auxiliary_Range
0972 3ff4       |?   |		Loop_Increasing	0x967
0973 00ce       |    |		Action	Pop_Auxiliary
0974 e03c       | <  |		Load	0x0,0x3c
0975 0f14       |    |		Execute_Immediate	Equal,0x14
0976 6802       |h   |		Jump_Zero	0x979
0977 e051       | Q  |		Load	0x0,0x51
0978 0257       | W  |		Execute	Discrete,Raise
0979 e03a       | :  |		Load	0x0,0x3a
097a 0a01       |    |		Execute_Immediate	Plus,0x1
097b 00d8       |    |		Load_Top	At_Offset_0
097c 00e3       |    |		Load_Encached	Natural_Cache
097d 0260       | `  |		Execute	Discrete,In_Type
097e 7001       |p   |		Jump_Nonzero	0x980
097f 0801       |    |		Execute_Immediate	Raise,0x1
0980 8402       |    |		Call	0x2,0x2
0981 e03a       | :  |		Load	0x0,0x3a
0982 0a01       |    |		Execute_Immediate	Plus,0x1
0983 c03a       | :  |		Store	0x0,0x3a
0984 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0985 0000 0000  |    |		.XXX[0x3]
0987 0000       |    |
0988 ; --------------------------------------------------------------------------------------
0988 ; SUBPROGRAM
0988 ; --------------------------------------------------------------------------------------
0988 098b       |    |		.CONST	0x098b								; Address of begin
0989 0004       |    |		.CONST	0x0004								; Address of exception handler
098a 0001       |    |		.CONST	0x0001								; Number of locals
098b			BODY_0988:
098b			INIT_0988:
098b e5ff       |    |		Load	0x2,-0x1
098c 00db       |    |		Load_Top	At_Offset_3
098d e03e       | >  |		Load	0x0,0x3e
098e 01d5       |    |		Execute	Vector,Field_Reference
098f 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0990 e5fe       |    |		Load	0x2,-0x2
0991 00db       |    |		Load_Top	At_Offset_3
0992 e03e       | >  |		Load	0x0,0x3e
0993 01d5       |    |		Execute	Vector,Field_Reference
0994 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0995 e5fd       |    |		Load	0x2,-0x3
0996 00db       |    |		Load_Top	At_Offset_3
0997 e03e       | >  |		Load	0x0,0x3e
0998 01d5       |    |		Execute	Vector,Field_Reference
0999 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
099a 00db       |    |		Load_Top	At_Offset_3
099b e402       |    |		Load	0x2,0x2
099c 01d5       |    |		Execute	Vector,Field_Reference
099d 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
099e 00db       |    |		Load_Top	At_Offset_3
099f e03e       | >  |		Load	0x0,0x3e
09a0 01d5       |    |		Execute	Vector,Field_Reference
09a1 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
09a2 00db       |    |		Load_Top	At_Offset_3
09a3 e402       |    |		Load	0x2,0x2
09a4 01d5       |    |		Execute	Vector,Field_Reference
09a5 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
09a6 00db       |    |		Load_Top	At_Offset_3
09a7 e03e       | >  |		Load	0x0,0x3e
09a8 01d5       |    |		Execute	Vector,Field_Reference
09a9 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
09aa e5f9       |    |		Load	0x2,-0x7
09ab 00db       |    |		Load_Top	At_Offset_3
09ac e03e       | >  |		Load	0x0,0x3e
09ad 01d5       |    |		Execute	Vector,Field_Reference
09ae 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
09af e03f       | ?  |		Load	0x0,0x3f
09b0 0a01       |    |		Execute_Immediate	Plus,0x1
09b1 c03f       | ?  |		Store	0x0,0x3f
09b2 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
09b3 0000 0000  |    |		.BLANK	0000[0x5]
09b8 ; --------------------------------------------------------------------------------------
09b8 ; SUBPROGRAM
09b8 ; --------------------------------------------------------------------------------------
09b8 09bd       |    |		.CONST	0x09bd								; Address of begin
09b9 0004       |    |		.CONST	0x0004								; Address of exception handler
09ba 0003       |    |		.CONST	0x0003								; Number of locals
09bb			INIT_09b8:
09bb 00e3       |    |		Load_Encached	Natural_Cache
09bc 00e1       |    |		Load_Encached	Boolean_Cache
09bd			BODY_09b8:
09bd 00cf       |    |		Action	Mark_Auxiliary
09be e03d       | =  |		Load	0x0,0x3d
09bf 4801       |H   |		Short_Literal	0x1
09c0 0263       | c  |		Execute	Discrete,Above_Bound
09c1 700a       |p   |		Jump_Nonzero	0x9cc
09c2 00d8       |    |		Load_Top	At_Offset_0
09c3 e03e       | >  |		Load	0x0,0x3e
09c4 01d5       |    |		Execute	Vector,Field_Reference
09c5 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
09c6 e5f9       |    |		Load	0x2,-0x7
09c7 027f       |    |		Execute	Discrete,Equal
09c8 6801       |h   |		Jump_Zero	0x9ca
09c9 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
09ca 00c8       |    |		Action	Pop_Auxiliary_Range
09cb 3ff6       |?   |		Loop_Increasing	0x9c2
09cc 00ce       |    |		Action	Pop_Auxiliary
09cd 4801       |H   |		Short_Literal	0x1
09ce 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
09cf 00cf       |    |		Action	Mark_Auxiliary
09d0 e403       |    |		Load	0x2,0x3
09d1 4801       |H   |		Short_Literal	0x1
09d2 0263       | c  |		Execute	Discrete,Above_Bound
09d3 7030       |p0  |		Jump_Nonzero	0xa04
09d4 4801       |H   |		Short_Literal	0x1
09d5 a603       |    |		Store_Unchecked	0x3,0x3
09d6 00cf       |    |		Action	Mark_Auxiliary
09d7 e03d       | =  |		Load	0x0,0x3d
09d8 e602       |    |		Load	0x3,0x2
09d9 0263       | c  |		Execute	Discrete,Above_Bound
09da 7013       |p   |		Jump_Nonzero	0x9ee
09db 00d8       |    |		Load_Top	At_Offset_0
09dc e03e       | >  |		Load	0x0,0x3e
09dd 01d5       |    |		Execute	Vector,Field_Reference
09de 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
09df e012       |    |		Load	0x0,0x12
09e0 027f       |    |		Execute	Discrete,Equal
09e1 680a       |h   |		Jump_Zero	0x9ec
09e2 00db       |    |		Load_Top	At_Offset_3
09e3 00d9       |    |		Load_Top	At_Offset_1
09e4 8404       |    |		Call	0x2,0x4
09e5 00d8       |    |		Load_Top	At_Offset_0
09e6 0a01       |    |		Execute_Immediate	Plus,0x1
09e7 c602       |    |		Store	0x3,0x2
09e8 4800       |H   |		Short_Literal	0x0
09e9 a603       |    |		Store_Unchecked	0x3,0x3
09ea 00d2       |    |		Pop_Control	Pop_Count_2
09eb 7802       |x   |		Jump	0x9ee
09ec 00c8       |    |		Action	Pop_Auxiliary_Range
09ed 3fed       |?   |		Loop_Increasing	0x9db
09ee 00ce       |    |		Action	Pop_Auxiliary
09ef 00db       |    |		Load_Top	At_Offset_3
09f0 6811       |h   |		Jump_Zero	0xa02
09f1 e03f       | ?  |		Load	0x0,0x3f
09f2 0f14       |    |		Execute_Immediate	Equal,0x14
09f3 6802       |h   |		Jump_Zero	0x9f6
09f4 e052       | R  |		Load	0x0,0x52
09f5 0257       | W  |		Execute	Discrete,Raise
09f6 00d8       |    |		Load_Top	At_Offset_0
09f7 e03d       | =  |		Load	0x0,0x3d
09f8 0a01       |    |		Execute_Immediate	Plus,0x1
09f9 00d8       |    |		Load_Top	At_Offset_0
09fa 00e3       |    |		Load_Encached	Natural_Cache
09fb 0260       | `  |		Execute	Discrete,In_Type
09fc 7001       |p   |		Jump_Nonzero	0x9fe
09fd 0801       |    |		Execute_Immediate	Raise,0x1
09fe 8404       |    |		Call	0x2,0x4
09ff e03d       | =  |		Load	0x0,0x3d
0a00 0a01       |    |		Execute_Immediate	Plus,0x1
0a01 c03d       | =  |		Store	0x0,0x3d
0a02 00c8       |    |		Action	Pop_Auxiliary_Range
0a03 3fd0       |?   |		Loop_Increasing	0x9d4
0a04 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0a05 0000 0000  |    |		.XXX[0x3]
0a07 0000       |    |
0a08 ; --------------------------------------------------------------------------------------
0a08 ; SUBPROGRAM
0a08 ; --------------------------------------------------------------------------------------
0a08 0a0b       |    |		.CONST	0x0a0b								; Address of begin
0a09 0004       |    |		.CONST	0x0004								; Address of exception handler
0a0a 0001       |    |		.CONST	0x0001								; Number of locals
0a0b			BODY_0a08:
0a0b			INIT_0a08:
0a0b e5ff       |    |		Load	0x2,-0x1
0a0c 00db       |    |		Load_Top	At_Offset_3
0a0d e011       |    |		Load	0x0,0x11
0a0e 01d5       |    |		Execute	Vector,Field_Reference
0a0f 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0a10 e5fe       |    |		Load	0x2,-0x2
0a11 00db       |    |		Load_Top	At_Offset_3
0a12 e011       |    |		Load	0x0,0x11
0a13 01d5       |    |		Execute	Vector,Field_Reference
0a14 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0a15 e5fa       |    |		Load	0x2,-0x6
0a16 00db       |    |		Load_Top	At_Offset_3
0a17 e011       |    |		Load	0x0,0x11
0a18 01d5       |    |		Execute	Vector,Field_Reference
0a19 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0a1a e5fd       |    |		Load	0x2,-0x3
0a1b 00db       |    |		Load_Top	At_Offset_3
0a1c e011       |    |		Load	0x0,0x11
0a1d 01d5       |    |		Execute	Vector,Field_Reference
0a1e 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0a1f e5fc       |    |		Load	0x2,-0x4
0a20 00db       |    |		Load_Top	At_Offset_3
0a21 e011       |    |		Load	0x0,0x11
0a22 01d5       |    |		Execute	Vector,Field_Reference
0a23 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0a24 e5fb       |    |		Load	0x2,-0x5
0a25 00db       |    |		Load_Top	At_Offset_3
0a26 e011       |    |		Load	0x0,0x11
0a27 01d5       |    |		Execute	Vector,Field_Reference
0a28 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0a29 e5f9       |    |		Load	0x2,-0x7
0a2a 00db       |    |		Load_Top	At_Offset_3
0a2b e011       |    |		Load	0x0,0x11
0a2c 01d5       |    |		Execute	Vector,Field_Reference
0a2d 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
0a2e e5f8       |    |		Load	0x2,-0x8
0a2f 00db       |    |		Load_Top	At_Offset_3
0a30 e011       |    |		Load	0x0,0x11
0a31 01d5       |    |		Execute	Vector,Field_Reference
0a32 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
0a33 e040       | @  |		Load	0x0,0x40
0a34 0a01       |    |		Execute_Immediate	Plus,0x1
0a35 c040       | @  |		Store	0x0,0x40
0a36 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0a37 0000       |    |		.XXX[0x1]
0a38 ; --------------------------------------------------------------------------------------
0a38 ; SUBPROGRAM
0a38 ; --------------------------------------------------------------------------------------
0a38 0a3b       | ;  |		.CONST	0x0a3b								; Address of begin
0a39 0004       |    |		.CONST	0x0004								; Address of exception handler
0a3a 0001       |    |		.CONST	0x0001								; Number of locals
0a3b			BODY_0a38:
0a3b			INIT_0a38:
0a3b 00cf       |    |		Action	Mark_Auxiliary
0a3c e010       |    |		Load	0x0,0x10
0a3d 4801       |H   |		Short_Literal	0x1
0a3e 0263       | c  |		Execute	Discrete,Above_Bound
0a3f 700c       |p   |		Jump_Nonzero	0xa4c
0a40 00d8       |    |		Load_Top	At_Offset_0
0a41 e011       |    |		Load	0x0,0x11
0a42 01d5       |    |		Execute	Vector,Field_Reference
0a43 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0a44 e012       |    |		Load	0x0,0x12
0a45 027f       |    |		Execute	Discrete,Equal
0a46 6803       |h   |		Jump_Zero	0xa4a
0a47 00d8       |    |		Load_Top	At_Offset_0
0a48 8402       |    |		Call	0x2,0x2
0a49 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0a4a 00c8       |    |		Action	Pop_Auxiliary_Range
0a4b 3ff4       |?   |		Loop_Increasing	0xa40
0a4c 00ce       |    |		Action	Pop_Auxiliary
0a4d e040       | @  |		Load	0x0,0x40
0a4e 0f28       | (  |		Execute_Immediate	Equal,0x28
0a4f 6802       |h   |		Jump_Zero	0xa52
0a50 e053       | S  |		Load	0x0,0x53
0a51 0257       | W  |		Execute	Discrete,Raise
0a52 e010       |    |		Load	0x0,0x10
0a53 0a01       |    |		Execute_Immediate	Plus,0x1
0a54 00d8       |    |		Load_Top	At_Offset_0
0a55 00e3       |    |		Load_Encached	Natural_Cache
0a56 0260       | `  |		Execute	Discrete,In_Type
0a57 7001       |p   |		Jump_Nonzero	0xa59
0a58 0801       |    |		Execute_Immediate	Raise,0x1
0a59 8402       |    |		Call	0x2,0x2
0a5a e010       |    |		Load	0x0,0x10
0a5b 0a01       |    |		Execute_Immediate	Plus,0x1
0a5c c010       |    |		Store	0x0,0x10
0a5d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0a5e 0000 0000  |    |		.XXX[0x2]
0a60 ; --------------------------------------------------------------------------------------
0a60 ; SUBPROGRAM
0a60 ; --------------------------------------------------------------------------------------
0a60 0a63       | c  |		.CONST	0x0a63								; Address of begin
0a61 0a66       | f  |		.CONST	0x0a66								; Address of exception handler
0a62 0001       |    |		.CONST	0x0001								; Number of locals
0a63			BODY_0a60:
0a63			INIT_0a60:
0a63 e5ff       |    |		Load	0x2,-0x1
0a64 824c       | L  |		Call	0x1,0x4c
0a65 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0a66			TRAP_0a60:
0a66 0007       |    |		Action	Break_Optional
0a67 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0a68 ; --------------------------------------------------------------------------------------
0a68 ; SUBPROGRAM
0a68 ; See instruction 0x02cf at 0x87b, index=0x20
0a68 ; --------------------------------------------------------------------------------------
0a68 0a6b       | k  |		.CONST	0x0a6b								; Address of begin
0a69 0004       |    |		.CONST	0x0004								; Address of exception handler
0a6a 0001       |    |		.CONST	0x0001								; Number of locals
0a6b			BODY_0a68:
0a6b			INIT_0a68:
0a6b e7fc       |    |		Load	0x3,-0x4
0a6c 00e3       |    |		Load_Encached	Natural_Cache
0a6d e7fe       |    |		Load	0x3,-0x2
0a6e 826b       | k  |		Call	0x1,0x6b
0a6f c7fd       |    |		Store	0x3,-0x3
0a70 c7fc       |    |		Store	0x3,-0x4
0a71 4102       |A   |		End_Rendezvous	0x2
0a72 0000 0000  |    |		.BLANK	0000[0x6]
0a78 ; --------------------------------------------------------------------------------------
0a78 ; SUBPROGRAM
0a78 ; See instruction 0x02cf at 0x87b, index=0x1f
0a78 ; --------------------------------------------------------------------------------------
0a78 0a7b       | {  |		.CONST	0x0a7b								; Address of begin
0a79 0004       |    |		.CONST	0x0004								; Address of exception handler
0a7a 0001       |    |		.CONST	0x0001								; Number of locals
0a7b			BODY_0a78:
0a7b			INIT_0a78:
0a7b 4100       |A   |		End_Rendezvous	0x0
0a7c 0000 0000  |    |		.BLANK	0000[0x4]
0a80 ; --------------------------------------------------------------------------------------
0a80 ; SUBPROGRAM
0a80 ; See instruction 0x02cf at 0x87b, index=0x1e
0a80 ; --------------------------------------------------------------------------------------
0a80 0a83       |    |		.CONST	0x0a83								; Address of begin
0a81 0004       |    |		.CONST	0x0004								; Address of exception handler
0a82 0001       |    |		.CONST	0x0001								; Number of locals
0a83			BODY_0a80:
0a83			INIT_0a80:
0a83 00db       |    |		Load_Top	At_Offset_3
0a84 e039       | 9  |		Load	0x0,0x39
0a85 01d5       |    |		Execute	Vector,Field_Reference
0a86 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0a87 0f01       |    |		Execute_Immediate	Equal,0x1
0a88 6819       |h   |		Jump_Zero	0xaa2
0a89 00db       |    |		Load_Top	At_Offset_3
0a8a e039       | 9  |		Load	0x0,0x39
0a8b 01d5       |    |		Execute	Vector,Field_Reference
0a8c 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0a8d a7fd       |    |		Store_Unchecked	0x3,-0x3
0a8e 00db       |    |		Load_Top	At_Offset_3
0a8f e039       | 9  |		Load	0x0,0x39
0a90 01d5       |    |		Execute	Vector,Field_Reference
0a91 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0a92 6806       |h   |		Jump_Zero	0xa99
0a93 00db       |    |		Load_Top	At_Offset_3
0a94 e039       | 9  |		Load	0x0,0x39
0a95 01d5       |    |		Execute	Vector,Field_Reference
0a96 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0a97 8249       | I  |		Call	0x1,0x49
0a98 4101       |A   |		End_Rendezvous	0x1
0a99 00db       |    |		Load_Top	At_Offset_3
0a9a e039       | 9  |		Load	0x0,0x39
0a9b 01d5       |    |		Execute	Vector,Field_Reference
0a9c 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0a9d e7fe       |    |		Load	0x3,-0x2
0a9e e039       | 9  |		Load	0x0,0x39
0a9f 01d5       |    |		Execute	Vector,Field_Reference
0aa0 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0aa1 4101       |A   |		End_Rendezvous	0x1
0aa2 e012       |    |		Load	0x0,0x12
0aa3 a7fd       |    |		Store_Unchecked	0x3,-0x3
0aa4 00db       |    |		Load_Top	At_Offset_3
0aa5 e039       | 9  |		Load	0x0,0x39
0aa6 01d5       |    |		Execute	Vector,Field_Reference
0aa7 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0aa8 0aff       |    |		Execute_Immediate	Plus,-0x1
0aa9 e7fe       |    |		Load	0x3,-0x2
0aaa e039       | 9  |		Load	0x0,0x39
0aab 01d5       |    |		Execute	Vector,Field_Reference
0aac 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0aad 4101       |A   |		End_Rendezvous	0x1
0aae 0000 0000  |    |		.XXX[0x2]
0ab0 ; --------------------------------------------------------------------------------------
0ab0 ; SUBPROGRAM
0ab0 ; See instruction 0x02cf at 0x87b, index=0x1d
0ab0 ; --------------------------------------------------------------------------------------
0ab0 0ab3       |    |		.CONST	0x0ab3								; Address of begin
0ab1 0004       |    |		.CONST	0x0004								; Address of exception handler
0ab2 0001       |    |		.CONST	0x0001								; Number of locals
0ab3			BODY_0ab0:
0ab3			INIT_0ab0:
0ab3 00db       |    |		Load_Top	At_Offset_3
0ab4 823f       | ?  |		Call	0x1,0x3f
0ab5 4100       |A   |		End_Rendezvous	0x0
0ab6 0000 0000  |    |		.XXX[0x2]
0ab8 ; --------------------------------------------------------------------------------------
0ab8 ; SUBPROGRAM
0ab8 ; See instruction 0x02cf at 0x87b, index=0x1c
0ab8 ; --------------------------------------------------------------------------------------
0ab8 0abb       |    |		.CONST	0x0abb								; Address of begin
0ab9 0004       |    |		.CONST	0x0004								; Address of exception handler
0aba 0001       |    |		.CONST	0x0001								; Number of locals
0abb			BODY_0ab8:
0abb			INIT_0ab8:
0abb 00db       |    |		Load_Top	At_Offset_3
0abc 8249       | I  |		Call	0x1,0x49
0abd 4100       |A   |		End_Rendezvous	0x0
0abe 0000 0000  |    |		.XXX[0x2]
0ac0 ; --------------------------------------------------------------------------------------
0ac0 ; SUBPROGRAM
0ac0 ; See instruction 0x02cf at 0x87b, index=0x1b
0ac0 ; --------------------------------------------------------------------------------------
0ac0 0ac3       |    |		.CONST	0x0ac3								; Address of begin
0ac1 0004       |    |		.CONST	0x0004								; Address of exception handler
0ac2 0001       |    |		.CONST	0x0001								; Number of locals
0ac3			BODY_0ac0:
0ac3			INIT_0ac0:
0ac3 e7fd       |    |		Load	0x3,-0x3
0ac4 e7fe       |    |		Load	0x3,-0x2
0ac5 825f       | _  |		Call	0x1,0x5f
0ac6 4100       |A   |		End_Rendezvous	0x0
0ac7 0000       |    |		.XXX[0x1]
0ac8 ; --------------------------------------------------------------------------------------
0ac8 ; SUBPROGRAM
0ac8 ; See instruction 0x02cf at 0x87b, index=0x1a
0ac8 ; --------------------------------------------------------------------------------------
0ac8 0acb       |    |		.CONST	0x0acb								; Address of begin
0ac9 0004       |    |		.CONST	0x0004								; Address of exception handler
0aca 0001       |    |		.CONST	0x0001								; Number of locals
0acb			BODY_0ac8:
0acb			INIT_0ac8:
0acb 826a       | j  |		Call	0x1,0x6a
0acc 4100       |A   |		End_Rendezvous	0x0
0acd 0000 0000  |    |		.XXX[0x3]
0acf 0000       |    |
0ad0 ; --------------------------------------------------------------------------------------
0ad0 ; SUBPROGRAM
0ad0 ; See instruction 0x02cf at 0x87b, index=0x19
0ad0 ; --------------------------------------------------------------------------------------
0ad0 0ad3       |    |		.CONST	0x0ad3								; Address of begin
0ad1 0004       |    |		.CONST	0x0004								; Address of exception handler
0ad2 0001       |    |		.CONST	0x0001								; Number of locals
0ad3			BODY_0ad0:
0ad3			INIT_0ad0:
0ad3 00db       |    |		Load_Top	At_Offset_3
0ad4 824c       | L  |		Call	0x1,0x4c
0ad5 4100       |A   |		End_Rendezvous	0x0
0ad6 0000 0000  |    |		.XXX[0x2]
0ad8 ; --------------------------------------------------------------------------------------
0ad8 ; SUBPROGRAM
0ad8 ; See instruction 0x02cf at 0x87b, index=0x18
0ad8 ; --------------------------------------------------------------------------------------
0ad8 0adb       |    |		.CONST	0x0adb								; Address of begin
0ad9 0004       |    |		.CONST	0x0004								; Address of exception handler
0ada 0001       |    |		.CONST	0x0001								; Number of locals
0adb			BODY_0ad8:
0adb			INIT_0ad8:
0adb 00db       |    |		Load_Top	At_Offset_3
0adc 8260       | `  |		Call	0x1,0x60
0add 4100       |A   |		End_Rendezvous	0x0
0ade 0000 0000  |    |		.XXX[0x2]
0ae0 ; --------------------------------------------------------------------------------------
0ae0 ; SUBPROGRAM
0ae0 ; See instruction 0x02cf at 0x87b, index=0x17
0ae0 ; --------------------------------------------------------------------------------------
0ae0 0ae3       |    |		.CONST	0x0ae3								; Address of begin
0ae1 0004       |    |		.CONST	0x0004								; Address of exception handler
0ae2 0001       |    |		.CONST	0x0001								; Number of locals
0ae3			BODY_0ae0:
0ae3			INIT_0ae0:
0ae3 00db       |    |		Load_Top	At_Offset_3
0ae4 824a       | J  |		Call	0x1,0x4a
0ae5 4100       |A   |		End_Rendezvous	0x0
0ae6 0000 0000  |    |		.XXX[0x2]
0ae8 ; --------------------------------------------------------------------------------------
0ae8 ; SUBPROGRAM
0ae8 ; See instruction 0x02cf at 0x87b, index=0x16
0ae8 ; --------------------------------------------------------------------------------------
0ae8 0aeb       |    |		.CONST	0x0aeb								; Address of begin
0ae9 0004       |    |		.CONST	0x0004								; Address of exception handler
0aea 0001       |    |		.CONST	0x0001								; Number of locals
0aeb			BODY_0ae8:
0aeb			INIT_0ae8:
0aeb e7f8       |    |		Load	0x3,-0x8
0aec e7f9       |    |		Load	0x3,-0x7
0aed e7fa       |    |		Load	0x3,-0x6
0aee e7fb       |    |		Load	0x3,-0x5
0aef e7fc       |    |		Load	0x3,-0x4
0af0 e7fd       |    |		Load	0x3,-0x3
0af1 e7fe       |    |		Load	0x3,-0x2
0af2 8248       | H  |		Call	0x1,0x48
0af3 4100       |A   |		End_Rendezvous	0x0
0af4 0000 0000  |    |		.BLANK	0000[0x4]
0af8 ; --------------------------------------------------------------------------------------
0af8 ; SUBPROGRAM
0af8 ; See instruction 0x02cf at 0x87b, index=0x15
0af8 ; --------------------------------------------------------------------------------------
0af8 0afb       |    |		.CONST	0x0afb								; Address of begin
0af9 0004       |    |		.CONST	0x0004								; Address of exception handler
0afa 0001       |    |		.CONST	0x0001								; Number of locals
0afb			BODY_0af8:
0afb			INIT_0af8:
0afb e7f7       |    |		Load	0x3,-0x9
0afc e7f8       |    |		Load	0x3,-0x8
0afd e7f9       |    |		Load	0x3,-0x7
0afe e7fa       |    |		Load	0x3,-0x6
0aff e7fb       |    |		Load	0x3,-0x5
0b00 e7fc       |    |		Load	0x3,-0x4
0b01 e7fd       |    |		Load	0x3,-0x3
0b02 e7fe       |    |		Load	0x3,-0x2
0b03 8247       | G  |		Call	0x1,0x47
0b04 4100       |A   |		End_Rendezvous	0x0
0b05 0000 0000  |    |		.XXX[0x3]
0b07 0000       |    |
0b08 ; --------------------------------------------------------------------------------------
0b08 ; SUBPROGRAM
0b08 ; See instruction 0x02cf at 0x87b, index=0x14
0b08 ; --------------------------------------------------------------------------------------
0b08 0b0b       |    |		.CONST	0x0b0b								; Address of begin
0b09 0004       |    |		.CONST	0x0004								; Address of exception handler
0b0a 0001       |    |		.CONST	0x0001								; Number of locals
0b0b			BODY_0b08:
0b0b			INIT_0b08:
0b0b e7fc       |    |		Load	0x3,-0x4
0b0c e7fd       |    |		Load	0x3,-0x3
0b0d e7fe       |    |		Load	0x3,-0x2
0b0e 8246       | F  |		Call	0x1,0x46
0b0f 4100       |A   |		End_Rendezvous	0x0
0b10 ; --------------------------------------------------------------------------------------
0b10 ; SUBPROGRAM
0b10 ; See instruction 0x02cf at 0x87b, index=0x13
0b10 ; --------------------------------------------------------------------------------------
0b10 0b13       |    |		.CONST	0x0b13								; Address of begin
0b11 0004       |    |		.CONST	0x0004								; Address of exception handler
0b12 0001       |    |		.CONST	0x0001								; Number of locals
0b13			BODY_0b10:
0b13			INIT_0b10:
0b13 e7f8       |    |		Load	0x3,-0x8
0b14 e7f9       |    |		Load	0x3,-0x7
0b15 e7fa       |    |		Load	0x3,-0x6
0b16 e7fb       |    |		Load	0x3,-0x5
0b17 e7fc       |    |		Load	0x3,-0x4
0b18 e7fd       |    |		Load	0x3,-0x3
0b19 e7fe       |    |		Load	0x3,-0x2
0b1a 8245       | E  |		Call	0x1,0x45
0b1b 4100       |A   |		End_Rendezvous	0x0
0b1c 0000 0000  |    |		.BLANK	0000[0x4]
0b20 ; --------------------------------------------------------------------------------------
0b20 ; SUBPROGRAM
0b20 ; See instruction 0x02cf at 0x87b, index=0x12
0b20 ; --------------------------------------------------------------------------------------
0b20 0b23       | #  |		.CONST	0x0b23								; Address of begin
0b21 0004       |    |		.CONST	0x0004								; Address of exception handler
0b22 0001       |    |		.CONST	0x0001								; Number of locals
0b23			BODY_0b20:
0b23			INIT_0b20:
0b23 e7f7       |    |		Load	0x3,-0x9
0b24 e7f8       |    |		Load	0x3,-0x8
0b25 e7f9       |    |		Load	0x3,-0x7
0b26 e7fa       |    |		Load	0x3,-0x6
0b27 e7fb       |    |		Load	0x3,-0x5
0b28 e7fc       |    |		Load	0x3,-0x4
0b29 e7fd       |    |		Load	0x3,-0x3
0b2a e7fe       |    |		Load	0x3,-0x2
0b2b 8244       | D  |		Call	0x1,0x44
0b2c 4101       |A   |		End_Rendezvous	0x1
0b2d 0000 0000  |    |		.XXX[0x3]
0b2f 0000       |    |
0b30 ; --------------------------------------------------------------------------------------
0b30 ; SUBPROGRAM
0b30 ; See instruction 0x02cf at 0x87b, index=0x11
0b30 ; --------------------------------------------------------------------------------------
0b30 0b33       | 3  |		.CONST	0x0b33								; Address of begin
0b31 0004       |    |		.CONST	0x0004								; Address of exception handler
0b32 0001       |    |		.CONST	0x0001								; Number of locals
0b33			BODY_0b30:
0b33			INIT_0b30:
0b33 e7fa       |    |		Load	0x3,-0x6
0b34 e7fb       |    |		Load	0x3,-0x5
0b35 e7fc       |    |		Load	0x3,-0x4
0b36 e7fd       |    |		Load	0x3,-0x3
0b37 e7fe       |    |		Load	0x3,-0x2
0b38 8243       | C  |		Call	0x1,0x43
0b39 4101       |A   |		End_Rendezvous	0x1
0b3a 0000 0000  |    |		.BLANK	0000[0x6]
0b40 ; --------------------------------------------------------------------------------------
0b40 ; SUBPROGRAM
0b40 ; See instruction 0x02cf at 0x87b, index=0x10
0b40 ; --------------------------------------------------------------------------------------
0b40 0b43       | C  |		.CONST	0x0b43								; Address of begin
0b41 0004       |    |		.CONST	0x0004								; Address of exception handler
0b42 0001       |    |		.CONST	0x0001								; Number of locals
0b43			BODY_0b40:
0b43			INIT_0b40:
0b43 e7fd       |    |		Load	0x3,-0x3
0b44 e7fc       |    |		Load	0x3,-0x4
0b45 e7fe       |    |		Load	0x3,-0x2
0b46 8242       | B  |		Call	0x1,0x42
0b47 4102       |A   |		End_Rendezvous	0x2
0b48 ; --------------------------------------------------------------------------------------
0b48 ; SUBPROGRAM
0b48 ; See instruction 0x02cf at 0x87b, index=0xf
0b48 ; --------------------------------------------------------------------------------------
0b48 0b4b       | K  |		.CONST	0x0b4b								; Address of begin
0b49 0004       |    |		.CONST	0x0004								; Address of exception handler
0b4a 0001       |    |		.CONST	0x0001								; Number of locals
0b4b			BODY_0b48:
0b4b			INIT_0b48:
0b4b 00db       |    |		Load_Top	At_Offset_3
0b4c 8241       | A  |		Call	0x1,0x41
0b4d 4100       |A   |		End_Rendezvous	0x0
0b4e 0000 0000  |    |		.XXX[0x2]
0b50 ; --------------------------------------------------------------------------------------
0b50 ; SUBPROGRAM
0b50 ; See instruction 0x02cf at 0x87b, index=0xe
0b50 ; --------------------------------------------------------------------------------------
0b50 0b53       | S  |		.CONST	0x0b53								; Address of begin
0b51 0004       |    |		.CONST	0x0004								; Address of exception handler
0b52 0001       |    |		.CONST	0x0001								; Number of locals
0b53			BODY_0b50:
0b53			INIT_0b50:
0b53 e7f9       |    |		Load	0x3,-0x7
0b54 e7fa       |    |		Load	0x3,-0x6
0b55 e7fb       |    |		Load	0x3,-0x5
0b56 e7fc       |    |		Load	0x3,-0x4
0b57 e7fd       |    |		Load	0x3,-0x3
0b58 e7fe       |    |		Load	0x3,-0x2
0b59 8240       | @  |		Call	0x1,0x40
0b5a 4100       |A   |		End_Rendezvous	0x0
0b5b 0000 0000  |    |		.BLANK	0000[0x5]
0b60 ; --------------------------------------------------------------------------------------
0b60 ; SUBPROGRAM
0b60 ; See instruction 0x02cf at 0x87b, index=0xd
0b60 ; --------------------------------------------------------------------------------------
0b60 0b63       | c  |		.CONST	0x0b63								; Address of begin
0b61 0004       |    |		.CONST	0x0004								; Address of exception handler
0b62 0001       |    |		.CONST	0x0001								; Number of locals
0b63			BODY_0b60:
0b63			INIT_0b60:
0b63 00db       |    |		Load_Top	At_Offset_3
0b64 8276       | v  |		Call	0x1,0x76
0b65 a7fd       |    |		Store_Unchecked	0x3,-0x3
0b66 4101       |A   |		End_Rendezvous	0x1
0b67 ; --------------------------------------------------------------------------------------
0b67 ; STRING TABLE
0b67 ; --------------------------------------------------------------------------------------
0b67 0004       |    |		.STRTAB	0x0004->0x0b69							; "Action not found"
0b68 0012       |    |		.STREND 0x0012->0x0b71
0b69 4163 7469  |Acti|		.STRTAB_STRINGS
0b71 0000 0000  |    |		.BLANK	0000[0x7]
0b78 ; --------------------------------------------------------------------------------------
0b78 ; Debug Table
0b78 ; --------------------------------------------------------------------------------------
0b78 0004 0009  |    |		.DEBUG4	0x0004,0x0009,0x12a6,0x0000,0x0001,0x0000
0b7e 0028       | (  |		.XXX[0x1]
0b7f 0000 0000  |    |		.BLANK	0000[0x2e]
0bad 1002 8000  |    |		.XXX[0xb]
0baf 0000 0000  |    |
0bb1 0020 0000  |    |
0bb3 0110 0000  |    |
0bb5 0000 8000  |    |
0bb7 0005       |    |
0bb8 0000 0000  |    |		.BLANK	0000[0x48]