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

⟦bf9557682⟧

    Length: 8192 (0x2000)
    Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_1758af

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 0bb8       |    |		.CONST	0x0bb8								; 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 0007       |    |		.CONST	0x0007								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00f0       |    |		.CONST	0x00f0								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 003d       | =  |		.CONST	0x003d								; Number of locals
000b			INIT_0008:
000b 4818       |H   |		Short_Literal	0x18
000c 03cd       |    |		Declare_Type	Access,Incomplete,Visible,Accesses_Protected
000d 029a 00fb  |    |		Declare_Subprogram	INIT_00f8,For_Outer_Call,Visible,Unelaborated
000f 029a 0103  |    |		Declare_Subprogram	INIT_0100,For_Outer_Call,Visible,Unelaborated
0011 029a 011b  |    |		Declare_Subprogram	INIT_0118,For_Outer_Call,Visible,Unelaborated
0013 029a 0133  |   3|		Declare_Subprogram	INIT_0130,For_Outer_Call,Visible,Unelaborated
0015 029a 01ab  |    |		Declare_Subprogram	INIT_01a8,For_Outer_Call,Visible,Unelaborated
0017 029a 01cb  |    |		Declare_Subprogram	INIT_01c8,For_Outer_Call,Visible,Unelaborated
0019 029a 01eb  |    |		Declare_Subprogram	INIT_01e8,For_Outer_Call,Visible,Unelaborated
001b 029a 020b  |    |		Declare_Subprogram	INIT_0208,For_Outer_Call,Visible,Unelaborated
001d 029a 022b  |   +|		Declare_Subprogram	INIT_0228,For_Outer_Call,Visible,Unelaborated
001f 029a 024b  |   K|		Declare_Subprogram	INIT_0248,For_Outer_Call,Visible,Unelaborated
0021 029a 026b  |   k|		Declare_Subprogram	INIT_0268,For_Outer_Call,Visible,Unelaborated
0023 029a 028b  |    |		Declare_Subprogram	INIT_0288,For_Outer_Call,Visible,Unelaborated
0025 029a 02ab  |    |		Declare_Subprogram	INIT_02a8,For_Outer_Call,Visible,Unelaborated
0027 029a 02cb  |    |		Declare_Subprogram	INIT_02c8,For_Outer_Call,Visible,Unelaborated
0029 029a 02e3  |    |		Declare_Subprogram	INIT_02e0,For_Outer_Call,Visible,Unelaborated
002b 029a 02fb  |    |		Declare_Subprogram	INIT_02f8,For_Outer_Call,Visible,Unelaborated
002d 029a 0313  |    |		Declare_Subprogram	INIT_0310,For_Outer_Call,Visible,Unelaborated
002f 4800       |H   |		Short_Literal	0x0
0030 480b       |H   |		Short_Literal	0xb
0031 029f 031b  |    |		Declare_Subprogram	INIT_0318,For_Call
0033 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0034 00d8       |    |		Load_Top	At_Offset_0
0035 00d9       |    |		Load_Top	At_Offset_1
0036 4803       |H   |		Short_Literal	0x3
0037 e002       |    |		Load	0x0,0x2
0038 e20d       |    |		Load	0x1,0xd
0039 00d8       |    |		Load_Top	At_Offset_0
003a 4802       |H   |		Short_Literal	0x2
003b 00e2       |    |		Load_Encached	Integer_Cache
003c e20d       |    |		Load	0x1,0xd
003d 4803       |H   |		Short_Literal	0x3
003e 4820       |H   |		Short_Literal	0x20
003f e003       |    |		Load	0x0,0x3
0040 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0041 1c07       |    |		Execute_Immediate	Run_Utility,0x7
0042 0129       | )  |		Execute	Any,Make_Visible
0043 4820       |H   |		Short_Literal	0x20
0044 e003       |    |		Load	0x0,0x3
0045 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0046 1c07       |    |		Execute_Immediate	Run_Utility,0x7
0047 0129       | )  |		Execute	Any,Make_Visible
0048 e002       |    |		Load	0x0,0x2
0049 4802       |H   |		Short_Literal	0x2
004a 4820       |H   |		Short_Literal	0x20
004b e003       |    |		Load	0x0,0x3
004c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
004d 1c07       |    |		Execute_Immediate	Run_Utility,0x7
004e 0129       | )  |		Execute	Any,Make_Visible
004f 4820       |H   |		Short_Literal	0x20
0050 e003       |    |		Load	0x0,0x3
0051 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0052 1c07       |    |		Execute_Immediate	Run_Utility,0x7
0053 0129       | )  |		Execute	Any,Make_Visible
0054 4802       |H   |		Short_Literal	0x2
0055 4820       |H   |		Short_Literal	0x20
0056 e003       |    |		Load	0x0,0x3
0057 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0058 1c07       |    |		Execute_Immediate	Run_Utility,0x7
0059 0129       | )  |		Execute	Any,Make_Visible
005a e004       |    |		Load	0x0,0x4
005b 4803       |H   |		Short_Literal	0x3
005c 4820       |H   |		Short_Literal	0x20
005d e003       |    |		Load	0x0,0x3
005e 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
005f 1c07       |    |		Execute_Immediate	Run_Utility,0x7
0060 0129       | )  |		Execute	Any,Make_Visible
0061 4820       |H   |		Short_Literal	0x20
0062 e003       |    |		Load	0x0,0x3
0063 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0064 1c07       |    |		Execute_Immediate	Run_Utility,0x7
0065 0129       | )  |		Execute	Any,Make_Visible
0066 4820       |H   |		Short_Literal	0x20
0067 e003       |    |		Load	0x0,0x3
0068 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0069 1c07       |    |		Execute_Immediate	Run_Utility,0x7
006a 0129       | )  |		Execute	Any,Make_Visible
006b 4801       |H   |		Short_Literal	0x1
006c 00e2       |    |		Load_Encached	Integer_Cache
006d 029f 08b3  |    |		Declare_Subprogram	INIT_08b0,For_Call
006f 4810       |H   |		Short_Literal	0x10
0070 4801       |H   |		Short_Literal	0x1
0071 4807       |H   |		Short_Literal	0x7
0072 4800       |H   |		Short_Literal	0x0
0073 4801       |H   |		Short_Literal	0x1
0074 031e       |    |		Declare_Type	Variant_Record,Defined,Visible
0075 00d8       |    |		Load_Top	At_Offset_0
0076 e20d       |    |		Load	0x1,0xd
0077 029f 0983  |    |		Declare_Subprogram	INIT_0980,For_Call
0079 4802       |H   |		Short_Literal	0x2
007a 032e       | .  |		Declare_Type	Record,Defined,Visible
007b 00d8       |    |		Load_Top	At_Offset_0
007c 02a0       |    |		Declare_Subprogram	Null_Subprogram
007d e20d       |    |		Load	0x1,0xd
007e 03c7       |    |		Complete_Type	Access,By_Defining
007f 00bf       |    |		Action	Accept_Activation
0080 a005       |    |		Store_Unchecked	0x0,0x5
0081 00c6       |    |		Action	Check_Subprogram_Elaborated
0082 00d8       |    |		Load_Top	At_Offset_0
0083 e20d       |    |		Load	0x1,0xd
0084 e006       |    |		Load	0x0,0x6
0085 e007       |    |		Load	0x0,0x7
0086 4800       |H   |		Short_Literal	0x0
0087 0007       |    |		Action	Break_Optional
0088 029d 0343  |   C|		Declare_Subprogram	INIT_0340,For_Outer_Call
008a 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
008b 00c7       |    |		Action	Elaborate_Subprogram
008c 029d 0363  |   c|		Declare_Subprogram	INIT_0360,For_Outer_Call
008e 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
008f 00c7       |    |		Action	Elaborate_Subprogram
0090 029d 037b  |   {|		Declare_Subprogram	INIT_0378,For_Outer_Call
0092 029d 0383  |    |		Declare_Subprogram	INIT_0380,For_Outer_Call
0094 029d 0393  |    |		Declare_Subprogram	INIT_0390,For_Outer_Call
0096 029d 039b  |    |		Declare_Subprogram	INIT_0398,For_Outer_Call
0098 029d 03a3  |    |		Declare_Subprogram	INIT_03a0,For_Outer_Call
009a 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
009b 00c7       |    |		Action	Elaborate_Subprogram
009c 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
009d 00c7       |    |		Action	Elaborate_Subprogram
009e 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
009f 00c7       |    |		Action	Elaborate_Subprogram
00a0 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
00a1 00c7       |    |		Action	Elaborate_Subprogram
00a2 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
00a3 00c7       |    |		Action	Elaborate_Subprogram
00a4 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
00a5 00c7       |    |		Action	Elaborate_Subprogram
00a6 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
00a7 00c7       |    |		Action	Elaborate_Subprogram
00a8 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
00a9 00c7       |    |		Action	Elaborate_Subprogram
00aa 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
00ab 00c7       |    |		Action	Elaborate_Subprogram
00ac 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b
00ad 00c7       |    |		Action	Elaborate_Subprogram
00ae 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
00af 00c7       |    |		Action	Elaborate_Subprogram
00b0 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
00b1 00c7       |    |		Action	Elaborate_Subprogram
00b2 029d 03b3  |    |		Declare_Subprogram	INIT_03b0,For_Outer_Call
00b4 029d 045b  |   [|		Declare_Subprogram	INIT_0458,For_Outer_Call
00b6 029d 046b  |   k|		Declare_Subprogram	INIT_0468,For_Outer_Call
00b8 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
00b9 00c7       |    |		Action	Elaborate_Subprogram
00ba 029b 05bb  |    |		Declare_Subprogram	INIT_05b8,For_Outer_Call,Unelaborated
00bc 029b 05f3  |    |		Declare_Subprogram	INIT_05f0,For_Outer_Call,Unelaborated
00be 029b 0613  |    |		Declare_Subprogram	INIT_0610,For_Outer_Call,Unelaborated
00c0 029b 067b  |   {|		Declare_Subprogram	INIT_0678,For_Outer_Call,Unelaborated
00c2 029b 06bb  |    |		Declare_Subprogram	INIT_06b8,For_Outer_Call,Unelaborated
00c4 029b 06fb  |    |		Declare_Subprogram	INIT_06f8,For_Outer_Call,Unelaborated
00c6 029b 073b  |   ;|		Declare_Subprogram	INIT_0738,For_Outer_Call,Unelaborated
00c8 029b 077b  |   {|		Declare_Subprogram	INIT_0778,For_Outer_Call,Unelaborated
00ca 029b 07bb  |    |		Declare_Subprogram	INIT_07b8,For_Outer_Call,Unelaborated
00cc 029b 081b  |    |		Declare_Subprogram	INIT_0818,For_Outer_Call,Unelaborated
00ce 029b 082b  |   +|		Declare_Subprogram	INIT_0828,For_Outer_Call,Unelaborated
00d0 029b 083b  |   ;|		Declare_Subprogram	INIT_0838,For_Outer_Call,Unelaborated
00d2 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
00d3 00c7       |    |		Action	Elaborate_Subprogram
00d4 1d31       | 1  |		Execute_Immediate	Reference_Lex_1,0x31
00d5 00c7       |    |		Action	Elaborate_Subprogram
00d6 1d32       | 2  |		Execute_Immediate	Reference_Lex_1,0x32
00d7 00c7       |    |		Action	Elaborate_Subprogram
00d8 1d33       | 3  |		Execute_Immediate	Reference_Lex_1,0x33
00d9 00c7       |    |		Action	Elaborate_Subprogram
00da 1d34       | 4  |		Execute_Immediate	Reference_Lex_1,0x34
00db 00c7       |    |		Action	Elaborate_Subprogram
00dc 1d35       | 5  |		Execute_Immediate	Reference_Lex_1,0x35
00dd 00c7       |    |		Action	Elaborate_Subprogram
00de 1d36       | 6  |		Execute_Immediate	Reference_Lex_1,0x36
00df 00c7       |    |		Action	Elaborate_Subprogram
00e0 1d37       | 7  |		Execute_Immediate	Reference_Lex_1,0x37
00e1 00c7       |    |		Action	Elaborate_Subprogram
00e2 1d38       | 8  |		Execute_Immediate	Reference_Lex_1,0x38
00e3 00c7       |    |		Action	Elaborate_Subprogram
00e4 1d39       | 9  |		Execute_Immediate	Reference_Lex_1,0x39
00e5 00c7       |    |		Action	Elaborate_Subprogram
00e6 1d3a       | :  |		Execute_Immediate	Reference_Lex_1,0x3a
00e7 00c7       |    |		Action	Elaborate_Subprogram
00e8 1d3b       | ;  |		Execute_Immediate	Reference_Lex_1,0x3b
00e9 00c7       |    |		Action	Elaborate_Subprogram
00ea 1d3c       | <  |		Execute_Immediate	Reference_Lex_1,0x3c
00eb 00c7       |    |		Action	Elaborate_Subprogram
00ec 029d 084b  |   K|		Declare_Subprogram	INIT_0848,For_Outer_Call
00ee 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
00ef 00c7       |    |		Action	Elaborate_Subprogram
00f0			BODY_0008:
00f0 00bc       |    |		Action	Signal_Activated
00f1 00bb       |    |		Action	Signal_Completion
00f2 0000 0000  |    |		.BLANK	0000[0x6]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 00fb       |    |		.CONST	0x00fb								; Address of begin
00f9 0004       |    |		.CONST	0x0004								; Address of exception handler
00fa 0001       |    |		.CONST	0x0001								; Number of locals
00fb			BODY_00f8:
00fb			INIT_00f8:
00fb e20d       |    |		Load	0x1,0xd
00fc 00ca       |    |		Action	Exit_Nullary_Function
00fd 0000 0000  |    |		.XXX[0x3]
00ff 0000       |    |
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0105       |    |		.CONST	0x0105								; Address of begin
0101 0004       |    |		.CONST	0x0004								; Address of exception handler
0102 0003       |    |		.CONST	0x0003								; Number of locals
0103			INIT_0100:
0103 e20d       |    |		Load	0x1,0xd
0104 03bd       |    |		Declare_Variable	Access,Duplicate
0105			BODY_0100:
0105 e5ff       |    |		Load	0x2,-0x1
0106 003a       | :  |		Store_Top	Access,At_Offset_2
0107 00cf       |    |		Action	Mark_Auxiliary
0108 780a       |x   |		Jump	0x113
0109 00da       |    |		Load_Top	At_Offset_2
010a 0227       | '  |		Execute	Access,All_Reference
010b 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
010c 003a       | :  |		Store_Top	Access,At_Offset_2
010d 00da       |    |		Load_Top	At_Offset_2
010e 823d       | =  |		Call	0x1,0x3d
010f 003b       | ;  |		Store_Top	Access,At_Offset_3
0110 00d9       |    |		Load_Top	At_Offset_1
0111 003b       | ;  |		Store_Top	Access,At_Offset_3
0112 00c9       |    |		Action	Pop_Auxiliary_Loop
0113 00da       |    |		Load_Top	At_Offset_2
0114 822b       | +  |		Call	0x1,0x2b
0115 6ff3       |o   |		Jump_Zero	0x109
0116 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0117 0000       |    |		.XXX[0x1]
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 011d       |    |		.CONST	0x011d								; Address of begin
0119 0004       |    |		.CONST	0x0004								; Address of exception handler
011a 0002       |    |		.CONST	0x0002								; Number of locals
011b			INIT_0118:
011b e20d       |    |		Load	0x1,0xd
011c 0007       |    |		Action	Break_Optional
011d			BODY_0118:
011d e5fe       |    |		Load	0x2,-0x2
011e 7003       |p   |		Jump_Nonzero	0x122
011f 00db       |    |		Load_Top	At_Offset_3
0120 a5fe       |    |		Store_Unchecked	0x2,-0x2
0121 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0122 e5fe       |    |		Load	0x2,-0x2
0123 8227       | '  |		Call	0x1,0x27
0124 0039       | 9  |		Store_Top	Access,At_Offset_1
0125 00db       |    |		Load_Top	At_Offset_3
0126 00d9       |    |		Load_Top	At_Offset_1
0127 0227       | '  |		Execute	Access,All_Reference
0128 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0129 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
012a 0000 0000  |    |		.BLANK	0000[0x6]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0139       | 9  |		.CONST	0x0139								; Address of begin
0131 0004       |    |		.CONST	0x0004								; Address of exception handler
0132 0003       |    |		.CONST	0x0003								; Number of locals
0133			INIT_0130:
0133 e220       |    |		Load	0x1,0x20
0134 02ff       |    |		Declare_Variable	Variant_Record
0135 00d8       |    |		Load_Top	At_Offset_0
0136 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0137 e20d       |    |		Load	0x1,0xd
0138 0007       |    |		Action	Break_Optional
0139			BODY_0130:
0139 e5ff       |    |		Load	0x2,-0x1
013a 8229       | )  |		Call	0x1,0x29
013b 0039       | 9  |		Store_Top	Access,At_Offset_1
013c 00cf       |    |		Action	Mark_Auxiliary
013d 7863       |xc  |		Jump	0x1a1
013e 00d9       |    |		Load_Top	At_Offset_1
013f 822d       | -  |		Call	0x1,0x2d
0140 00db       |    |		Load_Top	At_Offset_3
0141 016d       | m  |		Execute	Variant_Record,Structure_Write
0142 00da       |    |		Load_Top	At_Offset_2
0143 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0144 460b       |F   |		Jump_Case	0xc
0145 780e       |x   |		Jump	0x154								; case 0x0
0146 7815       |x   |		Jump	0x15c								; case 0x1
0147 781c       |x   |		Jump	0x164								; case 0x2
0148 7823       |x#  |		Jump	0x16c								; case 0x3
0149 7829       |x)  |		Jump	0x173								; case 0x4
014a 782f       |x/  |		Jump	0x17a								; case 0x5
014b 7835       |x5  |		Jump	0x181								; case 0x6
014c 783b       |x;  |		Jump	0x188								; case 0x7
014d 7841       |xA  |		Jump	0x18f								; case 0x8
014e 7847       |xG  |		Jump	0x196								; case 0x9
014f 784b       |xK  |		Jump	0x19b								; case 0xa
0150 7800       |x   |		Jump	0x151								; case 0xb
0151 00da       |    |		Load_Top	At_Offset_2
0152 823c       | <  |		Call	0x1,0x3c
0153 7849       |xI  |		Jump	0x19d
0154 e5fb       |    |		Load	0x2,-0x5
0155 e5fc       |    |		Load	0x2,-0x4
0156 e5fd       |    |		Load	0x2,-0x3
0157 e5fe       |    |		Load	0x2,-0x2
0158 e402       |    |		Load	0x2,0x2
0159 8231       | 1  |		Call	0x1,0x31
015a 00d2       |    |		Pop_Control	Pop_Count_2
015b 7841       |xA  |		Jump	0x19d
015c e5fb       |    |		Load	0x2,-0x5
015d e5fc       |    |		Load	0x2,-0x4
015e e5fd       |    |		Load	0x2,-0x3
015f e5fe       |    |		Load	0x2,-0x2
0160 e402       |    |		Load	0x2,0x2
0161 8232       | 2  |		Call	0x1,0x32
0162 00d2       |    |		Pop_Control	Pop_Count_2
0163 7839       |x9  |		Jump	0x19d
0164 e5fb       |    |		Load	0x2,-0x5
0165 e5fc       |    |		Load	0x2,-0x4
0166 e5fd       |    |		Load	0x2,-0x3
0167 e5fe       |    |		Load	0x2,-0x2
0168 e402       |    |		Load	0x2,0x2
0169 8233       | 3  |		Call	0x1,0x33
016a 00d2       |    |		Pop_Control	Pop_Count_2
016b 7831       |x1  |		Jump	0x19d
016c e5fc       |    |		Load	0x2,-0x4
016d e5fd       |    |		Load	0x2,-0x3
016e e5fe       |    |		Load	0x2,-0x2
016f e402       |    |		Load	0x2,0x2
0170 8234       | 4  |		Call	0x1,0x34
0171 00d1       |    |		Pop_Control	Pop_Count_1
0172 782a       |x*  |		Jump	0x19d
0173 e5fc       |    |		Load	0x2,-0x4
0174 e5fd       |    |		Load	0x2,-0x3
0175 e5fe       |    |		Load	0x2,-0x2
0176 e402       |    |		Load	0x2,0x2
0177 8235       | 5  |		Call	0x1,0x35
0178 00d1       |    |		Pop_Control	Pop_Count_1
0179 7823       |x#  |		Jump	0x19d
017a e5fb       |    |		Load	0x2,-0x5
017b e5fd       |    |		Load	0x2,-0x3
017c e5fe       |    |		Load	0x2,-0x2
017d e402       |    |		Load	0x2,0x2
017e 8236       | 6  |		Call	0x1,0x36
017f 00d1       |    |		Pop_Control	Pop_Count_1
0180 781c       |x   |		Jump	0x19d
0181 e5fb       |    |		Load	0x2,-0x5
0182 e5fd       |    |		Load	0x2,-0x3
0183 e5fe       |    |		Load	0x2,-0x2
0184 e402       |    |		Load	0x2,0x2
0185 8237       | 7  |		Call	0x1,0x37
0186 00d1       |    |		Pop_Control	Pop_Count_1
0187 7815       |x   |		Jump	0x19d
0188 e5fb       |    |		Load	0x2,-0x5
0189 e5fd       |    |		Load	0x2,-0x3
018a e5fe       |    |		Load	0x2,-0x2
018b e402       |    |		Load	0x2,0x2
018c 8238       | 8  |		Call	0x1,0x38
018d 00d1       |    |		Pop_Control	Pop_Count_1
018e 780e       |x   |		Jump	0x19d
018f e5fb       |    |		Load	0x2,-0x5
0190 e5fd       |    |		Load	0x2,-0x3
0191 e5fe       |    |		Load	0x2,-0x2
0192 e402       |    |		Load	0x2,0x2
0193 8239       | 9  |		Call	0x1,0x39
0194 00d1       |    |		Pop_Control	Pop_Count_1
0195 7807       |x   |		Jump	0x19d
0196 e5fd       |    |		Load	0x2,-0x3
0197 e5fe       |    |		Load	0x2,-0x2
0198 e402       |    |		Load	0x2,0x2
0199 823a       | :  |		Call	0x1,0x3a
019a 7802       |x   |		Jump	0x19d
019b 00da       |    |		Load_Top	At_Offset_2
019c 823b       | ;  |		Call	0x1,0x3b
019d 00d9       |    |		Load_Top	At_Offset_1
019e 822a       | *  |		Call	0x1,0x2a
019f 003a       | :  |		Store_Top	Access,At_Offset_2
01a0 00c9       |    |		Action	Pop_Auxiliary_Loop
01a1 00d9       |    |		Load_Top	At_Offset_1
01a2 822c       | ,  |		Call	0x1,0x2c
01a3 779a       |w   |		Jump_Nonzero	0x13e
01a4 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
01a5 0000 0000  |    |		.XXX[0x3]
01a7 0000       |    |
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01b2       |    |		.CONST	0x01b2								; Address of begin
01a9 0004       |    |		.CONST	0x0004								; Address of exception handler
01aa 0003       |    |		.CONST	0x0003								; Number of locals
01ab			INIT_01a8:
01ab e20d       |    |		Load	0x1,0xd
01ac 0007       |    |		Action	Break_Optional
01ad 4800       |H   |		Short_Literal	0x0
01ae e220       |    |		Load	0x1,0x20
01af 1c08       |    |		Execute_Immediate	Run_Utility,0x8
01b0 00d8       |    |		Load_Top	At_Offset_0
01b1 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01b2			BODY_01a8:
01b2 820e       |    |		Call	0x1,0xe
01b3 003a       | :  |		Store_Top	Access,At_Offset_2
01b4 4800       |H   |		Short_Literal	0x0
01b5 00d9       |    |		Load_Top	At_Offset_1
01b6 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
01b7 e5ff       |    |		Load	0x2,-0x1
01b8 00d9       |    |		Load_Top	At_Offset_1
01b9 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
01ba e5fe       |    |		Load	0x2,-0x2
01bb 00d9       |    |		Load_Top	At_Offset_1
01bc 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
01bd e5fd       |    |		Load	0x2,-0x3
01be 00d9       |    |		Load_Top	At_Offset_1
01bf 2a05       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5
01c0 00d9       |    |		Load_Top	At_Offset_1
01c1 00d9       |    |		Load_Top	At_Offset_1
01c2 8228       | (  |		Call	0x1,0x28
01c3 003a       | :  |		Store_Top	Access,At_Offset_2
01c4 00d9       |    |		Load_Top	At_Offset_1
01c5 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
01c6 0000 0000  |    |		.XXX[0x2]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01d2       |    |		.CONST	0x01d2								; Address of begin
01c9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ca 0003       |    |		.CONST	0x0003								; Number of locals
01cb			INIT_01c8:
01cb e20d       |    |		Load	0x1,0xd
01cc 0007       |    |		Action	Break_Optional
01cd 4801       |H   |		Short_Literal	0x1
01ce e220       |    |		Load	0x1,0x20
01cf 1c08       |    |		Execute_Immediate	Run_Utility,0x8
01d0 00d8       |    |		Load_Top	At_Offset_0
01d1 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01d2			BODY_01c8:
01d2 4801       |H   |		Short_Literal	0x1
01d3 00d9       |    |		Load_Top	At_Offset_1
01d4 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
01d5 e5ff       |    |		Load	0x2,-0x1
01d6 00d9       |    |		Load_Top	At_Offset_1
01d7 2a06       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6
01d8 e5fe       |    |		Load	0x2,-0x2
01d9 00d9       |    |		Load_Top	At_Offset_1
01da 2a07       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7
01db 00d9       |    |		Load_Top	At_Offset_1
01dc 00d9       |    |		Load_Top	At_Offset_1
01dd 8228       | (  |		Call	0x1,0x28
01de 003a       | :  |		Store_Top	Access,At_Offset_2
01df 00d9       |    |		Load_Top	At_Offset_1
01e0 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01e1 0000 0000  |    |		.BLANK	0000[0x7]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01f2       |    |		.CONST	0x01f2								; Address of begin
01e9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ea 0003       |    |		.CONST	0x0003								; Number of locals
01eb			INIT_01e8:
01eb e20d       |    |		Load	0x1,0xd
01ec 0007       |    |		Action	Break_Optional
01ed 4802       |H   |		Short_Literal	0x2
01ee e220       |    |		Load	0x1,0x20
01ef 1c08       |    |		Execute_Immediate	Run_Utility,0x8
01f0 00d8       |    |		Load_Top	At_Offset_0
01f1 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01f2			BODY_01e8:
01f2 4802       |H   |		Short_Literal	0x2
01f3 00d9       |    |		Load_Top	At_Offset_1
01f4 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
01f5 e5ff       |    |		Load	0x2,-0x1
01f6 00d9       |    |		Load_Top	At_Offset_1
01f7 2a08       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8
01f8 e5fe       |    |		Load	0x2,-0x2
01f9 00d9       |    |		Load_Top	At_Offset_1
01fa 2a09       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x9
01fb e5fd       |    |		Load	0x2,-0x3
01fc 00d9       |    |		Load_Top	At_Offset_1
01fd 2a0a       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xa
01fe 00d9       |    |		Load_Top	At_Offset_1
01ff 00d9       |    |		Load_Top	At_Offset_1
0200 8228       | (  |		Call	0x1,0x28
0201 003a       | :  |		Store_Top	Access,At_Offset_2
0202 00d9       |    |		Load_Top	At_Offset_1
0203 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0204 0000 0000  |    |		.BLANK	0000[0x4]
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 0212       |    |		.CONST	0x0212								; Address of begin
0209 0004       |    |		.CONST	0x0004								; Address of exception handler
020a 0003       |    |		.CONST	0x0003								; Number of locals
020b			INIT_0208:
020b e20d       |    |		Load	0x1,0xd
020c 0007       |    |		Action	Break_Optional
020d 4803       |H   |		Short_Literal	0x3
020e e220       |    |		Load	0x1,0x20
020f 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0210 00d8       |    |		Load_Top	At_Offset_0
0211 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0212			BODY_0208:
0212 4803       |H   |		Short_Literal	0x3
0213 00d9       |    |		Load_Top	At_Offset_1
0214 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0215 e5ff       |    |		Load	0x2,-0x1
0216 00d9       |    |		Load_Top	At_Offset_1
0217 2a0b       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xb
0218 e5fe       |    |		Load	0x2,-0x2
0219 00d9       |    |		Load_Top	At_Offset_1
021a 2a0c       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xc
021b 00d9       |    |		Load_Top	At_Offset_1
021c 00d9       |    |		Load_Top	At_Offset_1
021d 8228       | (  |		Call	0x1,0x28
021e 003a       | :  |		Store_Top	Access,At_Offset_2
021f 00d9       |    |		Load_Top	At_Offset_1
0220 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0221 0000 0000  |    |		.BLANK	0000[0x7]
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 0232       | 2  |		.CONST	0x0232								; Address of begin
0229 0004       |    |		.CONST	0x0004								; Address of exception handler
022a 0003       |    |		.CONST	0x0003								; Number of locals
022b			INIT_0228:
022b e20d       |    |		Load	0x1,0xd
022c 0007       |    |		Action	Break_Optional
022d 4804       |H   |		Short_Literal	0x4
022e e220       |    |		Load	0x1,0x20
022f 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0230 00d8       |    |		Load_Top	At_Offset_0
0231 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0232			BODY_0228:
0232 4804       |H   |		Short_Literal	0x4
0233 00d9       |    |		Load_Top	At_Offset_1
0234 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0235 e5ff       |    |		Load	0x2,-0x1
0236 00d9       |    |		Load_Top	At_Offset_1
0237 2a0b       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xb
0238 e5fe       |    |		Load	0x2,-0x2
0239 00d9       |    |		Load_Top	At_Offset_1
023a 2a0c       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xc
023b 00d9       |    |		Load_Top	At_Offset_1
023c 00d9       |    |		Load_Top	At_Offset_1
023d 8228       | (  |		Call	0x1,0x28
023e 003a       | :  |		Store_Top	Access,At_Offset_2
023f 00d9       |    |		Load_Top	At_Offset_1
0240 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0241 0000 0000  |    |		.BLANK	0000[0x7]
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 0252       | R  |		.CONST	0x0252								; Address of begin
0249 0004       |    |		.CONST	0x0004								; Address of exception handler
024a 0003       |    |		.CONST	0x0003								; Number of locals
024b			INIT_0248:
024b e20d       |    |		Load	0x1,0xd
024c 0007       |    |		Action	Break_Optional
024d 4805       |H   |		Short_Literal	0x5
024e e220       |    |		Load	0x1,0x20
024f 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0250 00d8       |    |		Load_Top	At_Offset_0
0251 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0252			BODY_0248:
0252 4805       |H   |		Short_Literal	0x5
0253 00d9       |    |		Load_Top	At_Offset_1
0254 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0255 e5ff       |    |		Load	0x2,-0x1
0256 00d9       |    |		Load_Top	At_Offset_1
0257 2a0b       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xb
0258 e5fe       |    |		Load	0x2,-0x2
0259 00d9       |    |		Load_Top	At_Offset_1
025a 2a0c       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xc
025b 00d9       |    |		Load_Top	At_Offset_1
025c 00d9       |    |		Load_Top	At_Offset_1
025d 8228       | (  |		Call	0x1,0x28
025e 003a       | :  |		Store_Top	Access,At_Offset_2
025f 00d9       |    |		Load_Top	At_Offset_1
0260 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0261 0000 0000  |    |		.BLANK	0000[0x7]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 0272       | r  |		.CONST	0x0272								; Address of begin
0269 0004       |    |		.CONST	0x0004								; Address of exception handler
026a 0003       |    |		.CONST	0x0003								; Number of locals
026b			INIT_0268:
026b e20d       |    |		Load	0x1,0xd
026c 0007       |    |		Action	Break_Optional
026d 4806       |H   |		Short_Literal	0x6
026e e220       |    |		Load	0x1,0x20
026f 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0270 00d8       |    |		Load_Top	At_Offset_0
0271 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0272			BODY_0268:
0272 4806       |H   |		Short_Literal	0x6
0273 00d9       |    |		Load_Top	At_Offset_1
0274 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0275 e5ff       |    |		Load	0x2,-0x1
0276 00d9       |    |		Load_Top	At_Offset_1
0277 2a0b       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xb
0278 e5fe       |    |		Load	0x2,-0x2
0279 00d9       |    |		Load_Top	At_Offset_1
027a 2a0c       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xc
027b 00d9       |    |		Load_Top	At_Offset_1
027c 00d9       |    |		Load_Top	At_Offset_1
027d 8228       | (  |		Call	0x1,0x28
027e 003a       | :  |		Store_Top	Access,At_Offset_2
027f 00d9       |    |		Load_Top	At_Offset_1
0280 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0281 0000 0000  |    |		.BLANK	0000[0x7]
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 0292       |    |		.CONST	0x0292								; Address of begin
0289 0004       |    |		.CONST	0x0004								; Address of exception handler
028a 0003       |    |		.CONST	0x0003								; Number of locals
028b			INIT_0288:
028b e20d       |    |		Load	0x1,0xd
028c 0007       |    |		Action	Break_Optional
028d 4808       |H   |		Short_Literal	0x8
028e e220       |    |		Load	0x1,0x20
028f 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0290 00d8       |    |		Load_Top	At_Offset_0
0291 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0292			BODY_0288:
0292 4808       |H   |		Short_Literal	0x8
0293 00d9       |    |		Load_Top	At_Offset_1
0294 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0295 e5ff       |    |		Load	0x2,-0x1
0296 00d9       |    |		Load_Top	At_Offset_1
0297 2a0f       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xf
0298 e5fe       |    |		Load	0x2,-0x2
0299 00d9       |    |		Load_Top	At_Offset_1
029a 2a10       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x10
029b e5fd       |    |		Load	0x2,-0x3
029c 00d9       |    |		Load_Top	At_Offset_1
029d 2a11       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x11
029e 00d9       |    |		Load_Top	At_Offset_1
029f 00d9       |    |		Load_Top	At_Offset_1
02a0 8228       | (  |		Call	0x1,0x28
02a1 003a       | :  |		Store_Top	Access,At_Offset_2
02a2 00d9       |    |		Load_Top	At_Offset_1
02a3 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
02a4 0000 0000  |    |		.BLANK	0000[0x4]
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02b2       |    |		.CONST	0x02b2								; Address of begin
02a9 0004       |    |		.CONST	0x0004								; Address of exception handler
02aa 0003       |    |		.CONST	0x0003								; Number of locals
02ab			INIT_02a8:
02ab e20d       |    |		Load	0x1,0xd
02ac 0007       |    |		Action	Break_Optional
02ad 4807       |H   |		Short_Literal	0x7
02ae e220       |    |		Load	0x1,0x20
02af 1c08       |    |		Execute_Immediate	Run_Utility,0x8
02b0 00d8       |    |		Load_Top	At_Offset_0
02b1 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02b2			BODY_02a8:
02b2 4807       |H   |		Short_Literal	0x7
02b3 00d9       |    |		Load_Top	At_Offset_1
02b4 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
02b5 e5ff       |    |		Load	0x2,-0x1
02b6 00d9       |    |		Load_Top	At_Offset_1
02b7 2a0d       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xd
02b8 e5fe       |    |		Load	0x2,-0x2
02b9 00d9       |    |		Load_Top	At_Offset_1
02ba 2a0e       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xe
02bb 00d9       |    |		Load_Top	At_Offset_1
02bc 00d9       |    |		Load_Top	At_Offset_1
02bd 8228       | (  |		Call	0x1,0x28
02be 003a       | :  |		Store_Top	Access,At_Offset_2
02bf 00d9       |    |		Load_Top	At_Offset_1
02c0 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
02c1 0000 0000  |    |		.BLANK	0000[0x7]
02c8 ; --------------------------------------------------------------------------------------
02c8 ; SUBPROGRAM
02c8 ; --------------------------------------------------------------------------------------
02c8 02d2       |    |		.CONST	0x02d2								; Address of begin
02c9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ca 0003       |    |		.CONST	0x0003								; Number of locals
02cb			INIT_02c8:
02cb e20d       |    |		Load	0x1,0xd
02cc 0007       |    |		Action	Break_Optional
02cd 4809       |H   |		Short_Literal	0x9
02ce e220       |    |		Load	0x1,0x20
02cf 1c08       |    |		Execute_Immediate	Run_Utility,0x8
02d0 00d8       |    |		Load_Top	At_Offset_0
02d1 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02d2			BODY_02c8:
02d2 4809       |H   |		Short_Literal	0x9
02d3 00d9       |    |		Load_Top	At_Offset_1
02d4 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
02d5 e5ff       |    |		Load	0x2,-0x1
02d6 00d9       |    |		Load_Top	At_Offset_1
02d7 2a12       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x12
02d8 00d9       |    |		Load_Top	At_Offset_1
02d9 00d9       |    |		Load_Top	At_Offset_1
02da 8228       | (  |		Call	0x1,0x28
02db 003a       | :  |		Store_Top	Access,At_Offset_2
02dc 00d9       |    |		Load_Top	At_Offset_1
02dd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02de 0000 0000  |    |		.XXX[0x2]
02e0 ; --------------------------------------------------------------------------------------
02e0 ; SUBPROGRAM
02e0 ; --------------------------------------------------------------------------------------
02e0 02ea       |    |		.CONST	0x02ea								; Address of begin
02e1 0004       |    |		.CONST	0x0004								; Address of exception handler
02e2 0003       |    |		.CONST	0x0003								; Number of locals
02e3			INIT_02e0:
02e3 e20d       |    |		Load	0x1,0xd
02e4 0007       |    |		Action	Break_Optional
02e5 480a       |H   |		Short_Literal	0xa
02e6 e220       |    |		Load	0x1,0x20
02e7 1c08       |    |		Execute_Immediate	Run_Utility,0x8
02e8 00d8       |    |		Load_Top	At_Offset_0
02e9 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02ea			BODY_02e0:
02ea 480a       |H   |		Short_Literal	0xa
02eb 00d9       |    |		Load_Top	At_Offset_1
02ec 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
02ed 00d9       |    |		Load_Top	At_Offset_1
02ee 00d9       |    |		Load_Top	At_Offset_1
02ef 8228       | (  |		Call	0x1,0x28
02f0 003a       | :  |		Store_Top	Access,At_Offset_2
02f1 00d9       |    |		Load_Top	At_Offset_1
02f2 00ca       |    |		Action	Exit_Nullary_Function
02f3 0000 0000  |    |		.BLANK	0000[0x5]
02f8 ; --------------------------------------------------------------------------------------
02f8 ; SUBPROGRAM
02f8 ; --------------------------------------------------------------------------------------
02f8 0302       |    |		.CONST	0x0302								; Address of begin
02f9 0004       |    |		.CONST	0x0004								; Address of exception handler
02fa 0003       |    |		.CONST	0x0003								; Number of locals
02fb			INIT_02f8:
02fb e20d       |    |		Load	0x1,0xd
02fc 0007       |    |		Action	Break_Optional
02fd 480b       |H   |		Short_Literal	0xb
02fe e220       |    |		Load	0x1,0x20
02ff 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0300 00d8       |    |		Load_Top	At_Offset_0
0301 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0302			BODY_02f8:
0302 480b       |H   |		Short_Literal	0xb
0303 00d9       |    |		Load_Top	At_Offset_1
0304 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0305 00d9       |    |		Load_Top	At_Offset_1
0306 00d9       |    |		Load_Top	At_Offset_1
0307 8228       | (  |		Call	0x1,0x28
0308 003a       | :  |		Store_Top	Access,At_Offset_2
0309 00d9       |    |		Load_Top	At_Offset_1
030a 00ca       |    |		Action	Exit_Nullary_Function
030b 0000 0000  |    |		.BLANK	0000[0x5]
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 0313       |    |		.CONST	0x0313								; Address of begin
0311 0004       |    |		.CONST	0x0004								; Address of exception handler
0312 0001       |    |		.CONST	0x0001								; Number of locals
0313			BODY_0310:
0313			INIT_0310:
0313 00da       |    |		Load_Top	At_Offset_2
0314 4800       |H   |		Short_Literal	0x0
0315 8230       | 0  |		Call	0x1,0x30
0316 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0317 0000       |    |		.XXX[0x1]
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 4607       |F   |		Jump_Case	0x8
031c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
031d 7807       |x   |		Jump	0x325								; case 0x1
031e 780a       |x   |		Jump	0x329								; case 0x2
031f 780e       |x   |		Jump	0x32e								; case 0x3
0320 7811       |x   |		Jump	0x332								; case 0x4
0321 7812       |x   |		Jump	0x334								; case 0x5
0322 7813       |x   |		Jump	0x336								; case 0x6
0323 7816       |x   |		Jump	0x33a								; case 0x7
0324 4302       |C   |		.XXX[0x1]
0325 00da       |    |		Load_Top	At_Offset_2
0326 0091 098a  |    |		Action	Push_String_Extended_Indexed,0x98a				; "SI_ALORS_SINON"
0328 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0329 00db       |    |		Load_Top	At_Offset_3
032a 00db       |    |		Load_Top	At_Offset_3
032b 00e0       |    |		Load_Encached	Standard_Cache
032c 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
032d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
032e 00da       |    |		Load_Top	At_Offset_2
032f 00e0       |    |		Load_Encached	Standard_Cache
0330 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0331 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0332 00db       |    |		Load_Top	At_Offset_3
0333 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0334 00db       |    |		Load_Top	At_Offset_3
0335 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0336 e21f       |    |		Load	0x1,0x1f
0337 00dc       |    |		Load_Top	At_Offset_4
0338 0267       | g  |		Execute	Discrete,Predecessor
0339 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
033a e21f       |    |		Load	0x1,0x1f
033b 00dc       |    |		Load_Top	At_Offset_4
033c 0268       | h  |		Execute	Discrete,Successor
033d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
033e 0000 0000  |    |		.XXX[0x2]
0340 ; --------------------------------------------------------------------------------------
0340 ; SUBPROGRAM
0340 ; --------------------------------------------------------------------------------------
0340 0347       | G  |		.CONST	0x0347								; Address of begin
0341 0004       |    |		.CONST	0x0004								; Address of exception handler
0342 0003       |    |		.CONST	0x0003								; Number of locals
0343			INIT_0340:
0343 e20d       |    |		Load	0x1,0xd
0344 0007       |    |		Action	Break_Optional
0345 00d8       |    |		Load_Top	At_Offset_0
0346 0007       |    |		Action	Break_Optional
0347			BODY_0340:
0347 e5ff       |    |		Load	0x2,-0x1
0348 7002       |p   |		Jump_Nonzero	0x34b
0349 e20d       |    |		Load	0x1,0xd
034a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
034b e5ff       |    |		Load	0x2,-0x1
034c 003a       | :  |		Store_Top	Access,At_Offset_2
034d 00cf       |    |		Action	Mark_Auxiliary
034e 7807       |x   |		Jump	0x356
034f 00da       |    |		Load_Top	At_Offset_2
0350 003a       | :  |		Store_Top	Access,At_Offset_2
0351 00da       |    |		Load_Top	At_Offset_2
0352 0227       | '  |		Execute	Access,All_Reference
0353 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0354 003b       | ;  |		Store_Top	Access,At_Offset_3
0355 00c9       |    |		Action	Pop_Auxiliary_Loop
0356 00da       |    |		Load_Top	At_Offset_2
0357 77f7       |w   |		Jump_Nonzero	0x34f
0358 00ce       |    |		Action	Pop_Auxiliary
0359 00d8       |    |		Load_Top	At_Offset_0
035a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
035b 0000 0000  |    |		.BLANK	0000[0x5]
0360 ; --------------------------------------------------------------------------------------
0360 ; SUBPROGRAM
0360 ; --------------------------------------------------------------------------------------
0360 0365       | e  |		.CONST	0x0365								; Address of begin
0361 0004       |    |		.CONST	0x0004								; Address of exception handler
0362 0002       |    |		.CONST	0x0002								; Number of locals
0363			INIT_0360:
0363 e20d       |    |		Load	0x1,0xd
0364 0007       |    |		Action	Break_Optional
0365			BODY_0360:
0365 e221       | !  |		Load	0x1,0x21
0366 0322       | "  |		Declare_Variable	Record
0367 e5ff       |    |		Load	0x2,-0x1
0368 00d9       |    |		Load_Top	At_Offset_1
0369 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
036a e20d       |    |		Load	0x1,0xd
036b 00d9       |    |		Load_Top	At_Offset_1
036c 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
036d e20d       |    |		Load	0x1,0xd
036e 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
036f 0039       | 9  |		Store_Top	Access,At_Offset_1
0370 e5fe       |    |		Load	0x2,-0x2
0371 00d9       |    |		Load_Top	At_Offset_1
0372 8210       |    |		Call	0x1,0x10
0373 c5fe       |    |		Store	0x2,-0x2
0374 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0375 0000 0000  |    |		.XXX[0x3]
0377 0000       |    |
0378 ; --------------------------------------------------------------------------------------
0378 ; SUBPROGRAM
0378 ; --------------------------------------------------------------------------------------
0378 037b       | {  |		.CONST	0x037b								; Address of begin
0379 0004       |    |		.CONST	0x0004								; Address of exception handler
037a 0001       |    |		.CONST	0x0001								; Number of locals
037b			BODY_0378:
037b			INIT_0378:
037b 00da       |    |		Load_Top	At_Offset_2
037c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
037d 0000 0000  |    |		.XXX[0x3]
037f 0000       |    |
0380 ; --------------------------------------------------------------------------------------
0380 ; SUBPROGRAM
0380 ; --------------------------------------------------------------------------------------
0380 0383       |    |		.CONST	0x0383								; Address of begin
0381 0004       |    |		.CONST	0x0004								; Address of exception handler
0382 0001       |    |		.CONST	0x0001								; Number of locals
0383			BODY_0380:
0383			INIT_0380:
0383 00da       |    |		Load_Top	At_Offset_2
0384 6804       |h   |		Jump_Zero	0x389
0385 00da       |    |		Load_Top	At_Offset_2
0386 0227       | '  |		Execute	Access,All_Reference
0387 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0388 003b       | ;  |		Store_Top	Access,At_Offset_3
0389 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
038a 0000 0000  |    |		.BLANK	0000[0x6]
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 0393       |    |		.CONST	0x0393								; Address of begin
0391 0004       |    |		.CONST	0x0004								; Address of exception handler
0392 0001       |    |		.CONST	0x0001								; Number of locals
0393			BODY_0390:
0393			INIT_0390:
0393 00da       |    |		Load_Top	At_Offset_2
0394 022d       | -  |		Execute	Access,Is_Null
0395 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0396 0000 0000  |    |		.XXX[0x2]
0398 ; --------------------------------------------------------------------------------------
0398 ; SUBPROGRAM
0398 ; --------------------------------------------------------------------------------------
0398 039b       |    |		.CONST	0x039b								; Address of begin
0399 0004       |    |		.CONST	0x0004								; Address of exception handler
039a 0001       |    |		.CONST	0x0001								; Number of locals
039b			BODY_0398:
039b			INIT_0398:
039b 00da       |    |		Load_Top	At_Offset_2
039c 022c       | ,  |		Execute	Access,Not_Null
039d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
039e 0000 0000  |    |		.XXX[0x2]
03a0 ; --------------------------------------------------------------------------------------
03a0 ; SUBPROGRAM
03a0 ; --------------------------------------------------------------------------------------
03a0 03a5       |    |		.CONST	0x03a5								; Address of begin
03a1 0004       |    |		.CONST	0x0004								; Address of exception handler
03a2 0002       |    |		.CONST	0x0002								; Number of locals
03a3			INIT_03a0:
03a3 e20d       |    |		Load	0x1,0xd
03a4 0007       |    |		Action	Break_Optional
03a5			BODY_03a0:
03a5 00db       |    |		Load_Top	At_Offset_3
03a6 0039       | 9  |		Store_Top	Access,At_Offset_1
03a7 00d8       |    |		Load_Top	At_Offset_0
03a8 0227       | '  |		Execute	Access,All_Reference
03a9 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
03aa 02fd       |    |		Declare_Variable	Variant_Record,Duplicate
03ab 00cd       |    |		Action	Spare6_Action
03ac 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03ad 0000 0000  |    |		.XXX[0x3]
03af 0000       |    |
03b0 ; --------------------------------------------------------------------------------------
03b0 ; SUBPROGRAM
03b0 ; --------------------------------------------------------------------------------------
03b0 03b3       |    |		.CONST	0x03b3								; Address of begin
03b1 0004       |    |		.CONST	0x0004								; Address of exception handler
03b2 0001       |    |		.CONST	0x0001								; Number of locals
03b3			BODY_03b0:
03b3			INIT_03b0:
03b3 00da       |    |		Load_Top	At_Offset_2
03b4 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03b5 460b       |F   |		Jump_Case	0xc
03b6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; case 0x0
03b7 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; case 0x1
03b8 787b       |x{  |		Jump	0x434								; case 0x2
03b9 7809       |x   |		Jump	0x3c3								; case 0x3
03ba 7818       |x   |		Jump	0x3d3								; case 0x4
03bb 7858       |xX  |		Jump	0x414								; case 0x5
03bc 7867       |xg  |		Jump	0x424								; case 0x6
03bd 7825       |x%  |		Jump	0x3e3								; case 0x7
03be 7835       |x5  |		Jump	0x3f4								; case 0x8
03bf 784d       |xM  |		Jump	0x40d								; case 0x9
03c0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; case 0xa
03c1 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; case 0xb
03c2 4502       |E   |		.XXX[0x1]
03c3 00da       |    |		Load_Top	At_Offset_2
03c4 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
03c5 e003       |    |		Load	0x0,0x3
03c6 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03c7 0092 0996  |    |		Action	Push_String_Extended,0x996					; " , "
03c9 01cc       |    |		Execute	Vector,Catenate
03ca e008       |    |		Load	0x0,0x8
03cb 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
03cc 00da       |    |		Load_Top	At_Offset_2
03cd 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
03ce e003       |    |		Load	0x0,0x3
03cf 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03d0 e008       |    |		Load	0x0,0x8
03d1 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
03d2 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
03d3 00da       |    |		Load_Top	At_Offset_2
03d4 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
03d5 e003       |    |		Load	0x0,0x3
03d6 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03d7 0092 0996  |    |		Action	Push_String_Extended,0x996					; " , "
03d9 01cc       |    |		Execute	Vector,Catenate
03da e008       |    |		Load	0x0,0x8
03db 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
03dc 00da       |    |		Load_Top	At_Offset_2
03dd 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
03de e003       |    |		Load	0x0,0x3
03df 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03e0 e008       |    |		Load	0x0,0x8
03e1 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
03e2 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
03e3 00da       |    |		Load_Top	At_Offset_2
03e4 260d       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xd
03e5 e003       |    |		Load	0x0,0x3
03e6 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03e7 0092 0996  |    |		Action	Push_String_Extended,0x996					; " , "
03e9 01cc       |    |		Execute	Vector,Catenate
03ea e008       |    |		Load	0x0,0x8
03eb 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
03ec 00da       |    |		Load_Top	At_Offset_2
03ed 2e0e       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xe
03ee e004       |    |		Load	0x0,0x4
03ef 011c       |    |		Execute	Any,Convert_Unchecked
03f0 1c01       |    |		Execute_Immediate	Run_Utility,0x1
03f1 e008       |    |		Load	0x0,0x8
03f2 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
03f3 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
03f4 00da       |    |		Load_Top	At_Offset_2
03f5 260f       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xf
03f6 e003       |    |		Load	0x0,0x3
03f7 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03f8 0092 0996  |    |		Action	Push_String_Extended,0x996					; " , "
03fa 01cc       |    |		Execute	Vector,Catenate
03fb e008       |    |		Load	0x0,0x8
03fc 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
03fd 00da       |    |		Load_Top	At_Offset_2
03fe 2610       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x10
03ff e003       |    |		Load	0x0,0x3
0400 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0401 0092 0996  |    |		Action	Push_String_Extended,0x996					; " , "
0403 01cc       |    |		Execute	Vector,Catenate
0404 e008       |    |		Load	0x0,0x8
0405 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0406 00da       |    |		Load_Top	At_Offset_2
0407 2611       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x11
0408 e003       |    |		Load	0x0,0x3
0409 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
040a e008       |    |		Load	0x0,0x8
040b 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
040c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
040d 00da       |    |		Load_Top	At_Offset_2
040e 2e12       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x12
040f 00e0       |    |		Load_Encached	Standard_Cache
0410 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0411 e008       |    |		Load	0x0,0x8
0412 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0413 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0414 00da       |    |		Load_Top	At_Offset_2
0415 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
0416 e003       |    |		Load	0x0,0x3
0417 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0418 0092 0996  |    |		Action	Push_String_Extended,0x996					; " , "
041a 01cc       |    |		Execute	Vector,Catenate
041b e008       |    |		Load	0x0,0x8
041c 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
041d 00da       |    |		Load_Top	At_Offset_2
041e 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
041f e003       |    |		Load	0x0,0x3
0420 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0421 e008       |    |		Load	0x0,0x8
0422 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0423 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0424 00da       |    |		Load_Top	At_Offset_2
0425 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
0426 e003       |    |		Load	0x0,0x3
0427 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0428 0092 0996  |    |		Action	Push_String_Extended,0x996					; " , "
042a 01cc       |    |		Execute	Vector,Catenate
042b e008       |    |		Load	0x0,0x8
042c 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
042d 00da       |    |		Load_Top	At_Offset_2
042e 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
042f e003       |    |		Load	0x0,0x3
0430 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0431 e008       |    |		Load	0x0,0x8
0432 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0433 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0434 00da       |    |		Load_Top	At_Offset_2
0435 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
0436 e003       |    |		Load	0x0,0x3
0437 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0438 e008       |    |		Load	0x0,0x8
0439 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
043a 00da       |    |		Load_Top	At_Offset_2
043b 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
043c e003       |    |		Load	0x0,0x3
043d 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
043e 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
043f 6809       |h   |		Jump_Zero	0x449
0440 0092 0997  |    |		Action	Push_String_Extended,0x997					; "."
0442 00db       |    |		Load_Top	At_Offset_3
0443 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
0444 e003       |    |		Load	0x0,0x3
0445 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0446 01cc       |    |		Execute	Vector,Catenate
0447 e008       |    |		Load	0x0,0x8
0448 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0449 0092 0998  |    |		Action	Push_String_Extended,0x998					; " = "
044b e008       |    |		Load	0x0,0x8
044c 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
044d 00da       |    |		Load_Top	At_Offset_2
044e 2e0a       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa
044f 8009       |    |		Call	0x0,0x9
0450 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0451 0000 0000  |    |		.BLANK	0000[0x7]
0458 ; --------------------------------------------------------------------------------------
0458 ; SUBPROGRAM
0458 ; --------------------------------------------------------------------------------------
0458 045b       | [  |		.CONST	0x045b								; Address of begin
0459 0004       |    |		.CONST	0x0004								; Address of exception handler
045a 0001       |    |		.CONST	0x0001								; Number of locals
045b			BODY_0458:
045b			INIT_0458:
045b 00cf       |    |		Action	Mark_Auxiliary
045c 00db       |    |		Load_Top	At_Offset_3
045d 4801       |H   |		Short_Literal	0x1
045e 0263       | c  |		Execute	Discrete,Above_Bound
045f 7006       |p   |		Jump_Nonzero	0x466
0460 0092 0999  |    |		Action	Push_String_Extended,0x999					; " "
0462 e008       |    |		Load	0x0,0x8
0463 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0464 00c8       |    |		Action	Pop_Auxiliary_Range
0465 3ffa       |?   |		Loop_Increasing	0x460
0466 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0467 0000       |    |		.XXX[0x1]
0468 ; --------------------------------------------------------------------------------------
0468 ; SUBPROGRAM
0468 ; --------------------------------------------------------------------------------------
0468 0471       | q  |		.CONST	0x0471								; Address of begin
0469 0004       |    |		.CONST	0x0004								; Address of exception handler
046a 0003       |    |		.CONST	0x0003								; Number of locals
046b			INIT_0468:
046b e20d       |    |		Load	0x1,0xd
046c 0007       |    |		Action	Break_Optional
046d e220       |    |		Load	0x1,0x20
046e 02ff       |    |		Declare_Variable	Variant_Record
046f 00d8       |    |		Load_Top	At_Offset_0
0470 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0471			BODY_0468:
0471 e5fe       |    |		Load	0x2,-0x2
0472 8229       | )  |		Call	0x1,0x29
0473 003a       | :  |		Store_Top	Access,At_Offset_2
0474 00cf       |    |		Action	Mark_Auxiliary
0475 793a       |y:  |		Jump	0x5b0
0476 00da       |    |		Load_Top	At_Offset_2
0477 822d       | -  |		Call	0x1,0x2d
0478 00da       |    |		Load_Top	At_Offset_2
0479 016d       | m  |		Execute	Variant_Record,Structure_Write
047a 00d9       |    |		Load_Top	At_Offset_1
047b 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
047c 460b       |F   |		Jump_Case	0xc
047d 7812       |x   |		Jump	0x490								; case 0x0
047e 7848       |xH  |		Jump	0x4c7								; case 0x1
047f 7866       |xf  |		Jump	0x4e6								; case 0x2
0480 788b       |x   |		Jump	0x50c								; case 0x3
0481 78a1       |x   |		Jump	0x523								; case 0x4
0482 78b7       |x   |		Jump	0x53a								; case 0x5
0483 78cd       |x   |		Jump	0x551								; case 0x6
0484 78e3       |x   |		Jump	0x568								; case 0x7
0485 78fa       |x   |		Jump	0x580								; case 0x8
0486 7918       |y   |		Jump	0x59f								; case 0x9
0487 791e       |y   |		Jump	0x5a6								; case 0xa
0488 7800       |x   |		Jump	0x489								; case 0xb
0489 e5ff       |    |		Load	0x2,-0x1
048a 822f       | /  |		Call	0x1,0x2f
048b 0092 099a  |    |		Action	Push_String_Extended,0x99a					; "-- Vide"
048d e008       |    |		Load	0x0,0x8
048e 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
048f 791c       |y   |		Jump	0x5ac
0490 e5ff       |    |		Load	0x2,-0x1
0491 822f       | /  |		Call	0x1,0x2f
0492 0092 099b  |    |		Action	Push_String_Extended,0x99b					; "SI"
0494 e008       |    |		Load	0x0,0x8
0495 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0496 00d9       |    |		Load_Top	At_Offset_1
0497 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0498 e5ff       |    |		Load	0x2,-0x1
0499 0a02       |    |		Execute_Immediate	Plus,0x2
049a 00d8       |    |		Load_Top	At_Offset_0
049b 00e2       |    |		Load_Encached	Integer_Cache
049c 0260       | `  |		Execute	Discrete,In_Type
049d 7001       |p   |		Jump_Nonzero	0x49f
049e 0801       |    |		Execute_Immediate	Raise,0x1
049f 800a       |    |		Call	0x0,0xa
04a0 e5ff       |    |		Load	0x2,-0x1
04a1 822f       | /  |		Call	0x1,0x2f
04a2 0092 099c  |    |		Action	Push_String_Extended,0x99c					; "ALORS"
04a4 e008       |    |		Load	0x0,0x8
04a5 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
04a6 00d9       |    |		Load_Top	At_Offset_1
04a7 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
04a8 e5ff       |    |		Load	0x2,-0x1
04a9 0a02       |    |		Execute_Immediate	Plus,0x2
04aa 00d8       |    |		Load_Top	At_Offset_0
04ab 00e2       |    |		Load_Encached	Integer_Cache
04ac 0260       | `  |		Execute	Discrete,In_Type
04ad 7001       |p   |		Jump_Nonzero	0x4af
04ae 0801       |    |		Execute_Immediate	Raise,0x1
04af 8230       | 0  |		Call	0x1,0x30
04b0 e5ff       |    |		Load	0x2,-0x1
04b1 822f       | /  |		Call	0x1,0x2f
04b2 0092 099d  |    |		Action	Push_String_Extended,0x99d					; "SINON"
04b4 e008       |    |		Load	0x0,0x8
04b5 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
04b6 00d9       |    |		Load_Top	At_Offset_1
04b7 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
04b8 e5ff       |    |		Load	0x2,-0x1
04b9 0a02       |    |		Execute_Immediate	Plus,0x2
04ba 00d8       |    |		Load_Top	At_Offset_0
04bb 00e2       |    |		Load_Encached	Integer_Cache
04bc 0260       | `  |		Execute	Discrete,In_Type
04bd 7001       |p   |		Jump_Nonzero	0x4bf
04be 0801       |    |		Execute_Immediate	Raise,0x1
04bf 8230       | 0  |		Call	0x1,0x30
04c0 e5ff       |    |		Load	0x2,-0x1
04c1 822f       | /  |		Call	0x1,0x2f
04c2 0092 099e  |    |		Action	Push_String_Extended,0x99e					; "FIN_SI"
04c4 e008       |    |		Load	0x0,0x8
04c5 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
04c6 78e5       |x   |		Jump	0x5ac
04c7 e5ff       |    |		Load	0x2,-0x1
04c8 822f       | /  |		Call	0x1,0x2f
04c9 0092 099f  |    |		Action	Push_String_Extended,0x99f					; "POUR "
04cb 00da       |    |		Load_Top	At_Offset_2
04cc 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
04cd 00e0       |    |		Load_Encached	Standard_Cache
04ce 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
04cf 01cc       |    |		Execute	Vector,Catenate
04d0 0092 09a0  |    |		Action	Push_String_Extended,0x9a0					; " ENTREE FAIRE "
04d2 01cc       |    |		Execute	Vector,Catenate
04d3 e008       |    |		Load	0x0,0x8
04d4 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
04d5 00d9       |    |		Load_Top	At_Offset_1
04d6 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
04d7 e5ff       |    |		Load	0x2,-0x1
04d8 0a02       |    |		Execute_Immediate	Plus,0x2
04d9 00d8       |    |		Load_Top	At_Offset_0
04da 00e2       |    |		Load_Encached	Integer_Cache
04db 0260       | `  |		Execute	Discrete,In_Type
04dc 7001       |p   |		Jump_Nonzero	0x4de
04dd 0801       |    |		Execute_Immediate	Raise,0x1
04de 8230       | 0  |		Call	0x1,0x30
04df e5ff       |    |		Load	0x2,-0x1
04e0 822f       | /  |		Call	0x1,0x2f
04e1 0092 09a1  |    |		Action	Push_String_Extended,0x9a1					; "FIN_POUR"
04e3 e008       |    |		Load	0x0,0x8
04e4 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
04e5 78c6       |x   |		Jump	0x5ac
04e6 e5ff       |    |		Load	0x2,-0x1
04e7 822f       | /  |		Call	0x1,0x2f
04e8 00d9       |    |		Load_Top	At_Offset_1
04e9 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
04ea e003       |    |		Load	0x0,0x3
04eb 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04ec e008       |    |		Load	0x0,0x8
04ed 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
04ee 00d9       |    |		Load_Top	At_Offset_1
04ef 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
04f0 e003       |    |		Load	0x0,0x3
04f1 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
04f2 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
04f3 6809       |h   |		Jump_Zero	0x4fd
04f4 0092 0997  |    |		Action	Push_String_Extended,0x997					; "."
04f6 00da       |    |		Load_Top	At_Offset_2
04f7 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
04f8 e003       |    |		Load	0x0,0x3
04f9 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04fa 01cc       |    |		Execute	Vector,Catenate
04fb e008       |    |		Load	0x0,0x8
04fc 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
04fd 0092 0998  |    |		Action	Push_String_Extended,0x998					; " = "
04ff e008       |    |		Load	0x0,0x8
0500 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0501 00d9       |    |		Load_Top	At_Offset_1
0502 2e0a       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa
0503 e5ff       |    |		Load	0x2,-0x1
0504 0a02       |    |		Execute_Immediate	Plus,0x2
0505 00d8       |    |		Load_Top	At_Offset_0
0506 00e2       |    |		Load_Encached	Integer_Cache
0507 0260       | `  |		Execute	Discrete,In_Type
0508 7001       |p   |		Jump_Nonzero	0x50a
0509 0801       |    |		Execute_Immediate	Raise,0x1
050a 800a       |    |		Call	0x0,0xa
050b 78a0       |x   |		Jump	0x5ac
050c e5ff       |    |		Load	0x2,-0x1
050d 822f       | /  |		Call	0x1,0x2f
050e 0092 09a2  |    |		Action	Push_String_Extended,0x9a2					; "LIE_CONNEXION ( "
0510 00da       |    |		Load_Top	At_Offset_2
0511 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
0512 e003       |    |		Load	0x0,0x3
0513 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0514 01cc       |    |		Execute	Vector,Catenate
0515 0092 09a3  |    |		Action	Push_String_Extended,0x9a3					; ", "
0517 01cc       |    |		Execute	Vector,Catenate
0518 00da       |    |		Load_Top	At_Offset_2
0519 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
051a e003       |    |		Load	0x0,0x3
051b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
051c 01cc       |    |		Execute	Vector,Catenate
051d 0092 09a4  |    |		Action	Push_String_Extended,0x9a4					; " )"
051f 01cc       |    |		Execute	Vector,Catenate
0520 e008       |    |		Load	0x0,0x8
0521 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0522 7889       |x   |		Jump	0x5ac
0523 e5ff       |    |		Load	0x2,-0x1
0524 822f       | /  |		Call	0x1,0x2f
0525 0092 09a5  |    |		Action	Push_String_Extended,0x9a5					; "DELIE_CONNEXION ( "
0527 00da       |    |		Load_Top	At_Offset_2
0528 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
0529 e003       |    |		Load	0x0,0x3
052a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
052b 01cc       |    |		Execute	Vector,Catenate
052c 0092 09a3  |    |		Action	Push_String_Extended,0x9a3					; ", "
052e 01cc       |    |		Execute	Vector,Catenate
052f 00da       |    |		Load_Top	At_Offset_2
0530 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
0531 e003       |    |		Load	0x0,0x3
0532 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0533 01cc       |    |		Execute	Vector,Catenate
0534 0092 09a4  |    |		Action	Push_String_Extended,0x9a4					; " )"
0536 01cc       |    |		Execute	Vector,Catenate
0537 e008       |    |		Load	0x0,0x8
0538 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0539 7872       |xr  |		Jump	0x5ac
053a e5ff       |    |		Load	0x2,-0x1
053b 822f       | /  |		Call	0x1,0x2f
053c 0092 09a6  |    |		Action	Push_String_Extended,0x9a6					; "LIE_LIEN ( "
053e 00da       |    |		Load_Top	At_Offset_2
053f 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
0540 e003       |    |		Load	0x0,0x3
0541 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0542 01cc       |    |		Execute	Vector,Catenate
0543 0092 09a3  |    |		Action	Push_String_Extended,0x9a3					; ", "
0545 01cc       |    |		Execute	Vector,Catenate
0546 00da       |    |		Load_Top	At_Offset_2
0547 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
0548 e003       |    |		Load	0x0,0x3
0549 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
054a 01cc       |    |		Execute	Vector,Catenate
054b 0092 09a4  |    |		Action	Push_String_Extended,0x9a4					; " )"
054d 01cc       |    |		Execute	Vector,Catenate
054e e008       |    |		Load	0x0,0x8
054f 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0550 785b       |x[  |		Jump	0x5ac
0551 e5ff       |    |		Load	0x2,-0x1
0552 822f       | /  |		Call	0x1,0x2f
0553 0092 09a7  |    |		Action	Push_String_Extended,0x9a7					; "DELIE_LIEN ( "
0555 00da       |    |		Load_Top	At_Offset_2
0556 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
0557 e003       |    |		Load	0x0,0x3
0558 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0559 01cc       |    |		Execute	Vector,Catenate
055a 0092 09a3  |    |		Action	Push_String_Extended,0x9a3					; ", "
055c 01cc       |    |		Execute	Vector,Catenate
055d 00da       |    |		Load_Top	At_Offset_2
055e 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
055f e003       |    |		Load	0x0,0x3
0560 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0561 01cc       |    |		Execute	Vector,Catenate
0562 0092 09a4  |    |		Action	Push_String_Extended,0x9a4					; " )"
0564 01cc       |    |		Execute	Vector,Catenate
0565 e008       |    |		Load	0x0,0x8
0566 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0567 7844       |xD  |		Jump	0x5ac
0568 e5ff       |    |		Load	0x2,-0x1
0569 822f       | /  |		Call	0x1,0x2f
056a 0092 09a8  |    |		Action	Push_String_Extended,0x9a8					; "LISTE_LIEN ( "
056c 00da       |    |		Load_Top	At_Offset_2
056d 260d       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xd
056e e003       |    |		Load	0x0,0x3
056f 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0570 01cc       |    |		Execute	Vector,Catenate
0571 0092 09a3  |    |		Action	Push_String_Extended,0x9a3					; ", "
0573 01cc       |    |		Execute	Vector,Catenate
0574 00da       |    |		Load_Top	At_Offset_2
0575 2e0e       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xe
0576 e004       |    |		Load	0x0,0x4
0577 011c       |    |		Execute	Any,Convert_Unchecked
0578 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0579 01cc       |    |		Execute	Vector,Catenate
057a 0092 09a4  |    |		Action	Push_String_Extended,0x9a4					; " )"
057c 01cc       |    |		Execute	Vector,Catenate
057d e008       |    |		Load	0x0,0x8
057e 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
057f 782c       |x,  |		Jump	0x5ac
0580 e5ff       |    |		Load	0x2,-0x1
0581 822f       | /  |		Call	0x1,0x2f
0582 0092 09a9  |    |		Action	Push_String_Extended,0x9a9					; "ECHANGER_LIEN ( "
0584 00da       |    |		Load_Top	At_Offset_2
0585 260f       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xf
0586 e003       |    |		Load	0x0,0x3
0587 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0588 01cc       |    |		Execute	Vector,Catenate
0589 0092 09a3  |    |		Action	Push_String_Extended,0x9a3					; ", "
058b 01cc       |    |		Execute	Vector,Catenate
058c 00da       |    |		Load_Top	At_Offset_2
058d 2610       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x10
058e e003       |    |		Load	0x0,0x3
058f 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0590 01cc       |    |		Execute	Vector,Catenate
0591 0092 09a3  |    |		Action	Push_String_Extended,0x9a3					; ", "
0593 01cc       |    |		Execute	Vector,Catenate
0594 00da       |    |		Load_Top	At_Offset_2
0595 2611       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x11
0596 e003       |    |		Load	0x0,0x3
0597 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0598 01cc       |    |		Execute	Vector,Catenate
0599 0092 09a4  |    |		Action	Push_String_Extended,0x9a4					; " )"
059b 01cc       |    |		Execute	Vector,Catenate
059c e008       |    |		Load	0x0,0x8
059d 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
059e 780d       |x   |		Jump	0x5ac
059f e5ff       |    |		Load	0x2,-0x1
05a0 822f       | /  |		Call	0x1,0x2f
05a1 0092 09aa  |    |		Action	Push_String_Extended,0x9aa					; "-- fonction afficher "
05a3 e008       |    |		Load	0x0,0x8
05a4 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
05a5 7806       |x   |		Jump	0x5ac
05a6 e5ff       |    |		Load	0x2,-0x1
05a7 822f       | /  |		Call	0x1,0x2f
05a8 0092 0994  |    |		Action	Push_String_Extended,0x994					; "FIN"
05aa e008       |    |		Load	0x0,0x8
05ab 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
05ac 00da       |    |		Load_Top	At_Offset_2
05ad 822a       | *  |		Call	0x1,0x2a
05ae 003b       | ;  |		Store_Top	Access,At_Offset_3
05af 00c9       |    |		Action	Pop_Auxiliary_Loop
05b0 00da       |    |		Load_Top	At_Offset_2
05b1 822c       | ,  |		Call	0x1,0x2c
05b2 76c3       |v   |		Jump_Nonzero	0x476
05b3 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
05b4 0000 0000  |    |		.BLANK	0000[0x4]
05b8 ; --------------------------------------------------------------------------------------
05b8 ; SUBPROGRAM
05b8 ; --------------------------------------------------------------------------------------
05b8 05bc       |    |		.CONST	0x05bc								; Address of begin
05b9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ba 0002       |    |		.CONST	0x0002								; Number of locals
05bb			INIT_05b8:
05bb 00e1       |    |		Load_Encached	Boolean_Cache
05bc			BODY_05b8:
05bc 0092 09ab  |    |		Action	Push_String_Extended,0x9ab					; " execution de si-alors-sinon "
05be e008       |    |		Load	0x0,0x8
05bf 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
05c0 e5fb       |    |		Load	0x2,-0x5
05c1 e5fc       |    |		Load	0x2,-0x4
05c2 e5fd       |    |		Load	0x2,-0x3
05c3 e5fe       |    |		Load	0x2,-0x2
05c4 e5ff       |    |		Load	0x2,-0x1
05c5 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
05c6 800b       |    |		Call	0x0,0xb
05c7 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
05c8 00db       |    |		Load_Top	At_Offset_3
05c9 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
05ca 8009       |    |		Call	0x0,0x9
05cb 00d8       |    |		Load_Top	At_Offset_0
05cc 680d       |h   |		Jump_Zero	0x5da
05cd 0092 09ac  |    |		Action	Push_String_Extended,0x9ac					; " verifiee execution de alors "
05cf e008       |    |		Load	0x0,0x8
05d0 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
05d1 e5fb       |    |		Load	0x2,-0x5
05d2 e5fc       |    |		Load	0x2,-0x4
05d3 e5fd       |    |		Load	0x2,-0x3
05d4 e5fe       |    |		Load	0x2,-0x2
05d5 e5ff       |    |		Load	0x2,-0x1
05d6 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
05d7 8211       |    |		Call	0x1,0x11
05d8 00d2       |    |		Pop_Control	Pop_Count_2
05d9 780c       |x   |		Jump	0x5e6
05da 0092 09ad  |    |		Action	Push_String_Extended,0x9ad					; " non verifiee execution de sinon "
05dc e008       |    |		Load	0x0,0x8
05dd 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
05de e5fb       |    |		Load	0x2,-0x5
05df e5fc       |    |		Load	0x2,-0x4
05e0 e5fd       |    |		Load	0x2,-0x3
05e1 e5fe       |    |		Load	0x2,-0x2
05e2 e5ff       |    |		Load	0x2,-0x1
05e3 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
05e4 8211       |    |		Call	0x1,0x11
05e5 00d2       |    |		Pop_Control	Pop_Count_2
05e6 0092 09ae  |    |		Action	Push_String_Extended,0x9ae					; " fin de si-alors-sinon "
05e8 e008       |    |		Load	0x0,0x8
05e9 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
05ea 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
05eb 0000 0000  |    |		.BLANK	0000[0x5]
05f0 ; --------------------------------------------------------------------------------------
05f0 ; SUBPROGRAM
05f0 ; --------------------------------------------------------------------------------------
05f0 05f3       |    |		.CONST	0x05f3								; Address of begin
05f1 0004       |    |		.CONST	0x0004								; Address of exception handler
05f2 0001       |    |		.CONST	0x0001								; Number of locals
05f3			BODY_05f0:
05f3			INIT_05f0:
05f3 0092 09af  |    |		Action	Push_String_Extended,0x9af					; " execution de pour-faire =>"
05f5 e008       |    |		Load	0x0,0x8
05f6 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
05f7 800c       |    |		Call	0x0,0xc
05f8 00db       |    |		Load_Top	At_Offset_3
05f9 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
05fa 026e       | n  |		Execute	Discrete,Modulo
05fb 700c       |p   |		Jump_Nonzero	0x608
05fc 0092 09b0  |    |		Action	Push_String_Extended,0x9b0					; " condition verifiee "
05fe e008       |    |		Load	0x0,0x8
05ff 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0600 e5fb       |    |		Load	0x2,-0x5
0601 e5fc       |    |		Load	0x2,-0x4
0602 e5fd       |    |		Load	0x2,-0x3
0603 e5fe       |    |		Load	0x2,-0x2
0604 e5ff       |    |		Load	0x2,-0x1
0605 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
0606 8211       |    |		Call	0x1,0x11
0607 00d2       |    |		Pop_Control	Pop_Count_2
0608 0092 09b1  |    |		Action	Push_String_Extended,0x9b1					; " fin de pour-faire "
060a e008       |    |		Load	0x0,0x8
060b 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
060c 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
060d 0000 0000  |    |		.XXX[0x3]
060f 0000       |    |
0610 ; --------------------------------------------------------------------------------------
0610 ; SUBPROGRAM
0610 ; --------------------------------------------------------------------------------------
0610 0615       |    |		.CONST	0x0615								; Address of begin
0611 0004       |    |		.CONST	0x0004								; Address of exception handler
0612 0003       |    |		.CONST	0x0003								; Number of locals
0613			INIT_0610:
0613 00e2       |    |		Load_Encached	Integer_Cache
0614 00e1       |    |		Load_Encached	Boolean_Cache
0615			BODY_0610:
0615 0092 09b2  |    |		Action	Push_String_Extended,0x9b2					; " execution affectation "
0617 e008       |    |		Load	0x0,0x8
0618 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0619 e5ff       |    |		Load	0x2,-0x1
061a 822e       | .  |		Call	0x1,0x2e
061b e5ff       |    |		Load	0x2,-0x1
061c 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
061d e003       |    |		Load	0x0,0x3
061e 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
061f 700c       |p   |		Jump_Nonzero	0x62c
0620 e5ff       |    |		Load	0x2,-0x1
0621 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
0622 e003       |    |		Load	0x0,0x3
0623 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0624 e5fd       |    |		Load	0x2,-0x3
0625 800d       |    |		Call	0x0,0xd
0626 6801       |h   |		Jump_Zero	0x628
0627 7846       |xF  |		Jump	0x66e
0628 0092 09b3  |    |		Action	Push_String_Extended,0x9b3					; "Manque l'extension pour l'acces a la variable !!!"
062a 800e       |    |		Call	0x0,0xe
062b 7842       |xB  |		Jump	0x66e
062c e5ff       |    |		Load	0x2,-0x1
062d 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
062e e003       |    |		Load	0x0,0x3
062f 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0630 e5ff       |    |		Load	0x2,-0x1
0631 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
0632 e003       |    |		Load	0x0,0x3
0633 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0634 e5fe       |    |		Load	0x2,-0x2
0635 e5fd       |    |		Load	0x2,-0x3
0636 800f       |    |		Call	0x0,0xf
0637 0092 09b4  |    |		Action	Push_String_Extended,0x9b4					; "ENTIER"
0639 01df       |    |		Execute	Vector,Equal
063a e5ff       |    |		Load	0x2,-0x1
063b 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
063c e003       |    |		Load	0x0,0x3
063d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
063e e5ff       |    |		Load	0x2,-0x1
063f 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
0640 e003       |    |		Load	0x0,0x3
0641 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0642 e5fe       |    |		Load	0x2,-0x2
0643 e5fd       |    |		Load	0x2,-0x3
0644 800f       |    |		Call	0x0,0xf
0645 0092 09b5  |    |		Action	Push_String_Extended,0x9b5					; "ENUMERE"
0647 01df       |    |		Execute	Vector,Equal
0648 0278       | x  |		Execute	Discrete,Or
0649 6809       |h   |		Jump_Zero	0x653
064a e5fb       |    |		Load	0x2,-0x5
064b e5fc       |    |		Load	0x2,-0x4
064c e5fd       |    |		Load	0x2,-0x3
064d e5fe       |    |		Load	0x2,-0x2
064e e5ff       |    |		Load	0x2,-0x1
064f 2e0a       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa
0650 8010       |    |		Call	0x0,0x10
0651 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0652 781b       |x   |		Jump	0x66e
0653 e5ff       |    |		Load	0x2,-0x1
0654 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
0655 e003       |    |		Load	0x0,0x3
0656 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0657 e5ff       |    |		Load	0x2,-0x1
0658 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
0659 e003       |    |		Load	0x0,0x3
065a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
065b e5fe       |    |		Load	0x2,-0x2
065c e5fd       |    |		Load	0x2,-0x3
065d 800f       |    |		Call	0x0,0xf
065e 0092 09b6  |    |		Action	Push_String_Extended,0x9b6					; "BOOLEEN"
0660 01df       |    |		Execute	Vector,Equal
0661 6809       |h   |		Jump_Zero	0x66b
0662 e5fb       |    |		Load	0x2,-0x5
0663 e5fc       |    |		Load	0x2,-0x4
0664 e5fd       |    |		Load	0x2,-0x3
0665 e5fe       |    |		Load	0x2,-0x2
0666 e5ff       |    |		Load	0x2,-0x1
0667 2e0a       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa
0668 800b       |    |		Call	0x0,0xb
0669 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
066a 7803       |x   |		Jump	0x66e
066b 0092 09b7  |    |		Action	Push_String_Extended,0x9b7					; "Affectation non valide !!!"
066d 800e       |    |		Call	0x0,0xe
066e 0092 09b8  |    |		Action	Push_String_Extended,0x9b8					; " fin de affectation "
0670 e008       |    |		Load	0x0,0x8
0671 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0672 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0673 0000 0000  |    |		.BLANK	0000[0x5]
0678 ; --------------------------------------------------------------------------------------
0678 ; SUBPROGRAM
0678 ; --------------------------------------------------------------------------------------
0678 067b       | {  |		.CONST	0x067b								; Address of begin
0679 0004       |    |		.CONST	0x0004								; Address of exception handler
067a 0001       |    |		.CONST	0x0001								; Number of locals
067b			BODY_0678:
067b			INIT_0678:
067b 0092 09b9  |    |		Action	Push_String_Extended,0x9b9					; " execution lie_connexion "
067d e008       |    |		Load	0x0,0x8
067e 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
067f 00da       |    |		Load_Top	At_Offset_2
0680 822e       | .  |		Call	0x1,0x2e
0681 00da       |    |		Load_Top	At_Offset_2
0682 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
0683 e003       |    |		Load	0x0,0x3
0684 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0685 0092 09ba  |    |		Action	Push_String_Extended,0x9ba					; "COMP"
0687 01df       |    |		Execute	Vector,Equal
0688 680a       |h   |		Jump_Zero	0x693
0689 e5fc       |    |		Load	0x2,-0x4
068a 4801       |H   |		Short_Literal	0x1
068b e5ff       |    |		Load	0x2,-0x1
068c 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
068d e003       |    |		Load	0x0,0x3
068e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
068f 8011       |    |		Call	0x0,0x11
0690 8012       |    |		Call	0x0,0x12
0691 00d1       |    |		Pop_Control	Pop_Count_1
0692 781e       |x   |		Jump	0x6b1
0693 00da       |    |		Load_Top	At_Offset_2
0694 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
0695 e003       |    |		Load	0x0,0x3
0696 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0697 0092 09ba  |    |		Action	Push_String_Extended,0x9ba					; "COMP"
0699 01df       |    |		Execute	Vector,Equal
069a 680a       |h   |		Jump_Zero	0x6a5
069b e5fc       |    |		Load	0x2,-0x4
069c 4801       |H   |		Short_Literal	0x1
069d 8011       |    |		Call	0x0,0x11
069e e5ff       |    |		Load	0x2,-0x1
069f 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
06a0 e003       |    |		Load	0x0,0x3
06a1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06a2 8012       |    |		Call	0x0,0x12
06a3 00d1       |    |		Pop_Control	Pop_Count_1
06a4 780c       |x   |		Jump	0x6b1
06a5 e5fc       |    |		Load	0x2,-0x4
06a6 4801       |H   |		Short_Literal	0x1
06a7 e5ff       |    |		Load	0x2,-0x1
06a8 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
06a9 e003       |    |		Load	0x0,0x3
06aa 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06ab e5ff       |    |		Load	0x2,-0x1
06ac 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
06ad e003       |    |		Load	0x0,0x3
06ae 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06af 8012       |    |		Call	0x0,0x12
06b0 00d1       |    |		Pop_Control	Pop_Count_1
06b1 0092 09bb  |    |		Action	Push_String_Extended,0x9bb					; " fin de lie_connexion "
06b3 e008       |    |		Load	0x0,0x8
06b4 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
06b5 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
06b6 0000 0000  |    |		.XXX[0x2]
06b8 ; --------------------------------------------------------------------------------------
06b8 ; SUBPROGRAM
06b8 ; --------------------------------------------------------------------------------------
06b8 06bb       |    |		.CONST	0x06bb								; Address of begin
06b9 0004       |    |		.CONST	0x0004								; Address of exception handler
06ba 0001       |    |		.CONST	0x0001								; Number of locals
06bb			BODY_06b8:
06bb			INIT_06b8:
06bb 0092 09bc  |    |		Action	Push_String_Extended,0x9bc					; " execution delie_connexion "
06bd e008       |    |		Load	0x0,0x8
06be 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
06bf 00da       |    |		Load_Top	At_Offset_2
06c0 822e       | .  |		Call	0x1,0x2e
06c1 00da       |    |		Load_Top	At_Offset_2
06c2 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
06c3 e003       |    |		Load	0x0,0x3
06c4 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06c5 0092 09ba  |    |		Action	Push_String_Extended,0x9ba					; "COMP"
06c7 01df       |    |		Execute	Vector,Equal
06c8 680a       |h   |		Jump_Zero	0x6d3
06c9 e5fc       |    |		Load	0x2,-0x4
06ca 4802       |H   |		Short_Literal	0x2
06cb e5ff       |    |		Load	0x2,-0x1
06cc 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
06cd e003       |    |		Load	0x0,0x3
06ce 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06cf 8011       |    |		Call	0x0,0x11
06d0 8012       |    |		Call	0x0,0x12
06d1 00d1       |    |		Pop_Control	Pop_Count_1
06d2 781e       |x   |		Jump	0x6f1
06d3 00da       |    |		Load_Top	At_Offset_2
06d4 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
06d5 e003       |    |		Load	0x0,0x3
06d6 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06d7 0092 09ba  |    |		Action	Push_String_Extended,0x9ba					; "COMP"
06d9 01df       |    |		Execute	Vector,Equal
06da 680a       |h   |		Jump_Zero	0x6e5
06db e5fc       |    |		Load	0x2,-0x4
06dc 4802       |H   |		Short_Literal	0x2
06dd 8011       |    |		Call	0x0,0x11
06de e5ff       |    |		Load	0x2,-0x1
06df 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
06e0 e003       |    |		Load	0x0,0x3
06e1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06e2 8012       |    |		Call	0x0,0x12
06e3 00d1       |    |		Pop_Control	Pop_Count_1
06e4 780c       |x   |		Jump	0x6f1
06e5 e5fc       |    |		Load	0x2,-0x4
06e6 4802       |H   |		Short_Literal	0x2
06e7 e5ff       |    |		Load	0x2,-0x1
06e8 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
06e9 e003       |    |		Load	0x0,0x3
06ea 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06eb e5ff       |    |		Load	0x2,-0x1
06ec 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
06ed e003       |    |		Load	0x0,0x3
06ee 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06ef 8012       |    |		Call	0x0,0x12
06f0 00d1       |    |		Pop_Control	Pop_Count_1
06f1 0092 09bd  |    |		Action	Push_String_Extended,0x9bd					; " fin de delie_connexion "
06f3 e008       |    |		Load	0x0,0x8
06f4 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
06f5 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
06f6 0000 0000  |    |		.XXX[0x2]
06f8 ; --------------------------------------------------------------------------------------
06f8 ; SUBPROGRAM
06f8 ; --------------------------------------------------------------------------------------
06f8 06fb       |    |		.CONST	0x06fb								; Address of begin
06f9 0004       |    |		.CONST	0x0004								; Address of exception handler
06fa 0001       |    |		.CONST	0x0001								; Number of locals
06fb			BODY_06f8:
06fb			INIT_06f8:
06fb 0092 09be  |    |		Action	Push_String_Extended,0x9be					; " execution lie_lien "
06fd e008       |    |		Load	0x0,0x8
06fe 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
06ff 00da       |    |		Load_Top	At_Offset_2
0700 822e       | .  |		Call	0x1,0x2e
0701 00da       |    |		Load_Top	At_Offset_2
0702 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
0703 e003       |    |		Load	0x0,0x3
0704 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0705 0092 09ba  |    |		Action	Push_String_Extended,0x9ba					; "COMP"
0707 01df       |    |		Execute	Vector,Equal
0708 680a       |h   |		Jump_Zero	0x713
0709 e5fc       |    |		Load	0x2,-0x4
070a 4801       |H   |		Short_Literal	0x1
070b e5ff       |    |		Load	0x2,-0x1
070c 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
070d e003       |    |		Load	0x0,0x3
070e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
070f 8011       |    |		Call	0x0,0x11
0710 8013       |    |		Call	0x0,0x13
0711 00d1       |    |		Pop_Control	Pop_Count_1
0712 781e       |x   |		Jump	0x731
0713 00da       |    |		Load_Top	At_Offset_2
0714 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
0715 e003       |    |		Load	0x0,0x3
0716 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0717 0092 09ba  |    |		Action	Push_String_Extended,0x9ba					; "COMP"
0719 01df       |    |		Execute	Vector,Equal
071a 680a       |h   |		Jump_Zero	0x725
071b e5fc       |    |		Load	0x2,-0x4
071c 4801       |H   |		Short_Literal	0x1
071d 8011       |    |		Call	0x0,0x11
071e e5ff       |    |		Load	0x2,-0x1
071f 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
0720 e003       |    |		Load	0x0,0x3
0721 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0722 8013       |    |		Call	0x0,0x13
0723 00d1       |    |		Pop_Control	Pop_Count_1
0724 780c       |x   |		Jump	0x731
0725 e5fc       |    |		Load	0x2,-0x4
0726 4801       |H   |		Short_Literal	0x1
0727 e5ff       |    |		Load	0x2,-0x1
0728 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
0729 e003       |    |		Load	0x0,0x3
072a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
072b e5ff       |    |		Load	0x2,-0x1
072c 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
072d e003       |    |		Load	0x0,0x3
072e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
072f 8013       |    |		Call	0x0,0x13
0730 00d1       |    |		Pop_Control	Pop_Count_1
0731 0092 09bf  |    |		Action	Push_String_Extended,0x9bf					; " fin de lie_lien "
0733 e008       |    |		Load	0x0,0x8
0734 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0735 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0736 0000 0000  |    |		.XXX[0x2]
0738 ; --------------------------------------------------------------------------------------
0738 ; SUBPROGRAM
0738 ; --------------------------------------------------------------------------------------
0738 073b       | ;  |		.CONST	0x073b								; Address of begin
0739 0004       |    |		.CONST	0x0004								; Address of exception handler
073a 0001       |    |		.CONST	0x0001								; Number of locals
073b			BODY_0738:
073b			INIT_0738:
073b 0092 09c0  |    |		Action	Push_String_Extended,0x9c0					; " execution delie_lien "
073d e008       |    |		Load	0x0,0x8
073e 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
073f 00da       |    |		Load_Top	At_Offset_2
0740 822e       | .  |		Call	0x1,0x2e
0741 00da       |    |		Load_Top	At_Offset_2
0742 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
0743 e003       |    |		Load	0x0,0x3
0744 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0745 0092 09ba  |    |		Action	Push_String_Extended,0x9ba					; "COMP"
0747 01df       |    |		Execute	Vector,Equal
0748 680a       |h   |		Jump_Zero	0x753
0749 e5fc       |    |		Load	0x2,-0x4
074a 4802       |H   |		Short_Literal	0x2
074b e5ff       |    |		Load	0x2,-0x1
074c 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
074d e003       |    |		Load	0x0,0x3
074e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
074f 8011       |    |		Call	0x0,0x11
0750 8013       |    |		Call	0x0,0x13
0751 00d1       |    |		Pop_Control	Pop_Count_1
0752 781e       |x   |		Jump	0x771
0753 00da       |    |		Load_Top	At_Offset_2
0754 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
0755 e003       |    |		Load	0x0,0x3
0756 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0757 0092 09ba  |    |		Action	Push_String_Extended,0x9ba					; "COMP"
0759 01df       |    |		Execute	Vector,Equal
075a 680a       |h   |		Jump_Zero	0x765
075b e5fc       |    |		Load	0x2,-0x4
075c 4802       |H   |		Short_Literal	0x2
075d 8011       |    |		Call	0x0,0x11
075e e5ff       |    |		Load	0x2,-0x1
075f 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
0760 e003       |    |		Load	0x0,0x3
0761 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0762 8013       |    |		Call	0x0,0x13
0763 00d1       |    |		Pop_Control	Pop_Count_1
0764 780c       |x   |		Jump	0x771
0765 e5fc       |    |		Load	0x2,-0x4
0766 4802       |H   |		Short_Literal	0x2
0767 e5ff       |    |		Load	0x2,-0x1
0768 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
0769 e003       |    |		Load	0x0,0x3
076a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
076b e5ff       |    |		Load	0x2,-0x1
076c 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
076d e003       |    |		Load	0x0,0x3
076e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
076f 8013       |    |		Call	0x0,0x13
0770 00d1       |    |		Pop_Control	Pop_Count_1
0771 0092 09c1  |    |		Action	Push_String_Extended,0x9c1					; " fin de delie_lien "
0773 e008       |    |		Load	0x0,0x8
0774 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0775 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0776 0000 0000  |    |		.XXX[0x2]
0778 ; --------------------------------------------------------------------------------------
0778 ; SUBPROGRAM
0778 ; --------------------------------------------------------------------------------------
0778 077b       | {  |		.CONST	0x077b								; Address of begin
0779 0004       |    |		.CONST	0x0004								; Address of exception handler
077a 0001       |    |		.CONST	0x0001								; Number of locals
077b			BODY_0778:
077b			INIT_0778:
077b 0092 09c2  |    |		Action	Push_String_Extended,0x9c2					; " execution liste_lien "
077d e008       |    |		Load	0x0,0x8
077e 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
077f 00da       |    |		Load_Top	At_Offset_2
0780 822e       | .  |		Call	0x1,0x2e
0781 00da       |    |		Load_Top	At_Offset_2
0782 2e0e       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xe
0783 0f2d       | -  |		Execute_Immediate	Equal,0x2d
0784 6815       |h   |		Jump_Zero	0x79a
0785 00da       |    |		Load_Top	At_Offset_2
0786 260d       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xd
0787 e003       |    |		Load	0x0,0x3
0788 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0789 0092 09ba  |    |		Action	Push_String_Extended,0x9ba					; "COMP"
078b 01df       |    |		Execute	Vector,Equal
078c 6805       |h   |		Jump_Zero	0x792
078d e5fc       |    |		Load	0x2,-0x4
078e 4801       |H   |		Short_Literal	0x1
078f 8011       |    |		Call	0x0,0x11
0790 8014       |    |		Call	0x0,0x14
0791 781c       |x   |		Jump	0x7ae
0792 e5fc       |    |		Load	0x2,-0x4
0793 4801       |H   |		Short_Literal	0x1
0794 e5ff       |    |		Load	0x2,-0x1
0795 260d       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xd
0796 e003       |    |		Load	0x0,0x3
0797 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0798 8014       |    |		Call	0x0,0x14
0799 7814       |x   |		Jump	0x7ae
079a 00da       |    |		Load_Top	At_Offset_2
079b 260d       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xd
079c e003       |    |		Load	0x0,0x3
079d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
079e 0092 09ba  |    |		Action	Push_String_Extended,0x9ba					; "COMP"
07a0 01df       |    |		Execute	Vector,Equal
07a1 6805       |h   |		Jump_Zero	0x7a7
07a2 e5fc       |    |		Load	0x2,-0x4
07a3 4802       |H   |		Short_Literal	0x2
07a4 8011       |    |		Call	0x0,0x11
07a5 8014       |    |		Call	0x0,0x14
07a6 7807       |x   |		Jump	0x7ae
07a7 e5fc       |    |		Load	0x2,-0x4
07a8 4802       |H   |		Short_Literal	0x2
07a9 e5ff       |    |		Load	0x2,-0x1
07aa 260d       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xd
07ab e003       |    |		Load	0x0,0x3
07ac 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
07ad 8014       |    |		Call	0x0,0x14
07ae 0092 09c3  |    |		Action	Push_String_Extended,0x9c3					; " fin de liste_lien "
07b0 e008       |    |		Load	0x0,0x8
07b1 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
07b2 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
07b3 0000 0000  |    |		.BLANK	0000[0x5]
07b8 ; --------------------------------------------------------------------------------------
07b8 ; SUBPROGRAM
07b8 ; --------------------------------------------------------------------------------------
07b8 07bb       |    |		.CONST	0x07bb								; Address of begin
07b9 0004       |    |		.CONST	0x0004								; Address of exception handler
07ba 0001       |    |		.CONST	0x0001								; Number of locals
07bb			BODY_07b8:
07bb			INIT_07b8:
07bb 0092 09c4  |    |		Action	Push_String_Extended,0x9c4					; " execution echanger_lien "
07bd e008       |    |		Load	0x0,0x8
07be 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
07bf 00da       |    |		Load_Top	At_Offset_2
07c0 822e       | .  |		Call	0x1,0x2e
07c1 00da       |    |		Load_Top	At_Offset_2
07c2 260f       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xf
07c3 e003       |    |		Load	0x0,0x3
07c4 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
07c5 0092 09ba  |    |		Action	Push_String_Extended,0x9ba					; "COMP"
07c7 01df       |    |		Execute	Vector,Equal
07c8 680d       |h   |		Jump_Zero	0x7d6
07c9 e5fc       |    |		Load	0x2,-0x4
07ca 00db       |    |		Load_Top	At_Offset_3
07cb 2611       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x11
07cc e003       |    |		Load	0x0,0x3
07cd 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
07ce e5ff       |    |		Load	0x2,-0x1
07cf 2610       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x10
07d0 e003       |    |		Load	0x0,0x3
07d1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
07d2 8011       |    |		Call	0x0,0x11
07d3 8015       |    |		Call	0x0,0x15
07d4 00d1       |    |		Pop_Control	Pop_Count_1
07d5 7839       |x9  |		Jump	0x80f
07d6 00da       |    |		Load_Top	At_Offset_2
07d7 2610       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x10
07d8 e003       |    |		Load	0x0,0x3
07d9 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
07da 0092 09ba  |    |		Action	Push_String_Extended,0x9ba					; "COMP"
07dc 01df       |    |		Execute	Vector,Equal
07dd 680d       |h   |		Jump_Zero	0x7eb
07de e5fc       |    |		Load	0x2,-0x4
07df 00db       |    |		Load_Top	At_Offset_3
07e0 2611       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x11
07e1 e003       |    |		Load	0x0,0x3
07e2 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
07e3 8011       |    |		Call	0x0,0x11
07e4 e5ff       |    |		Load	0x2,-0x1
07e5 260f       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xf
07e6 e003       |    |		Load	0x0,0x3
07e7 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
07e8 8015       |    |		Call	0x0,0x15
07e9 00d1       |    |		Pop_Control	Pop_Count_1
07ea 7824       |x$  |		Jump	0x80f
07eb 00da       |    |		Load_Top	At_Offset_2
07ec 2611       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x11
07ed e003       |    |		Load	0x0,0x3
07ee 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
07ef 0092 09ba  |    |		Action	Push_String_Extended,0x9ba					; "COMP"
07f1 01df       |    |		Execute	Vector,Equal
07f2 680d       |h   |		Jump_Zero	0x800
07f3 e5fc       |    |		Load	0x2,-0x4
07f4 8011       |    |		Call	0x0,0x11
07f5 e5ff       |    |		Load	0x2,-0x1
07f6 2610       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x10
07f7 e003       |    |		Load	0x0,0x3
07f8 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
07f9 e5ff       |    |		Load	0x2,-0x1
07fa 260f       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xf
07fb e003       |    |		Load	0x0,0x3
07fc 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
07fd 8015       |    |		Call	0x0,0x15
07fe 00d1       |    |		Pop_Control	Pop_Count_1
07ff 780f       |x   |		Jump	0x80f
0800 e5fc       |    |		Load	0x2,-0x4
0801 00db       |    |		Load_Top	At_Offset_3
0802 2611       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x11
0803 e003       |    |		Load	0x0,0x3
0804 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0805 e5ff       |    |		Load	0x2,-0x1
0806 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
0807 e003       |    |		Load	0x0,0x3
0808 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0809 e5ff       |    |		Load	0x2,-0x1
080a 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
080b e003       |    |		Load	0x0,0x3
080c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
080d 8015       |    |		Call	0x0,0x15
080e 00d1       |    |		Pop_Control	Pop_Count_1
080f 0092 09c5  |    |		Action	Push_String_Extended,0x9c5					; " fin de echanger_lien "
0811 e008       |    |		Load	0x0,0x8
0812 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0813 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0814 0000 0000  |    |		.BLANK	0000[0x4]
0818 ; --------------------------------------------------------------------------------------
0818 ; SUBPROGRAM
0818 ; --------------------------------------------------------------------------------------
0818 081b       |    |		.CONST	0x081b								; Address of begin
0819 0004       |    |		.CONST	0x0004								; Address of exception handler
081a 0001       |    |		.CONST	0x0001								; Number of locals
081b			BODY_0818:
081b			INIT_0818:
081b 0092 09c6  |    |		Action	Push_String_Extended,0x9c6					; " execution afficher "
081d e008       |    |		Load	0x0,0x8
081e 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
081f 00da       |    |		Load_Top	At_Offset_2
0820 822e       | .  |		Call	0x1,0x2e
0821 0092 09c7  |    |		Action	Push_String_Extended,0x9c7					; " fin de afficher "
0823 e008       |    |		Load	0x0,0x8
0824 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0825 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0826 0000 0000  |    |		.XXX[0x2]
0828 ; --------------------------------------------------------------------------------------
0828 ; SUBPROGRAM
0828 ; --------------------------------------------------------------------------------------
0828 082b       | +  |		.CONST	0x082b								; Address of begin
0829 0004       |    |		.CONST	0x0004								; Address of exception handler
082a 0001       |    |		.CONST	0x0001								; Number of locals
082b			BODY_0828:
082b			INIT_0828:
082b 0092 09c8  |    |		Action	Push_String_Extended,0x9c8					; " execution fin "
082d e008       |    |		Load	0x0,0x8
082e 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
082f 00da       |    |		Load_Top	At_Offset_2
0830 822e       | .  |		Call	0x1,0x2e
0831 0092 09c9  |    |		Action	Push_String_Extended,0x9c9					; " fin de fin "
0833 e008       |    |		Load	0x0,0x8
0834 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0835 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0836 0000 0000  |    |		.XXX[0x2]
0838 ; --------------------------------------------------------------------------------------
0838 ; SUBPROGRAM
0838 ; --------------------------------------------------------------------------------------
0838 083b       | ;  |		.CONST	0x083b								; Address of begin
0839 0004       |    |		.CONST	0x0004								; Address of exception handler
083a 0001       |    |		.CONST	0x0001								; Number of locals
083b			BODY_0838:
083b			INIT_0838:
083b 0092 09ca  |    |		Action	Push_String_Extended,0x9ca					; " execution vide "
083d e008       |    |		Load	0x0,0x8
083e 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
083f 00da       |    |		Load_Top	At_Offset_2
0840 822e       | .  |		Call	0x1,0x2e
0841 0092 09cb  |    |		Action	Push_String_Extended,0x9cb					; " fin de vide "
0843 e008       |    |		Load	0x0,0x8
0844 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0845 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0846 0000 0000  |    |		.XXX[0x2]
0848 ; --------------------------------------------------------------------------------------
0848 ; SUBPROGRAM
0848 ; --------------------------------------------------------------------------------------
0848 084b       | K  |		.CONST	0x084b								; Address of begin
0849 0004       |    |		.CONST	0x0004								; Address of exception handler
084a 0001       |    |		.CONST	0x0001								; Number of locals
084b			BODY_0848:
084b			INIT_0848:
084b 00da       |    |		Load_Top	At_Offset_2
084c 0227       | '  |		Execute	Access,All_Reference
084d 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
084e 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
084f 460b       |F   |		Jump_Case	0xc
0850 7812       |x   |		Jump	0x863								; case 0x0
0851 7833       |x3  |		Jump	0x885								; case 0x1
0852 7849       |xI  |		Jump	0x89c								; case 0x2
0853 7808       |x   |		Jump	0x85c								; case 0x3
0854 7807       |x   |		Jump	0x85c								; case 0x4
0855 7806       |x   |		Jump	0x85c								; case 0x5
0856 7805       |x   |		Jump	0x85c								; case 0x6
0857 7804       |x   |		Jump	0x85c								; case 0x7
0858 7803       |x   |		Jump	0x85c								; case 0x8
0859 783b       |x;  |		Jump	0x895								; case 0x9
085a 7801       |x   |		Jump	0x85c								; case 0xa
085b 7800       |x   |		Jump	0x85c								; case 0xb
085c 00da       |    |		Load_Top	At_Offset_2
085d e222       | "  |		Load	0x1,0x22
085e e223       | #  |		Load	0x1,0x23
085f 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
0860 8005       |    |		Call	0x0,0x5
0861 003b       | ;  |		Store_Top	Access,At_Offset_3
0862 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0863 00da       |    |		Load_Top	At_Offset_2
0864 0229       | )  |		Execute	Access,All_Read
0865 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0866 00d8       |    |		Load_Top	At_Offset_0
0867 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0868 8016       |    |		Call	0x0,0x16
0869 00d9       |    |		Load_Top	At_Offset_1
086a 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
086b 00d1       |    |		Pop_Control	Pop_Count_1
086c 00da       |    |		Load_Top	At_Offset_2
086d 0229       | )  |		Execute	Access,All_Read
086e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
086f 00d8       |    |		Load_Top	At_Offset_0
0870 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0871 820f       |    |		Call	0x1,0xf
0872 00d9       |    |		Load_Top	At_Offset_1
0873 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0874 00d1       |    |		Pop_Control	Pop_Count_1
0875 00da       |    |		Load_Top	At_Offset_2
0876 0229       | )  |		Execute	Access,All_Read
0877 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0878 00d8       |    |		Load_Top	At_Offset_0
0879 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
087a 820f       |    |		Call	0x1,0xf
087b 00d9       |    |		Load_Top	At_Offset_1
087c 2a05       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5
087d 00d1       |    |		Pop_Control	Pop_Count_1
087e 00da       |    |		Load_Top	At_Offset_2
087f e222       | "  |		Load	0x1,0x22
0880 e223       | #  |		Load	0x1,0x23
0881 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
0882 8005       |    |		Call	0x0,0x5
0883 003b       | ;  |		Store_Top	Access,At_Offset_3
0884 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0885 00da       |    |		Load_Top	At_Offset_2
0886 0229       | )  |		Execute	Access,All_Read
0887 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0888 00d8       |    |		Load_Top	At_Offset_0
0889 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
088a 820f       |    |		Call	0x1,0xf
088b 00d9       |    |		Load_Top	At_Offset_1
088c 2a07       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7
088d 00d1       |    |		Pop_Control	Pop_Count_1
088e 00da       |    |		Load_Top	At_Offset_2
088f e222       | "  |		Load	0x1,0x22
0890 e223       | #  |		Load	0x1,0x23
0891 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
0892 8005       |    |		Call	0x0,0x5
0893 003b       | ;  |		Store_Top	Access,At_Offset_3
0894 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0895 00da       |    |		Load_Top	At_Offset_2
0896 e222       | "  |		Load	0x1,0x22
0897 e223       | #  |		Load	0x1,0x23
0898 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
0899 8005       |    |		Call	0x0,0x5
089a 003b       | ;  |		Store_Top	Access,At_Offset_3
089b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
089c 00da       |    |		Load_Top	At_Offset_2
089d 0229       | )  |		Execute	Access,All_Read
089e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
089f 00d8       |    |		Load_Top	At_Offset_0
08a0 2e0a       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa
08a1 8016       |    |		Call	0x0,0x16
08a2 00d9       |    |		Load_Top	At_Offset_1
08a3 2a0a       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xa
08a4 00d1       |    |		Pop_Control	Pop_Count_1
08a5 00da       |    |		Load_Top	At_Offset_2
08a6 e222       | "  |		Load	0x1,0x22
08a7 e223       | #  |		Load	0x1,0x23
08a8 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
08a9 8005       |    |		Call	0x0,0x5
08aa 003b       | ;  |		Store_Top	Access,At_Offset_3
08ab 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
08ac 0000 0000  |    |		.BLANK	0000[0x4]
08b0 ; --------------------------------------------------------------------------------------
08b0 ; SUBPROGRAM
08b0 ; --------------------------------------------------------------------------------------
08b0 08b3       |    |		.CONST	0x08b3								; Address of begin
08b1 0004       |    |		.CONST	0x0004								; Address of exception handler
08b2 0001       |    |		.CONST	0x0001								; Number of locals
08b3			BODY_08b0:
08b3			INIT_08b0:
08b3 4609       |F   |		Jump_Case	0xa
08b4 7809       |x   |		Jump	0x8be								; case 0x0
08b5 7854       |xT  |		Jump	0x90a								; case 0x1
08b6 7872       |xr  |		Jump	0x929								; case 0x2
08b7 7875       |xu  |		Jump	0x92d								; case 0x3
08b8 78c6       |x   |		Jump	0x97f								; case 0x4
08b9 78c5       |x   |		Jump	0x97f								; case 0x5
08ba 7878       |xx  |		Jump	0x933								; case 0x6
08bb 7895       |x   |		Jump	0x951								; case 0x7
08bc 78b7       |x   |		Jump	0x974								; case 0x8
08bd 78bd       |x   |		Jump	0x97b								; case 0x9
08be 00da       |    |		Load_Top	At_Offset_2
08bf 016c       | l  |		Execute	Variant_Record,Is_Constrained
08c0 7009       |p   |		Jump_Nonzero	0x8ca
08c1 00cf       |    |		Action	Mark_Auxiliary
08c2 480b       |H   |		Short_Literal	0xb
08c3 e5ff       |    |		Load	0x2,-0x1
08c4 1c08       |    |		Execute_Immediate	Run_Utility,0x8
08c5 00d8       |    |		Load_Top	At_Offset_0
08c6 1c00       |    |		Execute_Immediate	Run_Utility,0x0
08c7 c5ff       |    |		Store	0x2,-0x1
08c8 00ce       |    |		Action	Pop_Auxiliary
08c9 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
08ca 00da       |    |		Load_Top	At_Offset_2
08cb 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
08cc 00db       |    |		Load_Top	At_Offset_3
08cd 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
08ce 00da       |    |		Load_Top	At_Offset_2
08cf 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
08d0 460b       |F   |		Jump_Case	0xc
08d1 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
08d2 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
08d3 780a       |x   |		Jump	0x8de								; case 0x2
08d4 7814       |x   |		Jump	0x8e9								; case 0x3
08d5 7813       |x   |		Jump	0x8e9								; case 0x4
08d6 7812       |x   |		Jump	0x8e9								; case 0x5
08d7 7811       |x   |		Jump	0x8e9								; case 0x6
08d8 781b       |x   |		Jump	0x8f4								; case 0x7
08d9 7820       |x   |		Jump	0x8fa								; case 0x8
08da 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x9
08db 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0xa
08dc 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0xb
08dd 4302       |C   |		.XXX[0x1]
08de 00da       |    |		Load_Top	At_Offset_2
08df 2208       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x8
08e0 00da       |    |		Load_Top	At_Offset_2
08e1 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
08e2 1c00       |    |		Execute_Immediate	Run_Utility,0x0
08e3 00da       |    |		Load_Top	At_Offset_2
08e4 2209       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x9
08e5 00da       |    |		Load_Top	At_Offset_2
08e6 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
08e7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
08e8 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
08e9 00da       |    |		Load_Top	At_Offset_2
08ea 220b       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0xb
08eb 00da       |    |		Load_Top	At_Offset_2
08ec 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
08ed 1c00       |    |		Execute_Immediate	Run_Utility,0x0
08ee 00da       |    |		Load_Top	At_Offset_2
08ef 220c       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0xc
08f0 00da       |    |		Load_Top	At_Offset_2
08f1 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
08f2 1c00       |    |		Execute_Immediate	Run_Utility,0x0
08f3 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
08f4 00da       |    |		Load_Top	At_Offset_2
08f5 220d       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0xd
08f6 00da       |    |		Load_Top	At_Offset_2
08f7 260d       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xd
08f8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
08f9 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
08fa 00da       |    |		Load_Top	At_Offset_2
08fb 220f       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0xf
08fc 00da       |    |		Load_Top	At_Offset_2
08fd 260f       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xf
08fe 1c00       |    |		Execute_Immediate	Run_Utility,0x0
08ff 00da       |    |		Load_Top	At_Offset_2
0900 2210       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x10
0901 00da       |    |		Load_Top	At_Offset_2
0902 2610       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x10
0903 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0904 00da       |    |		Load_Top	At_Offset_2
0905 2211       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x11
0906 00da       |    |		Load_Top	At_Offset_2
0907 2611       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x11
0908 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0909 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
090a 00da       |    |		Load_Top	At_Offset_2
090b 016b       | k  |		Execute	Variant_Record,Read_Variant
090c 00d8       |    |		Load_Top	At_Offset_0
090d 0f03       |    |		Execute_Immediate	Equal,0x3
090e 6804       |h   |		Jump_Zero	0x913
090f 00db       |    |		Load_Top	At_Offset_3
0910 2208       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x8
0911 00db       |    |		Load_Top	At_Offset_3
0912 2209       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x9
0913 00d8       |    |		Load_Top	At_Offset_0
0914 0f04       |    |		Execute_Immediate	Equal,0x4
0915 6804       |h   |		Jump_Zero	0x91a
0916 00db       |    |		Load_Top	At_Offset_3
0917 220b       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0xb
0918 00db       |    |		Load_Top	At_Offset_3
0919 220c       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0xc
091a 00d8       |    |		Load_Top	At_Offset_0
091b 0f05       |    |		Execute_Immediate	Equal,0x5
091c 6802       |h   |		Jump_Zero	0x91f
091d 00db       |    |		Load_Top	At_Offset_3
091e 220d       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0xd
091f 00d8       |    |		Load_Top	At_Offset_0
0920 0f06       |    |		Execute_Immediate	Equal,0x6
0921 6806       |h   |		Jump_Zero	0x928
0922 00db       |    |		Load_Top	At_Offset_3
0923 220f       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0xf
0924 00db       |    |		Load_Top	At_Offset_3
0925 2210       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x10
0926 00db       |    |		Load_Top	At_Offset_3
0927 2211       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x11
0928 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0929 4801       |H   |		Short_Literal	0x1
092a 4812       |H   |		Short_Literal	0x12
092b 0311       |    |		Declare_Type	Variant_Record,Constrained_Incomplete
092c 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
092d e5fd       |    |		Load	0x2,-0x3
092e 00db       |    |		Load_Top	At_Offset_3
092f 1c07       |    |		Execute_Immediate	Run_Utility,0x7
0930 e5fe       |    |		Load	0x2,-0x2
0931 0306       |    |		Complete_Type	Variant_Record,By_Renaming
0932 4304       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x4
0933 00db       |    |		Load_Top	At_Offset_3
0934 460b       |F   |		Jump_Case	0xc
0935 780d       |x   |		Jump	0x943								; case 0x0
0936 780e       |x   |		Jump	0x945								; case 0x1
0937 780f       |x   |		Jump	0x947								; case 0x2
0938 7810       |x   |		Jump	0x949								; case 0x3
0939 780f       |x   |		Jump	0x949								; case 0x4
093a 780e       |x   |		Jump	0x949								; case 0x5
093b 780d       |x   |		Jump	0x949								; case 0x6
093c 780e       |x   |		Jump	0x94b								; case 0x7
093d 780f       |x   |		Jump	0x94d								; case 0x8
093e 7810       |x   |		Jump	0x94f								; case 0x9
093f 7801       |x   |		Jump	0x941								; case 0xa
0940 7800       |x   |		Jump	0x941								; case 0xb
0941 48ff       |H   |		Short_Literal	0xff
0942 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0943 4801       |H   |		Short_Literal	0x1
0944 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0945 4802       |H   |		Short_Literal	0x2
0946 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0947 4803       |H   |		Short_Literal	0x3
0948 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0949 4804       |H   |		Short_Literal	0x4
094a 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
094b 4805       |H   |		Short_Literal	0x5
094c 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
094d 4806       |H   |		Short_Literal	0x6
094e 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
094f 4807       |H   |		Short_Literal	0x7
0950 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0951 00db       |    |		Load_Top	At_Offset_3
0952 e5fe       |    |		Load	0x2,-0x2
0953 460b       |F   |		Jump_Case	0xc
0954 780d       |x   |		Jump	0x962								; case 0x0
0955 780e       |x   |		Jump	0x964								; case 0x1
0956 780f       |x   |		Jump	0x966								; case 0x2
0957 7810       |x   |		Jump	0x968								; case 0x3
0958 780f       |x   |		Jump	0x968								; case 0x4
0959 780e       |x   |		Jump	0x968								; case 0x5
095a 780d       |x   |		Jump	0x968								; case 0x6
095b 780e       |x   |		Jump	0x96a								; case 0x7
095c 780f       |x   |		Jump	0x96c								; case 0x8
095d 7810       |x   |		Jump	0x96e								; case 0x9
095e 7811       |x   |		Jump	0x970								; case 0xa
095f 7800       |x   |		Jump	0x960								; case 0xb
0960 48ff       |H   |		Short_Literal	0xff
0961 780f       |x   |		Jump	0x971
0962 4801       |H   |		Short_Literal	0x1
0963 780d       |x   |		Jump	0x971
0964 4802       |H   |		Short_Literal	0x2
0965 780b       |x   |		Jump	0x971
0966 4803       |H   |		Short_Literal	0x3
0967 7809       |x   |		Jump	0x971
0968 4804       |H   |		Short_Literal	0x4
0969 7807       |x   |		Jump	0x971
096a 4805       |H   |		Short_Literal	0x5
096b 7805       |x   |		Jump	0x971
096c 4806       |H   |		Short_Literal	0x6
096d 7803       |x   |		Jump	0x971
096e 4807       |H   |		Short_Literal	0x7
096f 7801       |x   |		Jump	0x971
0970 48ff       |H   |		Short_Literal	0xff
0971 e5ff       |    |		Load	0x2,-0x1
0972 031b       |    |		Declare_Type	Variant_Record,Constrained
0973 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0974 00db       |    |		Load_Top	At_Offset_3
0975 e5fe       |    |		Load	0x2,-0x2
0976 e5ff       |    |		Load	0x2,-0x1
0977 1c06       |    |		Execute_Immediate	Run_Utility,0x6
0978 e5ff       |    |		Load	0x2,-0x1
0979 02fc       |    |		Declare_Variable	Variant_Record,With_Constraint
097a 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
097b 480b       |H   |		Short_Literal	0xb
097c 00db       |    |		Load_Top	At_Offset_3
097d 1c07       |    |		Execute_Immediate	Run_Utility,0x7
097e 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
097f 0869       | i  |		Execute_Immediate	Raise,0x69
0980 ; --------------------------------------------------------------------------------------
0980 ; SUBPROGRAM
0980 ; --------------------------------------------------------------------------------------
0980 0983       |    |		.CONST	0x0983								; Address of begin
0981 0004       |    |		.CONST	0x0004								; Address of exception handler
0982 0001       |    |		.CONST	0x0001								; Number of locals
0983			BODY_0980:
0983			INIT_0980:
0983 4601       |F   |		Jump_Case	0x2
0984 7801       |x   |		Jump	0x986								; case 0x0
0985 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
0986 00da       |    |		Load_Top	At_Offset_2
0987 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0988 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0989 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
098a ; --------------------------------------------------------------------------------------
098a ; STRING TABLE
098a ; --------------------------------------------------------------------------------------
098a 0086       |    |		.STRTAB	0x0086->0x09cd							; "SI_ALORS_SINON"
098b 0092       |    |		.STRTAB	0x0092->0x09d4							; "POUR_FAIRE"
098c 009a       |    |		.STRTAB	0x009a->0x09d9							; "AFFECTATION"
098d 00a3       |    |		.STRTAB	0x00a3->0x09de							; "LIE_CONNEXION"
098e 00ae       |    |		.STRTAB	0x00ae->0x09e5							; "DELIE_CONNEXION"
098f 00bb       |    |		.STRTAB	0x00bb->0x09ec							; "LIE_LIEN"
0990 00c1       |    |		.STRTAB	0x00c1->0x09f0							; "DELIE_LIEN"
0991 00c9       |    |		.STRTAB	0x00c9->0x09f5							; "LISTE_LIEN"
0992 00d1       |    |		.STRTAB	0x00d1->0x09fa							; "ECHANGER_LIEN"
0993 00dc       |    |		.STRTAB	0x00dc->0x0a01							; "AFFICHER"
0994 00e2       |    |		.STRTAB	0x00e2->0x0a05							; "FIN"
0995 00e3       |    |		.STRTAB	0x00e3->0x0a06							; "VIDE"
0996 00e5       |    |		.STRTAB	0x00e5->0x0a08							; " , "
0997 00e6       |    |		.STRTAB	0x00e6->0x0a0a							; "."
0998 00e5       |    |		.STRTAB	0x00e5->0x0a0a							; " = "
0999 00e6       |    |		.STRTAB	0x00e6->0x0a0c							; " "
099a 00e5       |    |		.STRTAB	0x00e5->0x0a0c							; "-- Vide"
099b 00ea       |    |		.STRTAB	0x00ea->0x0a10							; "SI"
099c 00ea       |    |		.STRTAB	0x00ea->0x0a11							; "ALORS"
099d 00ed       |    |		.STRTAB	0x00ed->0x0a13							; "SINON"
099e 00f0       |    |		.STRTAB	0x00f0->0x0a16							; "FIN_SI"
099f 00f4       |    |		.STRTAB	0x00f4->0x0a19							; "POUR "
09a0 00f7       |    |		.STRTAB	0x00f7->0x0a1b							; " ENTREE FAIRE "
09a1 0103       |    |		.STRTAB	0x0103->0x0a22							; "FIN_POUR"
09a2 0109       |    |		.STRTAB	0x0109->0x0a26							; "LIE_CONNEXION ( "
09a3 0117       |    |		.STRTAB	0x0117->0x0a2e							; ", "
09a4 0117       |    |		.STRTAB	0x0117->0x0a2f							; " )"
09a5 0117       |    |		.STRTAB	0x0117->0x0a30							; "DELIE_CONNEXION ( "
09a6 0127       | '  |		.STRTAB	0x0127->0x0a39							; "LIE_LIEN ( "
09a7 0130       | 0  |		.STRTAB	0x0130->0x0a3f							; "DELIE_LIEN ( "
09a8 013b       | ;  |		.STRTAB	0x013b->0x0a45							; "LISTE_LIEN ( "
09a9 0146       | F  |		.STRTAB	0x0146->0x0a4c							; "ECHANGER_LIEN ( "
09aa 0154       | T  |		.STRTAB	0x0154->0x0a54							; "-- fonction afficher "
09ab 0167       | g  |		.STRTAB	0x0167->0x0a5e							; " execution de si-alors-sinon "
09ac 0182       |    |		.STRTAB	0x0182->0x0a6d							; " verifiee execution de alors "
09ad 019d       |    |		.STRTAB	0x019d->0x0a7b							; " non verifiee execution de sinon "
09ae 01bc       |    |		.STRTAB	0x01bc->0x0a8c							; " fin de si-alors-sinon "
09af 01d1       |    |		.STRTAB	0x01d1->0x0a97							; " execution de pour-faire =>"
09b0 01ea       |    |		.STRTAB	0x01ea->0x0aa5							; " condition verifiee "
09b1 01fc       |    |		.STRTAB	0x01fc->0x0aaf							; " fin de pour-faire "
09b2 020d       |    |		.STRTAB	0x020d->0x0ab8							; " execution affectation "
09b3 0222       | "  |		.STRTAB	0x0222->0x0ac4							; "Manque l'extension pour l'acces a la variable !!!"
09b4 0251       | Q  |		.STRTAB	0x0251->0x0adc							; "ENTIER"
09b5 0255       | U  |		.STRTAB	0x0255->0x0adf							; "ENUMERE"
09b6 025a       | Z  |		.STRTAB	0x025a->0x0ae3							; "BOOLEEN"
09b7 025f       | _  |		.STRTAB	0x025f->0x0ae6							; "Affectation non valide !!!"
09b8 0277       | w  |		.STRTAB	0x0277->0x0af3							; " fin de affectation "
09b9 0289       |    |		.STRTAB	0x0289->0x0afd							; " execution lie_connexion "
09ba 02a0       |    |		.STRTAB	0x02a0->0x0b0a							; "COMP"
09bb 02a2       |    |		.STRTAB	0x02a2->0x0b0c							; " fin de lie_connexion "
09bc 02b6       |    |		.STRTAB	0x02b6->0x0b17							; " execution delie_connexion "
09bd 02cf       |    |		.STRTAB	0x02cf->0x0b24							; " fin de delie_connexion "
09be 02e5       |    |		.STRTAB	0x02e5->0x0b30							; " execution lie_lien "
09bf 02f7       |    |		.STRTAB	0x02f7->0x0b3a							; " fin de lie_lien "
09c0 0306       |    |		.STRTAB	0x0306->0x0b43							; " execution delie_lien "
09c1 031a       |    |		.STRTAB	0x031a->0x0b4e							; " fin de delie_lien "
09c2 032b       | +  |		.STRTAB	0x032b->0x0b57							; " execution liste_lien "
09c3 033f       | ?  |		.STRTAB	0x033f->0x0b62							; " fin de liste_lien "
09c4 0350       | P  |		.STRTAB	0x0350->0x0b6c							; " execution echanger_lien "
09c5 0367       | g  |		.STRTAB	0x0367->0x0b78							; " fin de echanger_lien "
09c6 037b       | {  |		.STRTAB	0x037b->0x0b83							; " execution afficher "
09c7 038d       |    |		.STRTAB	0x038d->0x0b8d							; " fin de afficher "
09c8 039c       |    |		.STRTAB	0x039c->0x0b96							; " execution fin "
09c9 03a9       |    |		.STRTAB	0x03a9->0x0b9d							; " fin de fin "
09ca 03b3       |    |		.STRTAB	0x03b3->0x0ba3							; " execution vide "
09cb 03c1       |    |		.STRTAB	0x03c1->0x0bab							; " fin de vide "
09cc 03cc       |    |		.STREND 0x03cc->0x0bb2
09cd 5349 5f41  |SI_A|		.STRTAB_STRINGS
0bb2 0000 0000  |    |		.BLANK	0000[0x6]
0bb8 ; --------------------------------------------------------------------------------------
0bb8 ; Debug Table
0bb8 ; --------------------------------------------------------------------------------------
0bb8 0004 0008  |    |		.DEBUG4	0x0004,0x0008,0xb456,0x0000,0x0001,0x002d
0bbe 000b 0c72  |   r|		.DBG4T	0x000b,0x0c72,0x8000,0x8000
0bc2 0080 0c9e  |    |		.DBG4T	0x0080,0x0c9e,0x8000,0x8000
0bc6 00fb 0d0a  |    |		.DBG4T	0x00fb,0x0d0a,0x0002,0x0000
0bca 0103 0d0d  |    |		.DBG4T	0x0103,0x0d0d,0x0001,0x4000
0bce 011b 0d1a  |    |		.DBG4T	0x011b,0x0d1a,0x0001,0x0000
0bd2 0133 0d22  | 3 "|		.DBG4T	0x0133,0x0d22,0x0001,0x4000
0bd6 01ab 0d48  |   H|		.DBG4T	0x01ab,0x0d48,0x0002,0x0000
0bda 01cb 0d53  |   S|		.DBG4T	0x01cb,0x0d53,0x0002,0x0000
0bde 01eb 0d5c  |   \|		.DBG4T	0x01eb,0x0d5c,0x0002,0x0000
0be2 020b 0d66  |   f|		.DBG4T	0x020b,0x0d66,0x0002,0x0000
0be6 022b 0d6f  | + o|		.DBG4T	0x022b,0x0d6f,0x0002,0x0000
0bea 024b 0d78  | K x|		.DBG4T	0x024b,0x0d78,0x0002,0x0000
0bee 026b 0d81  | k  |		.DBG4T	0x026b,0x0d81,0x0002,0x0000
0bf2 028b 0d8a  |    |		.DBG4T	0x028b,0x0d8a,0x0002,0x0000
0bf6 02ab 0d94  |    |		.DBG4T	0x02ab,0x0d94,0x0002,0x0000
0bfa 02cb 0d9d  |    |		.DBG4T	0x02cb,0x0d9d,0x0002,0x0000
0bfe 02e3 0da5  |    |		.DBG4T	0x02e3,0x0da5,0x0002,0x0000
0c02 02fb 0dac  |    |		.DBG4T	0x02fb,0x0dac,0x0002,0x0000
0c06 0313 0db3  |    |		.DBG4T	0x0313,0x0db3,0x0001,0x0000
0c0a 031b 0000  |    |		.DBG4T	0x031b,0x0000,0x0005,0x0000
0c0e 0343 0db6  | C  |		.DBG4T	0x0343,0x0db6,0x0002,0x4000
0c12 0363 0dc8  | c  |		.DBG4T	0x0363,0x0dc8,0x0001,0x0000
0c16 037b 0dcd  | {  |		.DBG4T	0x037b,0x0dcd,0x0002,0x0000
0c1a 0383 0dd0  |    |		.DBG4T	0x0383,0x0dd0,0x0001,0x0000
0c1e 0393 0dd4  |    |		.DBG4T	0x0393,0x0dd4,0x0002,0x0000
0c22 039b 0dd7  |    |		.DBG4T	0x039b,0x0dd7,0x0002,0x0000
0c26 03a3 0dda  |    |		.DBG4T	0x03a3,0x0dda,0x0002,0x0000
0c2a 03b3 0ddf  |    |		.DBG4T	0x03b3,0x0ddf,0x0001,0x4000
0c2e 045b 0e09  | [  |		.DBG4T	0x045b,0x0e09,0x0001,0x0000
0c32 046b 0e0d  | k  |		.DBG4T	0x046b,0x0e0d,0x0001,0x4000
0c36 05bb 0e6b  |   k|		.DBG4T	0x05bb,0x0e6b,0x0001,0x0000
0c3a 05f3 0e77  |   w|		.DBG4T	0x05f3,0x0e77,0x0001,0x0000
0c3e 0613 0e7e  |   ~|		.DBG4T	0x0613,0x0e7e,0x0001,0x0000
0c42 067b 0e8e  | {  |		.DBG4T	0x067b,0x0e8e,0x0001,0x0000
0c46 06bb 0e98  |    |		.DBG4T	0x06bb,0x0e98,0x0001,0x0000
0c4a 06fb 0ea2  |    |		.DBG4T	0x06fb,0x0ea2,0x0001,0x0000
0c4e 073b 0eac  | ;  |		.DBG4T	0x073b,0x0eac,0x0001,0x0000
0c52 077b 0eb6  | {  |		.DBG4T	0x077b,0x0eb6,0x0001,0x0000
0c56 07bb 0ec2  |    |		.DBG4T	0x07bb,0x0ec2,0x0001,0x0000
0c5a 081b 0ece  |    |		.DBG4T	0x081b,0x0ece,0x0001,0x0000
0c5e 082b 0ed3  | +  |		.DBG4T	0x082b,0x0ed3,0x0001,0x0000
0c62 083b 0ed8  | ;  |		.DBG4T	0x083b,0x0ed8,0x0001,0x0000
0c66 084b 0edd  | K  |		.DBG4T	0x084b,0x0edd,0x0001,0x4000
0c6a 08b3 0000  |    |		.DBG4T	0x08b3,0x0000,0x0005,0x0000
0c6e 0983 0000  |    |		.DBG4T	0x0983,0x0000,0x0005,0x0000
0c72 ; --------------------------------------------------------------------------------------
0c72 ; Debug chain
0c72 ; --------------------------------------------------------------------------------------
0c72 0015 0000  |    |		.DBGLEN	0x0015,0x0000
0c74 000b 000d  |    |		.DBGLNO	0x000b,0x000d,0x000f,0x0011,0x0013,0x0015,0x0017,0x0019,0x001b,0x001d,0x001f,0x0021,0x0023,0x0025,0x0027,0x0029,0x002b,0x002d,0x002f,0x0034,0x0075
0c89 0001 0002  |    |		.XXX[0x15]
0c8b 0003 0004  |    |
0c8d 0005 0006  |    |
0c8f 0007 0008  |    |
0c91 0009 000a  |    |
0c93 000b 000c  |    |
0c95 000d 000e  |    |
0c97 000f 0010  |    |
0c99 0011 0012  |    |
0c9b 0013 0014  |    |
0c9d 0017       |    |
0c9e ; --------------------------------------------------------------------------------------
0c9e ; Debug chain
0c9e ; --------------------------------------------------------------------------------------
0c9e 0035 0000  | 5  |		.DBGLEN	0x0035,0x0000
0ca0 0080 0088  |    |		.DBGLNO	0x0080,0x0088,0x008a,0x008c,0x008e,0x0090,0x0092,0x0094,0x0096,0x0098,0x009a,0x009c,0x009e,0x00a0,0x00a2,0x00a4,0x00a6,0x00a8,0x00aa,0x00ac,0x00ae,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,0x00e4,0x00e6,0x00e8,0x00ea,0x00ec,0x00ee
0cd5 0001 0003  |    |		.XXX[0x35]
0cd7 0004 0005  |    |
0cd9 0006 0007  |    |
0cdb 0008 0009  |    |
0cdd 000a 000b  |    |
0cdf 000c 000d  |    |
0ce1 000e 000f  |    |
0ce3 0010 0011  |    |
0ce5 0012 0013  |    |
0ce7 0014 0015  |    |
0ce9 0016 0017  |    |
0ceb 0018 0019  |    |
0ced 001a 001b  |    |
0cef 001c 001d  |    |
0cf1 001e 001f  |    |
0cf3 0020 0021  |   !|
0cf5 0022 0023  | " #|
0cf7 0024 0025  | $ %|
0cf9 0026 0027  | & '|
0cfb 0028 0029  | ( )|
0cfd 002a 002b  | * +|
0cff 002c 002d  | , -|
0d01 002e 002f  | . /|
0d03 0030 0031  | 0 1|
0d05 0032 0033  | 2 3|
0d07 0034 0035  | 4 5|
0d09 0036       | 6  |
0d0a ; --------------------------------------------------------------------------------------
0d0a ; Debug chain
0d0a ; --------------------------------------------------------------------------------------
0d0a 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0d0c 00fb       |    |		.DBGLNO	0x00fb
0d0d ; --------------------------------------------------------------------------------------
0d0d ; Debug chain
0d0d ; --------------------------------------------------------------------------------------
0d0d 0001 0005  |    |		.DBGLEN	0x0001,0x0005
0d0f 0103 0105  |    |		.DBGLNO	0x0103,0x0105,0x0109,0x010d,0x0110,0x0113
0d15 0001 0003  |    |		.XXX[0x5]
0d17 0004 0005  |    |
0d19 0002       |    |
0d1a ; --------------------------------------------------------------------------------------
0d1a ; Debug chain
0d1a ; --------------------------------------------------------------------------------------
0d1a 0001 0005  |    |		.DBGLEN	0x0001,0x0005
0d1c 011b 011d  |    |		.DBGLNO	0x011b,0x011d,0x011f,0x0121,0x0122,0x0125
0d22 ; --------------------------------------------------------------------------------------
0d22 ; Debug chain
0d22 ; --------------------------------------------------------------------------------------
0d22 0002 0011  |    |		.DBGLEN	0x0002,0x0011
0d24 0133 0137  | 3 7|		.DBGLNO	0x0133,0x0137,0x0139,0x013e,0x0142,0x0151,0x0154,0x015c,0x0164,0x016c,0x0173,0x017a,0x0181,0x0188,0x018f,0x0196,0x019b,0x019d,0x01a1
0d37 0001 0003  |    |		.XXX[0x11]
0d39 0004 0010  |    |
0d3b 0005 0006  |    |
0d3d 0007 0008  |    |
0d3f 0009 000a  |    |
0d41 000b 000c  |    |
0d43 000d 000e  |    |
0d45 000f 0011  |    |
0d47 0002       |    |
0d48 ; --------------------------------------------------------------------------------------
0d48 ; Debug chain
0d48 ; --------------------------------------------------------------------------------------
0d48 0002 0007  |    |		.DBGLEN	0x0002,0x0007
0d4a 01ab 01ad  |    |		.DBGLNO	0x01ab,0x01ad,0x01b2,0x01b4,0x01b7,0x01ba,0x01bd,0x01c0,0x01c4
0d53 ; --------------------------------------------------------------------------------------
0d53 ; Debug chain
0d53 ; --------------------------------------------------------------------------------------
0d53 0002 0005  |    |		.DBGLEN	0x0002,0x0005
0d55 01cb 01cd  |    |		.DBGLNO	0x01cb,0x01cd,0x01d2,0x01d5,0x01d8,0x01db,0x01df
0d5c ; --------------------------------------------------------------------------------------
0d5c ; Debug chain
0d5c ; --------------------------------------------------------------------------------------
0d5c 0002 0006  |    |		.DBGLEN	0x0002,0x0006
0d5e 01eb 01ed  |    |		.DBGLNO	0x01eb,0x01ed,0x01f2,0x01f5,0x01f8,0x01fb,0x01fe,0x0202
0d66 ; --------------------------------------------------------------------------------------
0d66 ; Debug chain
0d66 ; --------------------------------------------------------------------------------------
0d66 0002 0005  |    |		.DBGLEN	0x0002,0x0005
0d68 020b 020d  |    |		.DBGLNO	0x020b,0x020d,0x0212,0x0215,0x0218,0x021b,0x021f
0d6f ; --------------------------------------------------------------------------------------
0d6f ; Debug chain
0d6f ; --------------------------------------------------------------------------------------
0d6f 0002 0005  |    |		.DBGLEN	0x0002,0x0005
0d71 022b 022d  | + -|		.DBGLNO	0x022b,0x022d,0x0232,0x0235,0x0238,0x023b,0x023f
0d78 ; --------------------------------------------------------------------------------------
0d78 ; Debug chain
0d78 ; --------------------------------------------------------------------------------------
0d78 0002 0005  |    |		.DBGLEN	0x0002,0x0005
0d7a 024b 024d  | K M|		.DBGLNO	0x024b,0x024d,0x0252,0x0255,0x0258,0x025b,0x025f
0d81 ; --------------------------------------------------------------------------------------
0d81 ; Debug chain
0d81 ; --------------------------------------------------------------------------------------
0d81 0002 0005  |    |		.DBGLEN	0x0002,0x0005
0d83 026b 026d  | k m|		.DBGLNO	0x026b,0x026d,0x0272,0x0275,0x0278,0x027b,0x027f
0d8a ; --------------------------------------------------------------------------------------
0d8a ; Debug chain
0d8a ; --------------------------------------------------------------------------------------
0d8a 0002 0006  |    |		.DBGLEN	0x0002,0x0006
0d8c 028b 028d  |    |		.DBGLNO	0x028b,0x028d,0x0292,0x0295,0x0298,0x029b,0x029e,0x02a2
0d94 ; --------------------------------------------------------------------------------------
0d94 ; Debug chain
0d94 ; --------------------------------------------------------------------------------------
0d94 0002 0005  |    |		.DBGLEN	0x0002,0x0005
0d96 02ab 02ad  |    |		.DBGLNO	0x02ab,0x02ad,0x02b2,0x02b5,0x02b8,0x02bb,0x02bf
0d9d ; --------------------------------------------------------------------------------------
0d9d ; Debug chain
0d9d ; --------------------------------------------------------------------------------------
0d9d 0002 0004  |    |		.DBGLEN	0x0002,0x0004
0d9f 02cb 02cd  |    |		.DBGLNO	0x02cb,0x02cd,0x02d2,0x02d5,0x02d8,0x02dc
0da5 ; --------------------------------------------------------------------------------------
0da5 ; Debug chain
0da5 ; --------------------------------------------------------------------------------------
0da5 0002 0003  |    |		.DBGLEN	0x0002,0x0003
0da7 02e3 02e5  |    |		.DBGLNO	0x02e3,0x02e5,0x02ea,0x02ed,0x02f1
0dac ; --------------------------------------------------------------------------------------
0dac ; Debug chain
0dac ; --------------------------------------------------------------------------------------
0dac 0002 0003  |    |		.DBGLEN	0x0002,0x0003
0dae 02fb 02fd  |    |		.DBGLNO	0x02fb,0x02fd,0x0302,0x0305,0x0309
0db3 ; --------------------------------------------------------------------------------------
0db3 ; Debug chain
0db3 ; --------------------------------------------------------------------------------------
0db3 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0db5 0313       |    |		.DBGLNO	0x0313
0db6 ; --------------------------------------------------------------------------------------
0db6 ; Debug chain
0db6 ; --------------------------------------------------------------------------------------
0db6 0002 0007  |    |		.DBGLEN	0x0002,0x0007
0db8 0343 0345  | C E|		.DBGLNO	0x0343,0x0345,0x0347,0x0349,0x034b,0x034f,0x0351,0x0356,0x0359
0dc1 0001 0002  |    |		.XXX[0x7]
0dc3 0003 0005  |    |
0dc5 0006 0004  |    |
0dc7 0007       |    |
0dc8 ; --------------------------------------------------------------------------------------
0dc8 ; Debug chain
0dc8 ; --------------------------------------------------------------------------------------
0dc8 0001 0002  |    |		.DBGLEN	0x0001,0x0002
0dca 0363 0365  | c e|		.DBGLNO	0x0363,0x0365,0x0370
0dcd ; --------------------------------------------------------------------------------------
0dcd ; Debug chain
0dcd ; --------------------------------------------------------------------------------------
0dcd 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0dcf 037b       | {  |		.DBGLNO	0x037b
0dd0 ; --------------------------------------------------------------------------------------
0dd0 ; Debug chain
0dd0 ; --------------------------------------------------------------------------------------
0dd0 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0dd2 0383 0385  |    |		.DBGLNO	0x0383,0x0385
0dd4 ; --------------------------------------------------------------------------------------
0dd4 ; Debug chain
0dd4 ; --------------------------------------------------------------------------------------
0dd4 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0dd6 0393       |    |		.DBGLNO	0x0393
0dd7 ; --------------------------------------------------------------------------------------
0dd7 ; Debug chain
0dd7 ; --------------------------------------------------------------------------------------
0dd7 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0dd9 039b       |    |		.DBGLNO	0x039b
0dda ; --------------------------------------------------------------------------------------
0dda ; Debug chain
0dda ; --------------------------------------------------------------------------------------
0dda 0001 0002  |    |		.DBGLEN	0x0001,0x0002
0ddc 03a3 03a5  |    |		.DBGLNO	0x03a3,0x03a5,0x03a7
0ddf ; --------------------------------------------------------------------------------------
0ddf ; Debug chain
0ddf ; --------------------------------------------------------------------------------------
0ddf 0000 0014  |    |		.DBGLEN	0x0000,0x0014
0de1 03b3 03c3  |    |		.DBGLNO	0x03b3,0x03c3,0x03cc,0x03d3,0x03dc,0x03e3,0x03ec,0x03f4,0x03fd,0x0406,0x040d,0x0414,0x041d,0x0424,0x042d,0x0434,0x043a,0x0440,0x0449,0x044d
0df5 0001 0007  |    |		.XXX[0x14]
0df7 0008 0009  |    |
0df9 000a 000f  |    |
0dfb 0010 0011  |    |
0dfd 0012 0013  |    |
0dff 0014 000b  |    |
0e01 000c 000d  |    |
0e03 000e 0002  |    |
0e05 0003 0004  |    |
0e07 0005 0006  |    |
0e09 ; --------------------------------------------------------------------------------------
0e09 ; Debug chain
0e09 ; --------------------------------------------------------------------------------------
0e09 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0e0b 045c 0460  | \ `|		.DBGLNO	0x045c,0x0460
0e0d ; --------------------------------------------------------------------------------------
0e0d ; Debug chain
0e0d ; --------------------------------------------------------------------------------------
0e0d 0002 002d  |   -|		.DBGLEN	0x0002,0x002d
0e0f 046b 046d  | k m|		.DBGLNO	0x046b,0x046d,0x0471,0x0476,0x047a,0x0489,0x048b,0x0490,0x0492,0x0496,0x04a0,0x04a2,0x04a6,0x04b0,0x04b2,0x04b6,0x04c0,0x04c2,0x04c7,0x04c9,0x04d5,0x04df,0x04e1,0x04e6,0x04e8,0x04ee,0x04f4,0x04fd,0x0501,0x050c,0x050e,0x0523,0x0525,0x053a,0x053c,0x0551,0x0553,0x0568,0x056a,0x0580,0x0582,0x059f,0x05a1,0x05a6,0x05a8,0x05ac,0x05b0
0e3e 0001 0003  |    |		.XXX[0x2d]
0e40 0004 002b  |   +|
0e42 002c 0005  | ,  |
0e44 0006 0007  |    |
0e46 0008 0009  |    |
0e48 000a 000b  |    |
0e4a 000c 000d  |    |
0e4c 000e 000f  |    |
0e4e 0010 0011  |    |
0e50 0012 0013  |    |
0e52 0014 0015  |    |
0e54 0016 0017  |    |
0e56 0018 0019  |    |
0e58 001a 001b  |    |
0e5a 001c 001d  |    |
0e5c 001e 001f  |    |
0e5e 0020 0021  |   !|
0e60 0022 0023  | " #|
0e62 0024 0025  | $ %|
0e64 0026 0027  | & '|
0e66 0028 0029  | ( )|
0e68 002a 002d  | * -|
0e6a 0002       |    |
0e6b ; --------------------------------------------------------------------------------------
0e6b ; Debug chain
0e6b ; --------------------------------------------------------------------------------------
0e6b 0001 0009  |    |		.DBGLEN	0x0001,0x0009
0e6d 05bb 05bc  |    |		.DBGLNO	0x05bb,0x05bc,0x05c0,0x05c8,0x05cb,0x05cd,0x05d1,0x05da,0x05de,0x05e6
0e77 ; --------------------------------------------------------------------------------------
0e77 ; Debug chain
0e77 ; --------------------------------------------------------------------------------------
0e77 0000 0005  |    |		.DBGLEN	0x0000,0x0005
0e79 05f3 05f7  |    |		.DBGLNO	0x05f3,0x05f7,0x05fc,0x0600,0x0608
0e7e ; --------------------------------------------------------------------------------------
0e7e ; Debug chain
0e7e ; --------------------------------------------------------------------------------------
0e7e 0002 000c  |    |		.DBGLEN	0x0002,0x000c
0e80 0613 0614  |    |		.DBGLNO	0x0613,0x0614,0x0615,0x0619,0x061b,0x0620,0x0627,0x0628,0x062c,0x064a,0x0653,0x0662,0x066b,0x066e
0e8e ; --------------------------------------------------------------------------------------
0e8e ; Debug chain
0e8e ; --------------------------------------------------------------------------------------
0e8e 0000 0008  |    |		.DBGLEN	0x0000,0x0008
0e90 067b 067f  | {  |		.DBGLNO	0x067b,0x067f,0x0681,0x0689,0x0693,0x069b,0x06a5,0x06b1
0e98 ; --------------------------------------------------------------------------------------
0e98 ; Debug chain
0e98 ; --------------------------------------------------------------------------------------
0e98 0000 0008  |    |		.DBGLEN	0x0000,0x0008
0e9a 06bb 06bf  |    |		.DBGLNO	0x06bb,0x06bf,0x06c1,0x06c9,0x06d3,0x06db,0x06e5,0x06f1
0ea2 ; --------------------------------------------------------------------------------------
0ea2 ; Debug chain
0ea2 ; --------------------------------------------------------------------------------------
0ea2 0000 0008  |    |		.DBGLEN	0x0000,0x0008
0ea4 06fb 06ff  |    |		.DBGLNO	0x06fb,0x06ff,0x0701,0x0709,0x0713,0x071b,0x0725,0x0731
0eac ; --------------------------------------------------------------------------------------
0eac ; Debug chain
0eac ; --------------------------------------------------------------------------------------
0eac 0000 0008  |    |		.DBGLEN	0x0000,0x0008
0eae 073b 073f  | ; ?|		.DBGLNO	0x073b,0x073f,0x0741,0x0749,0x0753,0x075b,0x0765,0x0771
0eb6 ; --------------------------------------------------------------------------------------
0eb6 ; Debug chain
0eb6 ; --------------------------------------------------------------------------------------
0eb6 0000 000a  |    |		.DBGLEN	0x0000,0x000a
0eb8 077b 077f  | {  |		.DBGLNO	0x077b,0x077f,0x0781,0x0785,0x078d,0x0792,0x079a,0x07a2,0x07a7,0x07ae
0ec2 ; --------------------------------------------------------------------------------------
0ec2 ; Debug chain
0ec2 ; --------------------------------------------------------------------------------------
0ec2 0000 000a  |    |		.DBGLEN	0x0000,0x000a
0ec4 07bb 07bf  |    |		.DBGLNO	0x07bb,0x07bf,0x07c1,0x07c9,0x07d6,0x07de,0x07eb,0x07f3,0x0800,0x080f
0ece ; --------------------------------------------------------------------------------------
0ece ; Debug chain
0ece ; --------------------------------------------------------------------------------------
0ece 0000 0003  |    |		.DBGLEN	0x0000,0x0003
0ed0 081b 081f  |    |		.DBGLNO	0x081b,0x081f,0x0821
0ed3 ; --------------------------------------------------------------------------------------
0ed3 ; Debug chain
0ed3 ; --------------------------------------------------------------------------------------
0ed3 0000 0003  |    |		.DBGLEN	0x0000,0x0003
0ed5 082b 082f  | + /|		.DBGLNO	0x082b,0x082f,0x0831
0ed8 ; --------------------------------------------------------------------------------------
0ed8 ; Debug chain
0ed8 ; --------------------------------------------------------------------------------------
0ed8 0000 0003  |    |		.DBGLEN	0x0000,0x0003
0eda 083b 083f  | ; ?|		.DBGLNO	0x083b,0x083f,0x0841
0edd ; --------------------------------------------------------------------------------------
0edd ; Debug chain
0edd ; --------------------------------------------------------------------------------------
0edd 0000 000b  |    |		.DBGLEN	0x0000,0x000b
0edf 084b 085c  | K \|		.DBGLNO	0x084b,0x085c,0x0863,0x086c,0x0875,0x087e,0x0885,0x088e,0x0895,0x089c,0x08a5
0eea 0001 000b  |    |		.XXX[0xb]
0eec 0002 0003  |    |
0eee 0004 0005  |    |
0ef0 0006 0007  |    |
0ef2 0008 0009  |    |
0ef4 000a       |    |
0ef5 0000 0000  |    |		.BLANK	0000[0x10b]