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

⟦fb72a6b65⟧

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

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 5900       |Y   |		.CONST	0x5900								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 07a0       |    |		.CONST	0x07a0								; 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 0005       |    |		.CONST	0x0005								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00e4       |    |		.CONST	0x00e4								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0046       | F  |		.CONST	0x0046								; Number of locals
000b			INIT_0008:
000b 0093 0000  |    |		push_full_address	0x0
000d 611a       |a   |		Indirect_Literal	Discrete,0x128,{0x80000000, 0x00010000}
000e 0273       | s  |		Execute	Discrete,Plus
000f 00db       |    |		Load_Top	At_Offset_3
0010 6113       |a   |		Indirect_Literal	Discrete,0x124,{0x00000000, 0x0000ffff}
0011 0279       | y  |		Execute	Discrete,And
0012 0273       | s  |		Execute	Discrete,Plus
0013 0129       | )  |		Execute	Any,Make_Visible
0014 0093 0000  |    |		push_full_address	0x0
0016 6109       |a   |		Indirect_Literal	Discrete,0x120,{0x80000000, 0x00020000}
0017 0273       | s  |		Execute	Discrete,Plus
0018 e20d       |    |		Load	0x1,0xd
0019 610a       |a   |		Indirect_Literal	Discrete,0x124,{0x00000000, 0x0000ffff}
001a 0279       | y  |		Execute	Discrete,And
001b 0273       | s  |		Execute	Discrete,Plus
001c 0129       | )  |		Execute	Any,Make_Visible
001d 0093 0000  |    |		push_full_address	0x0
001f 60fc       |`   |		Indirect_Literal	Discrete,0x11c,{0x80000000, 0x00030000}
0020 0273       | s  |		Execute	Discrete,Plus
0021 e20d       |    |		Load	0x1,0xd
0022 6101       |a   |		Indirect_Literal	Discrete,0x124,{0x00000000, 0x0000ffff}
0023 0279       | y  |		Execute	Discrete,And
0024 0273       | s  |		Execute	Discrete,Plus
0025 0129       | )  |		Execute	Any,Make_Visible
0026 0093 0000  |    |		push_full_address	0x0
0028 60ef       |`   |		Indirect_Literal	Discrete,0x118,{0x80000000, 0x00040000}
0029 0273       | s  |		Execute	Discrete,Plus
002a e20d       |    |		Load	0x1,0xd
002b 60f8       |`   |		Indirect_Literal	Discrete,0x124,{0x00000000, 0x0000ffff}
002c 0279       | y  |		Execute	Discrete,And
002d 0273       | s  |		Execute	Discrete,Plus
002e 0129       | )  |		Execute	Any,Make_Visible
002f 0093 0000  |    |		push_full_address	0x0
0031 60e2       |`   |		Indirect_Literal	Discrete,0x114,{0x80000000, 0x00050000}
0032 0273       | s  |		Execute	Discrete,Plus
0033 e20d       |    |		Load	0x1,0xd
0034 60ef       |`   |		Indirect_Literal	Discrete,0x124,{0x00000000, 0x0000ffff}
0035 0279       | y  |		Execute	Discrete,And
0036 0273       | s  |		Execute	Discrete,Plus
0037 0129       | )  |		Execute	Any,Make_Visible
0038 0093 0000  |    |		push_full_address	0x0
003a 60d5       |`   |		Indirect_Literal	Discrete,0x110,{0x80000000, 0x00060000}
003b 0273       | s  |		Execute	Discrete,Plus
003c e20d       |    |		Load	0x1,0xd
003d 60e6       |`   |		Indirect_Literal	Discrete,0x124,{0x00000000, 0x0000ffff}
003e 0279       | y  |		Execute	Discrete,And
003f 0273       | s  |		Execute	Discrete,Plus
0040 0129       | )  |		Execute	Any,Make_Visible
0041 4800       |H   |		Short_Literal	0x0
0042 4802       |H   |		Short_Literal	0x2
0043 029f 00eb  |    |		Declare_Subprogram	INIT_00e8,For_Call
0045 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0046 029a 0133  |   3|		Declare_Subprogram	INIT_0130,For_Outer_Call,Visible,Unelaborated
0048 029a 014b  |   K|		Declare_Subprogram	INIT_0148,For_Outer_Call,Visible,Unelaborated
004a 029a 017b  |   {|		Declare_Subprogram	INIT_0178,For_Outer_Call,Visible,Unelaborated
004c 029a 01ab  |    |		Declare_Subprogram	INIT_01a8,For_Outer_Call,Visible,Unelaborated
004e 029a 01e3  |    |		Declare_Subprogram	INIT_01e0,For_Outer_Call,Visible,Unelaborated
0050 029a 01fb  |    |		Declare_Subprogram	INIT_01f8,For_Outer_Call,Visible,Unelaborated
0052 029a 0213  |    |		Declare_Subprogram	INIT_0210,For_Outer_Call,Visible,Unelaborated
0054 029a 022b  |   +|		Declare_Subprogram	INIT_0228,For_Outer_Call,Visible,Unelaborated
0056 029a 025b  |   [|		Declare_Subprogram	INIT_0258,For_Outer_Call,Visible,Unelaborated
0058 029a 026b  |   k|		Declare_Subprogram	INIT_0268,For_Outer_Call,Visible,Unelaborated
005a 029a 0293  |    |		Declare_Subprogram	INIT_0290,For_Outer_Call,Visible,Unelaborated
005c 029a 02b3  |    |		Declare_Subprogram	INIT_02b0,For_Outer_Call,Visible,Unelaborated
005e 029a 02d3  |    |		Declare_Subprogram	INIT_02d0,For_Outer_Call,Visible,Unelaborated
0060 029a 02e3  |    |		Declare_Subprogram	INIT_02e0,For_Outer_Call,Visible,Unelaborated
0062 029a 030b  |    |		Declare_Subprogram	INIT_0308,For_Outer_Call,Visible,Unelaborated
0064 029a 031b  |    |		Declare_Subprogram	INIT_0318,For_Outer_Call,Visible,Unelaborated
0066 029a 0333  |   3|		Declare_Subprogram	INIT_0330,For_Outer_Call,Visible,Unelaborated
0068 029a 035b  |   [|		Declare_Subprogram	INIT_0358,For_Outer_Call,Visible,Unelaborated
006a 029a 0373  |   s|		Declare_Subprogram	INIT_0370,For_Outer_Call,Visible,Unelaborated
006c 029a 03f3  |    |		Declare_Subprogram	INIT_03f0,For_Outer_Call,Visible,Unelaborated
006e 4818       |H   |		Short_Literal	0x18
006f 03cd       |    |		Declare_Type	Access,Incomplete,Visible,Accesses_Protected
0070 e20e       |    |		Load	0x1,0xe
0071 00d9       |    |		Load_Top	At_Offset_1
0072 00da       |    |		Load_Top	At_Offset_2
0073 029f 0743  |   C|		Declare_Subprogram	INIT_0740,For_Call
0075 4803       |H   |		Short_Literal	0x3
0076 032e       | .  |		Declare_Type	Record,Defined,Visible
0077 00d8       |    |		Load_Top	At_Offset_0
0078 02a0       |    |		Declare_Subprogram	Null_Subprogram
0079 00db       |    |		Load_Top	At_Offset_3
007a 03c7       |    |		Complete_Type	Access,By_Defining
007b 00e3       |    |		Load_Encached	Natural_Cache
007c 00da       |    |		Load_Top	At_Offset_2
007d 00db       |    |		Load_Top	At_Offset_3
007e 029f 0753  |   S|		Declare_Subprogram	INIT_0750,For_Call
0080 4803       |H   |		Short_Literal	0x3
0081 032e       | .  |		Declare_Type	Record,Defined,Visible
0082 00d8       |    |		Load_Top	At_Offset_0
0083 02a0       |    |		Declare_Subprogram	Null_Subprogram
0084 4818       |H   |		Short_Literal	0x18
0085 03d4       |    |		Declare_Type	Access,Defined,Visible,Accesses_Protected
0086 4800       |H   |		Short_Literal	0x0
0087 4803       |H   |		Short_Literal	0x3
0088 029f 0433  |   3|		Declare_Subprogram	INIT_0430,For_Call
008a 03fe       |    |		Declare_Type	Discrete,Defined,Visible
008b 4818       |H   |		Short_Literal	0x18
008c 03cd       |    |		Declare_Type	Access,Incomplete,Visible,Accesses_Protected
008d 00d9       |    |		Load_Top	At_Offset_1
008e 00d9       |    |		Load_Top	At_Offset_1
008f e22b       | +  |		Load	0x1,0x2b
0090 02a0       |    |		Declare_Subprogram	Null_Subprogram
0091 4803       |H   |		Short_Literal	0x3
0092 032e       | .  |		Declare_Type	Record,Defined,Visible
0093 00d8       |    |		Load_Top	At_Offset_0
0094 02a0       |    |		Declare_Subprogram	Null_Subprogram
0095 00db       |    |		Load_Top	At_Offset_3
0096 03c7       |    |		Complete_Type	Access,By_Defining
0097 00bf       |    |		Action	Accept_Activation
0098 a002       |    |		Store_Unchecked	0x0,0x2
0099 00c6       |    |		Action	Check_Subprogram_Elaborated
009a e22c       | ,  |		Load	0x1,0x2c
009b e22b       | +  |		Load	0x1,0x2b
009c e003       |    |		Load	0x0,0x3
009d e004       |    |		Load	0x0,0x4
009e 4800       |H   |		Short_Literal	0x0
009f 0007       |    |		Action	Break_Optional
00a0 a002       |    |		Store_Unchecked	0x0,0x2
00a1 00c6       |    |		Action	Check_Subprogram_Elaborated
00a2 e22d       | -  |		Load	0x1,0x2d
00a3 e22e       | .  |		Load	0x1,0x2e
00a4 e005       |    |		Load	0x0,0x5
00a5 e006       |    |		Load	0x0,0x6
00a6 4800       |H   |		Short_Literal	0x0
00a7 0007       |    |		Action	Break_Optional
00a8 a002       |    |		Store_Unchecked	0x0,0x2
00a9 00c6       |    |		Action	Check_Subprogram_Elaborated
00aa e231       | 1  |		Load	0x1,0x31
00ab e230       | 0  |		Load	0x1,0x30
00ac e007       |    |		Load	0x0,0x7
00ad e008       |    |		Load	0x0,0x8
00ae 4800       |H   |		Short_Literal	0x0
00af 0007       |    |		Action	Break_Optional
00b0 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
00b1 00c7       |    |		Action	Elaborate_Subprogram
00b2 029d 045b  |   [|		Declare_Subprogram	INIT_0458,For_Outer_Call
00b4 029d 04bb  |    |		Declare_Subprogram	INIT_04b8,For_Outer_Call
00b6 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
00b7 00c7       |    |		Action	Elaborate_Subprogram
00b8 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
00b9 00c7       |    |		Action	Elaborate_Subprogram
00ba 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
00bb 00c7       |    |		Action	Elaborate_Subprogram
00bc 029d 0513  |    |		Declare_Subprogram	INIT_0510,For_Outer_Call
00be 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b
00bf 00c7       |    |		Action	Elaborate_Subprogram
00c0 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
00c1 00c7       |    |		Action	Elaborate_Subprogram
00c2 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
00c3 00c7       |    |		Action	Elaborate_Subprogram
00c4 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
00c5 00c7       |    |		Action	Elaborate_Subprogram
00c6 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f
00c7 00c7       |    |		Action	Elaborate_Subprogram
00c8 029d 0533  |   3|		Declare_Subprogram	INIT_0530,For_Outer_Call
00ca 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
00cb 00c7       |    |		Action	Elaborate_Subprogram
00cc 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
00cd 00c7       |    |		Action	Elaborate_Subprogram
00ce 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22
00cf 00c7       |    |		Action	Elaborate_Subprogram
00d0 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23
00d1 00c7       |    |		Action	Elaborate_Subprogram
00d2 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
00d3 00c7       |    |		Action	Elaborate_Subprogram
00d4 029d 057b  |   {|		Declare_Subprogram	INIT_0578,For_Outer_Call
00d6 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25
00d7 00c7       |    |		Action	Elaborate_Subprogram
00d8 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26
00d9 00c7       |    |		Action	Elaborate_Subprogram
00da 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27
00db 00c7       |    |		Action	Elaborate_Subprogram
00dc 029d 05b3  |    |		Declare_Subprogram	INIT_05b0,For_Outer_Call
00de 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28
00df 00c7       |    |		Action	Elaborate_Subprogram
00e0 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29
00e1 00c7       |    |		Action	Elaborate_Subprogram
00e2 1d2a       | *  |		Execute_Immediate	Reference_Lex_1,0x2a
00e3 00c7       |    |		Action	Elaborate_Subprogram
00e4			BODY_0008:
00e4 00bc       |    |		Action	Signal_Activated
00e5 00bb       |    |		Action	Signal_Completion
00e6 0000 0000  |    |		.XXX[0x2]
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 4607       |F   |		Jump_Case	0x8
00ec 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
00ed 7807       |x   |		Jump	0xf5								; case 0x1
00ee 780a       |x   |		Jump	0xf9								; case 0x2
00ef 780e       |x   |		Jump	0xfe								; case 0x3
00f0 7811       |x   |		Jump	0x102								; case 0x4
00f1 7812       |x   |		Jump	0x104								; case 0x5
00f2 7813       |x   |		Jump	0x106								; case 0x6
00f3 7816       |x   |		Jump	0x10a								; case 0x7
00f4 4302       |C   |		.XXX[0x1]
00f5 00da       |    |		Load_Top	At_Offset_2
00f6 0091 075a  |   Z|		Action	Push_String_Extended_Indexed,0x75a				; "INORDER"
00f8 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
00f9 00db       |    |		Load_Top	At_Offset_3
00fa 00db       |    |		Load_Top	At_Offset_3
00fb 00e0       |    |		Load_Encached	Standard_Cache
00fc 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
00fd 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00fe 00da       |    |		Load_Top	At_Offset_2
00ff 00e0       |    |		Load_Encached	Standard_Cache
0100 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0101 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0102 00db       |    |		Load_Top	At_Offset_3
0103 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0104 00db       |    |		Load_Top	At_Offset_3
0105 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0106 e216       |    |		Load	0x1,0x16
0107 00dc       |    |		Load_Top	At_Offset_4
0108 0267       | g  |		Execute	Discrete,Predecessor
0109 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
010a e216       |    |		Load	0x1,0x16
010b 00dc       |    |		Load_Top	At_Offset_4
010c 0268       | h  |		Execute	Discrete,Successor
010d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
010e 0000 0000  |    |		.XXX[0x2]
0110 8000 0000  |    |		.LITERAL	{0x80000000, 0x00060000}
0114 8000 0000  |    |		.LITERAL	{0x80000000, 0x00050000}
0118 8000 0000  |    |		.LITERAL	{0x80000000, 0x00040000}
011c 8000 0000  |    |		.LITERAL	{0x80000000, 0x00030000}
0120 8000 0000  |    |		.LITERAL	{0x80000000, 0x00020000}
0124 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000ffff}
0128 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
012c 0000 0000  |    |		.BLANK	0000[0x4]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0133       | 3  |		.CONST	0x0133								; Address of begin
0131 0004       |    |		.CONST	0x0004								; Address of exception handler
0132 0001       |    |		.CONST	0x0001								; Number of locals
0133			BODY_0130:
0133			INIT_0130:
0133 e22d       | -  |		Load	0x1,0x2d
0134 0322       | "  |		Declare_Variable	Record
0135 4800       |H   |		Short_Literal	0x0
0136 00d9       |    |		Load_Top	At_Offset_1
0137 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0138 e22b       | +  |		Load	0x1,0x2b
0139 00d9       |    |		Load_Top	At_Offset_1
013a 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
013b e22b       | +  |		Load	0x1,0x2b
013c 00d9       |    |		Load_Top	At_Offset_1
013d 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
013e e22e       | .  |		Load	0x1,0x2e
013f 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0140 00ca       |    |		Action	Exit_Nullary_Function
0141 0000 0000  |    |		.BLANK	0000[0x7]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 0150       | P  |		.CONST	0x0150								; Address of begin
0149 0004       |    |		.CONST	0x0004								; Address of exception handler
014a 0003       |    |		.CONST	0x0003								; Number of locals
014b			INIT_0148:
014b 00e1       |    |		Load_Encached	Boolean_Cache
014c e20e       |    |		Load	0x1,0xe
014d 02c7       |    |		Declare_Variable	Any
014e 00d8       |    |		Load_Top	At_Offset_0
014f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0150			BODY_0148:
0150 e5fe       |    |		Load	0x2,-0x2
0151 7002       |p   |		Jump_Nonzero	0x154
0152 e214       |    |		Load	0x1,0x14
0153 0257       | W  |		Execute	Discrete,Raise
0154 e5fe       |    |		Load	0x2,-0x2
0155 0229       | )  |		Execute	Access,All_Read
0156 00d9       |    |		Load_Top	At_Offset_1
0157 0120       |    |		Execute	Any,Is_Value
0158 6802       |h   |		Jump_Zero	0x15b
0159 e20e       |    |		Load	0x1,0xe
015a 7803       |x   |		Jump	0x15e
015b 00d9       |    |		Load_Top	At_Offset_1
015c e20e       |    |		Load	0x1,0xe
015d 0119       |    |		Execute	Any,Check_In_Formal_Type
015e 00e1       |    |		Load_Encached	Boolean_Cache
015f 00da       |    |		Load_Top	At_Offset_2
0160 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0161 e5ff       |    |		Load	0x2,-0x1
0162 e20e       |    |		Load	0x1,0xe
0163 0119       |    |		Execute	Any,Check_In_Formal_Type
0164 8241       | A  |		Call	0x1,0x41
0165 00db       |    |		Load_Top	At_Offset_3
0166 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0167 c402       |    |		Store	0x2,0x2
0168 c403       |    |		Store	0x2,0x3
0169 00d1       |    |		Pop_Control	Pop_Count_1
016a 00d9       |    |		Load_Top	At_Offset_1
016b 6802       |h   |		Jump_Zero	0x16e
016c e210       |    |		Load	0x1,0x10
016d 0257       | W  |		Execute	Discrete,Raise
016e e5fe       |    |		Load	0x2,-0x2
016f 0227       | '  |		Execute	Access,All_Reference
0170 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0171 0a01       |    |		Execute_Immediate	Plus,0x1
0172 e5fe       |    |		Load	0x2,-0x2
0173 0227       | '  |		Execute	Access,All_Reference
0174 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0175 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0176 0000 0000  |    |		.XXX[0x2]
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017c       | |  |		.CONST	0x017c								; Address of begin
0179 0004       |    |		.CONST	0x0004								; Address of exception handler
017a 0002       |    |		.CONST	0x0002								; Number of locals
017b			INIT_0178:
017b 00e1       |    |		Load_Encached	Boolean_Cache
017c			BODY_0178:
017c e5fe       |    |		Load	0x2,-0x2
017d 7002       |p   |		Jump_Nonzero	0x180
017e e214       |    |		Load	0x1,0x14
017f 0257       | W  |		Execute	Discrete,Raise
0180 e5fe       |    |		Load	0x2,-0x2
0181 0229       | )  |		Execute	Access,All_Read
0182 e5fc       |    |		Load	0x2,-0x4
0183 0120       |    |		Execute	Any,Is_Value
0184 6802       |h   |		Jump_Zero	0x187
0185 e20e       |    |		Load	0x1,0xe
0186 7803       |x   |		Jump	0x18a
0187 e5fc       |    |		Load	0x2,-0x4
0188 e20e       |    |		Load	0x1,0xe
0189 0119       |    |		Execute	Any,Check_In_Formal_Type
018a 00e1       |    |		Load_Encached	Boolean_Cache
018b 00da       |    |		Load_Top	At_Offset_2
018c 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
018d e5ff       |    |		Load	0x2,-0x1
018e e20e       |    |		Load	0x1,0xe
018f 0119       |    |		Execute	Any,Check_In_Formal_Type
0190 8241       | A  |		Call	0x1,0x41
0191 00db       |    |		Load_Top	At_Offset_3
0192 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0193 005b       | [  |		Store_Top	Discrete,At_Offset_3
0194 c5fc       |    |		Store	0x2,-0x4
0195 00d1       |    |		Pop_Control	Pop_Count_1
0196 00d8       |    |		Load_Top	At_Offset_0
0197 a5fd       |    |		Store_Unchecked	0x2,-0x3
0198 00d8       |    |		Load_Top	At_Offset_0
0199 7007       |p   |		Jump_Nonzero	0x1a1
019a e5fe       |    |		Load	0x2,-0x2
019b 0227       | '  |		Execute	Access,All_Reference
019c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
019d 0a01       |    |		Execute_Immediate	Plus,0x1
019e e5fe       |    |		Load	0x2,-0x2
019f 0227       | '  |		Execute	Access,All_Reference
01a0 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01a1 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01a2 0000 0000  |    |		.BLANK	0000[0x6]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01b0       |    |		.CONST	0x01b0								; Address of begin
01a9 0004       |    |		.CONST	0x0004								; Address of exception handler
01aa 0003       |    |		.CONST	0x0003								; Number of locals
01ab			INIT_01a8:
01ab 00e1       |    |		Load_Encached	Boolean_Cache
01ac e20e       |    |		Load	0x1,0xe
01ad 02c7       |    |		Declare_Variable	Any
01ae 00d8       |    |		Load_Top	At_Offset_0
01af 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01b0			BODY_01a8:
01b0 e5fe       |    |		Load	0x2,-0x2
01b1 7002       |p   |		Jump_Nonzero	0x1b4
01b2 e214       |    |		Load	0x1,0x14
01b3 0257       | W  |		Execute	Discrete,Raise
01b4 e5fe       |    |		Load	0x2,-0x2
01b5 0229       | )  |		Execute	Access,All_Read
01b6 00d9       |    |		Load_Top	At_Offset_1
01b7 0120       |    |		Execute	Any,Is_Value
01b8 6802       |h   |		Jump_Zero	0x1bb
01b9 e20e       |    |		Load	0x1,0xe
01ba 7803       |x   |		Jump	0x1be
01bb 00d9       |    |		Load_Top	At_Offset_1
01bc e20e       |    |		Load	0x1,0xe
01bd 0119       |    |		Execute	Any,Check_In_Formal_Type
01be 00e1       |    |		Load_Encached	Boolean_Cache
01bf 00da       |    |		Load_Top	At_Offset_2
01c0 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
01c1 e5ff       |    |		Load	0x2,-0x1
01c2 e20e       |    |		Load	0x1,0xe
01c3 0119       |    |		Execute	Any,Check_In_Formal_Type
01c4 8242       | B  |		Call	0x1,0x42
01c5 00db       |    |		Load_Top	At_Offset_3
01c6 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01c7 c402       |    |		Store	0x2,0x2
01c8 c403       |    |		Store	0x2,0x3
01c9 00d1       |    |		Pop_Control	Pop_Count_1
01ca 00d9       |    |		Load_Top	At_Offset_1
01cb a5fd       |    |		Store_Unchecked	0x2,-0x3
01cc 00d9       |    |		Load_Top	At_Offset_1
01cd 6803       |h   |		Jump_Zero	0x1d1
01ce 00d8       |    |		Load_Top	At_Offset_0
01cf c5fc       |    |		Store	0x2,-0x4
01d0 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01d1 e5fe       |    |		Load	0x2,-0x2
01d2 0227       | '  |		Execute	Access,All_Reference
01d3 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01d4 0a01       |    |		Execute_Immediate	Plus,0x1
01d5 e5fe       |    |		Load	0x2,-0x2
01d6 0227       | '  |		Execute	Access,All_Reference
01d7 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01d8 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01d9 0000 0000  |    |		.BLANK	0000[0x7]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e3       |    |		.CONST	0x01e3								; Address of begin
01e1 0004       |    |		.CONST	0x0004								; Address of exception handler
01e2 0001       |    |		.CONST	0x0001								; Number of locals
01e3			BODY_01e0:
01e3			INIT_01e0:
01e3 00da       |    |		Load_Top	At_Offset_2
01e4 680e       |h   |		Jump_Zero	0x1f3
01e5 00da       |    |		Load_Top	At_Offset_2
01e6 0229       | )  |		Execute	Access,All_Read
01e7 00d8       |    |		Load_Top	At_Offset_0
01e8 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
01e9 8243       | C  |		Call	0x1,0x43
01ea 00d9       |    |		Load_Top	At_Offset_1
01eb 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01ec 00d1       |    |		Pop_Control	Pop_Count_1
01ed 00da       |    |		Load_Top	At_Offset_2
01ee e237       | 7  |		Load	0x1,0x37
01ef e238       | 8  |		Load	0x1,0x38
01f0 1d39       | 9  |		Execute_Immediate	Reference_Lex_1,0x39
01f1 8002       |    |		Call	0x0,0x2
01f2 003b       | ;  |		Store_Top	Access,At_Offset_3
01f3 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01f4 0000 0000  |    |		.BLANK	0000[0x4]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01fd       |    |		.CONST	0x01fd								; Address of begin
01f9 0004       |    |		.CONST	0x0004								; Address of exception handler
01fa 0002       |    |		.CONST	0x0002								; Number of locals
01fb			INIT_01f8:
01fb 029f 05d3  |    |		Declare_Subprogram	INIT_05d0,For_Call
01fd			BODY_01f8:
01fd e5fd       |    |		Load	0x2,-0x3
01fe 680e       |h   |		Jump_Zero	0x20d
01ff e5fd       |    |		Load	0x2,-0x3
0200 0229       | )  |		Execute	Access,All_Read
0201 00d8       |    |		Load_Top	At_Offset_0
0202 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0203 8402       |    |		Call	0x2,0x2
0204 00d9       |    |		Load_Top	At_Offset_1
0205 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0206 00d1       |    |		Pop_Control	Pop_Count_1
0207 e5fd       |    |		Load	0x2,-0x3
0208 e237       | 7  |		Load	0x1,0x37
0209 e238       | 8  |		Load	0x1,0x38
020a 1d39       | 9  |		Execute_Immediate	Reference_Lex_1,0x39
020b 8002       |    |		Call	0x0,0x2
020c c5fd       |    |		Store	0x2,-0x3
020d 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
020e 0000 0000  |    |		.XXX[0x2]
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0216       |    |		.CONST	0x0216								; Address of begin
0211 0004       |    |		.CONST	0x0004								; Address of exception handler
0212 0003       |    |		.CONST	0x0003								; Number of locals
0213			INIT_0210:
0213 8217       |    |		Call	0x1,0x17
0214 029f 0603  |    |		Declare_Subprogram	INIT_0600,For_Call
0216			BODY_0210:
0216 e5fd       |    |		Load	0x2,-0x3
0217 00da       |    |		Load_Top	At_Offset_2
0218 0227       | '  |		Execute	Access,All_Reference
0219 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
021a 00d9       |    |		Load_Top	At_Offset_1
021b 0229       | )  |		Execute	Access,All_Read
021c 00d8       |    |		Load_Top	At_Offset_0
021d 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
021e e5fd       |    |		Load	0x2,-0x3
021f 8403       |    |		Call	0x2,0x3
0220 00d9       |    |		Load_Top	At_Offset_1
0221 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0222 00d1       |    |		Pop_Control	Pop_Count_1
0223 00d9       |    |		Load_Top	At_Offset_1
0224 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0225 0000 0000  |    |		.XXX[0x3]
0227 0000       |    |
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 0240       | @  |		.CONST	0x0240								; Address of begin
0229 0004       |    |		.CONST	0x0004								; Address of exception handler
022a 0006       |    |		.CONST	0x0006								; Number of locals
022b			INIT_0228:
022b e230       | 0  |		Load	0x1,0x30
022c 0007       |    |		Action	Break_Optional
022d 029f 0653  |   S|		Declare_Subprogram	INIT_0650,For_Call
022f 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
0230 00c6       |    |		Action	Check_Subprogram_Elaborated
0231 4803       |H   |		Short_Literal	0x3
0232 4802       |H   |		Short_Literal	0x2
0233 0099       |    |		Action	Reference_Dynamic
0234 0093 0000  |    |		push_full_address	0x0
0236 601d       |`   |		Indirect_Literal	Discrete,0x254,{0x80000000, 0x00010000}
0237 0273       | s  |		Execute	Discrete,Plus
0238 e5ff       |    |		Load	0x2,-0x1
0239 6016       |`   |		Indirect_Literal	Discrete,0x250,{0x00000000, 0x0000ffff}
023a 0279       | y  |		Execute	Discrete,And
023b 0273       | s  |		Execute	Discrete,Plus
023c e009       |    |		Load	0x0,0x9
023d 0273       | s  |		Execute	Discrete,Plus
023e 4806       |H   |		Short_Literal	0x6
023f 0007       |    |		Action	Break_Optional
0240			BODY_0228:
0240 e5fd       |    |		Load	0x2,-0x3
0241 8225       | %  |		Call	0x1,0x25
0242 a402       |    |		Store_Unchecked	0x2,0x2
0243 e5fd       |    |		Load	0x2,-0x3
0244 8223       | #  |		Call	0x1,0x23
0245 4804       |H   |		Short_Literal	0x4
0246 4802       |H   |		Short_Literal	0x2
0247 0099       |    |		Action	Reference_Dynamic
0248 4805       |H   |		Short_Literal	0x5
0249 4802       |H   |		Short_Literal	0x2
024a 0099       |    |		Action	Reference_Dynamic
024b 821d       |    |		Call	0x1,0x1d
024c e22e       | .  |		Load	0x1,0x2e
024d 0226       | &  |		Execute	Access,Convert
024e 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
024f 0000       |    |		.XXX[0x1]
0250 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000ffff}
0254 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
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 6805       |h   |		Jump_Zero	0x262
025d 00da       |    |		Load_Top	At_Offset_2
025e 0227       | '  |		Execute	Access,All_Reference
025f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0260 022d       | -  |		Execute	Access,Is_Null
0261 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0262 4801       |H   |		Short_Literal	0x1
0263 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0264 0000 0000  |    |		.BLANK	0000[0x4]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 0270       | p  |		.CONST	0x0270								; Address of begin
0269 0004       |    |		.CONST	0x0004								; Address of exception handler
026a 0003       |    |		.CONST	0x0003								; Number of locals
026b			INIT_0268:
026b 00e1       |    |		Load_Encached	Boolean_Cache
026c e20e       |    |		Load	0x1,0xe
026d 02c7       |    |		Declare_Variable	Any
026e 00d8       |    |		Load_Top	At_Offset_0
026f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0270			BODY_0268:
0270 e5fe       |    |		Load	0x2,-0x2
0271 7002       |p   |		Jump_Nonzero	0x274
0272 e214       |    |		Load	0x1,0x14
0273 0257       | W  |		Execute	Discrete,Raise
0274 00e1       |    |		Load_Encached	Boolean_Cache
0275 00d9       |    |		Load_Top	At_Offset_1
0276 0120       |    |		Execute	Any,Is_Value
0277 6802       |h   |		Jump_Zero	0x27a
0278 e20e       |    |		Load	0x1,0xe
0279 7803       |x   |		Jump	0x27d
027a 00d9       |    |		Load_Top	At_Offset_1
027b e20e       |    |		Load	0x1,0xe
027c 0119       |    |		Execute	Any,Check_In_Formal_Type
027d e5fe       |    |		Load	0x2,-0x2
027e 0227       | '  |		Execute	Access,All_Reference
027f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0280 e5ff       |    |		Load	0x2,-0x1
0281 e20e       |    |		Load	0x1,0xe
0282 0119       |    |		Execute	Any,Check_In_Formal_Type
0283 8244       | D  |		Call	0x1,0x44
0284 c403       |    |		Store	0x2,0x3
0285 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0286 00d9       |    |		Load_Top	At_Offset_1
0287 6804       |h   |		Jump_Zero	0x28c
0288 00d8       |    |		Load_Top	At_Offset_0
0289 e20e       |    |		Load	0x1,0xe
028a 0119       |    |		Execute	Any,Check_In_Formal_Type
028b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
028c e211       |    |		Load	0x1,0x11
028d 0257       | W  |		Execute	Discrete,Raise
028e 0000 0000  |    |		.XXX[0x2]
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0293       |    |		.CONST	0x0293								; Address of begin
0291 0004       |    |		.CONST	0x0004								; Address of exception handler
0292 0001       |    |		.CONST	0x0001								; Number of locals
0293			BODY_0290:
0293			INIT_0290:
0293 00db       |    |		Load_Top	At_Offset_3
0294 7002       |p   |		Jump_Nonzero	0x297
0295 e214       |    |		Load	0x1,0x14
0296 0257       | W  |		Execute	Discrete,Raise
0297 00e1       |    |		Load_Encached	Boolean_Cache
0298 e5fc       |    |		Load	0x2,-0x4
0299 0120       |    |		Execute	Any,Is_Value
029a 6802       |h   |		Jump_Zero	0x29d
029b e20e       |    |		Load	0x1,0xe
029c 7803       |x   |		Jump	0x2a0
029d e5fc       |    |		Load	0x2,-0x4
029e e20e       |    |		Load	0x1,0xe
029f 0119       |    |		Execute	Any,Check_In_Formal_Type
02a0 e5fe       |    |		Load	0x2,-0x2
02a1 0227       | '  |		Execute	Access,All_Reference
02a2 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02a3 e5ff       |    |		Load	0x2,-0x1
02a4 e20e       |    |		Load	0x1,0xe
02a5 0119       |    |		Execute	Any,Check_In_Formal_Type
02a6 8244       | D  |		Call	0x1,0x44
02a7 c5fc       |    |		Store	0x2,-0x4
02a8 c5fd       |    |		Store	0x2,-0x3
02a9 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02aa 0000 0000  |    |		.BLANK	0000[0x6]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02b8       |    |		.CONST	0x02b8								; Address of begin
02b1 0004       |    |		.CONST	0x0004								; Address of exception handler
02b2 0003       |    |		.CONST	0x0003								; Number of locals
02b3			INIT_02b0:
02b3 00e1       |    |		Load_Encached	Boolean_Cache
02b4 e20e       |    |		Load	0x1,0xe
02b5 02c7       |    |		Declare_Variable	Any
02b6 00d8       |    |		Load_Top	At_Offset_0
02b7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02b8			BODY_02b0:
02b8 e5fe       |    |		Load	0x2,-0x2
02b9 7002       |p   |		Jump_Nonzero	0x2bc
02ba e214       |    |		Load	0x1,0x14
02bb 0257       | W  |		Execute	Discrete,Raise
02bc 00e1       |    |		Load_Encached	Boolean_Cache
02bd 00d9       |    |		Load_Top	At_Offset_1
02be 0120       |    |		Execute	Any,Is_Value
02bf 6802       |h   |		Jump_Zero	0x2c2
02c0 e20e       |    |		Load	0x1,0xe
02c1 7803       |x   |		Jump	0x2c5
02c2 00d9       |    |		Load_Top	At_Offset_1
02c3 e20e       |    |		Load	0x1,0xe
02c4 0119       |    |		Execute	Any,Check_In_Formal_Type
02c5 e5fe       |    |		Load	0x2,-0x2
02c6 0227       | '  |		Execute	Access,All_Reference
02c7 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02c8 e5ff       |    |		Load	0x2,-0x1
02c9 e20e       |    |		Load	0x1,0xe
02ca 0119       |    |		Execute	Any,Check_In_Formal_Type
02cb 8244       | D  |		Call	0x1,0x44
02cc c403       |    |		Store	0x2,0x3
02cd 005a       | Z  |		Store_Top	Discrete,At_Offset_2
02ce 00d9       |    |		Load_Top	At_Offset_1
02cf 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 02d3       |    |		.CONST	0x02d3								; Address of begin
02d1 0004       |    |		.CONST	0x0004								; Address of exception handler
02d2 0001       |    |		.CONST	0x0001								; Number of locals
02d3			BODY_02d0:
02d3			INIT_02d0:
02d3 00da       |    |		Load_Top	At_Offset_2
02d4 7002       |p   |		Jump_Nonzero	0x2d7
02d5 4800       |H   |		Short_Literal	0x0
02d6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02d7 00da       |    |		Load_Top	At_Offset_2
02d8 0227       | '  |		Execute	Access,All_Reference
02d9 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02da 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02db 0000 0000  |    |		.BLANK	0000[0x5]
02e0 ; --------------------------------------------------------------------------------------
02e0 ; SUBPROGRAM
02e0 ; --------------------------------------------------------------------------------------
02e0 02e9       |    |		.CONST	0x02e9								; Address of begin
02e1 0004       |    |		.CONST	0x0004								; Address of exception handler
02e2 0004       |    |		.CONST	0x0004								; Number of locals
02e3			INIT_02e0:
02e3 029f 066b  |   k|		Declare_Subprogram	INIT_0668,For_Call
02e5 029f 0683  |    |		Declare_Subprogram	INIT_0680,For_Call
02e7 029f 069b  |    |		Declare_Subprogram	INIT_0698,For_Call
02e9			BODY_02e0:
02e9 e5fd       |    |		Load	0x2,-0x3
02ea 7002       |p   |		Jump_Nonzero	0x2ed
02eb e214       |    |		Load	0x1,0x14
02ec 0257       | W  |		Execute	Discrete,Raise
02ed e5fc       |    |		Load	0x2,-0x4
02ee 4602       |F   |		Jump_Case	0x3
02ef 7807       |x   |		Jump	0x2f7								; case 0x0
02f0 780b       |x   |		Jump	0x2fc								; case 0x1
02f1 7800       |x   |		Jump	0x2f2								; case 0x2
02f2 e5fd       |    |		Load	0x2,-0x3
02f3 0227       | '  |		Execute	Access,All_Reference
02f4 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02f5 8404       |    |		Call	0x2,0x4
02f6 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
02f7 e5fd       |    |		Load	0x2,-0x3
02f8 0227       | '  |		Execute	Access,All_Reference
02f9 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02fa 8402       |    |		Call	0x2,0x2
02fb 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
02fc e5fd       |    |		Load	0x2,-0x3
02fd 0227       | '  |		Execute	Access,All_Reference
02fe 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02ff 8403       |    |		Call	0x2,0x3
0300 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0301 0000 0000  |    |		.BLANK	0000[0x7]
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 030b       |    |		.CONST	0x030b								; Address of begin
0309 0004       |    |		.CONST	0x0004								; Address of exception handler
030a 0001       |    |		.CONST	0x0001								; Number of locals
030b			BODY_0308:
030b			INIT_0308:
030b 00da       |    |		Load_Top	At_Offset_2
030c 7002       |p   |		Jump_Nonzero	0x30f
030d e214       |    |		Load	0x1,0x14
030e 0257       | W  |		Execute	Discrete,Raise
030f e230       | 0  |		Load	0x1,0x30
0310 00db       |    |		Load_Top	At_Offset_3
0311 0227       | '  |		Execute	Access,All_Reference
0312 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0313 8245       | E  |		Call	0x1,0x45
0314 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0315 0000 0000  |    |		.XXX[0x3]
0317 0000       |    |
0318 ; --------------------------------------------------------------------------------------
0318 ; SUBPROGRAM
0318 ; --------------------------------------------------------------------------------------
0318 031b       |    |		.CONST	0x031b								; Address of begin
0319 0004       |    |		.CONST	0x0004								; Address of exception handler
031a 0001       |    |		.CONST	0x0001								; Number of locals
031b			BODY_0318:
031b			INIT_0318:
031b 00da       |    |		Load_Top	At_Offset_2
031c 7002       |p   |		Jump_Nonzero	0x31f
031d e214       |    |		Load	0x1,0x14
031e 0257       | W  |		Execute	Discrete,Raise
031f e230       | 0  |		Load	0x1,0x30
0320 00db       |    |		Load_Top	At_Offset_3
0321 0227       | '  |		Execute	Access,All_Reference
0322 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0323 8245       | E  |		Call	0x1,0x45
0324 a5fe       |    |		Store_Unchecked	0x2,-0x2
0325 00db       |    |		Load_Top	At_Offset_3
0326 0227       | '  |		Execute	Access,All_Reference
0327 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0328 0227       | '  |		Execute	Access,All_Reference
0329 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
032a c5fd       |    |		Store	0x2,-0x3
032b 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
032c 0000 0000  |    |		.BLANK	0000[0x4]
0330 ; --------------------------------------------------------------------------------------
0330 ; SUBPROGRAM
0330 ; --------------------------------------------------------------------------------------
0330 0333       | 3  |		.CONST	0x0333								; Address of begin
0331 0004       |    |		.CONST	0x0004								; Address of exception handler
0332 0001       |    |		.CONST	0x0001								; Number of locals
0333			BODY_0330:
0333			INIT_0330:
0333 00da       |    |		Load_Top	At_Offset_2
0334 7002       |p   |		Jump_Nonzero	0x337
0335 4800       |H   |		Short_Literal	0x0
0336 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0337 00da       |    |		Load_Top	At_Offset_2
0338 0227       | '  |		Execute	Access,All_Reference
0339 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
033a 700a       |p   |		Jump_Nonzero	0x345
033b 00da       |    |		Load_Top	At_Offset_2
033c 0227       | '  |		Execute	Access,All_Reference
033d 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
033e 0e03       |    |		Execute_Immediate	Not_Equal,0x3
033f 00db       |    |		Load_Top	At_Offset_3
0340 0227       | '  |		Execute	Access,All_Reference
0341 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0342 022c       | ,  |		Execute	Access,Not_Null
0343 0279       | y  |		Execute	Discrete,And
0344 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0345 00da       |    |		Load_Top	At_Offset_2
0346 0227       | '  |		Execute	Access,All_Reference
0347 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0348 0f03       |    |		Execute_Immediate	Equal,0x3
0349 6805       |h   |		Jump_Zero	0x34f
034a 00da       |    |		Load_Top	At_Offset_2
034b 0227       | '  |		Execute	Access,All_Reference
034c 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
034d 8227       | '  |		Call	0x1,0x27
034e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
034f 4801       |H   |		Short_Literal	0x1
0350 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0351 0000 0000  |    |		.BLANK	0000[0x7]
0358 ; --------------------------------------------------------------------------------------
0358 ; SUBPROGRAM
0358 ; --------------------------------------------------------------------------------------
0358 035b       | [  |		.CONST	0x035b								; Address of begin
0359 0004       |    |		.CONST	0x0004								; Address of exception handler
035a 0001       |    |		.CONST	0x0001								; Number of locals
035b			BODY_0358:
035b			INIT_0358:
035b 00da       |    |		Load_Top	At_Offset_2
035c 022d       | -  |		Execute	Access,Is_Null
035d 00db       |    |		Load_Top	At_Offset_3
035e 0227       | '  |		Execute	Access,All_Reference
035f 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0360 0f03       |    |		Execute_Immediate	Equal,0x3
0361 0278       | x  |		Execute	Discrete,Or
0362 6802       |h   |		Jump_Zero	0x365
0363 e212       |    |		Load	0x1,0x12
0364 0257       | W  |		Execute	Discrete,Raise
0365 00da       |    |		Load_Top	At_Offset_2
0366 0227       | '  |		Execute	Access,All_Reference
0367 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0368 0227       | '  |		Execute	Access,All_Reference
0369 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
036a c5fe       |    |		Store	0x2,-0x2
036b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
036c 0000 0000  |    |		.BLANK	0000[0x4]
0370 ; --------------------------------------------------------------------------------------
0370 ; SUBPROGRAM
0370 ; --------------------------------------------------------------------------------------
0370 0375       | u  |		.CONST	0x0375								; Address of begin
0371 0004       |    |		.CONST	0x0004								; Address of exception handler
0372 0002       |    |		.CONST	0x0002								; Number of locals
0373			INIT_0370:
0373 e230       | 0  |		Load	0x1,0x30
0374 0007       |    |		Action	Break_Optional
0375			BODY_0370:
0375 00db       |    |		Load_Top	At_Offset_3
0376 022d       | -  |		Execute	Access,Is_Null
0377 e5ff       |    |		Load	0x2,-0x1
0378 0227       | '  |		Execute	Access,All_Reference
0379 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
037a 0f03       |    |		Execute_Immediate	Equal,0x3
037b 0278       | x  |		Execute	Discrete,Or
037c 6802       |h   |		Jump_Zero	0x37f
037d e212       |    |		Load	0x1,0x12
037e 0257       | W  |		Execute	Discrete,Raise
037f 00db       |    |		Load_Top	At_Offset_3
0380 0227       | '  |		Execute	Access,All_Reference
0381 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0382 4603       |F   |		Jump_Case	0x4
0383 7813       |x   |		Jump	0x397								; case 0x0
0384 783d       |x=  |		Jump	0x3c2								; case 0x1
0385 7851       |xQ  |		Jump	0x3d7								; case 0x2
0386 7800       |x   |		Jump	0x387								; case 0x3
0387 00db       |    |		Load_Top	At_Offset_3
0388 8246       | F  |		Call	0x1,0x46
0389 c5ff       |    |		Store	0x2,-0x1
038a e5fe       |    |		Load	0x2,-0x2
038b 0120       |    |		Execute	Any,Is_Value
038c 6802       |h   |		Jump_Zero	0x38f
038d e20e       |    |		Load	0x1,0xe
038e 7803       |x   |		Jump	0x392
038f e5fe       |    |		Load	0x2,-0x2
0390 e20e       |    |		Load	0x1,0xe
0391 0119       |    |		Execute	Any,Check_In_Formal_Type
0392 e5ff       |    |		Load	0x2,-0x1
0393 8229       | )  |		Call	0x1,0x29
0394 c5ff       |    |		Store	0x2,-0x1
0395 c5fe       |    |		Store	0x2,-0x2
0396 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0397 00cf       |    |		Action	Mark_Auxiliary
0398 780d       |x   |		Jump	0x3a6
0399 4801       |H   |		Short_Literal	0x1
039a e5ff       |    |		Load	0x2,-0x1
039b 0227       | '  |		Execute	Access,All_Reference
039c 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
039d e5ff       |    |		Load	0x2,-0x1
039e 00d8       |    |		Load_Top	At_Offset_0
039f 0227       | '  |		Execute	Access,All_Reference
03a0 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
03a1 0227       | '  |		Execute	Access,All_Reference
03a2 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
03a3 8245       | E  |		Call	0x1,0x45
03a4 a5ff       |    |		Store_Unchecked	0x2,-0x1
03a5 00c9       |    |		Action	Pop_Auxiliary_Loop
03a6 e5ff       |    |		Load	0x2,-0x1
03a7 0227       | '  |		Execute	Access,All_Reference
03a8 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
03a9 0227       | '  |		Execute	Access,All_Reference
03aa 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
03ab 77ed       |w   |		Jump_Nonzero	0x399
03ac 00ce       |    |		Action	Pop_Auxiliary
03ad 00db       |    |		Load_Top	At_Offset_3
03ae 0227       | '  |		Execute	Access,All_Reference
03af 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
03b0 0227       | '  |		Execute	Access,All_Reference
03b1 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
03b2 c5fe       |    |		Store	0x2,-0x2
03b3 00db       |    |		Load_Top	At_Offset_3
03b4 0227       | '  |		Execute	Access,All_Reference
03b5 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
03b6 0227       | '  |		Execute	Access,All_Reference
03b7 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
03b8 6805       |h   |		Jump_Zero	0x3be
03b9 4802       |H   |		Short_Literal	0x2
03ba e5ff       |    |		Load	0x2,-0x1
03bb 0227       | '  |		Execute	Access,All_Reference
03bc 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
03bd 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03be 00db       |    |		Load_Top	At_Offset_3
03bf 8246       | F  |		Call	0x1,0x46
03c0 c5ff       |    |		Store	0x2,-0x1
03c1 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03c2 00db       |    |		Load_Top	At_Offset_3
03c3 0227       | '  |		Execute	Access,All_Reference
03c4 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
03c5 0227       | '  |		Execute	Access,All_Reference
03c6 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
03c7 c5fe       |    |		Store	0x2,-0x2
03c8 00db       |    |		Load_Top	At_Offset_3
03c9 0227       | '  |		Execute	Access,All_Reference
03ca 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
03cb 0227       | '  |		Execute	Access,All_Reference
03cc 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
03cd 6805       |h   |		Jump_Zero	0x3d3
03ce 4802       |H   |		Short_Literal	0x2
03cf e5ff       |    |		Load	0x2,-0x1
03d0 0227       | '  |		Execute	Access,All_Reference
03d1 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
03d2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03d3 00db       |    |		Load_Top	At_Offset_3
03d4 8246       | F  |		Call	0x1,0x46
03d5 c5ff       |    |		Store	0x2,-0x1
03d6 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03d7 4803       |H   |		Short_Literal	0x3
03d8 e5ff       |    |		Load	0x2,-0x1
03d9 0227       | '  |		Execute	Access,All_Reference
03da 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
03db 00db       |    |		Load_Top	At_Offset_3
03dc e5ff       |    |		Load	0x2,-0x1
03dd 0227       | '  |		Execute	Access,All_Reference
03de 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
03df 0227       | '  |		Execute	Access,All_Reference
03e0 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
03e1 8245       | E  |		Call	0x1,0x45
03e2 a5ff       |    |		Store_Unchecked	0x2,-0x1
03e3 e5fe       |    |		Load	0x2,-0x2
03e4 0120       |    |		Execute	Any,Is_Value
03e5 6802       |h   |		Jump_Zero	0x3e8
03e6 e20e       |    |		Load	0x1,0xe
03e7 7803       |x   |		Jump	0x3eb
03e8 e5fe       |    |		Load	0x2,-0x2
03e9 e20e       |    |		Load	0x1,0xe
03ea 0119       |    |		Execute	Any,Check_In_Formal_Type
03eb e5ff       |    |		Load	0x2,-0x1
03ec 8229       | )  |		Call	0x1,0x29
03ed c5ff       |    |		Store	0x2,-0x1
03ee c5fe       |    |		Store	0x2,-0x2
03ef 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03f0 ; --------------------------------------------------------------------------------------
03f0 ; SUBPROGRAM
03f0 ; --------------------------------------------------------------------------------------
03f0 03f9       |    |		.CONST	0x03f9								; Address of begin
03f1 0004       |    |		.CONST	0x0004								; Address of exception handler
03f2 0004       |    |		.CONST	0x0004								; Number of locals
03f3			INIT_03f0:
03f3 e22b       | +  |		Load	0x1,0x2b
03f4 0007       |    |		Action	Break_Optional
03f5 029f 06b3  |    |		Declare_Subprogram	INIT_06b0,For_Call
03f7 029f 06db  |    |		Declare_Subprogram	INIT_06d8,For_Call
03f9			BODY_03f0:
03f9 e5ff       |    |		Load	0x2,-0x1
03fa 0227       | '  |		Execute	Access,All_Reference
03fb 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
03fc 0f01       |    |		Execute_Immediate	Equal,0x1
03fd 680e       |h   |		Jump_Zero	0x40c
03fe e5ff       |    |		Load	0x2,-0x1
03ff 0227       | '  |		Execute	Access,All_Reference
0400 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0401 0227       | '  |		Execute	Access,All_Reference
0402 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0403 c5fe       |    |		Store	0x2,-0x2
0404 4800       |H   |		Short_Literal	0x0
0405 e5ff       |    |		Load	0x2,-0x1
0406 0227       | '  |		Execute	Access,All_Reference
0407 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0408 e5ff       |    |		Load	0x2,-0x1
0409 821b       |    |		Call	0x1,0x1b
040a c5ff       |    |		Store	0x2,-0x1
040b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
040c e5ff       |    |		Load	0x2,-0x1
040d 0227       | '  |		Execute	Access,All_Reference
040e 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
040f 003b       | ;  |		Store_Top	Access,At_Offset_3
0410 00da       |    |		Load_Top	At_Offset_2
0411 8403       |    |		Call	0x2,0x3
0412 003b       | ;  |		Store_Top	Access,At_Offset_3
0413 00da       |    |		Load_Top	At_Offset_2
0414 0227       | '  |		Execute	Access,All_Reference
0415 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0416 c5fe       |    |		Store	0x2,-0x2
0417 e22b       | +  |		Load	0x1,0x2b
0418 003b       | ;  |		Store_Top	Access,At_Offset_3
0419 e5ff       |    |		Load	0x2,-0x1
041a 0227       | '  |		Execute	Access,All_Reference
041b 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
041c e5ff       |    |		Load	0x2,-0x1
041d 0227       | '  |		Execute	Access,All_Reference
041e 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
041f e5ff       |    |		Load	0x2,-0x1
0420 0229       | )  |		Execute	Access,All_Read
0421 00d8       |    |		Load_Top	At_Offset_0
0422 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0423 8404       |    |		Call	0x2,0x4
0424 00d9       |    |		Load_Top	At_Offset_1
0425 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0426 00d1       |    |		Pop_Control	Pop_Count_1
0427 e5ff       |    |		Load	0x2,-0x1
0428 0227       | '  |		Execute	Access,All_Reference
0429 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
042a 0aff       |    |		Execute_Immediate	Plus,-0x1
042b e5ff       |    |		Load	0x2,-0x1
042c 0227       | '  |		Execute	Access,All_Reference
042d 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
042e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
042f 0000       |    |		.XXX[0x1]
0430 ; --------------------------------------------------------------------------------------
0430 ; SUBPROGRAM
0430 ; --------------------------------------------------------------------------------------
0430 0433       | 3  |		.CONST	0x0433								; Address of begin
0431 0004       |    |		.CONST	0x0004								; Address of exception handler
0432 0001       |    |		.CONST	0x0001								; Number of locals
0433			BODY_0430:
0433			INIT_0430:
0433 4607       |F   |		Jump_Case	0x8
0434 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
0435 7807       |x   |		Jump	0x43d								; case 0x1
0436 780a       |x   |		Jump	0x441								; case 0x2
0437 780e       |x   |		Jump	0x446								; case 0x3
0438 7811       |x   |		Jump	0x44a								; case 0x4
0439 7812       |x   |		Jump	0x44c								; case 0x5
043a 7813       |x   |		Jump	0x44e								; case 0x6
043b 7816       |x   |		Jump	0x452								; case 0x7
043c 4302       |C   |		.XXX[0x1]
043d 00da       |    |		Load_Top	At_Offset_2
043e 0091 075d  |   ]|		Action	Push_String_Extended_Indexed,0x75d				; "LEFT"
0440 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0441 00db       |    |		Load_Top	At_Offset_3
0442 00db       |    |		Load_Top	At_Offset_3
0443 00e0       |    |		Load_Encached	Standard_Cache
0444 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0445 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0446 00da       |    |		Load_Top	At_Offset_2
0447 00e0       |    |		Load_Encached	Standard_Cache
0448 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0449 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
044a 00db       |    |		Load_Top	At_Offset_3
044b 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
044c 00db       |    |		Load_Top	At_Offset_3
044d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
044e e22f       | /  |		Load	0x1,0x2f
044f 00dc       |    |		Load_Top	At_Offset_4
0450 0267       | g  |		Execute	Discrete,Predecessor
0451 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0452 e22f       | /  |		Load	0x1,0x2f
0453 00dc       |    |		Load_Top	At_Offset_4
0454 0268       | h  |		Execute	Discrete,Successor
0455 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0456 0000 0000  |    |		.XXX[0x2]
0458 ; --------------------------------------------------------------------------------------
0458 ; SUBPROGRAM
0458 ; --------------------------------------------------------------------------------------
0458 045c       | \  |		.CONST	0x045c								; Address of begin
0459 0004       |    |		.CONST	0x0004								; Address of exception handler
045a 0002       |    |		.CONST	0x0002								; Number of locals
045b			INIT_0458:
045b 00e2       |    |		Load_Encached	Integer_Cache
045c			BODY_0458:
045c 4800       |H   |		Short_Literal	0x0
045d a5fd       |    |		Store_Unchecked	0x2,-0x3
045e e5fe       |    |		Load	0x2,-0x2
045f 7012       |p   |		Jump_Nonzero	0x472
0460 e22c       | ,  |		Load	0x1,0x2c
0461 0322       | "  |		Declare_Variable	Record
0462 e5ff       |    |		Load	0x2,-0x1
0463 e22c       | ,  |		Load	0x1,0x2c
0464 3000       |0   |		Execute	Record,Field_Type,Field_Number 0x0
0465 0119       |    |		Execute	Any,Check_In_Formal_Type
0466 00d9       |    |		Load_Top	At_Offset_1
0467 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0468 e22b       | +  |		Load	0x1,0x2b
0469 00d9       |    |		Load_Top	At_Offset_1
046a 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
046b e22b       | +  |		Load	0x1,0x2b
046c 00d9       |    |		Load_Top	At_Offset_1
046d 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
046e e22b       | +  |		Load	0x1,0x2b
046f 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0470 a5fe       |    |		Store_Unchecked	0x2,-0x2
0471 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0472 e5fe       |    |		Load	0x2,-0x2
0473 0227       | '  |		Execute	Access,All_Reference
0474 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0475 e5ff       |    |		Load	0x2,-0x1
0476 820f       |    |		Call	0x1,0xf
0477 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0478 00d8       |    |		Load_Top	At_Offset_0
0479 0d00       |    |		Execute_Immediate	Less,0x0
047a 6817       |h   |		Jump_Zero	0x492
047b e5fe       |    |		Load	0x2,-0x2
047c 0229       | )  |		Execute	Access,All_Read
047d e5fc       |    |		Load	0x2,-0x4
047e 0120       |    |		Execute	Any,Is_Value
047f 6802       |h   |		Jump_Zero	0x482
0480 e20e       |    |		Load	0x1,0xe
0481 7803       |x   |		Jump	0x485
0482 e5fc       |    |		Load	0x2,-0x4
0483 e20e       |    |		Load	0x1,0xe
0484 0119       |    |		Execute	Any,Check_In_Formal_Type
0485 00e1       |    |		Load_Encached	Boolean_Cache
0486 00da       |    |		Load_Top	At_Offset_2
0487 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0488 e5ff       |    |		Load	0x2,-0x1
0489 e20e       |    |		Load	0x1,0xe
048a 0119       |    |		Execute	Any,Check_In_Formal_Type
048b 8241       | A  |		Call	0x1,0x41
048c 00db       |    |		Load_Top	At_Offset_3
048d 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
048e c5fd       |    |		Store	0x2,-0x3
048f c5fc       |    |		Store	0x2,-0x4
0490 00d1       |    |		Pop_Control	Pop_Count_1
0491 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0492 00d8       |    |		Load_Top	At_Offset_0
0493 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0494 6817       |h   |		Jump_Zero	0x4ac
0495 e5fe       |    |		Load	0x2,-0x2
0496 0229       | )  |		Execute	Access,All_Read
0497 e5fc       |    |		Load	0x2,-0x4
0498 0120       |    |		Execute	Any,Is_Value
0499 6802       |h   |		Jump_Zero	0x49c
049a e20e       |    |		Load	0x1,0xe
049b 7803       |x   |		Jump	0x49f
049c e5fc       |    |		Load	0x2,-0x4
049d e20e       |    |		Load	0x1,0xe
049e 0119       |    |		Execute	Any,Check_In_Formal_Type
049f 00e1       |    |		Load_Encached	Boolean_Cache
04a0 00da       |    |		Load_Top	At_Offset_2
04a1 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
04a2 e5ff       |    |		Load	0x2,-0x1
04a3 e20e       |    |		Load	0x1,0xe
04a4 0119       |    |		Execute	Any,Check_In_Formal_Type
04a5 8241       | A  |		Call	0x1,0x41
04a6 00db       |    |		Load_Top	At_Offset_3
04a7 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
04a8 c5fd       |    |		Store	0x2,-0x3
04a9 c5fc       |    |		Store	0x2,-0x4
04aa 00d1       |    |		Pop_Control	Pop_Count_1
04ab 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
04ac 4801       |H   |		Short_Literal	0x1
04ad a5fd       |    |		Store_Unchecked	0x2,-0x3
04ae e5fe       |    |		Load	0x2,-0x2
04af 0227       | '  |		Execute	Access,All_Reference
04b0 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
04b1 c5fc       |    |		Store	0x2,-0x4
04b2 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
04b3 0000 0000  |    |		.BLANK	0000[0x5]
04b8 ; --------------------------------------------------------------------------------------
04b8 ; SUBPROGRAM
04b8 ; --------------------------------------------------------------------------------------
04b8 04bc       |    |		.CONST	0x04bc								; Address of begin
04b9 0004       |    |		.CONST	0x0004								; Address of exception handler
04ba 0002       |    |		.CONST	0x0002								; Number of locals
04bb			INIT_04b8:
04bb 00e2       |    |		Load_Encached	Integer_Cache
04bc			BODY_04b8:
04bc 4800       |H   |		Short_Literal	0x0
04bd a5fd       |    |		Store_Unchecked	0x2,-0x3
04be e5fe       |    |		Load	0x2,-0x2
04bf 7005       |p   |		Jump_Nonzero	0x4c5
04c0 0092 0761  |   a|		Action	Push_String_Extended,0x761					; "*** WARNING***    You want to replace an element which does not exist!"
04c2 e00a       |    |		Load	0x0,0xa
04c3 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
04c4 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
04c5 e5fe       |    |		Load	0x2,-0x2
04c6 0227       | '  |		Execute	Access,All_Reference
04c7 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
04c8 e5ff       |    |		Load	0x2,-0x1
04c9 820f       |    |		Call	0x1,0xf
04ca 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
04cb 00d8       |    |		Load_Top	At_Offset_0
04cc 0d00       |    |		Execute_Immediate	Less,0x0
04cd 6817       |h   |		Jump_Zero	0x4e5
04ce e5fe       |    |		Load	0x2,-0x2
04cf 0229       | )  |		Execute	Access,All_Read
04d0 e5fc       |    |		Load	0x2,-0x4
04d1 0120       |    |		Execute	Any,Is_Value
04d2 6802       |h   |		Jump_Zero	0x4d5
04d3 e20e       |    |		Load	0x1,0xe
04d4 7803       |x   |		Jump	0x4d8
04d5 e5fc       |    |		Load	0x2,-0x4
04d6 e20e       |    |		Load	0x1,0xe
04d7 0119       |    |		Execute	Any,Check_In_Formal_Type
04d8 00e1       |    |		Load_Encached	Boolean_Cache
04d9 00da       |    |		Load_Top	At_Offset_2
04da 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
04db e5ff       |    |		Load	0x2,-0x1
04dc e20e       |    |		Load	0x1,0xe
04dd 0119       |    |		Execute	Any,Check_In_Formal_Type
04de 8242       | B  |		Call	0x1,0x42
04df 00db       |    |		Load_Top	At_Offset_3
04e0 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
04e1 c5fd       |    |		Store	0x2,-0x3
04e2 c5fc       |    |		Store	0x2,-0x4
04e3 00d1       |    |		Pop_Control	Pop_Count_1
04e4 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
04e5 00d8       |    |		Load_Top	At_Offset_0
04e6 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
04e7 6817       |h   |		Jump_Zero	0x4ff
04e8 e5fe       |    |		Load	0x2,-0x2
04e9 0229       | )  |		Execute	Access,All_Read
04ea e5fc       |    |		Load	0x2,-0x4
04eb 0120       |    |		Execute	Any,Is_Value
04ec 6802       |h   |		Jump_Zero	0x4ef
04ed e20e       |    |		Load	0x1,0xe
04ee 7803       |x   |		Jump	0x4f2
04ef e5fc       |    |		Load	0x2,-0x4
04f0 e20e       |    |		Load	0x1,0xe
04f1 0119       |    |		Execute	Any,Check_In_Formal_Type
04f2 00e1       |    |		Load_Encached	Boolean_Cache
04f3 00da       |    |		Load_Top	At_Offset_2
04f4 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
04f5 e5ff       |    |		Load	0x2,-0x1
04f6 e20e       |    |		Load	0x1,0xe
04f7 0119       |    |		Execute	Any,Check_In_Formal_Type
04f8 8242       | B  |		Call	0x1,0x42
04f9 00db       |    |		Load_Top	At_Offset_3
04fa 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
04fb c5fd       |    |		Store	0x2,-0x3
04fc c5fc       |    |		Store	0x2,-0x4
04fd 00d1       |    |		Pop_Control	Pop_Count_1
04fe 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
04ff 4801       |H   |		Short_Literal	0x1
0500 a5fd       |    |		Store_Unchecked	0x2,-0x3
0501 e5fe       |    |		Load	0x2,-0x2
0502 0227       | '  |		Execute	Access,All_Reference
0503 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0504 c5fc       |    |		Store	0x2,-0x4
0505 00db       |    |		Load_Top	At_Offset_3
0506 e5fe       |    |		Load	0x2,-0x2
0507 0227       | '  |		Execute	Access,All_Reference
0508 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0509 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
050a 0000 0000  |    |		.BLANK	0000[0x6]
0510 ; --------------------------------------------------------------------------------------
0510 ; SUBPROGRAM
0510 ; --------------------------------------------------------------------------------------
0510 0513       |    |		.CONST	0x0513								; Address of begin
0511 0004       |    |		.CONST	0x0004								; Address of exception handler
0512 0001       |    |		.CONST	0x0001								; Number of locals
0513			BODY_0510:
0513			INIT_0510:
0513 00da       |    |		Load_Top	At_Offset_2
0514 6816       |h   |		Jump_Zero	0x52b
0515 00da       |    |		Load_Top	At_Offset_2
0516 0229       | )  |		Execute	Access,All_Read
0517 00d8       |    |		Load_Top	At_Offset_0
0518 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0519 8243       | C  |		Call	0x1,0x43
051a 00d9       |    |		Load_Top	At_Offset_1
051b 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
051c 00d1       |    |		Pop_Control	Pop_Count_1
051d 00da       |    |		Load_Top	At_Offset_2
051e 0229       | )  |		Execute	Access,All_Read
051f 00d8       |    |		Load_Top	At_Offset_0
0520 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0521 8243       | C  |		Call	0x1,0x43
0522 00d9       |    |		Load_Top	At_Offset_1
0523 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0524 00d1       |    |		Pop_Control	Pop_Count_1
0525 00da       |    |		Load_Top	At_Offset_2
0526 e232       | 2  |		Load	0x1,0x32
0527 e233       | 3  |		Load	0x1,0x33
0528 1d34       | 4  |		Execute_Immediate	Reference_Lex_1,0x34
0529 8002       |    |		Call	0x0,0x2
052a 003b       | ;  |		Store_Top	Access,At_Offset_3
052b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
052c 0000 0000  |    |		.BLANK	0000[0x4]
0530 ; --------------------------------------------------------------------------------------
0530 ; SUBPROGRAM
0530 ; --------------------------------------------------------------------------------------
0530 0534       | 4  |		.CONST	0x0534								; Address of begin
0531 0004       |    |		.CONST	0x0004								; Address of exception handler
0532 0002       |    |		.CONST	0x0002								; Number of locals
0533			INIT_0530:
0533 00e2       |    |		Load_Encached	Integer_Cache
0534			BODY_0530:
0534 e5fe       |    |		Load	0x2,-0x2
0535 7003       |p   |		Jump_Nonzero	0x539
0536 4800       |H   |		Short_Literal	0x0
0537 a5fc       |    |		Store_Unchecked	0x2,-0x4
0538 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0539 e5fe       |    |		Load	0x2,-0x2
053a 0227       | '  |		Execute	Access,All_Reference
053b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
053c e5ff       |    |		Load	0x2,-0x1
053d 820f       |    |		Call	0x1,0xf
053e 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
053f 00d8       |    |		Load_Top	At_Offset_0
0540 0d00       |    |		Execute_Immediate	Less,0x0
0541 6813       |h   |		Jump_Zero	0x555
0542 00e1       |    |		Load_Encached	Boolean_Cache
0543 e5fd       |    |		Load	0x2,-0x3
0544 0120       |    |		Execute	Any,Is_Value
0545 6802       |h   |		Jump_Zero	0x548
0546 e20e       |    |		Load	0x1,0xe
0547 7803       |x   |		Jump	0x54b
0548 e5fd       |    |		Load	0x2,-0x3
0549 e20e       |    |		Load	0x1,0xe
054a 0119       |    |		Execute	Any,Check_In_Formal_Type
054b e5fe       |    |		Load	0x2,-0x2
054c 0227       | '  |		Execute	Access,All_Reference
054d 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
054e e5ff       |    |		Load	0x2,-0x1
054f e20e       |    |		Load	0x1,0xe
0550 0119       |    |		Execute	Any,Check_In_Formal_Type
0551 8244       | D  |		Call	0x1,0x44
0552 c5fd       |    |		Store	0x2,-0x3
0553 c5fc       |    |		Store	0x2,-0x4
0554 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0555 00d8       |    |		Load_Top	At_Offset_0
0556 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0557 6813       |h   |		Jump_Zero	0x56b
0558 00e1       |    |		Load_Encached	Boolean_Cache
0559 e5fd       |    |		Load	0x2,-0x3
055a 0120       |    |		Execute	Any,Is_Value
055b 6802       |h   |		Jump_Zero	0x55e
055c e20e       |    |		Load	0x1,0xe
055d 7803       |x   |		Jump	0x561
055e e5fd       |    |		Load	0x2,-0x3
055f e20e       |    |		Load	0x1,0xe
0560 0119       |    |		Execute	Any,Check_In_Formal_Type
0561 e5fe       |    |		Load	0x2,-0x2
0562 0227       | '  |		Execute	Access,All_Reference
0563 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0564 e5ff       |    |		Load	0x2,-0x1
0565 e20e       |    |		Load	0x1,0xe
0566 0119       |    |		Execute	Any,Check_In_Formal_Type
0567 8244       | D  |		Call	0x1,0x44
0568 c5fd       |    |		Store	0x2,-0x3
0569 c5fc       |    |		Store	0x2,-0x4
056a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
056b e5fe       |    |		Load	0x2,-0x2
056c 0227       | '  |		Execute	Access,All_Reference
056d 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
056e c5fd       |    |		Store	0x2,-0x3
056f 4801       |H   |		Short_Literal	0x1
0570 a5fc       |    |		Store_Unchecked	0x2,-0x4
0571 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0572 0000 0000  |    |		.BLANK	0000[0x6]
0578 ; --------------------------------------------------------------------------------------
0578 ; SUBPROGRAM
0578 ; --------------------------------------------------------------------------------------
0578 057b       | {  |		.CONST	0x057b								; Address of begin
0579 0004       |    |		.CONST	0x0004								; Address of exception handler
057a 0001       |    |		.CONST	0x0001								; Number of locals
057b			BODY_0578:
057b			INIT_0578:
057b 00da       |    |		Load_Top	At_Offset_2
057c 700e       |p   |		Jump_Nonzero	0x58b
057d e231       | 1  |		Load	0x1,0x31
057e 0322       | "  |		Declare_Variable	Record
057f 4803       |H   |		Short_Literal	0x3
0580 00d9       |    |		Load_Top	At_Offset_1
0581 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0582 e5fe       |    |		Load	0x2,-0x2
0583 00d9       |    |		Load_Top	At_Offset_1
0584 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0585 00db       |    |		Load_Top	At_Offset_3
0586 00d9       |    |		Load_Top	At_Offset_1
0587 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0588 e230       | 0  |		Load	0x1,0x30
0589 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
058a 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
058b 00da       |    |		Load_Top	At_Offset_2
058c 0227       | '  |		Execute	Access,All_Reference
058d 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
058e 700e       |p   |		Jump_Nonzero	0x59d
058f e231       | 1  |		Load	0x1,0x31
0590 0322       | "  |		Declare_Variable	Record
0591 4801       |H   |		Short_Literal	0x1
0592 00d9       |    |		Load_Top	At_Offset_1
0593 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0594 e5fe       |    |		Load	0x2,-0x2
0595 00d9       |    |		Load_Top	At_Offset_1
0596 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0597 00db       |    |		Load_Top	At_Offset_3
0598 00d9       |    |		Load_Top	At_Offset_1
0599 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
059a e230       | 0  |		Load	0x1,0x30
059b 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
059c 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
059d e231       | 1  |		Load	0x1,0x31
059e 0322       | "  |		Declare_Variable	Record
059f 4800       |H   |		Short_Literal	0x0
05a0 00d9       |    |		Load_Top	At_Offset_1
05a1 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
05a2 e5fe       |    |		Load	0x2,-0x2
05a3 00d9       |    |		Load_Top	At_Offset_1
05a4 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
05a5 00db       |    |		Load_Top	At_Offset_3
05a6 00d9       |    |		Load_Top	At_Offset_1
05a7 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
05a8 e230       | 0  |		Load	0x1,0x30
05a9 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
05aa 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
05ab 0000 0000  |    |		.BLANK	0000[0x5]
05b0 ; --------------------------------------------------------------------------------------
05b0 ; SUBPROGRAM
05b0 ; --------------------------------------------------------------------------------------
05b0 05b4       |    |		.CONST	0x05b4								; Address of begin
05b1 0004       |    |		.CONST	0x0004								; Address of exception handler
05b2 0002       |    |		.CONST	0x0002								; Number of locals
05b3			INIT_05b0:
05b3 e230       | 0  |		Load	0x1,0x30
05b4			BODY_05b0:
05b4 00cf       |    |		Action	Mark_Auxiliary
05b5 e5ff       |    |		Load	0x2,-0x1
05b6 003a       | :  |		Store_Top	Access,At_Offset_2
05b7 e5ff       |    |		Load	0x2,-0x1
05b8 0227       | '  |		Execute	Access,All_Reference
05b9 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
05ba a5ff       |    |		Store_Unchecked	0x2,-0x1
05bb 00d9       |    |		Load_Top	At_Offset_1
05bc e23c       | <  |		Load	0x1,0x3c
05bd e23d       | =  |		Load	0x1,0x3d
05be 1d3e       | >  |		Execute_Immediate	Reference_Lex_1,0x3e
05bf 8002       |    |		Call	0x0,0x2
05c0 003a       | :  |		Store_Top	Access,At_Offset_2
05c1 e5ff       |    |		Load	0x2,-0x1
05c2 6807       |h   |		Jump_Zero	0x5ca
05c3 e5ff       |    |		Load	0x2,-0x1
05c4 0227       | '  |		Execute	Access,All_Reference
05c5 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
05c6 0e03       |    |		Execute_Immediate	Not_Equal,0x3
05c7 7002       |p   |		Jump_Nonzero	0x5ca
05c8 00c9       |    |		Action	Pop_Auxiliary_Loop
05c9 7feb       |    |		Jump	0x5b5
05ca 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
05cb 0000 0000  |    |		.BLANK	0000[0x5]
05d0 ; --------------------------------------------------------------------------------------
05d0 ; SUBPROGRAM
05d0 ; --------------------------------------------------------------------------------------
05d0 05d3       |    |		.CONST	0x05d3								; Address of begin
05d1 0004       |    |		.CONST	0x0004								; Address of exception handler
05d2 0001       |    |		.CONST	0x0001								; Number of locals
05d3			BODY_05d0:
05d3			INIT_05d0:
05d3 00da       |    |		Load_Top	At_Offset_2
05d4 6824       |h$  |		Jump_Zero	0x5f9
05d5 00da       |    |		Load_Top	At_Offset_2
05d6 0229       | )  |		Execute	Access,All_Read
05d7 00d8       |    |		Load_Top	At_Offset_0
05d8 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
05d9 00d8       |    |		Load_Top	At_Offset_0
05da 0120       |    |		Execute	Any,Is_Value
05db 6803       |h   |		Jump_Zero	0x5df
05dc e20e       |    |		Load	0x1,0xe
05dd 0122       | "  |		Execute	Any,Make_Root_Type
05de 011e       |    |		Execute	Any,Convert
05df 85fe       |    |		Call	0x2,-0x2
05e0 00d9       |    |		Load_Top	At_Offset_1
05e1 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
05e2 00d1       |    |		Pop_Control	Pop_Count_1
05e3 00da       |    |		Load_Top	At_Offset_2
05e4 0229       | )  |		Execute	Access,All_Read
05e5 00d8       |    |		Load_Top	At_Offset_0
05e6 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
05e7 8402       |    |		Call	0x2,0x2
05e8 00d9       |    |		Load_Top	At_Offset_1
05e9 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
05ea 00d1       |    |		Pop_Control	Pop_Count_1
05eb 00da       |    |		Load_Top	At_Offset_2
05ec 0229       | )  |		Execute	Access,All_Read
05ed 00d8       |    |		Load_Top	At_Offset_0
05ee 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
05ef 8402       |    |		Call	0x2,0x2
05f0 00d9       |    |		Load_Top	At_Offset_1
05f1 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
05f2 00d1       |    |		Pop_Control	Pop_Count_1
05f3 00da       |    |		Load_Top	At_Offset_2
05f4 e232       | 2  |		Load	0x1,0x32
05f5 e233       | 3  |		Load	0x1,0x33
05f6 1d34       | 4  |		Execute_Immediate	Reference_Lex_1,0x34
05f7 8002       |    |		Call	0x0,0x2
05f8 003b       | ;  |		Store_Top	Access,At_Offset_3
05f9 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
05fa 0000 0000  |    |		.BLANK	0000[0x6]
0600 ; --------------------------------------------------------------------------------------
0600 ; SUBPROGRAM
0600 ; --------------------------------------------------------------------------------------
0600 0605       |    |		.CONST	0x0605								; Address of begin
0601 0004       |    |		.CONST	0x0004								; Address of exception handler
0602 0002       |    |		.CONST	0x0002								; Number of locals
0603			INIT_0600:
0603 e22b       | +  |		Load	0x1,0x2b
0604 0007       |    |		Action	Break_Optional
0605			BODY_0600:
0605 00db       |    |		Load_Top	At_Offset_3
0606 0f01       |    |		Execute_Immediate	Equal,0x1
0607 6812       |h   |		Jump_Zero	0x61a
0608 e22c       | ,  |		Load	0x1,0x2c
0609 0322       | "  |		Declare_Variable	Record
060a 85fe       |    |		Call	0x2,-0x2
060b e22c       | ,  |		Load	0x1,0x2c
060c 3000       |0   |		Execute	Record,Field_Type,Field_Number 0x0
060d 0119       |    |		Execute	Any,Check_In_Formal_Type
060e 00d9       |    |		Load_Top	At_Offset_1
060f 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0610 e22b       | +  |		Load	0x1,0x2b
0611 00d9       |    |		Load_Top	At_Offset_1
0612 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0613 e22b       | +  |		Load	0x1,0x2b
0614 00d9       |    |		Load_Top	At_Offset_1
0615 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0616 e22b       | +  |		Load	0x1,0x2b
0617 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0618 0039       | 9  |		Store_Top	Access,At_Offset_1
0619 782e       |x.  |		Jump	0x648
061a 00db       |    |		Load_Top	At_Offset_3
061b 0c02       |    |		Execute_Immediate	Greater_Equal,0x2
061c 682b       |h+  |		Jump_Zero	0x648
061d e22b       | +  |		Load	0x1,0x2b
061e 03bc       |    |		Declare_Variable	Access,By_Allocation
061f 00d8       |    |		Load_Top	At_Offset_0
0620 0227       | '  |		Execute	Access,All_Reference
0621 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0622 0039       | 9  |		Store_Top	Access,At_Offset_1
0623 00d8       |    |		Load_Top	At_Offset_0
0624 0229       | )  |		Execute	Access,All_Read
0625 00d8       |    |		Load_Top	At_Offset_0
0626 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0627 e7ff       |    |		Load	0x3,-0x1
0628 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
0629 00d8       |    |		Load_Top	At_Offset_0
062a 00e3       |    |		Load_Encached	Natural_Cache
062b 0260       | `  |		Execute	Discrete,In_Type
062c 7001       |p   |		Jump_Nonzero	0x62e
062d 0801       |    |		Execute_Immediate	Raise,0x1
062e 8403       |    |		Call	0x2,0x3
062f 00d9       |    |		Load_Top	At_Offset_1
0630 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0631 00d1       |    |		Pop_Control	Pop_Count_1
0632 85fe       |    |		Call	0x2,-0x2
0633 00d9       |    |		Load_Top	At_Offset_1
0634 0227       | '  |		Execute	Access,All_Reference
0635 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0636 00d8       |    |		Load_Top	At_Offset_0
0637 0229       | )  |		Execute	Access,All_Read
0638 00d8       |    |		Load_Top	At_Offset_0
0639 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
063a e7ff       |    |		Load	0x3,-0x1
063b 00d8       |    |		Load_Top	At_Offset_0
063c 09ff       |    |		Execute_Immediate	Binary_Scale,-0x1
063d 0272       | r  |		Execute	Discrete,Minus
063e 0aff       |    |		Execute_Immediate	Plus,-0x1
063f 00d8       |    |		Load_Top	At_Offset_0
0640 00e3       |    |		Load_Encached	Natural_Cache
0641 0260       | `  |		Execute	Discrete,In_Type
0642 7001       |p   |		Jump_Nonzero	0x644
0643 0801       |    |		Execute_Immediate	Raise,0x1
0644 8403       |    |		Call	0x2,0x3
0645 00d9       |    |		Load_Top	At_Offset_1
0646 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0647 00d1       |    |		Pop_Control	Pop_Count_1
0648 00d8       |    |		Load_Top	At_Offset_0
0649 a7fe       |    |		Store_Unchecked	0x3,-0x2
064a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
064b 0000 0000  |    |		.BLANK	0000[0x5]
0650 ; --------------------------------------------------------------------------------------
0650 ; SUBPROGRAM
0650 ; --------------------------------------------------------------------------------------
0650 0657       | W  |		.CONST	0x0657								; Address of begin
0651 0004       |    |		.CONST	0x0004								; Address of exception handler
0652 0002       |    |		.CONST	0x0002								; Number of locals
0653			INIT_0650:
0653 e20e       |    |		Load	0x1,0xe
0654 02c7       |    |		Declare_Variable	Any
0655 00d8       |    |		Load_Top	At_Offset_0
0656 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0657			BODY_0650:
0657 00d8       |    |		Load_Top	At_Offset_0
0658 0120       |    |		Execute	Any,Is_Value
0659 6802       |h   |		Jump_Zero	0x65c
065a e20e       |    |		Load	0x1,0xe
065b 7803       |x   |		Jump	0x65f
065c 00d8       |    |		Load_Top	At_Offset_0
065d e20e       |    |		Load	0x1,0xe
065e 0119       |    |		Execute	Any,Check_In_Formal_Type
065f e402       |    |		Load	0x2,0x2
0660 8229       | )  |		Call	0x1,0x29
0661 c402       |    |		Store	0x2,0x2
0662 c602       |    |		Store	0x3,0x2
0663 00d8       |    |		Load_Top	At_Offset_0
0664 85fe       |    |		Call	0x2,-0x2
0665 e20e       |    |		Load	0x1,0xe
0666 0119       |    |		Execute	Any,Check_In_Formal_Type
0667 00ca       |    |		Action	Exit_Nullary_Function
0668 ; --------------------------------------------------------------------------------------
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			INIT_0668:
066b 00da       |    |		Load_Top	At_Offset_2
066c 0227       | '  |		Execute	Access,All_Reference
066d 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
066e 6804       |h   |		Jump_Zero	0x673
066f 00da       |    |		Load_Top	At_Offset_2
0670 0227       | '  |		Execute	Access,All_Reference
0671 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0672 8402       |    |		Call	0x2,0x2
0673 00da       |    |		Load_Top	At_Offset_2
0674 0227       | '  |		Execute	Access,All_Reference
0675 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0676 85fe       |    |		Call	0x2,-0x2
0677 00da       |    |		Load_Top	At_Offset_2
0678 0227       | '  |		Execute	Access,All_Reference
0679 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
067a 6804       |h   |		Jump_Zero	0x67f
067b 00da       |    |		Load_Top	At_Offset_2
067c 0227       | '  |		Execute	Access,All_Reference
067d 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
067e 8402       |    |		Call	0x2,0x2
067f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0680 ; --------------------------------------------------------------------------------------
0680 ; SUBPROGRAM
0680 ; --------------------------------------------------------------------------------------
0680 0683       |    |		.CONST	0x0683								; Address of begin
0681 0004       |    |		.CONST	0x0004								; Address of exception handler
0682 0001       |    |		.CONST	0x0001								; Number of locals
0683			BODY_0680:
0683			INIT_0680:
0683 00da       |    |		Load_Top	At_Offset_2
0684 0227       | '  |		Execute	Access,All_Reference
0685 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0686 85fe       |    |		Call	0x2,-0x2
0687 00da       |    |		Load_Top	At_Offset_2
0688 0227       | '  |		Execute	Access,All_Reference
0689 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
068a 6804       |h   |		Jump_Zero	0x68f
068b 00da       |    |		Load_Top	At_Offset_2
068c 0227       | '  |		Execute	Access,All_Reference
068d 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
068e 8403       |    |		Call	0x2,0x3
068f 00da       |    |		Load_Top	At_Offset_2
0690 0227       | '  |		Execute	Access,All_Reference
0691 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0692 6804       |h   |		Jump_Zero	0x697
0693 00da       |    |		Load_Top	At_Offset_2
0694 0227       | '  |		Execute	Access,All_Reference
0695 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0696 8403       |    |		Call	0x2,0x3
0697 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0698 ; --------------------------------------------------------------------------------------
0698 ; SUBPROGRAM
0698 ; --------------------------------------------------------------------------------------
0698 069b       |    |		.CONST	0x069b								; Address of begin
0699 0004       |    |		.CONST	0x0004								; Address of exception handler
069a 0001       |    |		.CONST	0x0001								; Number of locals
069b			BODY_0698:
069b			INIT_0698:
069b 00da       |    |		Load_Top	At_Offset_2
069c 0227       | '  |		Execute	Access,All_Reference
069d 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
069e 6804       |h   |		Jump_Zero	0x6a3
069f 00da       |    |		Load_Top	At_Offset_2
06a0 0227       | '  |		Execute	Access,All_Reference
06a1 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
06a2 8404       |    |		Call	0x2,0x4
06a3 00da       |    |		Load_Top	At_Offset_2
06a4 0227       | '  |		Execute	Access,All_Reference
06a5 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
06a6 6804       |h   |		Jump_Zero	0x6ab
06a7 00da       |    |		Load_Top	At_Offset_2
06a8 0227       | '  |		Execute	Access,All_Reference
06a9 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
06aa 8404       |    |		Call	0x2,0x4
06ab 00da       |    |		Load_Top	At_Offset_2
06ac 0227       | '  |		Execute	Access,All_Reference
06ad 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
06ae 85fe       |    |		Call	0x2,-0x2
06af 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
06b0 ; --------------------------------------------------------------------------------------
06b0 ; SUBPROGRAM
06b0 ; --------------------------------------------------------------------------------------
06b0 06b3       |    |		.CONST	0x06b3								; Address of begin
06b1 0004       |    |		.CONST	0x0004								; Address of exception handler
06b2 0001       |    |		.CONST	0x0001								; Number of locals
06b3			BODY_06b0:
06b3			INIT_06b0:
06b3 00da       |    |		Load_Top	At_Offset_2
06b4 681f       |h   |		Jump_Zero	0x6d4
06b5 00cf       |    |		Action	Mark_Auxiliary
06b6 7812       |x   |		Jump	0x6c9
06b7 00db       |    |		Load_Top	At_Offset_3
06b8 0227       | '  |		Execute	Access,All_Reference
06b9 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
06ba 6805       |h   |		Jump_Zero	0x6c0
06bb 00db       |    |		Load_Top	At_Offset_3
06bc 0227       | '  |		Execute	Access,All_Reference
06bd 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
06be a7ff       |    |		Store_Unchecked	0x3,-0x1
06bf 7808       |x   |		Jump	0x6c8
06c0 00db       |    |		Load_Top	At_Offset_3
06c1 0227       | '  |		Execute	Access,All_Reference
06c2 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
06c3 6804       |h   |		Jump_Zero	0x6c8
06c4 00db       |    |		Load_Top	At_Offset_3
06c5 0227       | '  |		Execute	Access,All_Reference
06c6 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
06c7 a7ff       |    |		Store_Unchecked	0x3,-0x1
06c8 00c9       |    |		Action	Pop_Auxiliary_Loop
06c9 00db       |    |		Load_Top	At_Offset_3
06ca 0227       | '  |		Execute	Access,All_Reference
06cb 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
06cc 022c       | ,  |		Execute	Access,Not_Null
06cd e7ff       |    |		Load	0x3,-0x1
06ce 0227       | '  |		Execute	Access,All_Reference
06cf 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
06d0 022c       | ,  |		Execute	Access,Not_Null
06d1 0278       | x  |		Execute	Discrete,Or
06d2 77e4       |w   |		Jump_Nonzero	0x6b7
06d3 00ce       |    |		Action	Pop_Auxiliary
06d4 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
06d5 0000 0000  |    |		.XXX[0x3]
06d7 0000       |    |
06d8 ; --------------------------------------------------------------------------------------
06d8 ; SUBPROGRAM
06d8 ; --------------------------------------------------------------------------------------
06d8 06dd       |    |		.CONST	0x06dd								; Address of begin
06d9 0004       |    |		.CONST	0x0004								; Address of exception handler
06da 0002       |    |		.CONST	0x0002								; Number of locals
06db			INIT_06d8:
06db e22b       | +  |		Load	0x1,0x2b
06dc 0007       |    |		Action	Break_Optional
06dd			BODY_06d8:
06dd 00db       |    |		Load_Top	At_Offset_3
06de 685c       |h\  |		Jump_Zero	0x73b
06df 00cf       |    |		Action	Mark_Auxiliary
06e0 7816       |x   |		Jump	0x6f7
06e1 e7ff       |    |		Load	0x3,-0x1
06e2 0227       | '  |		Execute	Access,All_Reference
06e3 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
06e4 6807       |h   |		Jump_Zero	0x6ec
06e5 e7ff       |    |		Load	0x3,-0x1
06e6 003a       | :  |		Store_Top	Access,At_Offset_2
06e7 e7ff       |    |		Load	0x3,-0x1
06e8 0227       | '  |		Execute	Access,All_Reference
06e9 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
06ea a7ff       |    |		Store_Unchecked	0x3,-0x1
06eb 780a       |x   |		Jump	0x6f6
06ec e7ff       |    |		Load	0x3,-0x1
06ed 0227       | '  |		Execute	Access,All_Reference
06ee 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
06ef 6806       |h   |		Jump_Zero	0x6f6
06f0 e7ff       |    |		Load	0x3,-0x1
06f1 003a       | :  |		Store_Top	Access,At_Offset_2
06f2 e7ff       |    |		Load	0x3,-0x1
06f3 0227       | '  |		Execute	Access,All_Reference
06f4 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
06f5 a7ff       |    |		Store_Unchecked	0x3,-0x1
06f6 00c9       |    |		Action	Pop_Auxiliary_Loop
06f7 e7ff       |    |		Load	0x3,-0x1
06f8 0227       | '  |		Execute	Access,All_Reference
06f9 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
06fa 022c       | ,  |		Execute	Access,Not_Null
06fb e7ff       |    |		Load	0x3,-0x1
06fc 0227       | '  |		Execute	Access,All_Reference
06fd 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
06fe 022c       | ,  |		Execute	Access,Not_Null
06ff 0278       | x  |		Execute	Discrete,Or
0700 77e0       |w   |		Jump_Nonzero	0x6e1
0701 00ce       |    |		Action	Pop_Auxiliary
0702 00d8       |    |		Load_Top	At_Offset_0
0703 0227       | '  |		Execute	Access,All_Reference
0704 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0705 022c       | ,  |		Execute	Access,Not_Null
0706 00d9       |    |		Load_Top	At_Offset_1
0707 0227       | '  |		Execute	Access,All_Reference
0708 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0709 022c       | ,  |		Execute	Access,Not_Null
070a 0279       | y  |		Execute	Discrete,And
070b 6807       |h   |		Jump_Zero	0x713
070c 00d8       |    |		Load_Top	At_Offset_0
070d a7ff       |    |		Store_Unchecked	0x3,-0x1
070e e22b       | +  |		Load	0x1,0x2b
070f e7ff       |    |		Load	0x3,-0x1
0710 0227       | '  |		Execute	Access,All_Reference
0711 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0712 7826       |x&  |		Jump	0x739
0713 00d8       |    |		Load_Top	At_Offset_0
0714 0227       | '  |		Execute	Access,All_Reference
0715 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0716 022c       | ,  |		Execute	Access,Not_Null
0717 00d9       |    |		Load_Top	At_Offset_1
0718 0227       | '  |		Execute	Access,All_Reference
0719 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
071a 022d       | -  |		Execute	Access,Is_Null
071b 0279       | y  |		Execute	Discrete,And
071c 6807       |h   |		Jump_Zero	0x724
071d 00d8       |    |		Load_Top	At_Offset_0
071e a7ff       |    |		Store_Unchecked	0x3,-0x1
071f e22b       | +  |		Load	0x1,0x2b
0720 e7ff       |    |		Load	0x3,-0x1
0721 0227       | '  |		Execute	Access,All_Reference
0722 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0723 7815       |x   |		Jump	0x739
0724 00d8       |    |		Load_Top	At_Offset_0
0725 0227       | '  |		Execute	Access,All_Reference
0726 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0727 022d       | -  |		Execute	Access,Is_Null
0728 00d9       |    |		Load_Top	At_Offset_1
0729 0227       | '  |		Execute	Access,All_Reference
072a 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
072b 022c       | ,  |		Execute	Access,Not_Null
072c 0279       | y  |		Execute	Discrete,And
072d 6807       |h   |		Jump_Zero	0x735
072e 00d8       |    |		Load_Top	At_Offset_0
072f a7ff       |    |		Store_Unchecked	0x3,-0x1
0730 e22b       | +  |		Load	0x1,0x2b
0731 e7ff       |    |		Load	0x3,-0x1
0732 0227       | '  |		Execute	Access,All_Reference
0733 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0734 7804       |x   |		Jump	0x739
0735 00d8       |    |		Load_Top	At_Offset_0
0736 a7ff       |    |		Store_Unchecked	0x3,-0x1
0737 e22b       | +  |		Load	0x1,0x2b
0738 a7ff       |    |		Store_Unchecked	0x3,-0x1
0739 e22b       | +  |		Load	0x1,0x2b
073a 0039       | 9  |		Store_Top	Access,At_Offset_1
073b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
073c 0000 0000  |    |		.BLANK	0000[0x4]
0740 ; --------------------------------------------------------------------------------------
0740 ; SUBPROGRAM
0740 ; --------------------------------------------------------------------------------------
0740 0743       | C  |		.CONST	0x0743								; Address of begin
0741 0004       |    |		.CONST	0x0004								; Address of exception handler
0742 0001       |    |		.CONST	0x0001								; Number of locals
0743			BODY_0740:
0743			INIT_0740:
0743 4601       |F   |		Jump_Case	0x2
0744 7801       |x   |		Jump	0x746								; case 0x0
0745 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
0746 00da       |    |		Load_Top	At_Offset_2
0747 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0748 0125       | %  |		Execute	Any,Set_Constraint
0749 00da       |    |		Load_Top	At_Offset_2
074a 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
074b 1c00       |    |		Execute_Immediate	Run_Utility,0x0
074c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
074d 0000 0000  |    |		.XXX[0x3]
074f 0000       |    |
0750 ; --------------------------------------------------------------------------------------
0750 ; SUBPROGRAM
0750 ; --------------------------------------------------------------------------------------
0750 0753       | S  |		.CONST	0x0753								; Address of begin
0751 0004       |    |		.CONST	0x0004								; Address of exception handler
0752 0001       |    |		.CONST	0x0001								; Number of locals
0753			BODY_0750:
0753			INIT_0750:
0753 4601       |F   |		Jump_Case	0x2
0754 7801       |x   |		Jump	0x756								; case 0x0
0755 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
0756 4800       |H   |		Short_Literal	0x0
0757 00db       |    |		Load_Top	At_Offset_3
0758 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0759 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
075a ; --------------------------------------------------------------------------------------
075a ; STRING TABLE
075a ; --------------------------------------------------------------------------------------
075a 0012       |    |		.STRTAB	0x0012->0x0763							; "INORDER"
075b 0017       |    |		.STRTAB	0x0017->0x0766							; "PREORDER"
075c 001d       |    |		.STRTAB	0x001d->0x076a							; "POSTORDER"
075d 0024       | $  |		.STRTAB	0x0024->0x076f							; "LEFT"
075e 0026       | &  |		.STRTAB	0x0026->0x0771							; "MIDDLE"
075f 002a       | *  |		.STRTAB	0x002a->0x0774							; "RIGHT"
0760 002d       | -  |		.STRTAB	0x002d->0x0776							; "DONE"
0761 002f       | /  |		.STRTAB	0x002f->0x0778							; "*** WARNING***    You want to replace an element which does not exist!"
0762 0073       | s  |		.STREND 0x0073->0x079b
0763 494e 4f52  |INOR|		.STRTAB_STRINGS
079c 0000 0000  |    |		.BLANK	0000[0x4]
07a0 ; --------------------------------------------------------------------------------------
07a0 ; Debug Table
07a0 ; --------------------------------------------------------------------------------------
07a0 0004 0008  |    |		.DEBUG4	0x0004,0x0008,0x2e52,0x0000,0x0001,0x0028
07a6 000b 0846  |   F|		.DBG4T	0x000b,0x0846,0xc000,0x8000
07aa 0098 088c  |    |		.DBG4T	0x0098,0x088c,0xc000,0x0000
07ae 00eb 0000  |    |		.DBG4T	0x00eb,0x0000,0x1005,0x0000
07b2 0133 08ab  | 3  |		.DBG4T	0x0133,0x08ab,0x1002,0x0000
07b6 014b 08ae  | K  |		.DBG4T	0x014b,0x08ae,0x1001,0x0000
07ba 017b 08b8  | {  |		.DBG4T	0x017b,0x08b8,0x1001,0x0000
07be 01ab 08c1  |    |		.DBG4T	0x01ab,0x08c1,0x1001,0x0000
07c2 01e3 08cc  |    |		.DBG4T	0x01e3,0x08cc,0x1001,0x0000
07c6 01fb 08d1  |    |		.DBG4T	0x01fb,0x08d1,0x3801,0x0002
07ca 0213 08d7  |    |		.DBG4T	0x0213,0x08d7,0x3802,0x0002
07ce 022b 08de  | +  |		.DBG4T	0x022b,0x08de,0x3802,0x0002
07d2 025b 08e5  | [  |		.DBG4T	0x025b,0x08e5,0x1002,0x0000
07d6 026b 08e8  | k  |		.DBG4T	0x026b,0x08e8,0x1002,0x0000
07da 0293 08f2  |    |		.DBG4T	0x0293,0x08f2,0x1001,0x0000
07de 02b3 08f7  |    |		.DBG4T	0x02b3,0x08f7,0x1002,0x0000
07e2 02d3 08ff  |    |		.DBG4T	0x02d3,0x08ff,0x1002,0x0000
07e6 02e3 0904  |    |		.DBG4T	0x02e3,0x0904,0x3801,0x4002
07ea 030b 0915  |    |		.DBG4T	0x030b,0x0915,0x1002,0x0000
07ee 031b 091a  |    |		.DBG4T	0x031b,0x091a,0x1001,0x0000
07f2 0333 0920  | 3  |		.DBG4T	0x0333,0x0920,0x1002,0x0000
07f6 035b 0929  | [ )|		.DBG4T	0x035b,0x0929,0x1001,0x0000
07fa 0373 092e  | s .|		.DBG4T	0x0373,0x092e,0x1001,0x4000
07fe 03f3 0957  |   W|		.DBG4T	0x03f3,0x0957,0x1001,0x0000
0802 0433 0000  | 3  |		.DBG4T	0x0433,0x0000,0x1005,0x0000
0806 045b 0967  | [ g|		.DBG4T	0x045b,0x0967,0x1001,0x0000
080a 04bb 0974  |   t|		.DBG4T	0x04bb,0x0974,0x1001,0x0000
080e 0513 0982  |    |		.DBG4T	0x0513,0x0982,0x1001,0x0000
0812 0533 0988  | 3  |		.DBG4T	0x0533,0x0988,0x1001,0x0000
0816 057b 0995  | {  |		.DBG4T	0x057b,0x0995,0x1002,0x0000
081a 05b3 099c  |    |		.DBG4T	0x05b3,0x099c,0x1001,0x4000
081e 05d3 09a9  |    |		.DBG4T	0x05d3,0x09a9,0x1801,0x0002
0822 0603 09b0  |    |		.DBG4T	0x0603,0x09b0,0x1801,0x0002
0826 0653 09bb  | S  |		.DBG4T	0x0653,0x09bb,0x1802,0x0002
082a 066b 09c0  | k  |		.DBG4T	0x066b,0x09c0,0x1801,0x0002
082e 0683 09c7  |    |		.DBG4T	0x0683,0x09c7,0x1801,0x0002
0832 069b 09ce  |    |		.DBG4T	0x069b,0x09ce,0x1801,0x0002
0836 06b3 09d5  |    |		.DBG4T	0x06b3,0x09d5,0x1001,0x4000
083a 06db 09e3  |    |		.DBG4T	0x06db,0x09e3,0x1001,0x4000
083e 0743 0000  | C  |		.DBG4T	0x0743,0x0000,0x1005,0x0000
0842 0753 0000  | S  |		.DBG4T	0x0753,0x0000,0x1005,0x0000
0846 ; --------------------------------------------------------------------------------------
0846 ; Debug chain
0846 ; --------------------------------------------------------------------------------------
0846 0022 0000  | "  |		.DBGLEN	0x0022,0x0000
0848 000b 0014  |    |		.DBGLNO	0x000b,0x0014,0x001d,0x0026,0x002f,0x0038,0x0041,0x0046,0x0048,0x004a,0x004c,0x004e,0x0050,0x0052,0x0054,0x0056,0x0058,0x005a,0x005c,0x005e,0x0060,0x0062,0x0064,0x0066,0x0068,0x006a,0x006c,0x006e,0x0070,0x007b,0x0082,0x0086,0x008b,0x008d
086a 0001 0002  |    |		.XXX[0x22]
086c 0003 0004  |    |
086e 0005 0006  |    |
0870 0007 000a  |    |
0872 000b 000c  |    |
0874 000d 000e  |    |
0876 000f 0010  |    |
0878 0011 0012  |    |
087a 0013 0014  |    |
087c 0015 0016  |    |
087e 0017 0018  |    |
0880 0019 001a  |    |
0882 001b 001c  |    |
0884 001d 001f  |    |
0886 0020 0021  |   !|
0888 0022 0023  | " #|
088a 0025 0026  | % &|
088c ; --------------------------------------------------------------------------------------
088c ; Debug chain
088c ; --------------------------------------------------------------------------------------
088c 001d 0000  |    |		.DBGLEN	0x001d,0x0000
088e 0098 00a0  |    |		.DBGLNO	0x0098,0x00a0,0x00a8,0x00b0,0x00b2,0x00b4,0x00b6,0x00b8,0x00ba,0x00bc,0x00be,0x00c0,0x00c2,0x00c4,0x00c6,0x00c8,0x00ca,0x00cc,0x00ce,0x00d0,0x00d2,0x00d4,0x00d6,0x00d8,0x00da,0x00dc,0x00de,0x00e0,0x00e2
08ab ; --------------------------------------------------------------------------------------
08ab ; Debug chain
08ab ; --------------------------------------------------------------------------------------
08ab 0000 0001  |    |		.DBGLEN	0x0000,0x0001
08ad 0133       | 3  |		.DBGLNO	0x0133
08ae ; --------------------------------------------------------------------------------------
08ae ; Debug chain
08ae ; --------------------------------------------------------------------------------------
08ae 0002 0006  |    |		.DBGLEN	0x0002,0x0006
08b0 014b 014c  | K L|		.DBGLNO	0x014b,0x014c,0x0150,0x0152,0x0154,0x016a,0x016c,0x016e
08b8 ; --------------------------------------------------------------------------------------
08b8 ; Debug chain
08b8 ; --------------------------------------------------------------------------------------
08b8 0001 0006  |    |		.DBGLEN	0x0001,0x0006
08ba 017b 017c  | { ||		.DBGLNO	0x017b,0x017c,0x017e,0x0180,0x0196,0x0198,0x019a
08c1 ; --------------------------------------------------------------------------------------
08c1 ; Debug chain
08c1 ; --------------------------------------------------------------------------------------
08c1 0002 0007  |    |		.DBGLEN	0x0002,0x0007
08c3 01ab 01ac  |    |		.DBGLNO	0x01ab,0x01ac,0x01b0,0x01b2,0x01b4,0x01ca,0x01cc,0x01ce,0x01d1
08cc ; --------------------------------------------------------------------------------------
08cc ; Debug chain
08cc ; --------------------------------------------------------------------------------------
08cc 0000 0003  |    |		.DBGLEN	0x0000,0x0003
08ce 01e3 01e5  |    |		.DBGLNO	0x01e3,0x01e5,0x01ed
08d1 ; --------------------------------------------------------------------------------------
08d1 ; Debug chain
08d1 ; --------------------------------------------------------------------------------------
08d1 0001 0003  |    |		.DBGLEN	0x0001,0x0003
08d3 01fb 01fd  |    |		.DBGLNO	0x01fb,0x01fd,0x01ff,0x0207
08d7 ; --------------------------------------------------------------------------------------
08d7 ; Debug chain
08d7 ; --------------------------------------------------------------------------------------
08d7 0002 0003  |    |		.DBGLEN	0x0002,0x0003
08d9 0213 0214  |    |		.DBGLNO	0x0213,0x0214,0x0216,0x021a,0x0223
08de ; --------------------------------------------------------------------------------------
08de ; Debug chain
08de ; --------------------------------------------------------------------------------------
08de 0003 0002  |    |		.DBGLEN	0x0003,0x0002
08e0 022b 022d  | + -|		.DBGLNO	0x022b,0x022d,0x022f,0x0240,0x0243
08e5 ; --------------------------------------------------------------------------------------
08e5 ; Debug chain
08e5 ; --------------------------------------------------------------------------------------
08e5 0000 0001  |    |		.DBGLEN	0x0000,0x0001
08e7 025b       | [  |		.DBGLNO	0x025b
08e8 ; --------------------------------------------------------------------------------------
08e8 ; Debug chain
08e8 ; --------------------------------------------------------------------------------------
08e8 0002 0006  |    |		.DBGLEN	0x0002,0x0006
08ea 026b 026c  | k l|		.DBGLNO	0x026b,0x026c,0x0270,0x0272,0x0274,0x0286,0x0288,0x028c
08f2 ; --------------------------------------------------------------------------------------
08f2 ; Debug chain
08f2 ; --------------------------------------------------------------------------------------
08f2 0000 0003  |    |		.DBGLEN	0x0000,0x0003
08f4 0293 0295  |    |		.DBGLNO	0x0293,0x0295,0x0297
08f7 ; --------------------------------------------------------------------------------------
08f7 ; Debug chain
08f7 ; --------------------------------------------------------------------------------------
08f7 0002 0004  |    |		.DBGLEN	0x0002,0x0004
08f9 02b3 02b4  |    |		.DBGLNO	0x02b3,0x02b4,0x02b8,0x02ba,0x02bc,0x02ce
08ff ; --------------------------------------------------------------------------------------
08ff ; Debug chain
08ff ; --------------------------------------------------------------------------------------
08ff 0000 0003  |    |		.DBGLEN	0x0000,0x0003
0901 02d3 02d5  |    |		.DBGLNO	0x02d3,0x02d5,0x02d7
0904 ; --------------------------------------------------------------------------------------
0904 ; Debug chain
0904 ; --------------------------------------------------------------------------------------
0904 0003 0006  |    |		.DBGLEN	0x0003,0x0006
0906 02e3 02e5  |    |		.DBGLNO	0x02e3,0x02e5,0x02e7,0x02e9,0x02eb,0x02ed,0x02f2,0x02f7,0x02fc
090f 0001 0002  |    |		.XXX[0x6]
0911 0003 0006  |    |
0913 0004 0005  |    |
0915 ; --------------------------------------------------------------------------------------
0915 ; Debug chain
0915 ; --------------------------------------------------------------------------------------
0915 0000 0003  |    |		.DBGLEN	0x0000,0x0003
0917 030b 030d  |    |		.DBGLNO	0x030b,0x030d,0x030f
091a ; --------------------------------------------------------------------------------------
091a ; Debug chain
091a ; --------------------------------------------------------------------------------------
091a 0000 0004  |    |		.DBGLEN	0x0000,0x0004
091c 031b 031d  |    |		.DBGLNO	0x031b,0x031d,0x031f,0x0325
0920 ; --------------------------------------------------------------------------------------
0920 ; Debug chain
0920 ; --------------------------------------------------------------------------------------
0920 0000 0007  |    |		.DBGLEN	0x0000,0x0007
0922 0333 0335  | 3 5|		.DBGLNO	0x0333,0x0335,0x0337,0x033b,0x0345,0x034a,0x034f
0929 ; --------------------------------------------------------------------------------------
0929 ; Debug chain
0929 ; --------------------------------------------------------------------------------------
0929 0000 0003  |    |		.DBGLEN	0x0000,0x0003
092b 035b 0363  | [ c|		.DBGLNO	0x035b,0x0363,0x0365
092e ; --------------------------------------------------------------------------------------
092e ; Debug chain
092e ; --------------------------------------------------------------------------------------
092e 0001 0013  |    |		.DBGLEN	0x0001,0x0013
0930 0373 0375  | s u|		.DBGLNO	0x0373,0x0375,0x037d,0x037f,0x0387,0x038a,0x0399,0x039d,0x03a6,0x03ad,0x03b3,0x03b9,0x03be,0x03c2,0x03c8,0x03ce,0x03d3,0x03d7,0x03db,0x03e3
0944 0001 0002  |    |		.XXX[0x13]
0946 0003 0012  |    |
0948 0013 0005  |    |
094a 0006 0004  |    |
094c 0007 0008  |    |
094e 0009 000a  |    |
0950 000b 000c  |    |
0952 000d 000e  |    |
0954 000f 0010  |    |
0956 0011       |    |
0957 ; --------------------------------------------------------------------------------------
0957 ; Debug chain
0957 ; --------------------------------------------------------------------------------------
0957 0003 000b  |    |		.DBGLEN	0x0003,0x000b
0959 03f3 03f5  |    |		.DBGLNO	0x03f3,0x03f5,0x03f7,0x03f9,0x03fe,0x0404,0x0408,0x040c,0x0410,0x0413,0x0417,0x0419,0x041f,0x0427
0967 ; --------------------------------------------------------------------------------------
0967 ; Debug chain
0967 ; --------------------------------------------------------------------------------------
0967 0001 000a  |    |		.DBGLEN	0x0001,0x000a
0969 045b 045c  | [ \|		.DBGLNO	0x045b,0x045c,0x045e,0x0460,0x0472,0x0478,0x047b,0x0492,0x0495,0x04ac,0x04ae
0974 ; --------------------------------------------------------------------------------------
0974 ; Debug chain
0974 ; --------------------------------------------------------------------------------------
0974 0001 000b  |    |		.DBGLEN	0x0001,0x000b
0976 04bb 04bc  |    |		.DBGLNO	0x04bb,0x04bc,0x04be,0x04c0,0x04c5,0x04cb,0x04ce,0x04e5,0x04e8,0x04ff,0x0501,0x0505
0982 ; --------------------------------------------------------------------------------------
0982 ; Debug chain
0982 ; --------------------------------------------------------------------------------------
0982 0000 0004  |    |		.DBGLEN	0x0000,0x0004
0984 0513 0515  |    |		.DBGLNO	0x0513,0x0515,0x051d,0x0525
0988 ; --------------------------------------------------------------------------------------
0988 ; Debug chain
0988 ; --------------------------------------------------------------------------------------
0988 0001 000a  |    |		.DBGLEN	0x0001,0x000a
098a 0533 0534  | 3 4|		.DBGLNO	0x0533,0x0534,0x0536,0x0538,0x0539,0x053f,0x0542,0x0555,0x0558,0x056b,0x056f
0995 ; --------------------------------------------------------------------------------------
0995 ; Debug chain
0995 ; --------------------------------------------------------------------------------------
0995 0000 0005  |    |		.DBGLEN	0x0000,0x0005
0997 057b 057d  | { }|		.DBGLNO	0x057b,0x057d,0x058b,0x058f,0x059d
099c ; --------------------------------------------------------------------------------------
099c ; Debug chain
099c ; --------------------------------------------------------------------------------------
099c 0001 0005  |    |		.DBGLEN	0x0001,0x0005
099e 05b3 05b5  |    |		.DBGLNO	0x05b3,0x05b5,0x05b7,0x05bb,0x05c1,0x05c3
09a4 0002 0003  |    |		.XXX[0x5]
09a6 0004 0005  |    |
09a8 0006       |    |
09a9 ; --------------------------------------------------------------------------------------
09a9 ; Debug chain
09a9 ; --------------------------------------------------------------------------------------
09a9 0000 0005  |    |		.DBGLEN	0x0000,0x0005
09ab 05d3 05d5  |    |		.DBGLNO	0x05d3,0x05d5,0x05e3,0x05eb,0x05f3
09b0 ; --------------------------------------------------------------------------------------
09b0 ; Debug chain
09b0 ; --------------------------------------------------------------------------------------
09b0 0001 0008  |    |		.DBGLEN	0x0001,0x0008
09b2 0603 0605  |    |		.DBGLNO	0x0603,0x0605,0x0608,0x061a,0x061d,0x0623,0x0632,0x0636,0x0648
09bb ; --------------------------------------------------------------------------------------
09bb ; Debug chain
09bb ; --------------------------------------------------------------------------------------
09bb 0001 0002  |    |		.DBGLEN	0x0001,0x0002
09bd 0653 0657  | S W|		.DBGLNO	0x0653,0x0657,0x0663
09c0 ; --------------------------------------------------------------------------------------
09c0 ; Debug chain
09c0 ; --------------------------------------------------------------------------------------
09c0 0000 0005  |    |		.DBGLEN	0x0000,0x0005
09c2 066b 066f  | k o|		.DBGLNO	0x066b,0x066f,0x0673,0x0677,0x067b
09c7 ; --------------------------------------------------------------------------------------
09c7 ; Debug chain
09c7 ; --------------------------------------------------------------------------------------
09c7 0000 0005  |    |		.DBGLEN	0x0000,0x0005
09c9 0683 0687  |    |		.DBGLNO	0x0683,0x0687,0x068b,0x068f,0x0693
09ce ; --------------------------------------------------------------------------------------
09ce ; Debug chain
09ce ; --------------------------------------------------------------------------------------
09ce 0000 0005  |    |		.DBGLEN	0x0000,0x0005
09d0 069b 069f  |    |		.DBGLNO	0x069b,0x069f,0x06a3,0x06a7,0x06ab
09d5 ; --------------------------------------------------------------------------------------
09d5 ; Debug chain
09d5 ; --------------------------------------------------------------------------------------
09d5 0000 0006  |    |		.DBGLEN	0x0000,0x0006
09d7 06b3 06b7  |    |		.DBGLNO	0x06b3,0x06b7,0x06bb,0x06c0,0x06c4,0x06c9
09dd 0001 0003  |    |		.XXX[0x6]
09df 0004 0005  |    |
09e1 0006 0002  |    |
09e3 ; --------------------------------------------------------------------------------------
09e3 ; Debug chain
09e3 ; --------------------------------------------------------------------------------------
09e3 0001 0014  |    |		.DBGLEN	0x0001,0x0014
09e5 06db 06dd  |    |		.DBGLNO	0x06db,0x06dd,0x06e1,0x06e5,0x06e7,0x06ec,0x06f0,0x06f2,0x06f7,0x0702,0x070c,0x070e,0x0713,0x071d,0x071f,0x0724,0x072e,0x0730,0x0735,0x0737,0x0739
09fa 0001 0003  |    |		.XXX[0x14]
09fc 0004 0005  |    |
09fe 0006 0007  |    |
0a00 0008 0002  |    |
0a02 0009 000a  |    |
0a04 000b 000c  |    |
0a06 000d 000e  |    |
0a08 000f 0010  |    |
0a0a 0011 0012  |    |
0a0c 0013 0014  |    |
0a0e 0000 0000  |    |		.BLANK	0000[0x1f2]