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

⟦a740a59e7⟧

    Length: 3072 (0xc00)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_07b4f8

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 0420       |    |		.CONST	0x0420								; 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 8002       |    |		.CONST	0x8002								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 006c       | l  |		.CONST	0x006c								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0024       | $  |		.CONST	0x0024								; Number of locals
000b			INIT_0008:
000b 029a 0073  |   s|		Declare_Subprogram	INIT_0070,For_Outer_Call,Visible,Unelaborated
000d 029a 009b  |    |		Declare_Subprogram	INIT_0098,For_Outer_Call,Visible,Unelaborated
000f 029a 00c3  |    |		Declare_Subprogram	INIT_00c0,For_Outer_Call,Visible,Unelaborated
0011 029a 00eb  |    |		Declare_Subprogram	INIT_00e8,For_Outer_Call,Visible,Unelaborated
0013 029a 0113  |    |		Declare_Subprogram	INIT_0110,For_Outer_Call,Visible,Unelaborated
0015 029a 013b  |   ;|		Declare_Subprogram	INIT_0138,For_Outer_Call,Visible,Unelaborated
0017 029a 014b  |   K|		Declare_Subprogram	INIT_0148,For_Outer_Call,Visible,Unelaborated
0019 029a 016b  |   k|		Declare_Subprogram	INIT_0168,For_Outer_Call,Visible,Unelaborated
001b 029a 019b  |    |		Declare_Subprogram	INIT_0198,For_Outer_Call,Visible,Unelaborated
001d 029a 01b3  |    |		Declare_Subprogram	INIT_01b0,For_Outer_Call,Visible,Unelaborated
001f 029a 01d3  |    |		Declare_Subprogram	INIT_01d0,For_Outer_Call,Visible,Unelaborated
0021 029a 01fb  |    |		Declare_Subprogram	INIT_01f8,For_Outer_Call,Visible,Unelaborated
0023 029a 022b  |   +|		Declare_Subprogram	INIT_0228,For_Outer_Call,Visible,Unelaborated
0025 029a 025b  |   [|		Declare_Subprogram	INIT_0258,For_Outer_Call,Visible,Unelaborated
0027 029a 028b  |    |		Declare_Subprogram	INIT_0288,For_Outer_Call,Visible,Unelaborated
0029 029a 02bb  |    |		Declare_Subprogram	INIT_02b8,For_Outer_Call,Visible,Unelaborated
002b 029a 02d3  |    |		Declare_Subprogram	INIT_02d0,For_Outer_Call,Visible,Unelaborated
002d 029a 02fb  |    |		Declare_Subprogram	INIT_02f8,For_Outer_Call,Visible,Unelaborated
002f 029a 032b  |   +|		Declare_Subprogram	INIT_0328,For_Outer_Call,Visible,Unelaborated
0031 029a 0343  |   C|		Declare_Subprogram	INIT_0340,For_Outer_Call,Visible,Unelaborated
0033 029a 036b  |   k|		Declare_Subprogram	INIT_0368,For_Outer_Call,Visible,Unelaborated
0035 029a 0393  |    |		Declare_Subprogram	INIT_0390,For_Outer_Call,Visible,Unelaborated
0037 029a 03c3  |    |		Declare_Subprogram	INIT_03c0,For_Outer_Call,Visible,Unelaborated
0039 029a 03f3  |    |		Declare_Subprogram	INIT_03f0,For_Outer_Call,Visible,Unelaborated
003b 00bf       |    |		Action	Accept_Activation
003c 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
003d 00c7       |    |		Action	Elaborate_Subprogram
003e 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
003f 00c7       |    |		Action	Elaborate_Subprogram
0040 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
0041 00c7       |    |		Action	Elaborate_Subprogram
0042 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
0043 00c7       |    |		Action	Elaborate_Subprogram
0044 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
0045 00c7       |    |		Action	Elaborate_Subprogram
0046 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
0047 00c7       |    |		Action	Elaborate_Subprogram
0048 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
0049 00c7       |    |		Action	Elaborate_Subprogram
004a 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
004b 00c7       |    |		Action	Elaborate_Subprogram
004c 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
004d 00c7       |    |		Action	Elaborate_Subprogram
004e 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
004f 00c7       |    |		Action	Elaborate_Subprogram
0050 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
0051 00c7       |    |		Action	Elaborate_Subprogram
0052 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
0053 00c7       |    |		Action	Elaborate_Subprogram
0054 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
0055 00c7       |    |		Action	Elaborate_Subprogram
0056 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
0057 00c7       |    |		Action	Elaborate_Subprogram
0058 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b
0059 00c7       |    |		Action	Elaborate_Subprogram
005a 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
005b 00c7       |    |		Action	Elaborate_Subprogram
005c 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
005d 00c7       |    |		Action	Elaborate_Subprogram
005e 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
005f 00c7       |    |		Action	Elaborate_Subprogram
0060 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f
0061 00c7       |    |		Action	Elaborate_Subprogram
0062 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
0063 00c7       |    |		Action	Elaborate_Subprogram
0064 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
0065 00c7       |    |		Action	Elaborate_Subprogram
0066 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22
0067 00c7       |    |		Action	Elaborate_Subprogram
0068 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23
0069 00c7       |    |		Action	Elaborate_Subprogram
006a 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
006b 00c7       |    |		Action	Elaborate_Subprogram
006c			BODY_0008:
006c 00bc       |    |		Action	Signal_Activated
006d 00bb       |    |		Action	Signal_Completion
006e 0000 0000  |    |		.XXX[0x2]
0070 ; --------------------------------------------------------------------------------------
0070 ; SUBPROGRAM
0070 ; --------------------------------------------------------------------------------------
0070 0073       | s  |		.CONST	0x0073								; Address of begin
0071 0004       |    |		.CONST	0x0004								; Address of exception handler
0072 0001       |    |		.CONST	0x0001								; Number of locals
0073			BODY_0070:
0073			INIT_0070:
0073 00da       |    |		Load_Top	At_Offset_2
0074 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0075 e5fe       |    |		Load	0x2,-0x2
0076 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0077 027f       |    |		Execute	Discrete,Equal
0078 6817       |h   |		Jump_Zero	0x90
0079 00cf       |    |		Action	Mark_Auxiliary
007a 4801       |H   |		Short_Literal	0x1
007b e5ff       |    |		Load	0x2,-0x1
007c 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
007d 0264       | d  |		Execute	Discrete,Below_Bound
007e 700e       |p   |		Jump_Nonzero	0x8d
007f 00d8       |    |		Load_Top	At_Offset_0
0080 e5ff       |    |		Load	0x2,-0x1
0081 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0082 01d7       |    |		Execute	Vector,Field_Read
0083 00d9       |    |		Load_Top	At_Offset_1
0084 e5fe       |    |		Load	0x2,-0x2
0085 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0086 01d7       |    |		Execute	Vector,Field_Read
0087 027e       | ~  |		Execute	Discrete,Not_Equal
0088 6802       |h   |		Jump_Zero	0x8b
0089 4800       |H   |		Short_Literal	0x0
008a 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
008b 00c8       |    |		Action	Pop_Auxiliary_Range
008c 37f2       |7   |		Loop_Decreasing	0x7f
008d 00ce       |    |		Action	Pop_Auxiliary
008e 4801       |H   |		Short_Literal	0x1
008f 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0090 4800       |H   |		Short_Literal	0x0
0091 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0092 0000 0000  |    |		.BLANK	0000[0x6]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 009b       |    |		.CONST	0x009b								; Address of begin
0099 0004       |    |		.CONST	0x0004								; Address of exception handler
009a 0001       |    |		.CONST	0x0001								; Number of locals
009b			BODY_0098:
009b			INIT_0098:
009b 00da       |    |		Load_Top	At_Offset_2
009c 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
009d e5fe       |    |		Load	0x2,-0x2
009e 0227       | '  |		Execute	Access,All_Reference
009f 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00a0 027f       |    |		Execute	Discrete,Equal
00a1 6818       |h   |		Jump_Zero	0xba
00a2 00cf       |    |		Action	Mark_Auxiliary
00a3 4801       |H   |		Short_Literal	0x1
00a4 e5ff       |    |		Load	0x2,-0x1
00a5 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00a6 0264       | d  |		Execute	Discrete,Below_Bound
00a7 700f       |p   |		Jump_Nonzero	0xb7
00a8 00d8       |    |		Load_Top	At_Offset_0
00a9 e5ff       |    |		Load	0x2,-0x1
00aa 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
00ab 01d7       |    |		Execute	Vector,Field_Read
00ac 00d9       |    |		Load_Top	At_Offset_1
00ad e5fe       |    |		Load	0x2,-0x2
00ae 0227       | '  |		Execute	Access,All_Reference
00af 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
00b0 01d7       |    |		Execute	Vector,Field_Read
00b1 027e       | ~  |		Execute	Discrete,Not_Equal
00b2 6802       |h   |		Jump_Zero	0xb5
00b3 4800       |H   |		Short_Literal	0x0
00b4 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
00b5 00c8       |    |		Action	Pop_Auxiliary_Range
00b6 37f1       |7   |		Loop_Decreasing	0xa8
00b7 00ce       |    |		Action	Pop_Auxiliary
00b8 4801       |H   |		Short_Literal	0x1
00b9 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
00ba 4800       |H   |		Short_Literal	0x0
00bb 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
00bc 0000 0000  |    |		.BLANK	0000[0x4]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c3       |    |		.CONST	0x00c3								; Address of begin
00c1 0004       |    |		.CONST	0x0004								; Address of exception handler
00c2 0001       |    |		.CONST	0x0001								; Number of locals
00c3			BODY_00c0:
00c3			INIT_00c0:
00c3 00da       |    |		Load_Top	At_Offset_2
00c4 0227       | '  |		Execute	Access,All_Reference
00c5 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00c6 e5fe       |    |		Load	0x2,-0x2
00c7 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00c8 027f       |    |		Execute	Discrete,Equal
00c9 6819       |h   |		Jump_Zero	0xe3
00ca 00cf       |    |		Action	Mark_Auxiliary
00cb 4801       |H   |		Short_Literal	0x1
00cc e5ff       |    |		Load	0x2,-0x1
00cd 0227       | '  |		Execute	Access,All_Reference
00ce 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00cf 0264       | d  |		Execute	Discrete,Below_Bound
00d0 700f       |p   |		Jump_Nonzero	0xe0
00d1 00d8       |    |		Load_Top	At_Offset_0
00d2 e5ff       |    |		Load	0x2,-0x1
00d3 0227       | '  |		Execute	Access,All_Reference
00d4 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
00d5 01d7       |    |		Execute	Vector,Field_Read
00d6 00d9       |    |		Load_Top	At_Offset_1
00d7 e5fe       |    |		Load	0x2,-0x2
00d8 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
00d9 01d7       |    |		Execute	Vector,Field_Read
00da 027e       | ~  |		Execute	Discrete,Not_Equal
00db 6802       |h   |		Jump_Zero	0xde
00dc 4800       |H   |		Short_Literal	0x0
00dd 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
00de 00c8       |    |		Action	Pop_Auxiliary_Range
00df 37f1       |7   |		Loop_Decreasing	0xd1
00e0 00ce       |    |		Action	Pop_Auxiliary
00e1 4801       |H   |		Short_Literal	0x1
00e2 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
00e3 4800       |H   |		Short_Literal	0x0
00e4 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
00e5 0000 0000  |    |		.XXX[0x3]
00e7 0000       |    |
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00eb       |    |		.CONST	0x00eb								; Address of begin
00e9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ea 0001       |    |		.CONST	0x0001								; Number of locals
00eb			BODY_00e8:
00eb			INIT_00e8:
00eb 00da       |    |		Load_Top	At_Offset_2
00ec 0227       | '  |		Execute	Access,All_Reference
00ed 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00ee e5fe       |    |		Load	0x2,-0x2
00ef 0227       | '  |		Execute	Access,All_Reference
00f0 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00f1 027f       |    |		Execute	Discrete,Equal
00f2 681a       |h   |		Jump_Zero	0x10d
00f3 00cf       |    |		Action	Mark_Auxiliary
00f4 4801       |H   |		Short_Literal	0x1
00f5 e5ff       |    |		Load	0x2,-0x1
00f6 0227       | '  |		Execute	Access,All_Reference
00f7 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00f8 0264       | d  |		Execute	Discrete,Below_Bound
00f9 7010       |p   |		Jump_Nonzero	0x10a
00fa 00d8       |    |		Load_Top	At_Offset_0
00fb e5ff       |    |		Load	0x2,-0x1
00fc 0227       | '  |		Execute	Access,All_Reference
00fd 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
00fe 01d7       |    |		Execute	Vector,Field_Read
00ff 00d9       |    |		Load_Top	At_Offset_1
0100 e5fe       |    |		Load	0x2,-0x2
0101 0227       | '  |		Execute	Access,All_Reference
0102 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0103 01d7       |    |		Execute	Vector,Field_Read
0104 027e       | ~  |		Execute	Discrete,Not_Equal
0105 6802       |h   |		Jump_Zero	0x108
0106 4800       |H   |		Short_Literal	0x0
0107 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0108 00c8       |    |		Action	Pop_Auxiliary_Range
0109 37f0       |7   |		Loop_Decreasing	0xfa
010a 00ce       |    |		Action	Pop_Auxiliary
010b 4801       |H   |		Short_Literal	0x1
010c 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
010d 4800       |H   |		Short_Literal	0x0
010e 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
010f 0000       |    |		.XXX[0x1]
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 0113       |    |		.CONST	0x0113								; Address of begin
0111 0004       |    |		.CONST	0x0004								; Address of exception handler
0112 0001       |    |		.CONST	0x0001								; Number of locals
0113			BODY_0110:
0113			INIT_0110:
0113 00da       |    |		Load_Top	At_Offset_2
0114 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0115 e5fe       |    |		Load	0x2,-0x2
0116 01db       |    |		Execute	Vector,Length
0117 027f       |    |		Execute	Discrete,Equal
0118 681b       |h   |		Jump_Zero	0x134
0119 00cf       |    |		Action	Mark_Auxiliary
011a 4800       |H   |		Short_Literal	0x0
011b e5ff       |    |		Load	0x2,-0x1
011c 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
011d 0aff       |    |		Execute_Immediate	Plus,-0x1
011e 0264       | d  |		Execute	Discrete,Below_Bound
011f 7011       |p   |		Jump_Nonzero	0x131
0120 00d8       |    |		Load_Top	At_Offset_0
0121 0a01       |    |		Execute_Immediate	Plus,0x1
0122 e5ff       |    |		Load	0x2,-0x1
0123 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0124 01d7       |    |		Execute	Vector,Field_Read
0125 00d9       |    |		Load_Top	At_Offset_1
0126 e5fe       |    |		Load	0x2,-0x2
0127 01dd       |    |		Execute	Vector,First
0128 0273       | s  |		Execute	Discrete,Plus
0129 e5fe       |    |		Load	0x2,-0x2
012a 01d7       |    |		Execute	Vector,Field_Read
012b 027e       | ~  |		Execute	Discrete,Not_Equal
012c 6802       |h   |		Jump_Zero	0x12f
012d 4800       |H   |		Short_Literal	0x0
012e 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
012f 00c8       |    |		Action	Pop_Auxiliary_Range
0130 37ef       |7   |		Loop_Decreasing	0x120
0131 00ce       |    |		Action	Pop_Auxiliary
0132 4801       |H   |		Short_Literal	0x1
0133 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0134 4800       |H   |		Short_Literal	0x0
0135 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0136 0000 0000  |    |		.XXX[0x2]
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 013b       | ;  |		.CONST	0x013b								; Address of begin
0139 0004       |    |		.CONST	0x0004								; Address of exception handler
013a 0001       |    |		.CONST	0x0001								; Number of locals
013b			BODY_0138:
013b			INIT_0138:
013b 00da       |    |		Load_Top	At_Offset_2
013c 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
013d 0e01       |    |		Execute_Immediate	Not_Equal,0x1
013e 7007       |p   |		Jump_Nonzero	0x146
013f 4801       |H   |		Short_Literal	0x1
0140 00db       |    |		Load_Top	At_Offset_3
0141 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0142 01d7       |    |		Execute	Vector,Field_Read
0143 e5fe       |    |		Load	0x2,-0x2
0144 027e       | ~  |		Execute	Discrete,Not_Equal
0145 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0146 4801       |H   |		Short_Literal	0x1
0147 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014b       | K  |		.CONST	0x014b								; Address of begin
0149 0004       |    |		.CONST	0x0004								; Address of exception handler
014a 0001       |    |		.CONST	0x0001								; Number of locals
014b			BODY_0148:
014b			INIT_0148:
014b 00da       |    |		Load_Top	At_Offset_2
014c 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
014d e5fd       |    |		Load	0x2,-0x3
014e 027f       |    |		Execute	Discrete,Equal
014f 6813       |h   |		Jump_Zero	0x163
0150 00cf       |    |		Action	Mark_Auxiliary
0151 4801       |H   |		Short_Literal	0x1
0152 e5fd       |    |		Load	0x2,-0x3
0153 0264       | d  |		Execute	Discrete,Below_Bound
0154 700b       |p   |		Jump_Nonzero	0x160
0155 00d8       |    |		Load_Top	At_Offset_0
0156 e5ff       |    |		Load	0x2,-0x1
0157 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0158 01d7       |    |		Execute	Vector,Field_Read
0159 e5fe       |    |		Load	0x2,-0x2
015a 027e       | ~  |		Execute	Discrete,Not_Equal
015b 6802       |h   |		Jump_Zero	0x15e
015c 4800       |H   |		Short_Literal	0x0
015d 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
015e 00c8       |    |		Action	Pop_Auxiliary_Range
015f 37f5       |7   |		Loop_Decreasing	0x155
0160 00ce       |    |		Action	Pop_Auxiliary
0161 4801       |H   |		Short_Literal	0x1
0162 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0163 4800       |H   |		Short_Literal	0x0
0164 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0165 0000 0000  |    |		.XXX[0x3]
0167 0000       |    |
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 016b       | k  |		.CONST	0x016b								; Address of begin
0169 0004       |    |		.CONST	0x0004								; Address of exception handler
016a 0001       |    |		.CONST	0x0001								; Number of locals
016b			BODY_0168:
016b			INIT_0168:
016b 00da       |    |		Load_Top	At_Offset_2
016c 0227       | '  |		Execute	Access,All_Reference
016d 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
016e e5fe       |    |		Load	0x2,-0x2
016f 01db       |    |		Execute	Vector,Length
0170 027f       |    |		Execute	Discrete,Equal
0171 681d       |h   |		Jump_Zero	0x18f
0172 00cf       |    |		Action	Mark_Auxiliary
0173 4800       |H   |		Short_Literal	0x0
0174 e5ff       |    |		Load	0x2,-0x1
0175 0227       | '  |		Execute	Access,All_Reference
0176 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0177 0aff       |    |		Execute_Immediate	Plus,-0x1
0178 0264       | d  |		Execute	Discrete,Below_Bound
0179 7012       |p   |		Jump_Nonzero	0x18c
017a 00d8       |    |		Load_Top	At_Offset_0
017b 0a01       |    |		Execute_Immediate	Plus,0x1
017c e5ff       |    |		Load	0x2,-0x1
017d 0227       | '  |		Execute	Access,All_Reference
017e 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
017f 01d7       |    |		Execute	Vector,Field_Read
0180 00d9       |    |		Load_Top	At_Offset_1
0181 e5fe       |    |		Load	0x2,-0x2
0182 01dd       |    |		Execute	Vector,First
0183 0273       | s  |		Execute	Discrete,Plus
0184 e5fe       |    |		Load	0x2,-0x2
0185 01d7       |    |		Execute	Vector,Field_Read
0186 027e       | ~  |		Execute	Discrete,Not_Equal
0187 6802       |h   |		Jump_Zero	0x18a
0188 4800       |H   |		Short_Literal	0x0
0189 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
018a 00c8       |    |		Action	Pop_Auxiliary_Range
018b 37ee       |7   |		Loop_Decreasing	0x17a
018c 00ce       |    |		Action	Pop_Auxiliary
018d 4801       |H   |		Short_Literal	0x1
018e 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
018f 4800       |H   |		Short_Literal	0x0
0190 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0191 0000 0000  |    |		.BLANK	0000[0x7]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019b       |    |		.CONST	0x019b								; Address of begin
0199 0004       |    |		.CONST	0x0004								; Address of exception handler
019a 0001       |    |		.CONST	0x0001								; Number of locals
019b			BODY_0198:
019b			INIT_0198:
019b 00da       |    |		Load_Top	At_Offset_2
019c 0227       | '  |		Execute	Access,All_Reference
019d 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
019e 0e01       |    |		Execute_Immediate	Not_Equal,0x1
019f 7008       |p   |		Jump_Nonzero	0x1a8
01a0 4801       |H   |		Short_Literal	0x1
01a1 00db       |    |		Load_Top	At_Offset_3
01a2 0227       | '  |		Execute	Access,All_Reference
01a3 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
01a4 01d7       |    |		Execute	Vector,Field_Read
01a5 e5fe       |    |		Load	0x2,-0x2
01a6 027e       | ~  |		Execute	Discrete,Not_Equal
01a7 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01a8 4801       |H   |		Short_Literal	0x1
01a9 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01aa 0000 0000  |    |		.BLANK	0000[0x6]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b3       |    |		.CONST	0x01b3								; Address of begin
01b1 0004       |    |		.CONST	0x0004								; Address of exception handler
01b2 0001       |    |		.CONST	0x0001								; Number of locals
01b3			BODY_01b0:
01b3			INIT_01b0:
01b3 00da       |    |		Load_Top	At_Offset_2
01b4 0227       | '  |		Execute	Access,All_Reference
01b5 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01b6 e5fd       |    |		Load	0x2,-0x3
01b7 027f       |    |		Execute	Discrete,Equal
01b8 6814       |h   |		Jump_Zero	0x1cd
01b9 00cf       |    |		Action	Mark_Auxiliary
01ba 4801       |H   |		Short_Literal	0x1
01bb e5fd       |    |		Load	0x2,-0x3
01bc 0264       | d  |		Execute	Discrete,Below_Bound
01bd 700c       |p   |		Jump_Nonzero	0x1ca
01be 00d8       |    |		Load_Top	At_Offset_0
01bf e5ff       |    |		Load	0x2,-0x1
01c0 0227       | '  |		Execute	Access,All_Reference
01c1 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
01c2 01d7       |    |		Execute	Vector,Field_Read
01c3 e5fe       |    |		Load	0x2,-0x2
01c4 027e       | ~  |		Execute	Discrete,Not_Equal
01c5 6802       |h   |		Jump_Zero	0x1c8
01c6 4800       |H   |		Short_Literal	0x0
01c7 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
01c8 00c8       |    |		Action	Pop_Auxiliary_Range
01c9 37f4       |7   |		Loop_Decreasing	0x1be
01ca 00ce       |    |		Action	Pop_Auxiliary
01cb 4801       |H   |		Short_Literal	0x1
01cc 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
01cd 4800       |H   |		Short_Literal	0x0
01ce 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
01cf 0000       |    |		.XXX[0x1]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3       |    |		.CONST	0x01d3								; Address of begin
01d1 0004       |    |		.CONST	0x0004								; Address of exception handler
01d2 0001       |    |		.CONST	0x0001								; Number of locals
01d3			BODY_01d0:
01d3			INIT_01d0:
01d3 00da       |    |		Load_Top	At_Offset_2
01d4 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01d5 e5fe       |    |		Load	0x2,-0x2
01d6 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01d7 027f       |    |		Execute	Discrete,Equal
01d8 681d       |h   |		Jump_Zero	0x1f6
01d9 00cf       |    |		Action	Mark_Auxiliary
01da 4801       |H   |		Short_Literal	0x1
01db e5ff       |    |		Load	0x2,-0x1
01dc 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01dd 0264       | d  |		Execute	Discrete,Below_Bound
01de 7014       |p   |		Jump_Nonzero	0x1f3
01df 00d8       |    |		Load_Top	At_Offset_0
01e0 e5ff       |    |		Load	0x2,-0x1
01e1 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
01e2 01d7       |    |		Execute	Vector,Field_Read
01e3 e001       |    |		Load	0x0,0x1
01e4 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01e5 01d7       |    |		Execute	Vector,Field_Read
01e6 00d9       |    |		Load_Top	At_Offset_1
01e7 e5fe       |    |		Load	0x2,-0x2
01e8 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
01e9 01d7       |    |		Execute	Vector,Field_Read
01ea e001       |    |		Load	0x0,0x1
01eb 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01ec 01d7       |    |		Execute	Vector,Field_Read
01ed 027e       | ~  |		Execute	Discrete,Not_Equal
01ee 6802       |h   |		Jump_Zero	0x1f1
01ef 4800       |H   |		Short_Literal	0x0
01f0 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01f1 00c8       |    |		Action	Pop_Auxiliary_Range
01f2 37ec       |7   |		Loop_Decreasing	0x1df
01f3 00ce       |    |		Action	Pop_Auxiliary
01f4 4801       |H   |		Short_Literal	0x1
01f5 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01f6 4800       |H   |		Short_Literal	0x0
01f7 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01fb       |    |		.CONST	0x01fb								; Address of begin
01f9 0004       |    |		.CONST	0x0004								; Address of exception handler
01fa 0001       |    |		.CONST	0x0001								; Number of locals
01fb			BODY_01f8:
01fb			INIT_01f8:
01fb 00da       |    |		Load_Top	At_Offset_2
01fc 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01fd e5fe       |    |		Load	0x2,-0x2
01fe 0227       | '  |		Execute	Access,All_Reference
01ff 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0200 027f       |    |		Execute	Discrete,Equal
0201 681e       |h   |		Jump_Zero	0x220
0202 00cf       |    |		Action	Mark_Auxiliary
0203 4801       |H   |		Short_Literal	0x1
0204 e5ff       |    |		Load	0x2,-0x1
0205 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0206 0264       | d  |		Execute	Discrete,Below_Bound
0207 7015       |p   |		Jump_Nonzero	0x21d
0208 00d8       |    |		Load_Top	At_Offset_0
0209 e5ff       |    |		Load	0x2,-0x1
020a 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
020b 01d7       |    |		Execute	Vector,Field_Read
020c e001       |    |		Load	0x0,0x1
020d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
020e 01d7       |    |		Execute	Vector,Field_Read
020f 00d9       |    |		Load_Top	At_Offset_1
0210 e5fe       |    |		Load	0x2,-0x2
0211 0227       | '  |		Execute	Access,All_Reference
0212 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0213 01d7       |    |		Execute	Vector,Field_Read
0214 e001       |    |		Load	0x0,0x1
0215 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0216 01d7       |    |		Execute	Vector,Field_Read
0217 027e       | ~  |		Execute	Discrete,Not_Equal
0218 6802       |h   |		Jump_Zero	0x21b
0219 4800       |H   |		Short_Literal	0x0
021a 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
021b 00c8       |    |		Action	Pop_Auxiliary_Range
021c 37eb       |7   |		Loop_Decreasing	0x208
021d 00ce       |    |		Action	Pop_Auxiliary
021e 4801       |H   |		Short_Literal	0x1
021f 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0220 4800       |H   |		Short_Literal	0x0
0221 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0222 0000 0000  |    |		.BLANK	0000[0x6]
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 022b       | +  |		.CONST	0x022b								; Address of begin
0229 0004       |    |		.CONST	0x0004								; Address of exception handler
022a 0001       |    |		.CONST	0x0001								; Number of locals
022b			BODY_0228:
022b			INIT_0228:
022b 00da       |    |		Load_Top	At_Offset_2
022c 0227       | '  |		Execute	Access,All_Reference
022d 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
022e e5fe       |    |		Load	0x2,-0x2
022f 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0230 027f       |    |		Execute	Discrete,Equal
0231 681f       |h   |		Jump_Zero	0x251
0232 00cf       |    |		Action	Mark_Auxiliary
0233 4801       |H   |		Short_Literal	0x1
0234 e5ff       |    |		Load	0x2,-0x1
0235 0227       | '  |		Execute	Access,All_Reference
0236 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0237 0264       | d  |		Execute	Discrete,Below_Bound
0238 7015       |p   |		Jump_Nonzero	0x24e
0239 00d8       |    |		Load_Top	At_Offset_0
023a e5ff       |    |		Load	0x2,-0x1
023b 0227       | '  |		Execute	Access,All_Reference
023c 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
023d 01d7       |    |		Execute	Vector,Field_Read
023e e001       |    |		Load	0x0,0x1
023f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0240 01d7       |    |		Execute	Vector,Field_Read
0241 00d9       |    |		Load_Top	At_Offset_1
0242 e5fe       |    |		Load	0x2,-0x2
0243 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0244 01d7       |    |		Execute	Vector,Field_Read
0245 e001       |    |		Load	0x0,0x1
0246 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0247 01d7       |    |		Execute	Vector,Field_Read
0248 027e       | ~  |		Execute	Discrete,Not_Equal
0249 6802       |h   |		Jump_Zero	0x24c
024a 4800       |H   |		Short_Literal	0x0
024b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
024c 00c8       |    |		Action	Pop_Auxiliary_Range
024d 37eb       |7   |		Loop_Decreasing	0x239
024e 00ce       |    |		Action	Pop_Auxiliary
024f 4801       |H   |		Short_Literal	0x1
0250 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0251 4800       |H   |		Short_Literal	0x0
0252 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0253 0000 0000  |    |		.BLANK	0000[0x5]
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 025b       | [  |		.CONST	0x025b								; Address of begin
0259 0004       |    |		.CONST	0x0004								; Address of exception handler
025a 0001       |    |		.CONST	0x0001								; Number of locals
025b			BODY_0258:
025b			INIT_0258:
025b 00da       |    |		Load_Top	At_Offset_2
025c 0227       | '  |		Execute	Access,All_Reference
025d 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
025e e5fe       |    |		Load	0x2,-0x2
025f 0227       | '  |		Execute	Access,All_Reference
0260 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0261 027f       |    |		Execute	Discrete,Equal
0262 6820       |h   |		Jump_Zero	0x283
0263 00cf       |    |		Action	Mark_Auxiliary
0264 4801       |H   |		Short_Literal	0x1
0265 e5ff       |    |		Load	0x2,-0x1
0266 0227       | '  |		Execute	Access,All_Reference
0267 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0268 0264       | d  |		Execute	Discrete,Below_Bound
0269 7016       |p   |		Jump_Nonzero	0x280
026a 00d8       |    |		Load_Top	At_Offset_0
026b e5ff       |    |		Load	0x2,-0x1
026c 0227       | '  |		Execute	Access,All_Reference
026d 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
026e 01d7       |    |		Execute	Vector,Field_Read
026f e001       |    |		Load	0x0,0x1
0270 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0271 01d7       |    |		Execute	Vector,Field_Read
0272 00d9       |    |		Load_Top	At_Offset_1
0273 e5fe       |    |		Load	0x2,-0x2
0274 0227       | '  |		Execute	Access,All_Reference
0275 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0276 01d7       |    |		Execute	Vector,Field_Read
0277 e001       |    |		Load	0x0,0x1
0278 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0279 01d7       |    |		Execute	Vector,Field_Read
027a 027e       | ~  |		Execute	Discrete,Not_Equal
027b 6802       |h   |		Jump_Zero	0x27e
027c 4800       |H   |		Short_Literal	0x0
027d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
027e 00c8       |    |		Action	Pop_Auxiliary_Range
027f 37ea       |7   |		Loop_Decreasing	0x26a
0280 00ce       |    |		Action	Pop_Auxiliary
0281 4801       |H   |		Short_Literal	0x1
0282 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0283 4800       |H   |		Short_Literal	0x0
0284 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0285 0000 0000  |    |		.XXX[0x3]
0287 0000       |    |
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 028b       |    |		.CONST	0x028b								; Address of begin
0289 0004       |    |		.CONST	0x0004								; Address of exception handler
028a 0001       |    |		.CONST	0x0001								; Number of locals
028b			BODY_0288:
028b			INIT_0288:
028b 00da       |    |		Load_Top	At_Offset_2
028c 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
028d e5fe       |    |		Load	0x2,-0x2
028e 01db       |    |		Execute	Vector,Length
028f 027f       |    |		Execute	Discrete,Equal
0290 6821       |h!  |		Jump_Zero	0x2b2
0291 00cf       |    |		Action	Mark_Auxiliary
0292 4800       |H   |		Short_Literal	0x0
0293 e5ff       |    |		Load	0x2,-0x1
0294 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0295 0aff       |    |		Execute_Immediate	Plus,-0x1
0296 0264       | d  |		Execute	Discrete,Below_Bound
0297 7017       |p   |		Jump_Nonzero	0x2af
0298 00d8       |    |		Load_Top	At_Offset_0
0299 0a01       |    |		Execute_Immediate	Plus,0x1
029a e5ff       |    |		Load	0x2,-0x1
029b 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
029c 01d7       |    |		Execute	Vector,Field_Read
029d e001       |    |		Load	0x0,0x1
029e 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
029f 01d7       |    |		Execute	Vector,Field_Read
02a0 00d9       |    |		Load_Top	At_Offset_1
02a1 e5fe       |    |		Load	0x2,-0x2
02a2 01dd       |    |		Execute	Vector,First
02a3 0273       | s  |		Execute	Discrete,Plus
02a4 e5fe       |    |		Load	0x2,-0x2
02a5 01d7       |    |		Execute	Vector,Field_Read
02a6 e001       |    |		Load	0x0,0x1
02a7 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02a8 01d7       |    |		Execute	Vector,Field_Read
02a9 027e       | ~  |		Execute	Discrete,Not_Equal
02aa 6802       |h   |		Jump_Zero	0x2ad
02ab 4800       |H   |		Short_Literal	0x0
02ac 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
02ad 00c8       |    |		Action	Pop_Auxiliary_Range
02ae 37e9       |7   |		Loop_Decreasing	0x298
02af 00ce       |    |		Action	Pop_Auxiliary
02b0 4801       |H   |		Short_Literal	0x1
02b1 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
02b2 4800       |H   |		Short_Literal	0x0
02b3 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
02b4 0000 0000  |    |		.BLANK	0000[0x4]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bb       |    |		.CONST	0x02bb								; Address of begin
02b9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ba 0001       |    |		.CONST	0x0001								; Number of locals
02bb			BODY_02b8:
02bb			INIT_02b8:
02bb 00da       |    |		Load_Top	At_Offset_2
02bc 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02bd 0e01       |    |		Execute_Immediate	Not_Equal,0x1
02be 700d       |p   |		Jump_Nonzero	0x2cc
02bf 4801       |H   |		Short_Literal	0x1
02c0 00db       |    |		Load_Top	At_Offset_3
02c1 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02c2 01d7       |    |		Execute	Vector,Field_Read
02c3 e001       |    |		Load	0x0,0x1
02c4 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02c5 01d7       |    |		Execute	Vector,Field_Read
02c6 e5fe       |    |		Load	0x2,-0x2
02c7 e001       |    |		Load	0x0,0x1
02c8 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02c9 01d7       |    |		Execute	Vector,Field_Read
02ca 027e       | ~  |		Execute	Discrete,Not_Equal
02cb 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
02cc 4801       |H   |		Short_Literal	0x1
02cd 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
02ce 0000 0000  |    |		.XXX[0x2]
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 02d8       |    |		.CONST	0x02d8								; Address of begin
02d1 0004       |    |		.CONST	0x0004								; Address of exception handler
02d2 0002       |    |		.CONST	0x0002								; Number of locals
02d3			INIT_02d0:
02d3 00db       |    |		Load_Top	At_Offset_3
02d4 e001       |    |		Load	0x0,0x1
02d5 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02d6 01d7       |    |		Execute	Vector,Field_Read
02d7 0007       |    |		Action	Break_Optional
02d8			BODY_02d0:
02d8 00db       |    |		Load_Top	At_Offset_3
02d9 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02da e5fd       |    |		Load	0x2,-0x3
02db 027f       |    |		Execute	Discrete,Equal
02dc 6816       |h   |		Jump_Zero	0x2f3
02dd 00cf       |    |		Action	Mark_Auxiliary
02de 4801       |H   |		Short_Literal	0x1
02df e5fd       |    |		Load	0x2,-0x3
02e0 0264       | d  |		Execute	Discrete,Below_Bound
02e1 700e       |p   |		Jump_Nonzero	0x2f0
02e2 00d8       |    |		Load_Top	At_Offset_0
02e3 e5ff       |    |		Load	0x2,-0x1
02e4 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02e5 01d7       |    |		Execute	Vector,Field_Read
02e6 e001       |    |		Load	0x0,0x1
02e7 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02e8 01d7       |    |		Execute	Vector,Field_Read
02e9 e402       |    |		Load	0x2,0x2
02ea 027e       | ~  |		Execute	Discrete,Not_Equal
02eb 6802       |h   |		Jump_Zero	0x2ee
02ec 4800       |H   |		Short_Literal	0x0
02ed 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
02ee 00c8       |    |		Action	Pop_Auxiliary_Range
02ef 37f2       |7   |		Loop_Decreasing	0x2e2
02f0 00ce       |    |		Action	Pop_Auxiliary
02f1 4801       |H   |		Short_Literal	0x1
02f2 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
02f3 4800       |H   |		Short_Literal	0x0
02f4 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
02f5 0000 0000  |    |		.XXX[0x3]
02f7 0000       |    |
02f8 ; --------------------------------------------------------------------------------------
02f8 ; SUBPROGRAM
02f8 ; --------------------------------------------------------------------------------------
02f8 02fb       |    |		.CONST	0x02fb								; Address of begin
02f9 0004       |    |		.CONST	0x0004								; Address of exception handler
02fa 0001       |    |		.CONST	0x0001								; Number of locals
02fb			BODY_02f8:
02fb			INIT_02f8:
02fb 00da       |    |		Load_Top	At_Offset_2
02fc 0227       | '  |		Execute	Access,All_Reference
02fd 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02fe e5fe       |    |		Load	0x2,-0x2
02ff 01db       |    |		Execute	Vector,Length
0300 027f       |    |		Execute	Discrete,Equal
0301 6823       |h#  |		Jump_Zero	0x325
0302 00cf       |    |		Action	Mark_Auxiliary
0303 4800       |H   |		Short_Literal	0x0
0304 e5ff       |    |		Load	0x2,-0x1
0305 0227       | '  |		Execute	Access,All_Reference
0306 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0307 0aff       |    |		Execute_Immediate	Plus,-0x1
0308 0264       | d  |		Execute	Discrete,Below_Bound
0309 7018       |p   |		Jump_Nonzero	0x322
030a 00d8       |    |		Load_Top	At_Offset_0
030b 0a01       |    |		Execute_Immediate	Plus,0x1
030c e5ff       |    |		Load	0x2,-0x1
030d 0227       | '  |		Execute	Access,All_Reference
030e 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
030f 01d7       |    |		Execute	Vector,Field_Read
0310 e001       |    |		Load	0x0,0x1
0311 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0312 01d7       |    |		Execute	Vector,Field_Read
0313 00d9       |    |		Load_Top	At_Offset_1
0314 e5fe       |    |		Load	0x2,-0x2
0315 01dd       |    |		Execute	Vector,First
0316 0273       | s  |		Execute	Discrete,Plus
0317 e5fe       |    |		Load	0x2,-0x2
0318 01d7       |    |		Execute	Vector,Field_Read
0319 e001       |    |		Load	0x0,0x1
031a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
031b 01d7       |    |		Execute	Vector,Field_Read
031c 027e       | ~  |		Execute	Discrete,Not_Equal
031d 6802       |h   |		Jump_Zero	0x320
031e 4800       |H   |		Short_Literal	0x0
031f 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0320 00c8       |    |		Action	Pop_Auxiliary_Range
0321 37e8       |7   |		Loop_Decreasing	0x30a
0322 00ce       |    |		Action	Pop_Auxiliary
0323 4801       |H   |		Short_Literal	0x1
0324 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0325 4800       |H   |		Short_Literal	0x0
0326 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0327 0000       |    |		.XXX[0x1]
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 032b       | +  |		.CONST	0x032b								; Address of begin
0329 0004       |    |		.CONST	0x0004								; Address of exception handler
032a 0001       |    |		.CONST	0x0001								; Number of locals
032b			BODY_0328:
032b			INIT_0328:
032b 00da       |    |		Load_Top	At_Offset_2
032c 0227       | '  |		Execute	Access,All_Reference
032d 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
032e 0e01       |    |		Execute_Immediate	Not_Equal,0x1
032f 700e       |p   |		Jump_Nonzero	0x33e
0330 4801       |H   |		Short_Literal	0x1
0331 00db       |    |		Load_Top	At_Offset_3
0332 0227       | '  |		Execute	Access,All_Reference
0333 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0334 01d7       |    |		Execute	Vector,Field_Read
0335 e001       |    |		Load	0x0,0x1
0336 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0337 01d7       |    |		Execute	Vector,Field_Read
0338 e5fe       |    |		Load	0x2,-0x2
0339 e001       |    |		Load	0x0,0x1
033a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
033b 01d7       |    |		Execute	Vector,Field_Read
033c 027e       | ~  |		Execute	Discrete,Not_Equal
033d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
033e 4801       |H   |		Short_Literal	0x1
033f 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0340 ; --------------------------------------------------------------------------------------
0340 ; SUBPROGRAM
0340 ; --------------------------------------------------------------------------------------
0340 0348       | H  |		.CONST	0x0348								; Address of begin
0341 0004       |    |		.CONST	0x0004								; Address of exception handler
0342 0002       |    |		.CONST	0x0002								; Number of locals
0343			INIT_0340:
0343 00db       |    |		Load_Top	At_Offset_3
0344 e001       |    |		Load	0x0,0x1
0345 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0346 01d7       |    |		Execute	Vector,Field_Read
0347 0007       |    |		Action	Break_Optional
0348			BODY_0340:
0348 00db       |    |		Load_Top	At_Offset_3
0349 0227       | '  |		Execute	Access,All_Reference
034a 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
034b e5fd       |    |		Load	0x2,-0x3
034c 027f       |    |		Execute	Discrete,Equal
034d 6817       |h   |		Jump_Zero	0x365
034e 00cf       |    |		Action	Mark_Auxiliary
034f 4801       |H   |		Short_Literal	0x1
0350 e5fd       |    |		Load	0x2,-0x3
0351 0264       | d  |		Execute	Discrete,Below_Bound
0352 700f       |p   |		Jump_Nonzero	0x362
0353 00d8       |    |		Load_Top	At_Offset_0
0354 e5ff       |    |		Load	0x2,-0x1
0355 0227       | '  |		Execute	Access,All_Reference
0356 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0357 01d7       |    |		Execute	Vector,Field_Read
0358 e001       |    |		Load	0x0,0x1
0359 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
035a 01d7       |    |		Execute	Vector,Field_Read
035b e402       |    |		Load	0x2,0x2
035c 027e       | ~  |		Execute	Discrete,Not_Equal
035d 6802       |h   |		Jump_Zero	0x360
035e 4800       |H   |		Short_Literal	0x0
035f 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0360 00c8       |    |		Action	Pop_Auxiliary_Range
0361 37f1       |7   |		Loop_Decreasing	0x353
0362 00ce       |    |		Action	Pop_Auxiliary
0363 4801       |H   |		Short_Literal	0x1
0364 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0365 4800       |H   |		Short_Literal	0x0
0366 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0367 0000       |    |		.XXX[0x1]
0368 ; --------------------------------------------------------------------------------------
0368 ; SUBPROGRAM
0368 ; --------------------------------------------------------------------------------------
0368 036b       | k  |		.CONST	0x036b								; Address of begin
0369 0004       |    |		.CONST	0x0004								; Address of exception handler
036a 0001       |    |		.CONST	0x0001								; Number of locals
036b			BODY_0368:
036b			INIT_0368:
036b 00da       |    |		Load_Top	At_Offset_2
036c 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
036d e5fe       |    |		Load	0x2,-0x2
036e 01db       |    |		Execute	Vector,Length
036f 027b       | {  |		Execute	Discrete,Greater_Equal
0370 681d       |h   |		Jump_Zero	0x38e
0371 00cf       |    |		Action	Mark_Auxiliary
0372 4800       |H   |		Short_Literal	0x0
0373 e5fe       |    |		Load	0x2,-0x2
0374 01db       |    |		Execute	Vector,Length
0375 0aff       |    |		Execute_Immediate	Plus,-0x1
0376 00e2       |    |		Load_Encached	Integer_Cache
0377 025d       | ]  |		Execute	Discrete,Bounds_Check
0378 0264       | d  |		Execute	Discrete,Below_Bound
0379 7011       |p   |		Jump_Nonzero	0x38b
037a 00d8       |    |		Load_Top	At_Offset_0
037b 0a01       |    |		Execute_Immediate	Plus,0x1
037c e5ff       |    |		Load	0x2,-0x1
037d 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
037e 01d7       |    |		Execute	Vector,Field_Read
037f 00d9       |    |		Load_Top	At_Offset_1
0380 e5fe       |    |		Load	0x2,-0x2
0381 01dd       |    |		Execute	Vector,First
0382 0273       | s  |		Execute	Discrete,Plus
0383 e5fe       |    |		Load	0x2,-0x2
0384 01d7       |    |		Execute	Vector,Field_Read
0385 027e       | ~  |		Execute	Discrete,Not_Equal
0386 6802       |h   |		Jump_Zero	0x389
0387 4800       |H   |		Short_Literal	0x0
0388 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0389 00c8       |    |		Action	Pop_Auxiliary_Range
038a 37ef       |7   |		Loop_Decreasing	0x37a
038b 00ce       |    |		Action	Pop_Auxiliary
038c 4801       |H   |		Short_Literal	0x1
038d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
038e 4800       |H   |		Short_Literal	0x0
038f 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 0393       |    |		.CONST	0x0393								; Address of begin
0391 0004       |    |		.CONST	0x0004								; Address of exception handler
0392 0001       |    |		.CONST	0x0001								; Number of locals
0393			BODY_0390:
0393			INIT_0390:
0393 00da       |    |		Load_Top	At_Offset_2
0394 0227       | '  |		Execute	Access,All_Reference
0395 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0396 e5fe       |    |		Load	0x2,-0x2
0397 01db       |    |		Execute	Vector,Length
0398 027b       | {  |		Execute	Discrete,Greater_Equal
0399 681e       |h   |		Jump_Zero	0x3b8
039a 00cf       |    |		Action	Mark_Auxiliary
039b 4800       |H   |		Short_Literal	0x0
039c e5fe       |    |		Load	0x2,-0x2
039d 01db       |    |		Execute	Vector,Length
039e 0aff       |    |		Execute_Immediate	Plus,-0x1
039f 00e2       |    |		Load_Encached	Integer_Cache
03a0 025d       | ]  |		Execute	Discrete,Bounds_Check
03a1 0264       | d  |		Execute	Discrete,Below_Bound
03a2 7012       |p   |		Jump_Nonzero	0x3b5
03a3 00d8       |    |		Load_Top	At_Offset_0
03a4 0a01       |    |		Execute_Immediate	Plus,0x1
03a5 e5ff       |    |		Load	0x2,-0x1
03a6 0227       | '  |		Execute	Access,All_Reference
03a7 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
03a8 01d7       |    |		Execute	Vector,Field_Read
03a9 00d9       |    |		Load_Top	At_Offset_1
03aa e5fe       |    |		Load	0x2,-0x2
03ab 01dd       |    |		Execute	Vector,First
03ac 0273       | s  |		Execute	Discrete,Plus
03ad e5fe       |    |		Load	0x2,-0x2
03ae 01d7       |    |		Execute	Vector,Field_Read
03af 027e       | ~  |		Execute	Discrete,Not_Equal
03b0 6802       |h   |		Jump_Zero	0x3b3
03b1 4800       |H   |		Short_Literal	0x0
03b2 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
03b3 00c8       |    |		Action	Pop_Auxiliary_Range
03b4 37ee       |7   |		Loop_Decreasing	0x3a3
03b5 00ce       |    |		Action	Pop_Auxiliary
03b6 4801       |H   |		Short_Literal	0x1
03b7 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
03b8 4800       |H   |		Short_Literal	0x0
03b9 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
03ba 0000 0000  |    |		.BLANK	0000[0x6]
03c0 ; --------------------------------------------------------------------------------------
03c0 ; SUBPROGRAM
03c0 ; --------------------------------------------------------------------------------------
03c0 03c3       |    |		.CONST	0x03c3								; Address of begin
03c1 0004       |    |		.CONST	0x0004								; Address of exception handler
03c2 0001       |    |		.CONST	0x0001								; Number of locals
03c3			BODY_03c0:
03c3			INIT_03c0:
03c3 00da       |    |		Load_Top	At_Offset_2
03c4 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03c5 e5fe       |    |		Load	0x2,-0x2
03c6 01db       |    |		Execute	Vector,Length
03c7 027b       | {  |		Execute	Discrete,Greater_Equal
03c8 6823       |h#  |		Jump_Zero	0x3ec
03c9 00cf       |    |		Action	Mark_Auxiliary
03ca 4800       |H   |		Short_Literal	0x0
03cb e5fe       |    |		Load	0x2,-0x2
03cc 01db       |    |		Execute	Vector,Length
03cd 0aff       |    |		Execute_Immediate	Plus,-0x1
03ce 00e2       |    |		Load_Encached	Integer_Cache
03cf 025d       | ]  |		Execute	Discrete,Bounds_Check
03d0 0264       | d  |		Execute	Discrete,Below_Bound
03d1 7017       |p   |		Jump_Nonzero	0x3e9
03d2 00d8       |    |		Load_Top	At_Offset_0
03d3 0a01       |    |		Execute_Immediate	Plus,0x1
03d4 e5ff       |    |		Load	0x2,-0x1
03d5 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
03d6 01d7       |    |		Execute	Vector,Field_Read
03d7 e001       |    |		Load	0x0,0x1
03d8 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
03d9 01d7       |    |		Execute	Vector,Field_Read
03da 00d9       |    |		Load_Top	At_Offset_1
03db e5fe       |    |		Load	0x2,-0x2
03dc 01dd       |    |		Execute	Vector,First
03dd 0273       | s  |		Execute	Discrete,Plus
03de e5fe       |    |		Load	0x2,-0x2
03df 01d7       |    |		Execute	Vector,Field_Read
03e0 e001       |    |		Load	0x0,0x1
03e1 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
03e2 01d7       |    |		Execute	Vector,Field_Read
03e3 027e       | ~  |		Execute	Discrete,Not_Equal
03e4 6802       |h   |		Jump_Zero	0x3e7
03e5 4800       |H   |		Short_Literal	0x0
03e6 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
03e7 00c8       |    |		Action	Pop_Auxiliary_Range
03e8 37e9       |7   |		Loop_Decreasing	0x3d2
03e9 00ce       |    |		Action	Pop_Auxiliary
03ea 4801       |H   |		Short_Literal	0x1
03eb 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
03ec 4800       |H   |		Short_Literal	0x0
03ed 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
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 0227       | '  |		Execute	Access,All_Reference
03f5 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03f6 e5fe       |    |		Load	0x2,-0x2
03f7 01db       |    |		Execute	Vector,Length
03f8 027b       | {  |		Execute	Discrete,Greater_Equal
03f9 6824       |h$  |		Jump_Zero	0x41e
03fa 00cf       |    |		Action	Mark_Auxiliary
03fb 4800       |H   |		Short_Literal	0x0
03fc e5fe       |    |		Load	0x2,-0x2
03fd 01db       |    |		Execute	Vector,Length
03fe 0aff       |    |		Execute_Immediate	Plus,-0x1
03ff 00e2       |    |		Load_Encached	Integer_Cache
0400 025d       | ]  |		Execute	Discrete,Bounds_Check
0401 0264       | d  |		Execute	Discrete,Below_Bound
0402 7018       |p   |		Jump_Nonzero	0x41b
0403 00d8       |    |		Load_Top	At_Offset_0
0404 0a01       |    |		Execute_Immediate	Plus,0x1
0405 e5ff       |    |		Load	0x2,-0x1
0406 0227       | '  |		Execute	Access,All_Reference
0407 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0408 01d7       |    |		Execute	Vector,Field_Read
0409 e001       |    |		Load	0x0,0x1
040a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
040b 01d7       |    |		Execute	Vector,Field_Read
040c 00d9       |    |		Load_Top	At_Offset_1
040d e5fe       |    |		Load	0x2,-0x2
040e 01dd       |    |		Execute	Vector,First
040f 0273       | s  |		Execute	Discrete,Plus
0410 e5fe       |    |		Load	0x2,-0x2
0411 01d7       |    |		Execute	Vector,Field_Read
0412 e001       |    |		Load	0x0,0x1
0413 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0414 01d7       |    |		Execute	Vector,Field_Read
0415 027e       | ~  |		Execute	Discrete,Not_Equal
0416 6802       |h   |		Jump_Zero	0x419
0417 4800       |H   |		Short_Literal	0x0
0418 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0419 00c8       |    |		Action	Pop_Auxiliary_Range
041a 37e8       |7   |		Loop_Decreasing	0x403
041b 00ce       |    |		Action	Pop_Auxiliary
041c 4801       |H   |		Short_Literal	0x1
041d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
041e 4800       |H   |		Short_Literal	0x0
041f 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0420 ; --------------------------------------------------------------------------------------
0420 ; Debug Table
0420 ; --------------------------------------------------------------------------------------
0420 0004 0004  |    |		.DEBUG4	0x0004,0x0004,0xa8fb,0x0000,0x0001,0x0000
0426 4f4d 4d41  |OMMA|		.XXX[0x64]
0428 4e44 532e  |NDS.|
042a 5348 4f57  |SHOW|
042c 8000 0340  |   @|
042e 8008 0000  |    |
0430 0000 1000  |    |
0432 0000 4534  |  E4|
0434 84f5 7000  |  p |
0436 0000 0800  |    |
0438 0034 0801  | 4  |
043a 8000 0000  |    |
043c 0100 0000  |    |
043e 2821 544f  |(!TO|
0440 4f4c 532e  |OLS.|
0442 4349 2e52  |CI.R|
0444 4556 395f  |EV9_|
0446 315f 5350  |1_SP|
0448 4543 2e55  |EC.U|
044a 4e49 5453  |NITS|
044c 2e43 4f4d  |.COM|
044e 4d41 4e44  |MAND|
0450 532e 5255  |S.RU|
0452 4e80 0003  |N   |
0454 4080 0800  |@   |
0456 0000 0010  |    |
0458 0000 0035  |   5|
045a 2554 e000  |%T  |
045c 0000 0c88  |    |
045e 0000 3408  |  4 |
0460 0130 0000  | 0  |
0462 0001 0000  |    |
0464 001e 2154  |  !T|
0466 4f4f 4c53  |OOLS|
0468 2e43 492e  |.CI.|
046a 5245 5639  |REV9|
046c 5f31 5f53  |_1_S|
046e 5045 432e  |PEC.|
0470 554e 4954  |UNIT|
0472 532e 4349  |S.CI|
0474 8000 0340  |   @|
0476 8008 0000  |    |
0478 0000 1000  |    |
047a 0000 2434  |  $4|
047c 9000 7edb  |  ~ |
047e 0000 0800  |    |
0480 013b a000  | ;  |
0482 0130 8400  | 0  |
0484 0000 4800  |  H |
0486 007f 0000  |    |
0488 0000 1800  |    |
048a 0000 0000  |    |		.BLANK	0000[0x4]
048e 0095 7000  |  p |		.XXX[0xa]
0490 008e a200  |    |
0492 0000 2400  |  $ |
0494 003f 9000  | ?  |
0496 0000 0c00  |    |
0498 0000 0000  |    |		.BLANK	0000[0x4]
049c 0045 e800  | E  |		.XXX[0x18]
049e 0042 7100  | Bq |
04a0 0000 1200  |    |
04a2 001f cc00  |    |
04a4 0000 0600  |    |
04a6 0000 0000  |    |
04a8 0220 0f00  |    |
04aa 0020 8400  |    |
04ac 001e d080  |    |
04ae 0000 0900  |    |
04b0 000f e800  |    |
04b2 0000 0300  |    |
04b4 0000 0000  |    |		.BLANK	0000[0x4]
04b8 000f 0e00  |    |		.XXX[0xa]
04ba 000e 9440  |   @|
04bc 0000 0480  |    |
04be 0000 5900  |  Y |
04c0 0000 0100  |    |
04c2 0000 0000  |    |		.BLANK	0000[0x4]
04c6 0007 1d00  |    |		.XXX[0x18]
04c8 0006 d620  |    |
04ca 0000 0240  |   @|
04cc 0000 4300  |  C |
04ce 0000 0080  |    |
04d0 000a de40  |   @|
04d2 000b 4ec0  |  N |
04d4 0003 5480  |  T |
04d6 0003 3710  |  7 |
04d8 0000 0120  |    |
04da 0000 1900  |    |
04dc 0000 0040  |   @|
04de 0000 0000  |    |		.BLANK	0000[0x4]
04e2 0001 8dc0  |    |		.XXX[0x18]
04e4 0001 7c88  |  | |
04e6 0000 0090  |    |
04e8 0000 2440  |  $@|
04ea 0000 0020  |    |
04ec 0002 c5a0  |    |
04ee 0002 fde0  |    |
04f0 0000 b860  |   `|
04f2 0000 b004  |    |
04f4 0000 0048  |   H|
04f6 0000 06b0  |    |
04f8 0000 0010  |    |
04fa 0000 0000  |    |		.BLANK	0000[0x5]
04ff 53f0 0000  |S   |		.XXX[0x17]
0501 4f02 0000  |O   |
0503 0024 0000  | $  |
0505 0958 0000  | X  |
0507 0008 0000  |    |
0509 bbf4 0000  |    |
050b c682 0000  |    |
050d 25d8 0000  |%   |
050f 23c1 0000  |#   |
0511 0012 0000  |    |
0513 04b0 0000  |    |
0515 0004       |    |
0516 0000 0000  |    |		.BLANK	0000[0x5]
051b 112c 0000  | ,  |		.XXX[0x17]
051d 1060 8000  | `  |
051f 0009 0000  |    |
0521 0158 0000  | X  |
0523 0002 0000  |    |
0525 30bf 0000  |0   |
0527 3281 0000  |2   |
0529 07d2 0000  |    |
052b 0764 4000  | d@ |
052d 0004 8000  |    |
052f 00a7 0000  |    |
0531 0001       |    |
0532 0000 0000  |    |		.BLANK	0000[0x5]
0537 037b 0000  | {  |		.XXX[0xa]
0539 033c 2000  | <  |
053b 0002 4000  |  @ |
053d 004f 0000  | O  |
053f 0000 8000  |    |
0541 0000 0000  |    |		.BLANK	0000[0x4]
0545 017a 8000  | z  |		.XXX[0x18]
0547 0153 1000  | S  |
0549 0001 2000  |    |
054b 0026 c000  | &  |
054d 0000 4000  |  @ |
054f 0000 0000  |    |
0551 06a4 9000  |    |
0553 009e 4000  |  @ |
0555 0090 0800  |    |
0557 0000 9000  |    |
0559 000e 8000  |    |
055b 0000 2000  |    |
055d 0000 0000  |    |		.BLANK	0000[0x4]
0561 0041 4800  | AH |		.XXX[0x9f]
0563 02b0 ac00  |    |
0565 0000 4800  |  H |
0567 0005 3000  |  0 |
0569 0000 1000  |    |
056b 0000 0000  |    |
056d 0000 0200  |    |
056f 000d 0200  |    |
0571 6ac0 0000  |j   |
0573 0040 0000  | @  |
0575 0908 5253  |  RS|
0577 5413 1153  |T  S|
0579 5153 9510  |QS  |
057b 5512 53d3  |U S |
057d 8b93 1253  |   S|
057f 92d4 d7d2  |    |
0581 5354 1311  |ST  |
0583 5351 5395  |SQS |
0585 1055 1253  | U S|
0587 d394 2800  |  ( |
0589 0000 0100  |    |
058b 003a 9400  | :  |
058d 001a 0400  |    |
058f 7000 0000  |p   |
0591 0080 0000  |    |
0593 0a26 24a7  | &$ |
0595 25a9 afa4  |%   |
0597 a6a8 2622  |  &"|
0599 a6a2 a72a  |   *|
059b 20aa 24a7  |  $ |
059d a740 0001  | @  |
059f a040 0600  | @  |
05a1 0000 0008  |    |
05a3 0000 0081  |    |
05a5 0a1a 7a6a  |  zj|
05a7 6a0a 7222  |j r"|
05a9 9972 220a  | r" |
05ab 2a6a 7a74  |*jzt|
05ad 0000 1a04  |    |
05af 0040 0000  | @  |
05b1 0000 8000  |    |
05b3 0003 2220  |  " |
05b5 a2a6 a7a7  |    |
05b7 0100 4000  |  @ |
05b9 01a0 400a  |  @ |
05bb c000 0000  |    |
05bd 0800 0001  |    |
05bf 190a 4a6a  |  Jj|
05c1 8262 2a6a  | b*j|
05c3 2a72 a20a  |*r  |
05c5 a24a 7a71  | Jzq|
05c7 729a 2a6a  |r *j|
05c9 0a72 a24a  | r J|
05cb 1afa 0aa2  |    |
05cd a292 4a12  |  J |
05cf aaa2 2a9c  |  * |
05d1 0000 1a04  |    |
05d3 006c 0000  | l  |
05d5 0000 8000  |    |
05d7 0009 a9a2  |    |
05d9 a6a0 a72a  |   *|
05db 24a1 afa0  |$   |
05dd aa2a 2924  | *)$|
05df a12a aa22  | * "|
05e1 a9c0 0001  |    |
05e3 a040 0680  | @  |
05e5 0000 0008  |    |
05e7 0000 0091  |    |
05e9 0aa2 7a7a  |  zz|
05eb 6299 726a  |b rj|
05ed 0a82 fa3a  |   :|
05ef 2a72 2a92  |*r* |
05f1 4a1c 0000  |J   |
05f3 1a04 004c  |   L|
05f5 0000 0000  |    |
05f7 8000 0005  |    |
05f9 a6a0 a82f  |   /|
05fb a3a2 a722  |   "|
05fd a924 a1c0  | $  |
05ff 0001       |    |