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

⟦62a41bbbc⟧

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

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« 
        └─⟦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 0ba8       |    |		.CONST	0x0ba8								; 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 01db  |    |		Declare_Subprogram	INIT_01d8,For_Outer_Call,Visible,Unelaborated
0017 029a 01fb  |    |		Declare_Subprogram	INIT_01f8,For_Outer_Call,Visible,Unelaborated
0019 029a 021b  |    |		Declare_Subprogram	INIT_0218,For_Outer_Call,Visible,Unelaborated
001b 029a 023b  |   ;|		Declare_Subprogram	INIT_0238,For_Outer_Call,Visible,Unelaborated
001d 029a 025b  |   [|		Declare_Subprogram	INIT_0258,For_Outer_Call,Visible,Unelaborated
001f 029a 027b  |   {|		Declare_Subprogram	INIT_0278,For_Outer_Call,Visible,Unelaborated
0021 029a 029b  |    |		Declare_Subprogram	INIT_0298,For_Outer_Call,Visible,Unelaborated
0023 029a 02bb  |    |		Declare_Subprogram	INIT_02b8,For_Outer_Call,Visible,Unelaborated
0025 029a 02db  |    |		Declare_Subprogram	INIT_02d8,For_Outer_Call,Visible,Unelaborated
0027 029a 02fb  |    |		Declare_Subprogram	INIT_02f8,For_Outer_Call,Visible,Unelaborated
0029 029a 0313  |    |		Declare_Subprogram	INIT_0310,For_Outer_Call,Visible,Unelaborated
002b 029a 032b  |   +|		Declare_Subprogram	INIT_0328,For_Outer_Call,Visible,Unelaborated
002d 029a 0343  |   C|		Declare_Subprogram	INIT_0340,For_Outer_Call,Visible,Unelaborated
002f 4800       |H   |		Short_Literal	0x0
0030 480b       |H   |		Short_Literal	0xb
0031 029f 034b  |   K|		Declare_Subprogram	INIT_0348,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 e005       |    |		Load	0x0,0x5
006d 029f 090b  |    |		Declare_Subprogram	INIT_0908,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 09db  |    |		Declare_Subprogram	INIT_09d8,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 a006       |    |		Store_Unchecked	0x0,0x6
0081 00c6       |    |		Action	Check_Subprogram_Elaborated
0082 00d8       |    |		Load_Top	At_Offset_0
0083 e20d       |    |		Load	0x1,0xd
0084 e007       |    |		Load	0x0,0x7
0085 e008       |    |		Load	0x0,0x8
0086 4800       |H   |		Short_Literal	0x0
0087 0007       |    |		Action	Break_Optional
0088 029d 0373  |   s|		Declare_Subprogram	INIT_0370,For_Outer_Call
008a 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
008b 00c7       |    |		Action	Elaborate_Subprogram
008c 029d 0393  |    |		Declare_Subprogram	INIT_0390,For_Outer_Call
008e 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
008f 00c7       |    |		Action	Elaborate_Subprogram
0090 029d 03ab  |    |		Declare_Subprogram	INIT_03a8,For_Outer_Call
0092 029d 03b3  |    |		Declare_Subprogram	INIT_03b0,For_Outer_Call
0094 029d 03c3  |    |		Declare_Subprogram	INIT_03c0,For_Outer_Call
0096 029d 03cb  |    |		Declare_Subprogram	INIT_03c8,For_Outer_Call
0098 029d 03d3  |    |		Declare_Subprogram	INIT_03d0,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 03e3  |    |		Declare_Subprogram	INIT_03e0,For_Outer_Call
00b4 029d 03f3  |    |		Declare_Subprogram	INIT_03f0,For_Outer_Call
00b6 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
00b7 00c7       |    |		Action	Elaborate_Subprogram
00b8 029b 0543  |   C|		Declare_Subprogram	INIT_0540,For_Outer_Call,Unelaborated
00ba 029b 0593  |    |		Declare_Subprogram	INIT_0590,For_Outer_Call,Unelaborated
00bc 029b 05c3  |    |		Declare_Subprogram	INIT_05c0,For_Outer_Call,Unelaborated
00be 029b 066b  |   k|		Declare_Subprogram	INIT_0668,For_Outer_Call,Unelaborated
00c0 029b 06b3  |    |		Declare_Subprogram	INIT_06b0,For_Outer_Call,Unelaborated
00c2 029b 06fb  |    |		Declare_Subprogram	INIT_06f8,For_Outer_Call,Unelaborated
00c4 029b 0743  |   C|		Declare_Subprogram	INIT_0740,For_Outer_Call,Unelaborated
00c6 029b 078b  |    |		Declare_Subprogram	INIT_0788,For_Outer_Call,Unelaborated
00c8 029b 07cb  |    |		Declare_Subprogram	INIT_07c8,For_Outer_Call,Unelaborated
00ca 029b 082b  |   +|		Declare_Subprogram	INIT_0828,For_Outer_Call,Unelaborated
00cc 029b 083b  |   ;|		Declare_Subprogram	INIT_0838,For_Outer_Call,Unelaborated
00ce 029b 084b  |   K|		Declare_Subprogram	INIT_0848,For_Outer_Call,Unelaborated
00d0 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
00d1 00c7       |    |		Action	Elaborate_Subprogram
00d2 029d 085b  |   [|		Declare_Subprogram	INIT_0858,For_Outer_Call
00d4 1d30       | 0  |		Execute_Immediate	Reference_Lex_1,0x30
00d5 00c7       |    |		Action	Elaborate_Subprogram
00d6 1d31       | 1  |		Execute_Immediate	Reference_Lex_1,0x31
00d7 00c7       |    |		Action	Elaborate_Subprogram
00d8 1d32       | 2  |		Execute_Immediate	Reference_Lex_1,0x32
00d9 00c7       |    |		Action	Elaborate_Subprogram
00da 1d33       | 3  |		Execute_Immediate	Reference_Lex_1,0x33
00db 00c7       |    |		Action	Elaborate_Subprogram
00dc 1d34       | 4  |		Execute_Immediate	Reference_Lex_1,0x34
00dd 00c7       |    |		Action	Elaborate_Subprogram
00de 1d35       | 5  |		Execute_Immediate	Reference_Lex_1,0x35
00df 00c7       |    |		Action	Elaborate_Subprogram
00e0 1d36       | 6  |		Execute_Immediate	Reference_Lex_1,0x36
00e1 00c7       |    |		Action	Elaborate_Subprogram
00e2 1d37       | 7  |		Execute_Immediate	Reference_Lex_1,0x37
00e3 00c7       |    |		Action	Elaborate_Subprogram
00e4 1d38       | 8  |		Execute_Immediate	Reference_Lex_1,0x38
00e5 00c7       |    |		Action	Elaborate_Subprogram
00e6 1d39       | 9  |		Execute_Immediate	Reference_Lex_1,0x39
00e7 00c7       |    |		Action	Elaborate_Subprogram
00e8 1d3a       | :  |		Execute_Immediate	Reference_Lex_1,0x3a
00e9 00c7       |    |		Action	Elaborate_Subprogram
00ea 1d3b       | ;  |		Execute_Immediate	Reference_Lex_1,0x3b
00eb 00c7       |    |		Action	Elaborate_Subprogram
00ec 029d 089b  |    |		Declare_Subprogram	INIT_0898,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 7895       |x   |		Jump	0x1d3
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 780f       |x   |		Jump	0x155								; case 0x0
0146 781c       |x   |		Jump	0x163								; case 0x1
0147 7829       |x)  |		Jump	0x171								; case 0x2
0148 7834       |x4  |		Jump	0x17d								; case 0x3
0149 783e       |x>  |		Jump	0x188								; case 0x4
014a 7848       |xH  |		Jump	0x193								; case 0x5
014b 7852       |xR  |		Jump	0x19e								; case 0x6
014c 785c       |x\  |		Jump	0x1a9								; case 0x7
014d 7866       |xf  |		Jump	0x1b4								; case 0x8
014e 7870       |xp  |		Jump	0x1bf								; case 0x9
014f 7878       |xx  |		Jump	0x1c8								; case 0xa
0150 7800       |x   |		Jump	0x151								; case 0xb
0151 e5fc       |    |		Load	0x2,-0x4
0152 00db       |    |		Load_Top	At_Offset_3
0153 823b       | ;  |		Call	0x1,0x3b
0154 787a       |xz  |		Jump	0x1cf
0155 e5f7       |    |		Load	0x2,-0x9
0156 e5f8       |    |		Load	0x2,-0x8
0157 e5f9       |    |		Load	0x2,-0x7
0158 e5fa       |    |		Load	0x2,-0x6
0159 e5fb       |    |		Load	0x2,-0x5
015a e5fc       |    |		Load	0x2,-0x4
015b e5fd       |    |		Load	0x2,-0x3
015c e5fe       |    |		Load	0x2,-0x2
015d e402       |    |		Load	0x2,0x2
015e 8230       | 0  |		Call	0x1,0x30
015f 00d3       |    |		Pop_Control	Pop_Count_3
0160 c5f8       |    |		Store	0x2,-0x8
0161 c5f7       |    |		Store	0x2,-0x9
0162 786c       |xl  |		Jump	0x1cf
0163 e5f7       |    |		Load	0x2,-0x9
0164 e5f8       |    |		Load	0x2,-0x8
0165 e5f9       |    |		Load	0x2,-0x7
0166 e5fa       |    |		Load	0x2,-0x6
0167 e5fb       |    |		Load	0x2,-0x5
0168 e5fc       |    |		Load	0x2,-0x4
0169 e5fd       |    |		Load	0x2,-0x3
016a e5fe       |    |		Load	0x2,-0x2
016b e402       |    |		Load	0x2,0x2
016c 8231       | 1  |		Call	0x1,0x31
016d 00d3       |    |		Pop_Control	Pop_Count_3
016e c5f8       |    |		Store	0x2,-0x8
016f c5f7       |    |		Store	0x2,-0x9
0170 785e       |x^  |		Jump	0x1cf
0171 e5f9       |    |		Load	0x2,-0x7
0172 e5fa       |    |		Load	0x2,-0x6
0173 e5fb       |    |		Load	0x2,-0x5
0174 e5fc       |    |		Load	0x2,-0x4
0175 e5fd       |    |		Load	0x2,-0x3
0176 e5fe       |    |		Load	0x2,-0x2
0177 e402       |    |		Load	0x2,0x2
0178 8232       | 2  |		Call	0x1,0x32
0179 00d3       |    |		Pop_Control	Pop_Count_3
017a 4801       |H   |		Short_Literal	0x1
017b a5f7       |    |		Store_Unchecked	0x2,-0x9
017c 7852       |xR  |		Jump	0x1cf
017d e5fa       |    |		Load	0x2,-0x6
017e e5fc       |    |		Load	0x2,-0x4
017f e5fd       |    |		Load	0x2,-0x3
0180 e5fb       |    |		Load	0x2,-0x5
0181 e5fe       |    |		Load	0x2,-0x2
0182 e402       |    |		Load	0x2,0x2
0183 8233       | 3  |		Call	0x1,0x33
0184 00d1       |    |		Pop_Control	Pop_Count_1
0185 4801       |H   |		Short_Literal	0x1
0186 a5f7       |    |		Store_Unchecked	0x2,-0x9
0187 7847       |xG  |		Jump	0x1cf
0188 e5fa       |    |		Load	0x2,-0x6
0189 e5fc       |    |		Load	0x2,-0x4
018a e5fd       |    |		Load	0x2,-0x3
018b e5fb       |    |		Load	0x2,-0x5
018c e5fe       |    |		Load	0x2,-0x2
018d e402       |    |		Load	0x2,0x2
018e 8234       | 4  |		Call	0x1,0x34
018f 00d1       |    |		Pop_Control	Pop_Count_1
0190 4801       |H   |		Short_Literal	0x1
0191 a5f7       |    |		Store_Unchecked	0x2,-0x9
0192 783c       |x<  |		Jump	0x1cf
0193 e5f9       |    |		Load	0x2,-0x7
0194 e5fc       |    |		Load	0x2,-0x4
0195 e5fd       |    |		Load	0x2,-0x3
0196 e5fb       |    |		Load	0x2,-0x5
0197 e5fe       |    |		Load	0x2,-0x2
0198 e402       |    |		Load	0x2,0x2
0199 8235       | 5  |		Call	0x1,0x35
019a 00d1       |    |		Pop_Control	Pop_Count_1
019b 4801       |H   |		Short_Literal	0x1
019c a5f7       |    |		Store_Unchecked	0x2,-0x9
019d 7831       |x1  |		Jump	0x1cf
019e e5f9       |    |		Load	0x2,-0x7
019f e5fc       |    |		Load	0x2,-0x4
01a0 e5fd       |    |		Load	0x2,-0x3
01a1 e5fb       |    |		Load	0x2,-0x5
01a2 e5fe       |    |		Load	0x2,-0x2
01a3 e402       |    |		Load	0x2,0x2
01a4 8236       | 6  |		Call	0x1,0x36
01a5 00d1       |    |		Pop_Control	Pop_Count_1
01a6 4801       |H   |		Short_Literal	0x1
01a7 a5f7       |    |		Store_Unchecked	0x2,-0x9
01a8 7826       |x&  |		Jump	0x1cf
01a9 e5f9       |    |		Load	0x2,-0x7
01aa e5fc       |    |		Load	0x2,-0x4
01ab e5fd       |    |		Load	0x2,-0x3
01ac e5fb       |    |		Load	0x2,-0x5
01ad e5fe       |    |		Load	0x2,-0x2
01ae e402       |    |		Load	0x2,0x2
01af 8237       | 7  |		Call	0x1,0x37
01b0 00d1       |    |		Pop_Control	Pop_Count_1
01b1 4801       |H   |		Short_Literal	0x1
01b2 a5f7       |    |		Store_Unchecked	0x2,-0x9
01b3 781b       |x   |		Jump	0x1cf
01b4 e5f9       |    |		Load	0x2,-0x7
01b5 e5fc       |    |		Load	0x2,-0x4
01b6 e5fd       |    |		Load	0x2,-0x3
01b7 e5fb       |    |		Load	0x2,-0x5
01b8 e5fe       |    |		Load	0x2,-0x2
01b9 e402       |    |		Load	0x2,0x2
01ba 8238       | 8  |		Call	0x1,0x38
01bb 00d1       |    |		Pop_Control	Pop_Count_1
01bc 4801       |H   |		Short_Literal	0x1
01bd a5f7       |    |		Store_Unchecked	0x2,-0x9
01be 7810       |x   |		Jump	0x1cf
01bf e5fc       |    |		Load	0x2,-0x4
01c0 e5fd       |    |		Load	0x2,-0x3
01c1 e5fb       |    |		Load	0x2,-0x5
01c2 e5fe       |    |		Load	0x2,-0x2
01c3 e402       |    |		Load	0x2,0x2
01c4 8239       | 9  |		Call	0x1,0x39
01c5 4801       |H   |		Short_Literal	0x1
01c6 a5f7       |    |		Store_Unchecked	0x2,-0x9
01c7 7807       |x   |		Jump	0x1cf
01c8 e5f8       |    |		Load	0x2,-0x8
01c9 e5fc       |    |		Load	0x2,-0x4
01ca e402       |    |		Load	0x2,0x2
01cb 823a       | :  |		Call	0x1,0x3a
01cc c5f8       |    |		Store	0x2,-0x8
01cd 4801       |H   |		Short_Literal	0x1
01ce a5f7       |    |		Store_Unchecked	0x2,-0x9
01cf 00d9       |    |		Load_Top	At_Offset_1
01d0 822a       | *  |		Call	0x1,0x2a
01d1 003a       | :  |		Store_Top	Access,At_Offset_2
01d2 00c9       |    |		Action	Pop_Auxiliary_Loop
01d3 00d9       |    |		Load_Top	At_Offset_1
01d4 822c       | ,  |		Call	0x1,0x2c
01d5 7768       |wh  |		Jump_Nonzero	0x13e
01d6 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
01d7 0000       |    |		.XXX[0x1]
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01e2       |    |		.CONST	0x01e2								; Address of begin
01d9 0004       |    |		.CONST	0x0004								; Address of exception handler
01da 0003       |    |		.CONST	0x0003								; Number of locals
01db			INIT_01d8:
01db e20d       |    |		Load	0x1,0xd
01dc 0007       |    |		Action	Break_Optional
01dd 4800       |H   |		Short_Literal	0x0
01de e220       |    |		Load	0x1,0x20
01df 1c08       |    |		Execute_Immediate	Run_Utility,0x8
01e0 00d8       |    |		Load_Top	At_Offset_0
01e1 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01e2			BODY_01d8:
01e2 820e       |    |		Call	0x1,0xe
01e3 003a       | :  |		Store_Top	Access,At_Offset_2
01e4 4800       |H   |		Short_Literal	0x0
01e5 00d9       |    |		Load_Top	At_Offset_1
01e6 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
01e7 e5ff       |    |		Load	0x2,-0x1
01e8 00d9       |    |		Load_Top	At_Offset_1
01e9 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
01ea e5fe       |    |		Load	0x2,-0x2
01eb 00d9       |    |		Load_Top	At_Offset_1
01ec 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
01ed e5fd       |    |		Load	0x2,-0x3
01ee 00d9       |    |		Load_Top	At_Offset_1
01ef 2a05       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5
01f0 00d9       |    |		Load_Top	At_Offset_1
01f1 00d9       |    |		Load_Top	At_Offset_1
01f2 8228       | (  |		Call	0x1,0x28
01f3 003a       | :  |		Store_Top	Access,At_Offset_2
01f4 00d9       |    |		Load_Top	At_Offset_1
01f5 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
01f6 0000 0000  |    |		.XXX[0x2]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 0202       |    |		.CONST	0x0202								; Address of begin
01f9 0004       |    |		.CONST	0x0004								; Address of exception handler
01fa 0003       |    |		.CONST	0x0003								; Number of locals
01fb			INIT_01f8:
01fb e20d       |    |		Load	0x1,0xd
01fc 0007       |    |		Action	Break_Optional
01fd 4801       |H   |		Short_Literal	0x1
01fe e220       |    |		Load	0x1,0x20
01ff 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0200 00d8       |    |		Load_Top	At_Offset_0
0201 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0202			BODY_01f8:
0202 4801       |H   |		Short_Literal	0x1
0203 00d9       |    |		Load_Top	At_Offset_1
0204 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0205 e5ff       |    |		Load	0x2,-0x1
0206 00d9       |    |		Load_Top	At_Offset_1
0207 2a06       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6
0208 e5fe       |    |		Load	0x2,-0x2
0209 00d9       |    |		Load_Top	At_Offset_1
020a 2a07       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7
020b 00d9       |    |		Load_Top	At_Offset_1
020c 00d9       |    |		Load_Top	At_Offset_1
020d 8228       | (  |		Call	0x1,0x28
020e 003a       | :  |		Store_Top	Access,At_Offset_2
020f 00d9       |    |		Load_Top	At_Offset_1
0210 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0211 0000 0000  |    |		.BLANK	0000[0x7]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 0222       | "  |		.CONST	0x0222								; Address of begin
0219 0004       |    |		.CONST	0x0004								; Address of exception handler
021a 0003       |    |		.CONST	0x0003								; Number of locals
021b			INIT_0218:
021b e20d       |    |		Load	0x1,0xd
021c 0007       |    |		Action	Break_Optional
021d 4802       |H   |		Short_Literal	0x2
021e e220       |    |		Load	0x1,0x20
021f 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0220 00d8       |    |		Load_Top	At_Offset_0
0221 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0222			BODY_0218:
0222 4802       |H   |		Short_Literal	0x2
0223 00d9       |    |		Load_Top	At_Offset_1
0224 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0225 e5ff       |    |		Load	0x2,-0x1
0226 00d9       |    |		Load_Top	At_Offset_1
0227 2a08       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8
0228 e5fe       |    |		Load	0x2,-0x2
0229 00d9       |    |		Load_Top	At_Offset_1
022a 2a09       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x9
022b e5fd       |    |		Load	0x2,-0x3
022c 00d9       |    |		Load_Top	At_Offset_1
022d 2a0a       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xa
022e 00d9       |    |		Load_Top	At_Offset_1
022f 00d9       |    |		Load_Top	At_Offset_1
0230 8228       | (  |		Call	0x1,0x28
0231 003a       | :  |		Store_Top	Access,At_Offset_2
0232 00d9       |    |		Load_Top	At_Offset_1
0233 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0234 0000 0000  |    |		.BLANK	0000[0x4]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 0242       | B  |		.CONST	0x0242								; Address of begin
0239 0004       |    |		.CONST	0x0004								; Address of exception handler
023a 0003       |    |		.CONST	0x0003								; Number of locals
023b			INIT_0238:
023b e20d       |    |		Load	0x1,0xd
023c 0007       |    |		Action	Break_Optional
023d 4803       |H   |		Short_Literal	0x3
023e e220       |    |		Load	0x1,0x20
023f 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0240 00d8       |    |		Load_Top	At_Offset_0
0241 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0242			BODY_0238:
0242 4803       |H   |		Short_Literal	0x3
0243 00d9       |    |		Load_Top	At_Offset_1
0244 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0245 e5ff       |    |		Load	0x2,-0x1
0246 00d9       |    |		Load_Top	At_Offset_1
0247 2a0b       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xb
0248 e5fe       |    |		Load	0x2,-0x2
0249 00d9       |    |		Load_Top	At_Offset_1
024a 2a0c       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xc
024b 00d9       |    |		Load_Top	At_Offset_1
024c 00d9       |    |		Load_Top	At_Offset_1
024d 8228       | (  |		Call	0x1,0x28
024e 003a       | :  |		Store_Top	Access,At_Offset_2
024f 00d9       |    |		Load_Top	At_Offset_1
0250 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0251 0000 0000  |    |		.BLANK	0000[0x7]
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 0262       | b  |		.CONST	0x0262								; Address of begin
0259 0004       |    |		.CONST	0x0004								; Address of exception handler
025a 0003       |    |		.CONST	0x0003								; Number of locals
025b			INIT_0258:
025b e20d       |    |		Load	0x1,0xd
025c 0007       |    |		Action	Break_Optional
025d 4804       |H   |		Short_Literal	0x4
025e e220       |    |		Load	0x1,0x20
025f 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0260 00d8       |    |		Load_Top	At_Offset_0
0261 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0262			BODY_0258:
0262 4804       |H   |		Short_Literal	0x4
0263 00d9       |    |		Load_Top	At_Offset_1
0264 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0265 e5ff       |    |		Load	0x2,-0x1
0266 00d9       |    |		Load_Top	At_Offset_1
0267 2a0b       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xb
0268 e5fe       |    |		Load	0x2,-0x2
0269 00d9       |    |		Load_Top	At_Offset_1
026a 2a0c       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xc
026b 00d9       |    |		Load_Top	At_Offset_1
026c 00d9       |    |		Load_Top	At_Offset_1
026d 8228       | (  |		Call	0x1,0x28
026e 003a       | :  |		Store_Top	Access,At_Offset_2
026f 00d9       |    |		Load_Top	At_Offset_1
0270 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0271 0000 0000  |    |		.BLANK	0000[0x7]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 0282       |    |		.CONST	0x0282								; Address of begin
0279 0004       |    |		.CONST	0x0004								; Address of exception handler
027a 0003       |    |		.CONST	0x0003								; Number of locals
027b			INIT_0278:
027b e20d       |    |		Load	0x1,0xd
027c 0007       |    |		Action	Break_Optional
027d 4805       |H   |		Short_Literal	0x5
027e e220       |    |		Load	0x1,0x20
027f 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0280 00d8       |    |		Load_Top	At_Offset_0
0281 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0282			BODY_0278:
0282 4805       |H   |		Short_Literal	0x5
0283 00d9       |    |		Load_Top	At_Offset_1
0284 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0285 e5ff       |    |		Load	0x2,-0x1
0286 00d9       |    |		Load_Top	At_Offset_1
0287 2a0b       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xb
0288 e5fe       |    |		Load	0x2,-0x2
0289 00d9       |    |		Load_Top	At_Offset_1
028a 2a0c       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xc
028b 00d9       |    |		Load_Top	At_Offset_1
028c 00d9       |    |		Load_Top	At_Offset_1
028d 8228       | (  |		Call	0x1,0x28
028e 003a       | :  |		Store_Top	Access,At_Offset_2
028f 00d9       |    |		Load_Top	At_Offset_1
0290 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0291 0000 0000  |    |		.BLANK	0000[0x7]
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 02a2       |    |		.CONST	0x02a2								; Address of begin
0299 0004       |    |		.CONST	0x0004								; Address of exception handler
029a 0003       |    |		.CONST	0x0003								; Number of locals
029b			INIT_0298:
029b e20d       |    |		Load	0x1,0xd
029c 0007       |    |		Action	Break_Optional
029d 4806       |H   |		Short_Literal	0x6
029e e220       |    |		Load	0x1,0x20
029f 1c08       |    |		Execute_Immediate	Run_Utility,0x8
02a0 00d8       |    |		Load_Top	At_Offset_0
02a1 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02a2			BODY_0298:
02a2 4806       |H   |		Short_Literal	0x6
02a3 00d9       |    |		Load_Top	At_Offset_1
02a4 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
02a5 e5ff       |    |		Load	0x2,-0x1
02a6 00d9       |    |		Load_Top	At_Offset_1
02a7 2a0b       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xb
02a8 e5fe       |    |		Load	0x2,-0x2
02a9 00d9       |    |		Load_Top	At_Offset_1
02aa 2a0c       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xc
02ab 00d9       |    |		Load_Top	At_Offset_1
02ac 00d9       |    |		Load_Top	At_Offset_1
02ad 8228       | (  |		Call	0x1,0x28
02ae 003a       | :  |		Store_Top	Access,At_Offset_2
02af 00d9       |    |		Load_Top	At_Offset_1
02b0 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
02b1 0000 0000  |    |		.BLANK	0000[0x7]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02c2       |    |		.CONST	0x02c2								; Address of begin
02b9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ba 0003       |    |		.CONST	0x0003								; Number of locals
02bb			INIT_02b8:
02bb e20d       |    |		Load	0x1,0xd
02bc 0007       |    |		Action	Break_Optional
02bd 4808       |H   |		Short_Literal	0x8
02be e220       |    |		Load	0x1,0x20
02bf 1c08       |    |		Execute_Immediate	Run_Utility,0x8
02c0 00d8       |    |		Load_Top	At_Offset_0
02c1 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02c2			BODY_02b8:
02c2 4808       |H   |		Short_Literal	0x8
02c3 00d9       |    |		Load_Top	At_Offset_1
02c4 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
02c5 e5ff       |    |		Load	0x2,-0x1
02c6 00d9       |    |		Load_Top	At_Offset_1
02c7 2a0f       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xf
02c8 e5fe       |    |		Load	0x2,-0x2
02c9 00d9       |    |		Load_Top	At_Offset_1
02ca 2a10       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x10
02cb e5fd       |    |		Load	0x2,-0x3
02cc 00d9       |    |		Load_Top	At_Offset_1
02cd 2a11       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x11
02ce 00d9       |    |		Load_Top	At_Offset_1
02cf 00d9       |    |		Load_Top	At_Offset_1
02d0 8228       | (  |		Call	0x1,0x28
02d1 003a       | :  |		Store_Top	Access,At_Offset_2
02d2 00d9       |    |		Load_Top	At_Offset_1
02d3 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
02d4 0000 0000  |    |		.BLANK	0000[0x4]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02e2       |    |		.CONST	0x02e2								; Address of begin
02d9 0004       |    |		.CONST	0x0004								; Address of exception handler
02da 0003       |    |		.CONST	0x0003								; Number of locals
02db			INIT_02d8:
02db e20d       |    |		Load	0x1,0xd
02dc 0007       |    |		Action	Break_Optional
02dd 4807       |H   |		Short_Literal	0x7
02de e220       |    |		Load	0x1,0x20
02df 1c08       |    |		Execute_Immediate	Run_Utility,0x8
02e0 00d8       |    |		Load_Top	At_Offset_0
02e1 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02e2			BODY_02d8:
02e2 4807       |H   |		Short_Literal	0x7
02e3 00d9       |    |		Load_Top	At_Offset_1
02e4 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
02e5 e5ff       |    |		Load	0x2,-0x1
02e6 00d9       |    |		Load_Top	At_Offset_1
02e7 2a0d       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xd
02e8 e5fe       |    |		Load	0x2,-0x2
02e9 00d9       |    |		Load_Top	At_Offset_1
02ea 2a0e       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xe
02eb 00d9       |    |		Load_Top	At_Offset_1
02ec 00d9       |    |		Load_Top	At_Offset_1
02ed 8228       | (  |		Call	0x1,0x28
02ee 003a       | :  |		Store_Top	Access,At_Offset_2
02ef 00d9       |    |		Load_Top	At_Offset_1
02f0 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
02f1 0000 0000  |    |		.BLANK	0000[0x7]
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 4809       |H   |		Short_Literal	0x9
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 4809       |H   |		Short_Literal	0x9
0303 00d9       |    |		Load_Top	At_Offset_1
0304 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0305 e5ff       |    |		Load	0x2,-0x1
0306 00d9       |    |		Load_Top	At_Offset_1
0307 2a12       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x12
0308 00d9       |    |		Load_Top	At_Offset_1
0309 00d9       |    |		Load_Top	At_Offset_1
030a 8228       | (  |		Call	0x1,0x28
030b 003a       | :  |		Store_Top	Access,At_Offset_2
030c 00d9       |    |		Load_Top	At_Offset_1
030d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
030e 0000 0000  |    |		.XXX[0x2]
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 031a       |    |		.CONST	0x031a								; Address of begin
0311 0004       |    |		.CONST	0x0004								; Address of exception handler
0312 0003       |    |		.CONST	0x0003								; Number of locals
0313			INIT_0310:
0313 e20d       |    |		Load	0x1,0xd
0314 0007       |    |		Action	Break_Optional
0315 480a       |H   |		Short_Literal	0xa
0316 e220       |    |		Load	0x1,0x20
0317 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0318 00d8       |    |		Load_Top	At_Offset_0
0319 1c00       |    |		Execute_Immediate	Run_Utility,0x0
031a			BODY_0310:
031a 480a       |H   |		Short_Literal	0xa
031b 00d9       |    |		Load_Top	At_Offset_1
031c 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
031d 00d9       |    |		Load_Top	At_Offset_1
031e 00d9       |    |		Load_Top	At_Offset_1
031f 8228       | (  |		Call	0x1,0x28
0320 003a       | :  |		Store_Top	Access,At_Offset_2
0321 00d9       |    |		Load_Top	At_Offset_1
0322 00ca       |    |		Action	Exit_Nullary_Function
0323 0000 0000  |    |		.BLANK	0000[0x5]
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 0332       | 2  |		.CONST	0x0332								; Address of begin
0329 0004       |    |		.CONST	0x0004								; Address of exception handler
032a 0003       |    |		.CONST	0x0003								; Number of locals
032b			INIT_0328:
032b e20d       |    |		Load	0x1,0xd
032c 0007       |    |		Action	Break_Optional
032d 480b       |H   |		Short_Literal	0xb
032e e220       |    |		Load	0x1,0x20
032f 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0330 00d8       |    |		Load_Top	At_Offset_0
0331 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0332			BODY_0328:
0332 480b       |H   |		Short_Literal	0xb
0333 00d9       |    |		Load_Top	At_Offset_1
0334 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0335 00d9       |    |		Load_Top	At_Offset_1
0336 00d9       |    |		Load_Top	At_Offset_1
0337 8228       | (  |		Call	0x1,0x28
0338 003a       | :  |		Store_Top	Access,At_Offset_2
0339 00d9       |    |		Load_Top	At_Offset_1
033a 00ca       |    |		Action	Exit_Nullary_Function
033b 0000 0000  |    |		.BLANK	0000[0x5]
0340 ; --------------------------------------------------------------------------------------
0340 ; SUBPROGRAM
0340 ; --------------------------------------------------------------------------------------
0340 0343       | C  |		.CONST	0x0343								; Address of begin
0341 0004       |    |		.CONST	0x0004								; Address of exception handler
0342 0001       |    |		.CONST	0x0001								; Number of locals
0343			BODY_0340:
0343			INIT_0340:
0343 00da       |    |		Load_Top	At_Offset_2
0344 4800       |H   |		Short_Literal	0x0
0345 822f       | /  |		Call	0x1,0x2f
0346 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0347 0000       |    |		.XXX[0x1]
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 034b       | K  |		.CONST	0x034b								; Address of begin
0349 0004       |    |		.CONST	0x0004								; Address of exception handler
034a 0001       |    |		.CONST	0x0001								; Number of locals
034b			BODY_0348:
034b			INIT_0348:
034b 4607       |F   |		Jump_Case	0x8
034c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
034d 7807       |x   |		Jump	0x355								; case 0x1
034e 780a       |x   |		Jump	0x359								; case 0x2
034f 780e       |x   |		Jump	0x35e								; case 0x3
0350 7811       |x   |		Jump	0x362								; case 0x4
0351 7812       |x   |		Jump	0x364								; case 0x5
0352 7813       |x   |		Jump	0x366								; case 0x6
0353 7816       |x   |		Jump	0x36a								; case 0x7
0354 4302       |C   |		.XXX[0x1]
0355 00da       |    |		Load_Top	At_Offset_2
0356 0091 09e2  |    |		Action	Push_String_Extended_Indexed,0x9e2				; "SI_ALORS_SINON"
0358 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0359 00db       |    |		Load_Top	At_Offset_3
035a 00db       |    |		Load_Top	At_Offset_3
035b 00e0       |    |		Load_Encached	Standard_Cache
035c 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
035d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
035e 00da       |    |		Load_Top	At_Offset_2
035f 00e0       |    |		Load_Encached	Standard_Cache
0360 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0361 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0362 00db       |    |		Load_Top	At_Offset_3
0363 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0364 00db       |    |		Load_Top	At_Offset_3
0365 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0366 e21f       |    |		Load	0x1,0x1f
0367 00dc       |    |		Load_Top	At_Offset_4
0368 0267       | g  |		Execute	Discrete,Predecessor
0369 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
036a e21f       |    |		Load	0x1,0x1f
036b 00dc       |    |		Load_Top	At_Offset_4
036c 0268       | h  |		Execute	Discrete,Successor
036d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
036e 0000 0000  |    |		.XXX[0x2]
0370 ; --------------------------------------------------------------------------------------
0370 ; SUBPROGRAM
0370 ; --------------------------------------------------------------------------------------
0370 0377       | w  |		.CONST	0x0377								; Address of begin
0371 0004       |    |		.CONST	0x0004								; Address of exception handler
0372 0003       |    |		.CONST	0x0003								; Number of locals
0373			INIT_0370:
0373 e20d       |    |		Load	0x1,0xd
0374 0007       |    |		Action	Break_Optional
0375 00d8       |    |		Load_Top	At_Offset_0
0376 0007       |    |		Action	Break_Optional
0377			BODY_0370:
0377 e5ff       |    |		Load	0x2,-0x1
0378 7002       |p   |		Jump_Nonzero	0x37b
0379 e20d       |    |		Load	0x1,0xd
037a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
037b e5ff       |    |		Load	0x2,-0x1
037c 003a       | :  |		Store_Top	Access,At_Offset_2
037d 00cf       |    |		Action	Mark_Auxiliary
037e 7807       |x   |		Jump	0x386
037f 00da       |    |		Load_Top	At_Offset_2
0380 003a       | :  |		Store_Top	Access,At_Offset_2
0381 00da       |    |		Load_Top	At_Offset_2
0382 0227       | '  |		Execute	Access,All_Reference
0383 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0384 003b       | ;  |		Store_Top	Access,At_Offset_3
0385 00c9       |    |		Action	Pop_Auxiliary_Loop
0386 00da       |    |		Load_Top	At_Offset_2
0387 77f7       |w   |		Jump_Nonzero	0x37f
0388 00ce       |    |		Action	Pop_Auxiliary
0389 00d8       |    |		Load_Top	At_Offset_0
038a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
038b 0000 0000  |    |		.BLANK	0000[0x5]
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 0395       |    |		.CONST	0x0395								; Address of begin
0391 0004       |    |		.CONST	0x0004								; Address of exception handler
0392 0002       |    |		.CONST	0x0002								; Number of locals
0393			INIT_0390:
0393 e20d       |    |		Load	0x1,0xd
0394 0007       |    |		Action	Break_Optional
0395			BODY_0390:
0395 e221       | !  |		Load	0x1,0x21
0396 0322       | "  |		Declare_Variable	Record
0397 e5ff       |    |		Load	0x2,-0x1
0398 00d9       |    |		Load_Top	At_Offset_1
0399 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
039a e20d       |    |		Load	0x1,0xd
039b 00d9       |    |		Load_Top	At_Offset_1
039c 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
039d e20d       |    |		Load	0x1,0xd
039e 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
039f 0039       | 9  |		Store_Top	Access,At_Offset_1
03a0 e5fe       |    |		Load	0x2,-0x2
03a1 00d9       |    |		Load_Top	At_Offset_1
03a2 8210       |    |		Call	0x1,0x10
03a3 c5fe       |    |		Store	0x2,-0x2
03a4 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
03a5 0000 0000  |    |		.XXX[0x3]
03a7 0000       |    |
03a8 ; --------------------------------------------------------------------------------------
03a8 ; SUBPROGRAM
03a8 ; --------------------------------------------------------------------------------------
03a8 03ab       |    |		.CONST	0x03ab								; Address of begin
03a9 0004       |    |		.CONST	0x0004								; Address of exception handler
03aa 0001       |    |		.CONST	0x0001								; Number of locals
03ab			BODY_03a8:
03ab			INIT_03a8:
03ab 00da       |    |		Load_Top	At_Offset_2
03ac 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 6804       |h   |		Jump_Zero	0x3b9
03b5 00da       |    |		Load_Top	At_Offset_2
03b6 0227       | '  |		Execute	Access,All_Reference
03b7 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
03b8 003b       | ;  |		Store_Top	Access,At_Offset_3
03b9 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03ba 0000 0000  |    |		.BLANK	0000[0x6]
03c0 ; --------------------------------------------------------------------------------------
03c0 ; SUBPROGRAM
03c0 ; --------------------------------------------------------------------------------------
03c0 03c3       |    |		.CONST	0x03c3								; Address of begin
03c1 0004       |    |		.CONST	0x0004								; Address of exception handler
03c2 0001       |    |		.CONST	0x0001								; Number of locals
03c3			BODY_03c0:
03c3			INIT_03c0:
03c3 00da       |    |		Load_Top	At_Offset_2
03c4 022d       | -  |		Execute	Access,Is_Null
03c5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03c6 0000 0000  |    |		.XXX[0x2]
03c8 ; --------------------------------------------------------------------------------------
03c8 ; SUBPROGRAM
03c8 ; --------------------------------------------------------------------------------------
03c8 03cb       |    |		.CONST	0x03cb								; Address of begin
03c9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ca 0001       |    |		.CONST	0x0001								; Number of locals
03cb			BODY_03c8:
03cb			INIT_03c8:
03cb 00da       |    |		Load_Top	At_Offset_2
03cc 022c       | ,  |		Execute	Access,Not_Null
03cd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03ce 0000 0000  |    |		.XXX[0x2]
03d0 ; --------------------------------------------------------------------------------------
03d0 ; SUBPROGRAM
03d0 ; --------------------------------------------------------------------------------------
03d0 03d5       |    |		.CONST	0x03d5								; Address of begin
03d1 0004       |    |		.CONST	0x0004								; Address of exception handler
03d2 0002       |    |		.CONST	0x0002								; Number of locals
03d3			INIT_03d0:
03d3 e20d       |    |		Load	0x1,0xd
03d4 0007       |    |		Action	Break_Optional
03d5			BODY_03d0:
03d5 00db       |    |		Load_Top	At_Offset_3
03d6 0039       | 9  |		Store_Top	Access,At_Offset_1
03d7 00d8       |    |		Load_Top	At_Offset_0
03d8 0227       | '  |		Execute	Access,All_Reference
03d9 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
03da 02fd       |    |		Declare_Variable	Variant_Record,Duplicate
03db 00cd       |    |		Action	Spare6_Action
03dc 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03dd 0000 0000  |    |		.XXX[0x3]
03df 0000       |    |
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 03e3       |    |		.CONST	0x03e3								; Address of begin
03e1 0004       |    |		.CONST	0x0004								; Address of exception handler
03e2 0001       |    |		.CONST	0x0001								; Number of locals
03e3			BODY_03e0:
03e3			INIT_03e0:
03e3 00cf       |    |		Action	Mark_Auxiliary
03e4 00db       |    |		Load_Top	At_Offset_3
03e5 4801       |H   |		Short_Literal	0x1
03e6 0263       | c  |		Execute	Discrete,Above_Bound
03e7 7006       |p   |		Jump_Nonzero	0x3ee
03e8 0092 09ee  |    |		Action	Push_String_Extended,0x9ee					; " "
03ea e009       |    |		Load	0x0,0x9
03eb 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
03ec 00c8       |    |		Action	Pop_Auxiliary_Range
03ed 3ffa       |?   |		Loop_Increasing	0x3e8
03ee 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
03ef 0000       |    |		.XXX[0x1]
03f0 ; --------------------------------------------------------------------------------------
03f0 ; SUBPROGRAM
03f0 ; --------------------------------------------------------------------------------------
03f0 03f9       |    |		.CONST	0x03f9								; Address of begin
03f1 0004       |    |		.CONST	0x0004								; Address of exception handler
03f2 0003       |    |		.CONST	0x0003								; Number of locals
03f3			INIT_03f0:
03f3 e20d       |    |		Load	0x1,0xd
03f4 0007       |    |		Action	Break_Optional
03f5 e220       |    |		Load	0x1,0x20
03f6 02ff       |    |		Declare_Variable	Variant_Record
03f7 00d8       |    |		Load_Top	At_Offset_0
03f8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03f9			BODY_03f0:
03f9 e5fe       |    |		Load	0x2,-0x2
03fa 8229       | )  |		Call	0x1,0x29
03fb 003a       | :  |		Store_Top	Access,At_Offset_2
03fc 00cf       |    |		Action	Mark_Auxiliary
03fd 793a       |y:  |		Jump	0x538
03fe 00da       |    |		Load_Top	At_Offset_2
03ff 822d       | -  |		Call	0x1,0x2d
0400 00da       |    |		Load_Top	At_Offset_2
0401 016d       | m  |		Execute	Variant_Record,Structure_Write
0402 00d9       |    |		Load_Top	At_Offset_1
0403 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0404 460b       |F   |		Jump_Case	0xc
0405 7812       |x   |		Jump	0x418								; case 0x0
0406 7848       |xH  |		Jump	0x44f								; case 0x1
0407 7866       |xf  |		Jump	0x46e								; case 0x2
0408 788b       |x   |		Jump	0x494								; case 0x3
0409 78a1       |x   |		Jump	0x4ab								; case 0x4
040a 78b7       |x   |		Jump	0x4c2								; case 0x5
040b 78cd       |x   |		Jump	0x4d9								; case 0x6
040c 78e3       |x   |		Jump	0x4f0								; case 0x7
040d 78fa       |x   |		Jump	0x508								; case 0x8
040e 7918       |y   |		Jump	0x527								; case 0x9
040f 791e       |y   |		Jump	0x52e								; case 0xa
0410 7800       |x   |		Jump	0x411								; case 0xb
0411 e5ff       |    |		Load	0x2,-0x1
0412 822e       | .  |		Call	0x1,0x2e
0413 0092 09ef  |    |		Action	Push_String_Extended,0x9ef					; "-- Vide"
0415 e009       |    |		Load	0x0,0x9
0416 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0417 791c       |y   |		Jump	0x534
0418 e5ff       |    |		Load	0x2,-0x1
0419 822e       | .  |		Call	0x1,0x2e
041a 0092 09f0  |    |		Action	Push_String_Extended,0x9f0					; "SI"
041c e009       |    |		Load	0x0,0x9
041d 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
041e 00d9       |    |		Load_Top	At_Offset_1
041f 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0420 e5ff       |    |		Load	0x2,-0x1
0421 0a02       |    |		Execute_Immediate	Plus,0x2
0422 00d8       |    |		Load_Top	At_Offset_0
0423 00e2       |    |		Load_Encached	Integer_Cache
0424 0260       | `  |		Execute	Discrete,In_Type
0425 7001       |p   |		Jump_Nonzero	0x427
0426 0801       |    |		Execute_Immediate	Raise,0x1
0427 800a       |    |		Call	0x0,0xa
0428 e5ff       |    |		Load	0x2,-0x1
0429 822e       | .  |		Call	0x1,0x2e
042a 0092 09f1  |    |		Action	Push_String_Extended,0x9f1					; "ALORS"
042c e009       |    |		Load	0x0,0x9
042d 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
042e 00d9       |    |		Load_Top	At_Offset_1
042f 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0430 e5ff       |    |		Load	0x2,-0x1
0431 0a02       |    |		Execute_Immediate	Plus,0x2
0432 00d8       |    |		Load_Top	At_Offset_0
0433 00e2       |    |		Load_Encached	Integer_Cache
0434 0260       | `  |		Execute	Discrete,In_Type
0435 7001       |p   |		Jump_Nonzero	0x437
0436 0801       |    |		Execute_Immediate	Raise,0x1
0437 822f       | /  |		Call	0x1,0x2f
0438 e5ff       |    |		Load	0x2,-0x1
0439 822e       | .  |		Call	0x1,0x2e
043a 0092 09f2  |    |		Action	Push_String_Extended,0x9f2					; "SINON"
043c e009       |    |		Load	0x0,0x9
043d 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
043e 00d9       |    |		Load_Top	At_Offset_1
043f 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
0440 e5ff       |    |		Load	0x2,-0x1
0441 0a02       |    |		Execute_Immediate	Plus,0x2
0442 00d8       |    |		Load_Top	At_Offset_0
0443 00e2       |    |		Load_Encached	Integer_Cache
0444 0260       | `  |		Execute	Discrete,In_Type
0445 7001       |p   |		Jump_Nonzero	0x447
0446 0801       |    |		Execute_Immediate	Raise,0x1
0447 822f       | /  |		Call	0x1,0x2f
0448 e5ff       |    |		Load	0x2,-0x1
0449 822e       | .  |		Call	0x1,0x2e
044a 0092 09f3  |    |		Action	Push_String_Extended,0x9f3					; "FIN_SI"
044c e009       |    |		Load	0x0,0x9
044d 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
044e 78e5       |x   |		Jump	0x534
044f e5ff       |    |		Load	0x2,-0x1
0450 822e       | .  |		Call	0x1,0x2e
0451 0092 09f4  |    |		Action	Push_String_Extended,0x9f4					; "POUR "
0453 00da       |    |		Load_Top	At_Offset_2
0454 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
0455 00e0       |    |		Load_Encached	Standard_Cache
0456 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0457 01cc       |    |		Execute	Vector,Catenate
0458 0092 09f5  |    |		Action	Push_String_Extended,0x9f5					; " ENTREE FAIRE "
045a 01cc       |    |		Execute	Vector,Catenate
045b e009       |    |		Load	0x0,0x9
045c 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
045d 00d9       |    |		Load_Top	At_Offset_1
045e 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
045f e5ff       |    |		Load	0x2,-0x1
0460 0a02       |    |		Execute_Immediate	Plus,0x2
0461 00d8       |    |		Load_Top	At_Offset_0
0462 00e2       |    |		Load_Encached	Integer_Cache
0463 0260       | `  |		Execute	Discrete,In_Type
0464 7001       |p   |		Jump_Nonzero	0x466
0465 0801       |    |		Execute_Immediate	Raise,0x1
0466 822f       | /  |		Call	0x1,0x2f
0467 e5ff       |    |		Load	0x2,-0x1
0468 822e       | .  |		Call	0x1,0x2e
0469 0092 09f6  |    |		Action	Push_String_Extended,0x9f6					; "FIN_POUR"
046b e009       |    |		Load	0x0,0x9
046c 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
046d 78c6       |x   |		Jump	0x534
046e e5ff       |    |		Load	0x2,-0x1
046f 822e       | .  |		Call	0x1,0x2e
0470 00d9       |    |		Load_Top	At_Offset_1
0471 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
0472 e003       |    |		Load	0x0,0x3
0473 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0474 e009       |    |		Load	0x0,0x9
0475 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0476 00d9       |    |		Load_Top	At_Offset_1
0477 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
0478 e003       |    |		Load	0x0,0x3
0479 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
047a 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
047b 6809       |h   |		Jump_Zero	0x485
047c 0092 09f7  |    |		Action	Push_String_Extended,0x9f7					; "."
047e 00da       |    |		Load_Top	At_Offset_2
047f 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
0480 e003       |    |		Load	0x0,0x3
0481 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0482 01cc       |    |		Execute	Vector,Catenate
0483 e009       |    |		Load	0x0,0x9
0484 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0485 0092 09f8  |    |		Action	Push_String_Extended,0x9f8					; " = "
0487 e009       |    |		Load	0x0,0x9
0488 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0489 00d9       |    |		Load_Top	At_Offset_1
048a 2e0a       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa
048b e5ff       |    |		Load	0x2,-0x1
048c 0a02       |    |		Execute_Immediate	Plus,0x2
048d 00d8       |    |		Load_Top	At_Offset_0
048e 00e2       |    |		Load_Encached	Integer_Cache
048f 0260       | `  |		Execute	Discrete,In_Type
0490 7001       |p   |		Jump_Nonzero	0x492
0491 0801       |    |		Execute_Immediate	Raise,0x1
0492 800a       |    |		Call	0x0,0xa
0493 78a0       |x   |		Jump	0x534
0494 e5ff       |    |		Load	0x2,-0x1
0495 822e       | .  |		Call	0x1,0x2e
0496 0092 09f9  |    |		Action	Push_String_Extended,0x9f9					; "LIE_CONNEXION ( "
0498 00da       |    |		Load_Top	At_Offset_2
0499 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
049a e003       |    |		Load	0x0,0x3
049b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
049c 01cc       |    |		Execute	Vector,Catenate
049d 0092 09fa  |    |		Action	Push_String_Extended,0x9fa					; ", "
049f 01cc       |    |		Execute	Vector,Catenate
04a0 00da       |    |		Load_Top	At_Offset_2
04a1 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
04a2 e003       |    |		Load	0x0,0x3
04a3 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04a4 01cc       |    |		Execute	Vector,Catenate
04a5 0092 09fb  |    |		Action	Push_String_Extended,0x9fb					; " )"
04a7 01cc       |    |		Execute	Vector,Catenate
04a8 e009       |    |		Load	0x0,0x9
04a9 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
04aa 7889       |x   |		Jump	0x534
04ab e5ff       |    |		Load	0x2,-0x1
04ac 822e       | .  |		Call	0x1,0x2e
04ad 0092 09fc  |    |		Action	Push_String_Extended,0x9fc					; "DELIE_CONNEXION ( "
04af 00da       |    |		Load_Top	At_Offset_2
04b0 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
04b1 e003       |    |		Load	0x0,0x3
04b2 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04b3 01cc       |    |		Execute	Vector,Catenate
04b4 0092 09fa  |    |		Action	Push_String_Extended,0x9fa					; ", "
04b6 01cc       |    |		Execute	Vector,Catenate
04b7 00da       |    |		Load_Top	At_Offset_2
04b8 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
04b9 e003       |    |		Load	0x0,0x3
04ba 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04bb 01cc       |    |		Execute	Vector,Catenate
04bc 0092 09fb  |    |		Action	Push_String_Extended,0x9fb					; " )"
04be 01cc       |    |		Execute	Vector,Catenate
04bf e009       |    |		Load	0x0,0x9
04c0 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
04c1 7872       |xr  |		Jump	0x534
04c2 e5ff       |    |		Load	0x2,-0x1
04c3 822e       | .  |		Call	0x1,0x2e
04c4 0092 09fd  |    |		Action	Push_String_Extended,0x9fd					; "LIE_LIEN ( "
04c6 00da       |    |		Load_Top	At_Offset_2
04c7 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
04c8 e003       |    |		Load	0x0,0x3
04c9 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04ca 01cc       |    |		Execute	Vector,Catenate
04cb 0092 09fa  |    |		Action	Push_String_Extended,0x9fa					; ", "
04cd 01cc       |    |		Execute	Vector,Catenate
04ce 00da       |    |		Load_Top	At_Offset_2
04cf 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
04d0 e003       |    |		Load	0x0,0x3
04d1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04d2 01cc       |    |		Execute	Vector,Catenate
04d3 0092 09fb  |    |		Action	Push_String_Extended,0x9fb					; " )"
04d5 01cc       |    |		Execute	Vector,Catenate
04d6 e009       |    |		Load	0x0,0x9
04d7 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
04d8 785b       |x[  |		Jump	0x534
04d9 e5ff       |    |		Load	0x2,-0x1
04da 822e       | .  |		Call	0x1,0x2e
04db 0092 09fe  |    |		Action	Push_String_Extended,0x9fe					; "DELIE_LIEN ( "
04dd 00da       |    |		Load_Top	At_Offset_2
04de 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
04df e003       |    |		Load	0x0,0x3
04e0 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04e1 01cc       |    |		Execute	Vector,Catenate
04e2 0092 09fa  |    |		Action	Push_String_Extended,0x9fa					; ", "
04e4 01cc       |    |		Execute	Vector,Catenate
04e5 00da       |    |		Load_Top	At_Offset_2
04e6 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
04e7 e003       |    |		Load	0x0,0x3
04e8 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04e9 01cc       |    |		Execute	Vector,Catenate
04ea 0092 09fb  |    |		Action	Push_String_Extended,0x9fb					; " )"
04ec 01cc       |    |		Execute	Vector,Catenate
04ed e009       |    |		Load	0x0,0x9
04ee 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
04ef 7844       |xD  |		Jump	0x534
04f0 e5ff       |    |		Load	0x2,-0x1
04f1 822e       | .  |		Call	0x1,0x2e
04f2 0092 09ff  |    |		Action	Push_String_Extended,0x9ff					; "LISTE_LIEN ( "
04f4 00da       |    |		Load_Top	At_Offset_2
04f5 260d       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xd
04f6 e003       |    |		Load	0x0,0x3
04f7 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04f8 01cc       |    |		Execute	Vector,Catenate
04f9 0092 09fa  |    |		Action	Push_String_Extended,0x9fa					; ", "
04fb 01cc       |    |		Execute	Vector,Catenate
04fc 00da       |    |		Load_Top	At_Offset_2
04fd 2e0e       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xe
04fe e004       |    |		Load	0x0,0x4
04ff 011c       |    |		Execute	Any,Convert_Unchecked
0500 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0501 01cc       |    |		Execute	Vector,Catenate
0502 0092 09fb  |    |		Action	Push_String_Extended,0x9fb					; " )"
0504 01cc       |    |		Execute	Vector,Catenate
0505 e009       |    |		Load	0x0,0x9
0506 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0507 782c       |x,  |		Jump	0x534
0508 e5ff       |    |		Load	0x2,-0x1
0509 822e       | .  |		Call	0x1,0x2e
050a 0092 0a00  |    |		Action	Push_String_Extended,0xa00					; "ECHANGER_LIEN ( "
050c 00da       |    |		Load_Top	At_Offset_2
050d 260f       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xf
050e e003       |    |		Load	0x0,0x3
050f 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0510 01cc       |    |		Execute	Vector,Catenate
0511 0092 09fa  |    |		Action	Push_String_Extended,0x9fa					; ", "
0513 01cc       |    |		Execute	Vector,Catenate
0514 00da       |    |		Load_Top	At_Offset_2
0515 2610       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x10
0516 e003       |    |		Load	0x0,0x3
0517 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0518 01cc       |    |		Execute	Vector,Catenate
0519 0092 09fa  |    |		Action	Push_String_Extended,0x9fa					; ", "
051b 01cc       |    |		Execute	Vector,Catenate
051c 00da       |    |		Load_Top	At_Offset_2
051d 2611       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x11
051e e003       |    |		Load	0x0,0x3
051f 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0520 01cc       |    |		Execute	Vector,Catenate
0521 0092 09fb  |    |		Action	Push_String_Extended,0x9fb					; " )"
0523 01cc       |    |		Execute	Vector,Catenate
0524 e009       |    |		Load	0x0,0x9
0525 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0526 780d       |x   |		Jump	0x534
0527 e5ff       |    |		Load	0x2,-0x1
0528 822e       | .  |		Call	0x1,0x2e
0529 0092 0a01  |    |		Action	Push_String_Extended,0xa01					; " -- Afficher -- "
052b e009       |    |		Load	0x0,0x9
052c 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
052d 7806       |x   |		Jump	0x534
052e e5ff       |    |		Load	0x2,-0x1
052f 822e       | .  |		Call	0x1,0x2e
0530 0092 09ec  |    |		Action	Push_String_Extended,0x9ec					; "FIN"
0532 e009       |    |		Load	0x0,0x9
0533 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0534 00da       |    |		Load_Top	At_Offset_2
0535 822a       | *  |		Call	0x1,0x2a
0536 003b       | ;  |		Store_Top	Access,At_Offset_3
0537 00c9       |    |		Action	Pop_Auxiliary_Loop
0538 00da       |    |		Load_Top	At_Offset_2
0539 822c       | ,  |		Call	0x1,0x2c
053a 76c3       |v   |		Jump_Nonzero	0x3fe
053b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
053c 0000 0000  |    |		.BLANK	0000[0x4]
0540 ; --------------------------------------------------------------------------------------
0540 ; SUBPROGRAM
0540 ; --------------------------------------------------------------------------------------
0540 0544       | D  |		.CONST	0x0544								; Address of begin
0541 0004       |    |		.CONST	0x0004								; Address of exception handler
0542 0002       |    |		.CONST	0x0002								; Number of locals
0543			INIT_0540:
0543 00e1       |    |		Load_Encached	Boolean_Cache
0544			BODY_0540:
0544 e5fc       |    |		Load	0x2,-0x4
0545 680b       |h   |		Jump_Zero	0x551
0546 0092 0a02  |    |		Action	Push_String_Extended,0xa02					; ">> Execution SI <<"
0548 e009       |    |		Load	0x0,0x9
0549 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
054a 0092 0a03  |    |		Action	Push_String_Extended,0xa03					; ">> Condition:"
054c e009       |    |		Load	0x0,0x9
054d 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
054e 00db       |    |		Load_Top	At_Offset_3
054f 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0550 800b       |    |		Call	0x0,0xb
0551 e5fd       |    |		Load	0x2,-0x3
0552 e5f9       |    |		Load	0x2,-0x7
0553 e5fa       |    |		Load	0x2,-0x6
0554 e5fb       |    |		Load	0x2,-0x5
0555 e5fe       |    |		Load	0x2,-0x2
0556 e5ff       |    |		Load	0x2,-0x1
0557 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0558 800c       |    |		Call	0x0,0xc
0559 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
055a 00d8       |    |		Load_Top	At_Offset_0
055b 6815       |h   |		Jump_Zero	0x571
055c e5fc       |    |		Load	0x2,-0x4
055d 6804       |h   |		Jump_Zero	0x562
055e 0092 0a04  |    |		Action	Push_String_Extended,0xa04					; ">> Execution ALORS <<"
0560 e009       |    |		Load	0x0,0x9
0561 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0562 e5f7       |    |		Load	0x2,-0x9
0563 e5f8       |    |		Load	0x2,-0x8
0564 e5f9       |    |		Load	0x2,-0x7
0565 e5fa       |    |		Load	0x2,-0x6
0566 e5fb       |    |		Load	0x2,-0x5
0567 e5fc       |    |		Load	0x2,-0x4
0568 e5fd       |    |		Load	0x2,-0x3
0569 e5fe       |    |		Load	0x2,-0x2
056a e5ff       |    |		Load	0x2,-0x1
056b 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
056c 8211       |    |		Call	0x1,0x11
056d 00d3       |    |		Pop_Control	Pop_Count_3
056e c5f8       |    |		Store	0x2,-0x8
056f c5f7       |    |		Store	0x2,-0x9
0570 7814       |x   |		Jump	0x585
0571 e5fc       |    |		Load	0x2,-0x4
0572 6804       |h   |		Jump_Zero	0x577
0573 0092 0a05  |    |		Action	Push_String_Extended,0xa05					; ">> Execution SINON <<"
0575 e009       |    |		Load	0x0,0x9
0576 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0577 e5f7       |    |		Load	0x2,-0x9
0578 e5f8       |    |		Load	0x2,-0x8
0579 e5f9       |    |		Load	0x2,-0x7
057a e5fa       |    |		Load	0x2,-0x6
057b e5fb       |    |		Load	0x2,-0x5
057c e5fc       |    |		Load	0x2,-0x4
057d e5fd       |    |		Load	0x2,-0x3
057e e5fe       |    |		Load	0x2,-0x2
057f e5ff       |    |		Load	0x2,-0x1
0580 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
0581 8211       |    |		Call	0x1,0x11
0582 00d3       |    |		Pop_Control	Pop_Count_3
0583 c5f8       |    |		Store	0x2,-0x8
0584 c5f7       |    |		Store	0x2,-0x9
0585 e5fc       |    |		Load	0x2,-0x4
0586 6804       |h   |		Jump_Zero	0x58b
0587 0092 0a06  |    |		Action	Push_String_Extended,0xa06					; ">> FIN SI <<"
0589 e009       |    |		Load	0x0,0x9
058a 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
058b 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
058c 0000 0000  |    |		.BLANK	0000[0x4]
0590 ; --------------------------------------------------------------------------------------
0590 ; SUBPROGRAM
0590 ; --------------------------------------------------------------------------------------
0590 0593       |    |		.CONST	0x0593								; Address of begin
0591 0004       |    |		.CONST	0x0004								; Address of exception handler
0592 0001       |    |		.CONST	0x0001								; Number of locals
0593			BODY_0590:
0593			INIT_0590:
0593 800d       |    |		Call	0x0,0xd
0594 00db       |    |		Load_Top	At_Offset_3
0595 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
0596 026e       | n  |		Execute	Discrete,Modulo
0597 7022       |p"  |		Jump_Nonzero	0x5ba
0598 e5fc       |    |		Load	0x2,-0x4
0599 680c       |h   |		Jump_Zero	0x5a6
059a 0092 0a07  |    |		Action	Push_String_Extended,0xa07					; ">> Execution POUR ("
059c 00db       |    |		Load_Top	At_Offset_3
059d 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
059e 00e0       |    |		Load_Encached	Standard_Cache
059f 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
05a0 01cc       |    |		Execute	Vector,Catenate
05a1 0092 0a08  |    |		Action	Push_String_Extended,0xa08					; ")"
05a3 01cc       |    |		Execute	Vector,Catenate
05a4 e009       |    |		Load	0x0,0x9
05a5 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
05a6 e5f7       |    |		Load	0x2,-0x9
05a7 e5f8       |    |		Load	0x2,-0x8
05a8 e5f9       |    |		Load	0x2,-0x7
05a9 e5fa       |    |		Load	0x2,-0x6
05aa e5fb       |    |		Load	0x2,-0x5
05ab e5fc       |    |		Load	0x2,-0x4
05ac e5fd       |    |		Load	0x2,-0x3
05ad e5fe       |    |		Load	0x2,-0x2
05ae e5ff       |    |		Load	0x2,-0x1
05af 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
05b0 8211       |    |		Call	0x1,0x11
05b1 00d3       |    |		Pop_Control	Pop_Count_3
05b2 c5f8       |    |		Store	0x2,-0x8
05b3 c5f7       |    |		Store	0x2,-0x9
05b4 e5fc       |    |		Load	0x2,-0x4
05b5 6804       |h   |		Jump_Zero	0x5ba
05b6 0092 0a09  |    |		Action	Push_String_Extended,0xa09					; ">> FIN POUR <<"
05b8 e009       |    |		Load	0x0,0x9
05b9 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
05ba 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
05bb 0000 0000  |    |		.BLANK	0000[0x5]
05c0 ; --------------------------------------------------------------------------------------
05c0 ; SUBPROGRAM
05c0 ; --------------------------------------------------------------------------------------
05c0 05c5       |    |		.CONST	0x05c5								; Address of begin
05c1 0004       |    |		.CONST	0x0004								; Address of exception handler
05c2 0003       |    |		.CONST	0x0003								; Number of locals
05c3			INIT_05c0:
05c3 00e2       |    |		Load_Encached	Integer_Cache
05c4 00e1       |    |		Load_Encached	Boolean_Cache
05c5			BODY_05c0:
05c5 e5fc       |    |		Load	0x2,-0x4
05c6 6820       |h   |		Jump_Zero	0x5e7
05c7 0092 0a0a  |    |		Action	Push_String_Extended,0xa0a					; ">> Execution AFFECTATION <<"
05c9 e009       |    |		Load	0x0,0x9
05ca 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
05cb e5ff       |    |		Load	0x2,-0x1
05cc 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
05cd e003       |    |		Load	0x0,0x3
05ce 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
05cf e009       |    |		Load	0x0,0x9
05d0 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
05d1 e5ff       |    |		Load	0x2,-0x1
05d2 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
05d3 e003       |    |		Load	0x0,0x3
05d4 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
05d5 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
05d6 6809       |h   |		Jump_Zero	0x5e0
05d7 0092 09f7  |    |		Action	Push_String_Extended,0x9f7					; "."
05d9 e5ff       |    |		Load	0x2,-0x1
05da 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
05db e003       |    |		Load	0x0,0x3
05dc 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
05dd 01cc       |    |		Execute	Vector,Catenate
05de e009       |    |		Load	0x0,0x9
05df 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
05e0 0092 0a0b  |    |		Action	Push_String_Extended,0xa0b					; " := "
05e2 e009       |    |		Load	0x0,0x9
05e3 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
05e4 e5ff       |    |		Load	0x2,-0x1
05e5 2e0a       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa
05e6 800b       |    |		Call	0x0,0xb
05e7 e5ff       |    |		Load	0x2,-0x1
05e8 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
05e9 e003       |    |		Load	0x0,0x3
05ea 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
05eb 701b       |p   |		Jump_Nonzero	0x607
05ec e5ff       |    |		Load	0x2,-0x1
05ed 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
05ee e003       |    |		Load	0x0,0x3
05ef 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
05f0 e5fb       |    |		Load	0x2,-0x5
05f1 800e       |    |		Call	0x0,0xe
05f2 6810       |h   |		Jump_Zero	0x603
05f3 e5fb       |    |		Load	0x2,-0x5
05f4 e5fd       |    |		Load	0x2,-0x3
05f5 e5f9       |    |		Load	0x2,-0x7
05f6 e5fa       |    |		Load	0x2,-0x6
05f7 e5fb       |    |		Load	0x2,-0x5
05f8 e5fe       |    |		Load	0x2,-0x2
05f9 e5ff       |    |		Load	0x2,-0x1
05fa 2e0a       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa
05fb 800f       |    |		Call	0x0,0xf
05fc e5ff       |    |		Load	0x2,-0x1
05fd 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
05fe e003       |    |		Load	0x0,0x3
05ff 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0600 8010       |    |		Call	0x0,0x10
0601 00d1       |    |		Pop_Control	Pop_Count_1
0602 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0603 0092 0a0c  |    |		Action	Push_String_Extended,0xa0c					; "Manque l'extension pour l'acces a la variable !!!"
0605 8011       |    |		Call	0x0,0x11
0606 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0607 e5ff       |    |		Load	0x2,-0x1
0608 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
0609 e003       |    |		Load	0x0,0x3
060a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
060b e5ff       |    |		Load	0x2,-0x1
060c 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
060d e003       |    |		Load	0x0,0x3
060e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
060f e5fe       |    |		Load	0x2,-0x2
0610 e5fb       |    |		Load	0x2,-0x5
0611 8012       |    |		Call	0x0,0x12
0612 0092 0a0d  |    |		Action	Push_String_Extended,0xa0d					; "ENTIER"
0614 01df       |    |		Execute	Vector,Equal
0615 e5ff       |    |		Load	0x2,-0x1
0616 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
0617 e003       |    |		Load	0x0,0x3
0618 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0619 e5ff       |    |		Load	0x2,-0x1
061a 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
061b e003       |    |		Load	0x0,0x3
061c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
061d e5fe       |    |		Load	0x2,-0x2
061e e5fb       |    |		Load	0x2,-0x5
061f 8012       |    |		Call	0x0,0x12
0620 0092 0a0e  |    |		Action	Push_String_Extended,0xa0e					; "ENUMERE"
0622 01df       |    |		Execute	Vector,Equal
0623 0278       | x  |		Execute	Discrete,Or
0624 6817       |h   |		Jump_Zero	0x63c
0625 e5fd       |    |		Load	0x2,-0x3
0626 e5f9       |    |		Load	0x2,-0x7
0627 e5fa       |    |		Load	0x2,-0x6
0628 e5fb       |    |		Load	0x2,-0x5
0629 e5fe       |    |		Load	0x2,-0x2
062a e5ff       |    |		Load	0x2,-0x1
062b 2e0a       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa
062c 8013       |    |		Call	0x0,0x13
062d 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
062e e5fb       |    |		Load	0x2,-0x5
062f 00da       |    |		Load_Top	At_Offset_2
0630 e5ff       |    |		Load	0x2,-0x1
0631 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
0632 e003       |    |		Load	0x0,0x3
0633 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0634 e5ff       |    |		Load	0x2,-0x1
0635 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
0636 e003       |    |		Load	0x0,0x3
0637 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0638 e5fe       |    |		Load	0x2,-0x2
0639 8014       |    |		Call	0x0,0x14
063a 00d1       |    |		Pop_Control	Pop_Count_1
063b 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
063c e5ff       |    |		Load	0x2,-0x1
063d 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
063e e003       |    |		Load	0x0,0x3
063f 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0640 e5ff       |    |		Load	0x2,-0x1
0641 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
0642 e003       |    |		Load	0x0,0x3
0643 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0644 e5fe       |    |		Load	0x2,-0x2
0645 e5fb       |    |		Load	0x2,-0x5
0646 8012       |    |		Call	0x0,0x12
0647 0092 0a0f  |    |		Action	Push_String_Extended,0xa0f					; "BOOLEEN"
0649 01df       |    |		Execute	Vector,Equal
064a 6817       |h   |		Jump_Zero	0x662
064b e5fd       |    |		Load	0x2,-0x3
064c e5f9       |    |		Load	0x2,-0x7
064d e5fa       |    |		Load	0x2,-0x6
064e e5fb       |    |		Load	0x2,-0x5
064f e5fe       |    |		Load	0x2,-0x2
0650 e5ff       |    |		Load	0x2,-0x1
0651 2e0a       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa
0652 800c       |    |		Call	0x0,0xc
0653 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0654 e5fb       |    |		Load	0x2,-0x5
0655 00d9       |    |		Load_Top	At_Offset_1
0656 e5ff       |    |		Load	0x2,-0x1
0657 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
0658 e003       |    |		Load	0x0,0x3
0659 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
065a e5ff       |    |		Load	0x2,-0x1
065b 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
065c e003       |    |		Load	0x0,0x3
065d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
065e e5fe       |    |		Load	0x2,-0x2
065f 8015       |    |		Call	0x0,0x15
0660 00d1       |    |		Pop_Control	Pop_Count_1
0661 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0662 0092 0a10  |    |		Action	Push_String_Extended,0xa10					; "Affectation non valide !!!"
0664 8011       |    |		Call	0x0,0x11
0665 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0666 0000 0000  |    |		.XXX[0x2]
0668 ; --------------------------------------------------------------------------------------
0668 ; SUBPROGRAM
0668 ; --------------------------------------------------------------------------------------
0668 0677       | w  |		.CONST	0x0677								; Address of begin
0669 0004       |    |		.CONST	0x0004								; Address of exception handler
066a 0003       |    |		.CONST	0x0003								; Number of locals
066b			INIT_0668:
066b 4820       |H   |		Short_Literal	0x20
066c e003       |    |		Load	0x0,0x3
066d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
066e 1c08       |    |		Execute_Immediate	Run_Utility,0x8
066f 00d8       |    |		Load_Top	At_Offset_0
0670 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0671 4820       |H   |		Short_Literal	0x20
0672 e003       |    |		Load	0x0,0x3
0673 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0674 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0675 00d8       |    |		Load_Top	At_Offset_0
0676 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0677			BODY_0668:
0677 e5fb       |    |		Load	0x2,-0x5
0678 6816       |h   |		Jump_Zero	0x68f
0679 0092 0a11  |    |		Action	Push_String_Extended,0xa11					; ">> Execution LIE_CONNEXION <<"
067b e009       |    |		Load	0x0,0x9
067c 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
067d 0092 0a12  |    |		Action	Push_String_Extended,0xa12					; ">> Parametres: "
067f e5ff       |    |		Load	0x2,-0x1
0680 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
0681 e003       |    |		Load	0x0,0x3
0682 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0683 01cc       |    |		Execute	Vector,Catenate
0684 0092 0a13  |    |		Action	Push_String_Extended,0xa13					; " , "
0686 01cc       |    |		Execute	Vector,Catenate
0687 e009       |    |		Load	0x0,0x9
0688 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0689 e5ff       |    |		Load	0x2,-0x1
068a 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
068b e003       |    |		Load	0x0,0x3
068c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
068d e009       |    |		Load	0x0,0x9
068e 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
068f e5ff       |    |		Load	0x2,-0x1
0690 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
0691 00da       |    |		Load_Top	At_Offset_2
0692 016d       | m  |		Execute	Variant_Record,Structure_Write
0693 e5ff       |    |		Load	0x2,-0x1
0694 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
0695 00d9       |    |		Load_Top	At_Offset_1
0696 016d       | m  |		Execute	Variant_Record,Structure_Write
0697 00d9       |    |		Load_Top	At_Offset_1
0698 e5fd       |    |		Load	0x2,-0x3
0699 e5fc       |    |		Load	0x2,-0x4
069a 823c       | <  |		Call	0x1,0x3c
069b 00d1       |    |		Pop_Control	Pop_Count_1
069c 00d8       |    |		Load_Top	At_Offset_0
069d e5fd       |    |		Load	0x2,-0x3
069e e5fc       |    |		Load	0x2,-0x4
069f 823c       | <  |		Call	0x1,0x3c
06a0 00d1       |    |		Pop_Control	Pop_Count_1
06a1 e5fa       |    |		Load	0x2,-0x6
06a2 4801       |H   |		Short_Literal	0x1
06a3 00da       |    |		Load_Top	At_Offset_2
06a4 e003       |    |		Load	0x0,0x3
06a5 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06a6 e402       |    |		Load	0x2,0x2
06a7 e003       |    |		Load	0x0,0x3
06a8 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06a9 8016       |    |		Call	0x0,0x16
06aa 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
06ab 0000 0000  |    |		.BLANK	0000[0x5]
06b0 ; --------------------------------------------------------------------------------------
06b0 ; SUBPROGRAM
06b0 ; --------------------------------------------------------------------------------------
06b0 06bf       |    |		.CONST	0x06bf								; Address of begin
06b1 0004       |    |		.CONST	0x0004								; Address of exception handler
06b2 0003       |    |		.CONST	0x0003								; Number of locals
06b3			INIT_06b0:
06b3 4820       |H   |		Short_Literal	0x20
06b4 e003       |    |		Load	0x0,0x3
06b5 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
06b6 1c08       |    |		Execute_Immediate	Run_Utility,0x8
06b7 00d8       |    |		Load_Top	At_Offset_0
06b8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
06b9 4820       |H   |		Short_Literal	0x20
06ba e003       |    |		Load	0x0,0x3
06bb 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
06bc 1c08       |    |		Execute_Immediate	Run_Utility,0x8
06bd 00d8       |    |		Load_Top	At_Offset_0
06be 1c00       |    |		Execute_Immediate	Run_Utility,0x0
06bf			BODY_06b0:
06bf e5fb       |    |		Load	0x2,-0x5
06c0 6816       |h   |		Jump_Zero	0x6d7
06c1 0092 0a14  |    |		Action	Push_String_Extended,0xa14					; ">> Execution DELIE_CONNEXION <<"
06c3 e009       |    |		Load	0x0,0x9
06c4 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
06c5 0092 0a12  |    |		Action	Push_String_Extended,0xa12					; ">> Parametres: "
06c7 e5ff       |    |		Load	0x2,-0x1
06c8 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
06c9 e003       |    |		Load	0x0,0x3
06ca 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06cb 01cc       |    |		Execute	Vector,Catenate
06cc 0092 0a13  |    |		Action	Push_String_Extended,0xa13					; " , "
06ce 01cc       |    |		Execute	Vector,Catenate
06cf e009       |    |		Load	0x0,0x9
06d0 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
06d1 e5ff       |    |		Load	0x2,-0x1
06d2 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
06d3 e003       |    |		Load	0x0,0x3
06d4 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06d5 e009       |    |		Load	0x0,0x9
06d6 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
06d7 e5ff       |    |		Load	0x2,-0x1
06d8 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
06d9 00da       |    |		Load_Top	At_Offset_2
06da 016d       | m  |		Execute	Variant_Record,Structure_Write
06db e5ff       |    |		Load	0x2,-0x1
06dc 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
06dd 00d9       |    |		Load_Top	At_Offset_1
06de 016d       | m  |		Execute	Variant_Record,Structure_Write
06df 00d9       |    |		Load_Top	At_Offset_1
06e0 e5fd       |    |		Load	0x2,-0x3
06e1 e5fc       |    |		Load	0x2,-0x4
06e2 823c       | <  |		Call	0x1,0x3c
06e3 00d1       |    |		Pop_Control	Pop_Count_1
06e4 00d8       |    |		Load_Top	At_Offset_0
06e5 e5fd       |    |		Load	0x2,-0x3
06e6 e5fc       |    |		Load	0x2,-0x4
06e7 823c       | <  |		Call	0x1,0x3c
06e8 00d1       |    |		Pop_Control	Pop_Count_1
06e9 e5fa       |    |		Load	0x2,-0x6
06ea 4802       |H   |		Short_Literal	0x2
06eb 00da       |    |		Load_Top	At_Offset_2
06ec e003       |    |		Load	0x0,0x3
06ed 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06ee e402       |    |		Load	0x2,0x2
06ef e003       |    |		Load	0x0,0x3
06f0 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06f1 8016       |    |		Call	0x0,0x16
06f2 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
06f3 0000 0000  |    |		.BLANK	0000[0x5]
06f8 ; --------------------------------------------------------------------------------------
06f8 ; SUBPROGRAM
06f8 ; --------------------------------------------------------------------------------------
06f8 0707       |    |		.CONST	0x0707								; Address of begin
06f9 0004       |    |		.CONST	0x0004								; Address of exception handler
06fa 0003       |    |		.CONST	0x0003								; Number of locals
06fb			INIT_06f8:
06fb 4820       |H   |		Short_Literal	0x20
06fc e003       |    |		Load	0x0,0x3
06fd 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
06fe 1c08       |    |		Execute_Immediate	Run_Utility,0x8
06ff 00d8       |    |		Load_Top	At_Offset_0
0700 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0701 4820       |H   |		Short_Literal	0x20
0702 e003       |    |		Load	0x0,0x3
0703 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0704 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0705 00d8       |    |		Load_Top	At_Offset_0
0706 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0707			BODY_06f8:
0707 e5fb       |    |		Load	0x2,-0x5
0708 6816       |h   |		Jump_Zero	0x71f
0709 0092 0a15  |    |		Action	Push_String_Extended,0xa15					; ">> Execution LIE_LIEN <<"
070b e009       |    |		Load	0x0,0x9
070c 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
070d 0092 0a12  |    |		Action	Push_String_Extended,0xa12					; ">> Parametres: "
070f e5ff       |    |		Load	0x2,-0x1
0710 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
0711 e003       |    |		Load	0x0,0x3
0712 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0713 01cc       |    |		Execute	Vector,Catenate
0714 0092 0a13  |    |		Action	Push_String_Extended,0xa13					; " , "
0716 01cc       |    |		Execute	Vector,Catenate
0717 e009       |    |		Load	0x0,0x9
0718 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0719 e5ff       |    |		Load	0x2,-0x1
071a 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
071b e003       |    |		Load	0x0,0x3
071c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
071d e009       |    |		Load	0x0,0x9
071e 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
071f e5ff       |    |		Load	0x2,-0x1
0720 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
0721 00da       |    |		Load_Top	At_Offset_2
0722 016d       | m  |		Execute	Variant_Record,Structure_Write
0723 e5ff       |    |		Load	0x2,-0x1
0724 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
0725 00d9       |    |		Load_Top	At_Offset_1
0726 016d       | m  |		Execute	Variant_Record,Structure_Write
0727 00d9       |    |		Load_Top	At_Offset_1
0728 e5fd       |    |		Load	0x2,-0x3
0729 e5fc       |    |		Load	0x2,-0x4
072a 823c       | <  |		Call	0x1,0x3c
072b 00d1       |    |		Pop_Control	Pop_Count_1
072c 00d8       |    |		Load_Top	At_Offset_0
072d e5fd       |    |		Load	0x2,-0x3
072e e5fc       |    |		Load	0x2,-0x4
072f 823c       | <  |		Call	0x1,0x3c
0730 00d1       |    |		Pop_Control	Pop_Count_1
0731 e5fa       |    |		Load	0x2,-0x6
0732 4801       |H   |		Short_Literal	0x1
0733 00da       |    |		Load_Top	At_Offset_2
0734 e003       |    |		Load	0x0,0x3
0735 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0736 e402       |    |		Load	0x2,0x2
0737 e003       |    |		Load	0x0,0x3
0738 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0739 8017       |    |		Call	0x0,0x17
073a 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
073b 0000 0000  |    |		.BLANK	0000[0x5]
0740 ; --------------------------------------------------------------------------------------
0740 ; SUBPROGRAM
0740 ; --------------------------------------------------------------------------------------
0740 074f       | O  |		.CONST	0x074f								; Address of begin
0741 0004       |    |		.CONST	0x0004								; Address of exception handler
0742 0003       |    |		.CONST	0x0003								; Number of locals
0743			INIT_0740:
0743 4820       |H   |		Short_Literal	0x20
0744 e003       |    |		Load	0x0,0x3
0745 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0746 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0747 00d8       |    |		Load_Top	At_Offset_0
0748 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0749 4820       |H   |		Short_Literal	0x20
074a e003       |    |		Load	0x0,0x3
074b 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
074c 1c08       |    |		Execute_Immediate	Run_Utility,0x8
074d 00d8       |    |		Load_Top	At_Offset_0
074e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
074f			BODY_0740:
074f e5fb       |    |		Load	0x2,-0x5
0750 6816       |h   |		Jump_Zero	0x767
0751 0092 0a16  |    |		Action	Push_String_Extended,0xa16					; ">> Execution DELIE_LIEN <<"
0753 e009       |    |		Load	0x0,0x9
0754 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0755 0092 0a12  |    |		Action	Push_String_Extended,0xa12					; ">> Parametres: "
0757 e5ff       |    |		Load	0x2,-0x1
0758 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
0759 e003       |    |		Load	0x0,0x3
075a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
075b 01cc       |    |		Execute	Vector,Catenate
075c 0092 0a13  |    |		Action	Push_String_Extended,0xa13					; " , "
075e 01cc       |    |		Execute	Vector,Catenate
075f e009       |    |		Load	0x0,0x9
0760 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0761 e5ff       |    |		Load	0x2,-0x1
0762 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
0763 e003       |    |		Load	0x0,0x3
0764 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0765 e009       |    |		Load	0x0,0x9
0766 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0767 e5ff       |    |		Load	0x2,-0x1
0768 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
0769 00da       |    |		Load_Top	At_Offset_2
076a 016d       | m  |		Execute	Variant_Record,Structure_Write
076b e5ff       |    |		Load	0x2,-0x1
076c 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
076d 00d9       |    |		Load_Top	At_Offset_1
076e 016d       | m  |		Execute	Variant_Record,Structure_Write
076f 00d9       |    |		Load_Top	At_Offset_1
0770 e5fd       |    |		Load	0x2,-0x3
0771 e5fc       |    |		Load	0x2,-0x4
0772 823c       | <  |		Call	0x1,0x3c
0773 00d1       |    |		Pop_Control	Pop_Count_1
0774 00d8       |    |		Load_Top	At_Offset_0
0775 e5fd       |    |		Load	0x2,-0x3
0776 e5fc       |    |		Load	0x2,-0x4
0777 823c       | <  |		Call	0x1,0x3c
0778 00d1       |    |		Pop_Control	Pop_Count_1
0779 e5fa       |    |		Load	0x2,-0x6
077a 4802       |H   |		Short_Literal	0x2
077b 00da       |    |		Load_Top	At_Offset_2
077c e003       |    |		Load	0x0,0x3
077d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
077e e402       |    |		Load	0x2,0x2
077f e003       |    |		Load	0x0,0x3
0780 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0781 8017       |    |		Call	0x0,0x17
0782 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0783 0000 0000  |    |		.BLANK	0000[0x5]
0788 ; --------------------------------------------------------------------------------------
0788 ; SUBPROGRAM
0788 ; --------------------------------------------------------------------------------------
0788 0791       |    |		.CONST	0x0791								; Address of begin
0789 0004       |    |		.CONST	0x0004								; Address of exception handler
078a 0002       |    |		.CONST	0x0002								; Number of locals
078b			INIT_0788:
078b 4820       |H   |		Short_Literal	0x20
078c e003       |    |		Load	0x0,0x3
078d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
078e 1c08       |    |		Execute_Immediate	Run_Utility,0x8
078f 00d8       |    |		Load_Top	At_Offset_0
0790 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0791			BODY_0788:
0791 e5fb       |    |		Load	0x2,-0x5
0792 6816       |h   |		Jump_Zero	0x7a9
0793 0092 0a17  |    |		Action	Push_String_Extended,0xa17					; ">> Execution LISTE_LIEN <<"
0795 e009       |    |		Load	0x0,0x9
0796 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0797 0092 0a12  |    |		Action	Push_String_Extended,0xa12					; ">> Parametres: "
0799 e5ff       |    |		Load	0x2,-0x1
079a 260d       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xd
079b e003       |    |		Load	0x0,0x3
079c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
079d 01cc       |    |		Execute	Vector,Catenate
079e 0092 09fa  |    |		Action	Push_String_Extended,0x9fa					; ", "
07a0 01cc       |    |		Execute	Vector,Catenate
07a1 e5ff       |    |		Load	0x2,-0x1
07a2 2e0e       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xe
07a3 e004       |    |		Load	0x0,0x4
07a4 011c       |    |		Execute	Any,Convert_Unchecked
07a5 1c01       |    |		Execute_Immediate	Run_Utility,0x1
07a6 01cc       |    |		Execute	Vector,Catenate
07a7 e009       |    |		Load	0x0,0x9
07a8 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
07a9 00db       |    |		Load_Top	At_Offset_3
07aa 260d       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xd
07ab 00d9       |    |		Load_Top	At_Offset_1
07ac 016d       | m  |		Execute	Variant_Record,Structure_Write
07ad 00d8       |    |		Load_Top	At_Offset_0
07ae e5fd       |    |		Load	0x2,-0x3
07af e5fc       |    |		Load	0x2,-0x4
07b0 823c       | <  |		Call	0x1,0x3c
07b1 00d1       |    |		Pop_Control	Pop_Count_1
07b2 00db       |    |		Load_Top	At_Offset_3
07b3 2e0e       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xe
07b4 0f2d       | -  |		Execute_Immediate	Equal,0x2d
07b5 6807       |h   |		Jump_Zero	0x7bd
07b6 e5fa       |    |		Load	0x2,-0x6
07b7 4801       |H   |		Short_Literal	0x1
07b8 00da       |    |		Load_Top	At_Offset_2
07b9 e003       |    |		Load	0x0,0x3
07ba 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
07bb 8018       |    |		Call	0x0,0x18
07bc 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
07bd e5fa       |    |		Load	0x2,-0x6
07be 4802       |H   |		Short_Literal	0x2
07bf 00da       |    |		Load_Top	At_Offset_2
07c0 e003       |    |		Load	0x0,0x3
07c1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
07c2 8018       |    |		Call	0x0,0x18
07c3 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
07c4 0000 0000  |    |		.BLANK	0000[0x4]
07c8 ; --------------------------------------------------------------------------------------
07c8 ; SUBPROGRAM
07c8 ; --------------------------------------------------------------------------------------
07c8 07dd       |    |		.CONST	0x07dd								; Address of begin
07c9 0004       |    |		.CONST	0x0004								; Address of exception handler
07ca 0004       |    |		.CONST	0x0004								; Number of locals
07cb			INIT_07c8:
07cb 4820       |H   |		Short_Literal	0x20
07cc e003       |    |		Load	0x0,0x3
07cd 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
07ce 1c08       |    |		Execute_Immediate	Run_Utility,0x8
07cf 00d8       |    |		Load_Top	At_Offset_0
07d0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
07d1 4820       |H   |		Short_Literal	0x20
07d2 e003       |    |		Load	0x0,0x3
07d3 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
07d4 1c08       |    |		Execute_Immediate	Run_Utility,0x8
07d5 00d8       |    |		Load_Top	At_Offset_0
07d6 1c00       |    |		Execute_Immediate	Run_Utility,0x0
07d7 4820       |H   |		Short_Literal	0x20
07d8 e003       |    |		Load	0x0,0x3
07d9 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
07da 1c08       |    |		Execute_Immediate	Run_Utility,0x8
07db 00d8       |    |		Load_Top	At_Offset_0
07dc 1c00       |    |		Execute_Immediate	Run_Utility,0x0
07dd			BODY_07c8:
07dd e5fb       |    |		Load	0x2,-0x5
07de 681d       |h   |		Jump_Zero	0x7fc
07df 0092 0a18  |    |		Action	Push_String_Extended,0xa18					; ">> Execution ECHANGER_LIEN <<"
07e1 e009       |    |		Load	0x0,0x9
07e2 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
07e3 0092 0a12  |    |		Action	Push_String_Extended,0xa12					; ">> Parametres: "
07e5 e5ff       |    |		Load	0x2,-0x1
07e6 260f       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xf
07e7 e003       |    |		Load	0x0,0x3
07e8 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
07e9 01cc       |    |		Execute	Vector,Catenate
07ea 0092 09fa  |    |		Action	Push_String_Extended,0x9fa					; ", "
07ec 01cc       |    |		Execute	Vector,Catenate
07ed e5ff       |    |		Load	0x2,-0x1
07ee 2610       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x10
07ef e003       |    |		Load	0x0,0x3
07f0 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
07f1 01cc       |    |		Execute	Vector,Catenate
07f2 0092 09fa  |    |		Action	Push_String_Extended,0x9fa					; ", "
07f4 01cc       |    |		Execute	Vector,Catenate
07f5 e5ff       |    |		Load	0x2,-0x1
07f6 2611       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x11
07f7 e003       |    |		Load	0x0,0x3
07f8 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
07f9 01cc       |    |		Execute	Vector,Catenate
07fa e009       |    |		Load	0x0,0x9
07fb 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
07fc e5ff       |    |		Load	0x2,-0x1
07fd 260f       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xf
07fe 00db       |    |		Load_Top	At_Offset_3
07ff 016d       | m  |		Execute	Variant_Record,Structure_Write
0800 e5ff       |    |		Load	0x2,-0x1
0801 2610       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x10
0802 00da       |    |		Load_Top	At_Offset_2
0803 016d       | m  |		Execute	Variant_Record,Structure_Write
0804 e5ff       |    |		Load	0x2,-0x1
0805 2611       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x11
0806 00d9       |    |		Load_Top	At_Offset_1
0807 016d       | m  |		Execute	Variant_Record,Structure_Write
0808 00da       |    |		Load_Top	At_Offset_2
0809 e5fd       |    |		Load	0x2,-0x3
080a e5fc       |    |		Load	0x2,-0x4
080b 823c       | <  |		Call	0x1,0x3c
080c 00d1       |    |		Pop_Control	Pop_Count_1
080d 00d9       |    |		Load_Top	At_Offset_1
080e e5fd       |    |		Load	0x2,-0x3
080f e5fc       |    |		Load	0x2,-0x4
0810 823c       | <  |		Call	0x1,0x3c
0811 00d1       |    |		Pop_Control	Pop_Count_1
0812 00d8       |    |		Load_Top	At_Offset_0
0813 e5fd       |    |		Load	0x2,-0x3
0814 e5fc       |    |		Load	0x2,-0x4
0815 823c       | <  |		Call	0x1,0x3c
0816 00d1       |    |		Pop_Control	Pop_Count_1
0817 e5fa       |    |		Load	0x2,-0x6
0818 00d9       |    |		Load_Top	At_Offset_1
0819 e003       |    |		Load	0x0,0x3
081a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
081b 00db       |    |		Load_Top	At_Offset_3
081c e003       |    |		Load	0x0,0x3
081d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
081e e402       |    |		Load	0x2,0x2
081f e003       |    |		Load	0x0,0x3
0820 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0821 8019       |    |		Call	0x0,0x19
0822 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0823 0000 0000  |    |		.BLANK	0000[0x5]
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 e5fb       |    |		Load	0x2,-0x5
082c 6804       |h   |		Jump_Zero	0x831
082d 0092 0a19  |    |		Action	Push_String_Extended,0xa19					; ">> Execution AFFICHER <<"
082f e009       |    |		Load	0x0,0x9
0830 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0831 e5fc       |    |		Load	0x2,-0x4
0832 e5fe       |    |		Load	0x2,-0x2
0833 e5fd       |    |		Load	0x2,-0x3
0834 e5ff       |    |		Load	0x2,-0x1
0835 2612       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x12
0836 801a       |    |		Call	0x0,0x1a
0837 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
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 00db       |    |		Load_Top	At_Offset_3
083c 6804       |h   |		Jump_Zero	0x841
083d 0092 0a1a  |    |		Action	Push_String_Extended,0xa1a					; ">> Execution FIN <<"
083f e009       |    |		Load	0x0,0x9
0840 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0841 4801       |H   |		Short_Literal	0x1
0842 a5fd       |    |		Store_Unchecked	0x2,-0x3
0843 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0844 0000 0000  |    |		.BLANK	0000[0x4]
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 00db       |    |		Load_Top	At_Offset_3
084c 6804       |h   |		Jump_Zero	0x851
084d 0092 0a1b  |    |		Action	Push_String_Extended,0xa1b					; ">> Execution VIDE <<"
084f e009       |    |		Load	0x0,0x9
0850 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0851 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0852 0000 0000  |    |		.BLANK	0000[0x6]
0858 ; --------------------------------------------------------------------------------------
0858 ; SUBPROGRAM
0858 ; --------------------------------------------------------------------------------------
0858 085b       | [  |		.CONST	0x085b								; Address of begin
0859 0004       |    |		.CONST	0x0004								; Address of exception handler
085a 0001       |    |		.CONST	0x0001								; Number of locals
085b			BODY_0858:
085b			INIT_0858:
085b e5fd       |    |		Load	0x2,-0x3
085c e003       |    |		Load	0x0,0x3
085d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
085e e5fe       |    |		Load	0x2,-0x2
085f 801b       |    |		Call	0x0,0x1b
0860 00db       |    |		Load_Top	At_Offset_3
0861 e5fd       |    |		Load	0x2,-0x3
0862 e003       |    |		Load	0x0,0x3
0863 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0864 801c       |    |		Call	0x0,0x1c
0865 0f00       |    |		Execute_Immediate	Equal,0x0
0866 0278       | x  |		Execute	Discrete,Or
0867 6829       |h)  |		Jump_Zero	0x891
0868 e5fd       |    |		Load	0x2,-0x3
0869 e003       |    |		Load	0x0,0x3
086a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
086b 0092 0a1c  |    |		Action	Push_String_Extended,0xa1c					; "COMP"
086d 01df       |    |		Execute	Vector,Equal
086e 6806       |h   |		Jump_Zero	0x875
086f e5fd       |    |		Load	0x2,-0x3
0870 00db       |    |		Load_Top	At_Offset_3
0871 801d       |    |		Call	0x0,0x1d
0872 e003       |    |		Load	0x0,0x3
0873 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0874 00d1       |    |		Pop_Control	Pop_Count_1
0875 e5fd       |    |		Load	0x2,-0x3
0876 e003       |    |		Load	0x0,0x3
0877 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0878 e5fe       |    |		Load	0x2,-0x2
0879 801b       |    |		Call	0x0,0x1b
087a 00db       |    |		Load_Top	At_Offset_3
087b e5fd       |    |		Load	0x2,-0x3
087c e003       |    |		Load	0x0,0x3
087d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
087e 801c       |    |		Call	0x0,0x1c
087f 0f00       |    |		Execute_Immediate	Equal,0x0
0880 0278       | x  |		Execute	Discrete,Or
0881 680f       |h   |		Jump_Zero	0x891
0882 e5fd       |    |		Load	0x2,-0x3
0883 e003       |    |		Load	0x0,0x3
0884 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0885 e5fe       |    |		Load	0x2,-0x2
0886 800e       |    |		Call	0x0,0xe
0887 6809       |h   |		Jump_Zero	0x891
0888 e5fd       |    |		Load	0x2,-0x3
0889 00d8       |    |		Load_Top	At_Offset_0
088a e003       |    |		Load	0x0,0x3
088b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
088c e5fe       |    |		Load	0x2,-0x2
088d 801e       |    |		Call	0x0,0x1e
088e e003       |    |		Load	0x0,0x3
088f 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0890 00d1       |    |		Pop_Control	Pop_Count_1
0891 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0892 0000 0000  |    |		.BLANK	0000[0x6]
0898 ; --------------------------------------------------------------------------------------
0898 ; SUBPROGRAM
0898 ; --------------------------------------------------------------------------------------
0898 089b       |    |		.CONST	0x089b								; Address of begin
0899 0004       |    |		.CONST	0x0004								; Address of exception handler
089a 0001       |    |		.CONST	0x0001								; Number of locals
089b			BODY_0898:
089b			INIT_0898:
089b 00da       |    |		Load_Top	At_Offset_2
089c 0227       | '  |		Execute	Access,All_Reference
089d 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
089e 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
089f 460b       |F   |		Jump_Case	0xc
08a0 7812       |x   |		Jump	0x8b3								; case 0x0
08a1 7833       |x3  |		Jump	0x8d5								; case 0x1
08a2 7854       |xT  |		Jump	0x8f7								; case 0x2
08a3 7808       |x   |		Jump	0x8ac								; case 0x3
08a4 7807       |x   |		Jump	0x8ac								; case 0x4
08a5 7806       |x   |		Jump	0x8ac								; case 0x5
08a6 7805       |x   |		Jump	0x8ac								; case 0x6
08a7 7804       |x   |		Jump	0x8ac								; case 0x7
08a8 7803       |x   |		Jump	0x8ac								; case 0x8
08a9 783b       |x;  |		Jump	0x8e5								; case 0x9
08aa 7801       |x   |		Jump	0x8ac								; case 0xa
08ab 7800       |x   |		Jump	0x8ac								; case 0xb
08ac 00da       |    |		Load_Top	At_Offset_2
08ad e222       | "  |		Load	0x1,0x22
08ae e223       | #  |		Load	0x1,0x23
08af 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
08b0 8006       |    |		Call	0x0,0x6
08b1 003b       | ;  |		Store_Top	Access,At_Offset_3
08b2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
08b3 00da       |    |		Load_Top	At_Offset_2
08b4 0229       | )  |		Execute	Access,All_Read
08b5 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
08b6 00d8       |    |		Load_Top	At_Offset_0
08b7 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
08b8 801f       |    |		Call	0x0,0x1f
08b9 00d9       |    |		Load_Top	At_Offset_1
08ba 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
08bb 00d1       |    |		Pop_Control	Pop_Count_1
08bc 00da       |    |		Load_Top	At_Offset_2
08bd 0229       | )  |		Execute	Access,All_Read
08be 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
08bf 00d8       |    |		Load_Top	At_Offset_0
08c0 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
08c1 820f       |    |		Call	0x1,0xf
08c2 00d9       |    |		Load_Top	At_Offset_1
08c3 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
08c4 00d1       |    |		Pop_Control	Pop_Count_1
08c5 00da       |    |		Load_Top	At_Offset_2
08c6 0229       | )  |		Execute	Access,All_Read
08c7 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
08c8 00d8       |    |		Load_Top	At_Offset_0
08c9 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
08ca 820f       |    |		Call	0x1,0xf
08cb 00d9       |    |		Load_Top	At_Offset_1
08cc 2a05       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5
08cd 00d1       |    |		Pop_Control	Pop_Count_1
08ce 00da       |    |		Load_Top	At_Offset_2
08cf e222       | "  |		Load	0x1,0x22
08d0 e223       | #  |		Load	0x1,0x23
08d1 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
08d2 8006       |    |		Call	0x0,0x6
08d3 003b       | ;  |		Store_Top	Access,At_Offset_3
08d4 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
08d5 00da       |    |		Load_Top	At_Offset_2
08d6 0229       | )  |		Execute	Access,All_Read
08d7 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
08d8 00d8       |    |		Load_Top	At_Offset_0
08d9 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
08da 820f       |    |		Call	0x1,0xf
08db 00d9       |    |		Load_Top	At_Offset_1
08dc 2a07       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7
08dd 00d1       |    |		Pop_Control	Pop_Count_1
08de 00da       |    |		Load_Top	At_Offset_2
08df e222       | "  |		Load	0x1,0x22
08e0 e223       | #  |		Load	0x1,0x23
08e1 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
08e2 8006       |    |		Call	0x0,0x6
08e3 003b       | ;  |		Store_Top	Access,At_Offset_3
08e4 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
08e5 00da       |    |		Load_Top	At_Offset_2
08e6 0229       | )  |		Execute	Access,All_Read
08e7 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
08e8 00d8       |    |		Load_Top	At_Offset_0
08e9 2e12       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x12
08ea 00d8       |    |		Load_Top	At_Offset_0
08eb 00d8       |    |		Load_Top	At_Offset_0
08ec 8020       |    |		Call	0x0,0x20
08ed 00d2       |    |		Pop_Control	Pop_Count_2
08ee 00d0       |    |		Action	Swap_Control
08ef 2a12       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x12
08f0 00da       |    |		Load_Top	At_Offset_2
08f1 e222       | "  |		Load	0x1,0x22
08f2 e223       | #  |		Load	0x1,0x23
08f3 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
08f4 8006       |    |		Call	0x0,0x6
08f5 003b       | ;  |		Store_Top	Access,At_Offset_3
08f6 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
08f7 00da       |    |		Load_Top	At_Offset_2
08f8 0229       | )  |		Execute	Access,All_Read
08f9 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
08fa 00d8       |    |		Load_Top	At_Offset_0
08fb 2e0a       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa
08fc 801f       |    |		Call	0x0,0x1f
08fd 00d9       |    |		Load_Top	At_Offset_1
08fe 2a0a       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xa
08ff 00d1       |    |		Pop_Control	Pop_Count_1
0900 00da       |    |		Load_Top	At_Offset_2
0901 e222       | "  |		Load	0x1,0x22
0902 e223       | #  |		Load	0x1,0x23
0903 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
0904 8006       |    |		Call	0x0,0x6
0905 003b       | ;  |		Store_Top	Access,At_Offset_3
0906 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0907 0000       |    |		.XXX[0x1]
0908 ; --------------------------------------------------------------------------------------
0908 ; SUBPROGRAM
0908 ; --------------------------------------------------------------------------------------
0908 090b       |    |		.CONST	0x090b								; Address of begin
0909 0004       |    |		.CONST	0x0004								; Address of exception handler
090a 0001       |    |		.CONST	0x0001								; Number of locals
090b			BODY_0908:
090b			INIT_0908:
090b 4609       |F   |		Jump_Case	0xa
090c 7809       |x   |		Jump	0x916								; case 0x0
090d 7854       |xT  |		Jump	0x962								; case 0x1
090e 7872       |xr  |		Jump	0x981								; case 0x2
090f 7875       |xu  |		Jump	0x985								; case 0x3
0910 78c6       |x   |		Jump	0x9d7								; case 0x4
0911 78c5       |x   |		Jump	0x9d7								; case 0x5
0912 7878       |xx  |		Jump	0x98b								; case 0x6
0913 7895       |x   |		Jump	0x9a9								; case 0x7
0914 78b7       |x   |		Jump	0x9cc								; case 0x8
0915 78bd       |x   |		Jump	0x9d3								; case 0x9
0916 00da       |    |		Load_Top	At_Offset_2
0917 016c       | l  |		Execute	Variant_Record,Is_Constrained
0918 7009       |p   |		Jump_Nonzero	0x922
0919 00cf       |    |		Action	Mark_Auxiliary
091a 480b       |H   |		Short_Literal	0xb
091b e5ff       |    |		Load	0x2,-0x1
091c 1c08       |    |		Execute_Immediate	Run_Utility,0x8
091d 00d8       |    |		Load_Top	At_Offset_0
091e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
091f c5ff       |    |		Store	0x2,-0x1
0920 00ce       |    |		Action	Pop_Auxiliary
0921 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0922 00da       |    |		Load_Top	At_Offset_2
0923 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0924 00db       |    |		Load_Top	At_Offset_3
0925 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0926 00da       |    |		Load_Top	At_Offset_2
0927 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0928 460b       |F   |		Jump_Case	0xc
0929 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
092a 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
092b 780a       |x   |		Jump	0x936								; case 0x2
092c 7814       |x   |		Jump	0x941								; case 0x3
092d 7813       |x   |		Jump	0x941								; case 0x4
092e 7812       |x   |		Jump	0x941								; case 0x5
092f 7811       |x   |		Jump	0x941								; case 0x6
0930 781b       |x   |		Jump	0x94c								; case 0x7
0931 7820       |x   |		Jump	0x952								; case 0x8
0932 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x9
0933 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0xa
0934 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0xb
0935 4302       |C   |		.XXX[0x1]
0936 00da       |    |		Load_Top	At_Offset_2
0937 2208       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x8
0938 00da       |    |		Load_Top	At_Offset_2
0939 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
093a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
093b 00da       |    |		Load_Top	At_Offset_2
093c 2209       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x9
093d 00da       |    |		Load_Top	At_Offset_2
093e 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
093f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0940 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0941 00da       |    |		Load_Top	At_Offset_2
0942 220b       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0xb
0943 00da       |    |		Load_Top	At_Offset_2
0944 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
0945 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0946 00da       |    |		Load_Top	At_Offset_2
0947 220c       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0xc
0948 00da       |    |		Load_Top	At_Offset_2
0949 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
094a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
094b 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
094c 00da       |    |		Load_Top	At_Offset_2
094d 220d       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0xd
094e 00da       |    |		Load_Top	At_Offset_2
094f 260d       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xd
0950 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0951 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0952 00da       |    |		Load_Top	At_Offset_2
0953 220f       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0xf
0954 00da       |    |		Load_Top	At_Offset_2
0955 260f       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xf
0956 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0957 00da       |    |		Load_Top	At_Offset_2
0958 2210       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x10
0959 00da       |    |		Load_Top	At_Offset_2
095a 2610       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x10
095b 1c00       |    |		Execute_Immediate	Run_Utility,0x0
095c 00da       |    |		Load_Top	At_Offset_2
095d 2211       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x11
095e 00da       |    |		Load_Top	At_Offset_2
095f 2611       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x11
0960 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0961 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0962 00da       |    |		Load_Top	At_Offset_2
0963 016b       | k  |		Execute	Variant_Record,Read_Variant
0964 00d8       |    |		Load_Top	At_Offset_0
0965 0f03       |    |		Execute_Immediate	Equal,0x3
0966 6804       |h   |		Jump_Zero	0x96b
0967 00db       |    |		Load_Top	At_Offset_3
0968 2208       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x8
0969 00db       |    |		Load_Top	At_Offset_3
096a 2209       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x9
096b 00d8       |    |		Load_Top	At_Offset_0
096c 0f04       |    |		Execute_Immediate	Equal,0x4
096d 6804       |h   |		Jump_Zero	0x972
096e 00db       |    |		Load_Top	At_Offset_3
096f 220b       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0xb
0970 00db       |    |		Load_Top	At_Offset_3
0971 220c       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0xc
0972 00d8       |    |		Load_Top	At_Offset_0
0973 0f05       |    |		Execute_Immediate	Equal,0x5
0974 6802       |h   |		Jump_Zero	0x977
0975 00db       |    |		Load_Top	At_Offset_3
0976 220d       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0xd
0977 00d8       |    |		Load_Top	At_Offset_0
0978 0f06       |    |		Execute_Immediate	Equal,0x6
0979 6806       |h   |		Jump_Zero	0x980
097a 00db       |    |		Load_Top	At_Offset_3
097b 220f       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0xf
097c 00db       |    |		Load_Top	At_Offset_3
097d 2210       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x10
097e 00db       |    |		Load_Top	At_Offset_3
097f 2211       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x11
0980 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0981 4801       |H   |		Short_Literal	0x1
0982 4812       |H   |		Short_Literal	0x12
0983 0311       |    |		Declare_Type	Variant_Record,Constrained_Incomplete
0984 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0985 e5fd       |    |		Load	0x2,-0x3
0986 00db       |    |		Load_Top	At_Offset_3
0987 1c07       |    |		Execute_Immediate	Run_Utility,0x7
0988 e5fe       |    |		Load	0x2,-0x2
0989 0306       |    |		Complete_Type	Variant_Record,By_Renaming
098a 4304       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x4
098b 00db       |    |		Load_Top	At_Offset_3
098c 460b       |F   |		Jump_Case	0xc
098d 780d       |x   |		Jump	0x99b								; case 0x0
098e 780e       |x   |		Jump	0x99d								; case 0x1
098f 780f       |x   |		Jump	0x99f								; case 0x2
0990 7810       |x   |		Jump	0x9a1								; case 0x3
0991 780f       |x   |		Jump	0x9a1								; case 0x4
0992 780e       |x   |		Jump	0x9a1								; case 0x5
0993 780d       |x   |		Jump	0x9a1								; case 0x6
0994 780e       |x   |		Jump	0x9a3								; case 0x7
0995 780f       |x   |		Jump	0x9a5								; case 0x8
0996 7810       |x   |		Jump	0x9a7								; case 0x9
0997 7801       |x   |		Jump	0x999								; case 0xa
0998 7800       |x   |		Jump	0x999								; case 0xb
0999 48ff       |H   |		Short_Literal	0xff
099a 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
099b 4801       |H   |		Short_Literal	0x1
099c 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
099d 4802       |H   |		Short_Literal	0x2
099e 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
099f 4803       |H   |		Short_Literal	0x3
09a0 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
09a1 4804       |H   |		Short_Literal	0x4
09a2 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
09a3 4805       |H   |		Short_Literal	0x5
09a4 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
09a5 4806       |H   |		Short_Literal	0x6
09a6 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
09a7 4807       |H   |		Short_Literal	0x7
09a8 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
09a9 00db       |    |		Load_Top	At_Offset_3
09aa e5fe       |    |		Load	0x2,-0x2
09ab 460b       |F   |		Jump_Case	0xc
09ac 780d       |x   |		Jump	0x9ba								; case 0x0
09ad 780e       |x   |		Jump	0x9bc								; case 0x1
09ae 780f       |x   |		Jump	0x9be								; case 0x2
09af 7810       |x   |		Jump	0x9c0								; case 0x3
09b0 780f       |x   |		Jump	0x9c0								; case 0x4
09b1 780e       |x   |		Jump	0x9c0								; case 0x5
09b2 780d       |x   |		Jump	0x9c0								; case 0x6
09b3 780e       |x   |		Jump	0x9c2								; case 0x7
09b4 780f       |x   |		Jump	0x9c4								; case 0x8
09b5 7810       |x   |		Jump	0x9c6								; case 0x9
09b6 7811       |x   |		Jump	0x9c8								; case 0xa
09b7 7800       |x   |		Jump	0x9b8								; case 0xb
09b8 48ff       |H   |		Short_Literal	0xff
09b9 780f       |x   |		Jump	0x9c9
09ba 4801       |H   |		Short_Literal	0x1
09bb 780d       |x   |		Jump	0x9c9
09bc 4802       |H   |		Short_Literal	0x2
09bd 780b       |x   |		Jump	0x9c9
09be 4803       |H   |		Short_Literal	0x3
09bf 7809       |x   |		Jump	0x9c9
09c0 4804       |H   |		Short_Literal	0x4
09c1 7807       |x   |		Jump	0x9c9
09c2 4805       |H   |		Short_Literal	0x5
09c3 7805       |x   |		Jump	0x9c9
09c4 4806       |H   |		Short_Literal	0x6
09c5 7803       |x   |		Jump	0x9c9
09c6 4807       |H   |		Short_Literal	0x7
09c7 7801       |x   |		Jump	0x9c9
09c8 48ff       |H   |		Short_Literal	0xff
09c9 e5ff       |    |		Load	0x2,-0x1
09ca 031b       |    |		Declare_Type	Variant_Record,Constrained
09cb 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
09cc 00db       |    |		Load_Top	At_Offset_3
09cd e5fe       |    |		Load	0x2,-0x2
09ce e5ff       |    |		Load	0x2,-0x1
09cf 1c06       |    |		Execute_Immediate	Run_Utility,0x6
09d0 e5ff       |    |		Load	0x2,-0x1
09d1 02fc       |    |		Declare_Variable	Variant_Record,With_Constraint
09d2 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
09d3 480b       |H   |		Short_Literal	0xb
09d4 00db       |    |		Load_Top	At_Offset_3
09d5 1c07       |    |		Execute_Immediate	Run_Utility,0x7
09d6 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
09d7 0869       | i  |		Execute_Immediate	Raise,0x69
09d8 ; --------------------------------------------------------------------------------------
09d8 ; SUBPROGRAM
09d8 ; --------------------------------------------------------------------------------------
09d8 09db       |    |		.CONST	0x09db								; Address of begin
09d9 0004       |    |		.CONST	0x0004								; Address of exception handler
09da 0001       |    |		.CONST	0x0001								; Number of locals
09db			BODY_09d8:
09db			INIT_09d8:
09db 4601       |F   |		Jump_Case	0x2
09dc 7801       |x   |		Jump	0x9de								; case 0x0
09dd 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
09de 00da       |    |		Load_Top	At_Offset_2
09df 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
09e0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
09e1 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
09e2 ; --------------------------------------------------------------------------------------
09e2 ; STRING TABLE
09e2 ; --------------------------------------------------------------------------------------
09e2 0078       | x  |		.STRTAB	0x0078->0x0a1e							; "SI_ALORS_SINON"
09e3 0084       |    |		.STRTAB	0x0084->0x0a25							; "POUR_FAIRE"
09e4 008c       |    |		.STRTAB	0x008c->0x0a2a							; "AFFECTATION"
09e5 0095       |    |		.STRTAB	0x0095->0x0a2f							; "LIE_CONNEXION"
09e6 00a0       |    |		.STRTAB	0x00a0->0x0a36							; "DELIE_CONNEXION"
09e7 00ad       |    |		.STRTAB	0x00ad->0x0a3d							; "LIE_LIEN"
09e8 00b3       |    |		.STRTAB	0x00b3->0x0a41							; "DELIE_LIEN"
09e9 00bb       |    |		.STRTAB	0x00bb->0x0a46							; "LISTE_LIEN"
09ea 00c3       |    |		.STRTAB	0x00c3->0x0a4b							; "ECHANGER_LIEN"
09eb 00ce       |    |		.STRTAB	0x00ce->0x0a52							; "AFFICHER"
09ec 00d4       |    |		.STRTAB	0x00d4->0x0a56							; "FIN"
09ed 00d5       |    |		.STRTAB	0x00d5->0x0a57							; "VIDE"
09ee 00d7       |    |		.STRTAB	0x00d7->0x0a59							; " "
09ef 00d6       |    |		.STRTAB	0x00d6->0x0a5a							; "-- Vide"
09f0 00db       |    |		.STRTAB	0x00db->0x0a5d							; "SI"
09f1 00db       |    |		.STRTAB	0x00db->0x0a5e							; "ALORS"
09f2 00de       |    |		.STRTAB	0x00de->0x0a61							; "SINON"
09f3 00e1       |    |		.STRTAB	0x00e1->0x0a63							; "FIN_SI"
09f4 00e5       |    |		.STRTAB	0x00e5->0x0a66							; "POUR "
09f5 00e8       |    |		.STRTAB	0x00e8->0x0a69							; " ENTREE FAIRE "
09f6 00f4       |    |		.STRTAB	0x00f4->0x0a70							; "FIN_POUR"
09f7 00fa       |    |		.STRTAB	0x00fa->0x0a74							; "."
09f8 00f9       |    |		.STRTAB	0x00f9->0x0a74							; " = "
09f9 00fa       |    |		.STRTAB	0x00fa->0x0a76							; "LIE_CONNEXION ( "
09fa 0108       |    |		.STRTAB	0x0108->0x0a7e							; ", "
09fb 0108       |    |		.STRTAB	0x0108->0x0a7f							; " )"
09fc 0108       |    |		.STRTAB	0x0108->0x0a80							; "DELIE_CONNEXION ( "
09fd 0118       |    |		.STRTAB	0x0118->0x0a89							; "LIE_LIEN ( "
09fe 0121       | !  |		.STRTAB	0x0121->0x0a8e							; "DELIE_LIEN ( "
09ff 012c       | ,  |		.STRTAB	0x012c->0x0a95							; "LISTE_LIEN ( "
0a00 0137       | 7  |		.STRTAB	0x0137->0x0a9b							; "ECHANGER_LIEN ( "
0a01 0145       | E  |		.STRTAB	0x0145->0x0aa3							; " -- Afficher -- "
0a02 0153       | S  |		.STRTAB	0x0153->0x0aab							; ">> Execution SI <<"
0a03 0163       | c  |		.STRTAB	0x0163->0x0ab4							; ">> Condition:"
0a04 016e       | n  |		.STRTAB	0x016e->0x0abb							; ">> Execution ALORS <<"
0a05 0181       |    |		.STRTAB	0x0181->0x0ac5							; ">> Execution SINON <<"
0a06 0194       |    |		.STRTAB	0x0194->0x0ad0							; ">> FIN SI <<"
0a07 019e       |    |		.STRTAB	0x019e->0x0ad6							; ">> Execution POUR ("
0a08 01af       |    |		.STRTAB	0x01af->0x0adf							; ")"
0a09 01ae       |    |		.STRTAB	0x01ae->0x0ae0							; ">> FIN POUR <<"
0a0a 01ba       |    |		.STRTAB	0x01ba->0x0ae7							; ">> Execution AFFECTATION <<"
0a0b 01d3       |    |		.STRTAB	0x01d3->0x0af4							; " := "
0a0c 01d5       |    |		.STRTAB	0x01d5->0x0af6							; "Manque l'extension pour l'acces a la variable !!!"
0a0d 0204       |    |		.STRTAB	0x0204->0x0b0f							; "ENTIER"
0a0e 0208       |    |		.STRTAB	0x0208->0x0b12							; "ENUMERE"
0a0f 020d       |    |		.STRTAB	0x020d->0x0b15							; "BOOLEEN"
0a10 0212       |    |		.STRTAB	0x0212->0x0b19							; "Affectation non valide !!!"
0a11 022a       | *  |		.STRTAB	0x022a->0x0b26							; ">> Execution LIE_CONNEXION <<"
0a12 0245       | E  |		.STRTAB	0x0245->0x0b34							; ">> Parametres: "
0a13 0252       | R  |		.STRTAB	0x0252->0x0b3c							; " , "
0a14 0253       | S  |		.STRTAB	0x0253->0x0b3d							; ">> Execution DELIE_CONNEXION <<"
0a15 0270       | p  |		.STRTAB	0x0270->0x0b4d							; ">> Execution LIE_LIEN <<"
0a16 0286       |    |		.STRTAB	0x0286->0x0b59							; ">> Execution DELIE_LIEN <<"
0a17 029e       |    |		.STRTAB	0x029e->0x0b66							; ">> Execution LISTE_LIEN <<"
0a18 02b6       |    |		.STRTAB	0x02b6->0x0b73							; ">> Execution ECHANGER_LIEN <<"
0a19 02d1       |    |		.STRTAB	0x02d1->0x0b81							; ">> Execution AFFICHER <<"
0a1a 02e7       |    |		.STRTAB	0x02e7->0x0b8d							; ">> Execution FIN <<"
0a1b 02f8       |    |		.STRTAB	0x02f8->0x0b97							; ">> Execution VIDE <<"
0a1c 030a       |    |		.STRTAB	0x030a->0x0ba1							; "COMP"
0a1d 030c       |    |		.STREND 0x030c->0x0ba3
0a1e 5349 5f41  |SI_A|		.STRTAB_STRINGS
0ba3 0000 0000  |    |		.BLANK	0000[0x5]
0ba8 ; --------------------------------------------------------------------------------------
0ba8 ; Debug Table
0ba8 ; --------------------------------------------------------------------------------------
0ba8 0004 0008  |    |		.DEBUG4	0x0004,0x0008,0xd488,0x0000,0x0001,0x002d
0bae 000b 0c62  |   b|		.DBG4T	0x000b,0x0c62,0x8000,0x8000
0bb2 0080 0c8e  |    |		.DBG4T	0x0080,0x0c8e,0x8000,0x8000
0bb6 00fb 0cfa  |    |		.DBG4T	0x00fb,0x0cfa,0x0002,0x0000
0bba 0103 0cfd  |    |		.DBG4T	0x0103,0x0cfd,0x0001,0x4000
0bbe 011b 0d0a  |    |		.DBG4T	0x011b,0x0d0a,0x0001,0x0000
0bc2 0133 0d12  | 3  |		.DBG4T	0x0133,0x0d12,0x0001,0x4000
0bc6 01db 0d4a  |   J|		.DBG4T	0x01db,0x0d4a,0x0002,0x0000
0bca 01fb 0d55  |   U|		.DBG4T	0x01fb,0x0d55,0x0002,0x0000
0bce 021b 0d5e  |   ^|		.DBG4T	0x021b,0x0d5e,0x0002,0x0000
0bd2 023b 0d68  | ; h|		.DBG4T	0x023b,0x0d68,0x0002,0x0000
0bd6 025b 0d71  | [ q|		.DBG4T	0x025b,0x0d71,0x0002,0x0000
0bda 027b 0d7a  | { z|		.DBG4T	0x027b,0x0d7a,0x0002,0x0000
0bde 029b 0d83  |    |		.DBG4T	0x029b,0x0d83,0x0002,0x0000
0be2 02bb 0d8c  |    |		.DBG4T	0x02bb,0x0d8c,0x0002,0x0000
0be6 02db 0d96  |    |		.DBG4T	0x02db,0x0d96,0x0002,0x0000
0bea 02fb 0d9f  |    |		.DBG4T	0x02fb,0x0d9f,0x0002,0x0000
0bee 0313 0da7  |    |		.DBG4T	0x0313,0x0da7,0x0002,0x0000
0bf2 032b 0dae  | +  |		.DBG4T	0x032b,0x0dae,0x0002,0x0000
0bf6 0343 0db5  | C  |		.DBG4T	0x0343,0x0db5,0x0001,0x0000
0bfa 034b 0000  | K  |		.DBG4T	0x034b,0x0000,0x0005,0x0000
0bfe 0373 0db8  | s  |		.DBG4T	0x0373,0x0db8,0x0002,0x4000
0c02 0393 0dca  |    |		.DBG4T	0x0393,0x0dca,0x0001,0x0000
0c06 03ab 0dcf  |    |		.DBG4T	0x03ab,0x0dcf,0x0002,0x0000
0c0a 03b3 0dd2  |    |		.DBG4T	0x03b3,0x0dd2,0x0001,0x0000
0c0e 03c3 0dd6  |    |		.DBG4T	0x03c3,0x0dd6,0x0002,0x0000
0c12 03cb 0dd9  |    |		.DBG4T	0x03cb,0x0dd9,0x0002,0x0000
0c16 03d3 0ddc  |    |		.DBG4T	0x03d3,0x0ddc,0x0002,0x0000
0c1a 03e3 0de1  |    |		.DBG4T	0x03e3,0x0de1,0x0001,0x0000
0c1e 03f3 0de5  |    |		.DBG4T	0x03f3,0x0de5,0x0001,0x4000
0c22 0543 0e43  | C C|		.DBG4T	0x0543,0x0e43,0x0001,0x0000
0c26 0593 0e54  |   T|		.DBG4T	0x0593,0x0e54,0x0001,0x0000
0c2a 05c3 0e5c  |   \|		.DBG4T	0x05c3,0x0e5c,0x0001,0x0000
0c2e 066b 0e72  | k r|		.DBG4T	0x066b,0x0e72,0x0001,0x0000
0c32 06b3 0e7e  |   ~|		.DBG4T	0x06b3,0x0e7e,0x0001,0x0000
0c36 06fb 0e8a  |    |		.DBG4T	0x06fb,0x0e8a,0x0001,0x0000
0c3a 0743 0e96  | C  |		.DBG4T	0x0743,0x0e96,0x0001,0x0000
0c3e 078b 0ea2  |    |		.DBG4T	0x078b,0x0ea2,0x0001,0x0000
0c42 07cb 0ead  |    |		.DBG4T	0x07cb,0x0ead,0x0001,0x0000
0c46 082b 0eba  | +  |		.DBG4T	0x082b,0x0eba,0x0001,0x0000
0c4a 083b 0ebf  | ;  |		.DBG4T	0x083b,0x0ebf,0x0001,0x0000
0c4e 084b 0ec4  | K  |		.DBG4T	0x084b,0x0ec4,0x0001,0x0000
0c52 085b 0ec8  | [  |		.DBG4T	0x085b,0x0ec8,0x0001,0x0000
0c56 089b 0ed0  |    |		.DBG4T	0x089b,0x0ed0,0x0001,0x4000
0c5a 090b 0000  |    |		.DBG4T	0x090b,0x0000,0x0005,0x0000
0c5e 09db 0000  |    |		.DBG4T	0x09db,0x0000,0x0005,0x0000
0c62 ; --------------------------------------------------------------------------------------
0c62 ; Debug chain
0c62 ; --------------------------------------------------------------------------------------
0c62 0015 0000  |    |		.DBGLEN	0x0015,0x0000
0c64 000b 000d  |    |		.DBGLNO	0x000b,0x000d,0x000f,0x0011,0x0013,0x0015,0x0017,0x0019,0x001b,0x001d,0x001f,0x0021,0x0023,0x0025,0x0027,0x0029,0x002b,0x002d,0x002f,0x0034,0x0075
0c79 0001 0002  |    |		.XXX[0x15]
0c7b 0003 0004  |    |
0c7d 0005 0006  |    |
0c7f 0007 0008  |    |
0c81 0009 000a  |    |
0c83 000b 000c  |    |
0c85 000d 000e  |    |
0c87 000f 0010  |    |
0c89 0011 0012  |    |
0c8b 0013 0014  |    |
0c8d 0017       |    |
0c8e ; --------------------------------------------------------------------------------------
0c8e ; Debug chain
0c8e ; --------------------------------------------------------------------------------------
0c8e 0035 0000  | 5  |		.DBGLEN	0x0035,0x0000
0c90 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
0cc5 0001 0003  |    |		.XXX[0x35]
0cc7 0004 0005  |    |
0cc9 0006 0007  |    |
0ccb 0008 0009  |    |
0ccd 000a 000b  |    |
0ccf 000c 000d  |    |
0cd1 000e 000f  |    |
0cd3 0010 0011  |    |
0cd5 0012 0013  |    |
0cd7 0014 0015  |    |
0cd9 0016 0017  |    |
0cdb 0018 0019  |    |
0cdd 001a 001b  |    |
0cdf 001c 001d  |    |
0ce1 001e 001f  |    |
0ce3 0020 0021  |   !|
0ce5 0022 0023  | " #|
0ce7 0024 0025  | $ %|
0ce9 0026 0027  | & '|
0ceb 0028 0029  | ( )|
0ced 002a 002b  | * +|
0cef 002c 002d  | , -|
0cf1 002e 002f  | . /|
0cf3 0030 0031  | 0 1|
0cf5 0032 0033  | 2 3|
0cf7 0034 0035  | 4 5|
0cf9 0036       | 6  |
0cfa ; --------------------------------------------------------------------------------------
0cfa ; Debug chain
0cfa ; --------------------------------------------------------------------------------------
0cfa 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0cfc 00fb       |    |		.DBGLNO	0x00fb
0cfd ; --------------------------------------------------------------------------------------
0cfd ; Debug chain
0cfd ; --------------------------------------------------------------------------------------
0cfd 0001 0005  |    |		.DBGLEN	0x0001,0x0005
0cff 0103 0105  |    |		.DBGLNO	0x0103,0x0105,0x0109,0x010d,0x0110,0x0113
0d05 0001 0003  |    |		.XXX[0x5]
0d07 0004 0005  |    |
0d09 0002       |    |
0d0a ; --------------------------------------------------------------------------------------
0d0a ; Debug chain
0d0a ; --------------------------------------------------------------------------------------
0d0a 0001 0005  |    |		.DBGLEN	0x0001,0x0005
0d0c 011b 011d  |    |		.DBGLNO	0x011b,0x011d,0x011f,0x0121,0x0122,0x0125
0d12 ; --------------------------------------------------------------------------------------
0d12 ; Debug chain
0d12 ; --------------------------------------------------------------------------------------
0d12 0002 001a  |    |		.DBGLEN	0x0002,0x001a
0d14 0133 0137  | 3 7|		.DBGLNO	0x0133,0x0137,0x0139,0x013e,0x0142,0x0151,0x0155,0x0163,0x0171,0x017a,0x017d,0x0185,0x0188,0x0190,0x0193,0x019b,0x019e,0x01a6,0x01a9,0x01b1,0x01b4,0x01bc,0x01bf,0x01c5,0x01c8,0x01cd,0x01cf,0x01d3
0d30 0001 0003  |    |		.XXX[0x1a]
0d32 0004 0019  |    |
0d34 0005 0006  |    |
0d36 0007 0008  |    |
0d38 0009 000a  |    |
0d3a 000b 000c  |    |
0d3c 000d 000e  |    |
0d3e 000f 0010  |    |
0d40 0011 0012  |    |
0d42 0013 0014  |    |
0d44 0015 0016  |    |
0d46 0017 0018  |    |
0d48 001a 0002  |    |
0d4a ; --------------------------------------------------------------------------------------
0d4a ; Debug chain
0d4a ; --------------------------------------------------------------------------------------
0d4a 0002 0007  |    |		.DBGLEN	0x0002,0x0007
0d4c 01db 01dd  |    |		.DBGLNO	0x01db,0x01dd,0x01e2,0x01e4,0x01e7,0x01ea,0x01ed,0x01f0,0x01f4
0d55 ; --------------------------------------------------------------------------------------
0d55 ; Debug chain
0d55 ; --------------------------------------------------------------------------------------
0d55 0002 0005  |    |		.DBGLEN	0x0002,0x0005
0d57 01fb 01fd  |    |		.DBGLNO	0x01fb,0x01fd,0x0202,0x0205,0x0208,0x020b,0x020f
0d5e ; --------------------------------------------------------------------------------------
0d5e ; Debug chain
0d5e ; --------------------------------------------------------------------------------------
0d5e 0002 0006  |    |		.DBGLEN	0x0002,0x0006
0d60 021b 021d  |    |		.DBGLNO	0x021b,0x021d,0x0222,0x0225,0x0228,0x022b,0x022e,0x0232
0d68 ; --------------------------------------------------------------------------------------
0d68 ; Debug chain
0d68 ; --------------------------------------------------------------------------------------
0d68 0002 0005  |    |		.DBGLEN	0x0002,0x0005
0d6a 023b 023d  | ; =|		.DBGLNO	0x023b,0x023d,0x0242,0x0245,0x0248,0x024b,0x024f
0d71 ; --------------------------------------------------------------------------------------
0d71 ; Debug chain
0d71 ; --------------------------------------------------------------------------------------
0d71 0002 0005  |    |		.DBGLEN	0x0002,0x0005
0d73 025b 025d  | [ ]|		.DBGLNO	0x025b,0x025d,0x0262,0x0265,0x0268,0x026b,0x026f
0d7a ; --------------------------------------------------------------------------------------
0d7a ; Debug chain
0d7a ; --------------------------------------------------------------------------------------
0d7a 0002 0005  |    |		.DBGLEN	0x0002,0x0005
0d7c 027b 027d  | { }|		.DBGLNO	0x027b,0x027d,0x0282,0x0285,0x0288,0x028b,0x028f
0d83 ; --------------------------------------------------------------------------------------
0d83 ; Debug chain
0d83 ; --------------------------------------------------------------------------------------
0d83 0002 0005  |    |		.DBGLEN	0x0002,0x0005
0d85 029b 029d  |    |		.DBGLNO	0x029b,0x029d,0x02a2,0x02a5,0x02a8,0x02ab,0x02af
0d8c ; --------------------------------------------------------------------------------------
0d8c ; Debug chain
0d8c ; --------------------------------------------------------------------------------------
0d8c 0002 0006  |    |		.DBGLEN	0x0002,0x0006
0d8e 02bb 02bd  |    |		.DBGLNO	0x02bb,0x02bd,0x02c2,0x02c5,0x02c8,0x02cb,0x02ce,0x02d2
0d96 ; --------------------------------------------------------------------------------------
0d96 ; Debug chain
0d96 ; --------------------------------------------------------------------------------------
0d96 0002 0005  |    |		.DBGLEN	0x0002,0x0005
0d98 02db 02dd  |    |		.DBGLNO	0x02db,0x02dd,0x02e2,0x02e5,0x02e8,0x02eb,0x02ef
0d9f ; --------------------------------------------------------------------------------------
0d9f ; Debug chain
0d9f ; --------------------------------------------------------------------------------------
0d9f 0002 0004  |    |		.DBGLEN	0x0002,0x0004
0da1 02fb 02fd  |    |		.DBGLNO	0x02fb,0x02fd,0x0302,0x0305,0x0308,0x030c
0da7 ; --------------------------------------------------------------------------------------
0da7 ; Debug chain
0da7 ; --------------------------------------------------------------------------------------
0da7 0002 0003  |    |		.DBGLEN	0x0002,0x0003
0da9 0313 0315  |    |		.DBGLNO	0x0313,0x0315,0x031a,0x031d,0x0321
0dae ; --------------------------------------------------------------------------------------
0dae ; Debug chain
0dae ; --------------------------------------------------------------------------------------
0dae 0002 0003  |    |		.DBGLEN	0x0002,0x0003
0db0 032b 032d  | + -|		.DBGLNO	0x032b,0x032d,0x0332,0x0335,0x0339
0db5 ; --------------------------------------------------------------------------------------
0db5 ; Debug chain
0db5 ; --------------------------------------------------------------------------------------
0db5 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0db7 0343       | C  |		.DBGLNO	0x0343
0db8 ; --------------------------------------------------------------------------------------
0db8 ; Debug chain
0db8 ; --------------------------------------------------------------------------------------
0db8 0002 0007  |    |		.DBGLEN	0x0002,0x0007
0dba 0373 0375  | s u|		.DBGLNO	0x0373,0x0375,0x0377,0x0379,0x037b,0x037f,0x0381,0x0386,0x0389
0dc3 0001 0002  |    |		.XXX[0x7]
0dc5 0003 0005  |    |
0dc7 0006 0004  |    |
0dc9 0007       |    |
0dca ; --------------------------------------------------------------------------------------
0dca ; Debug chain
0dca ; --------------------------------------------------------------------------------------
0dca 0001 0002  |    |		.DBGLEN	0x0001,0x0002
0dcc 0393 0395  |    |		.DBGLNO	0x0393,0x0395,0x03a0
0dcf ; --------------------------------------------------------------------------------------
0dcf ; Debug chain
0dcf ; --------------------------------------------------------------------------------------
0dcf 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0dd1 03ab       |    |		.DBGLNO	0x03ab
0dd2 ; --------------------------------------------------------------------------------------
0dd2 ; Debug chain
0dd2 ; --------------------------------------------------------------------------------------
0dd2 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0dd4 03b3 03b5  |    |		.DBGLNO	0x03b3,0x03b5
0dd6 ; --------------------------------------------------------------------------------------
0dd6 ; Debug chain
0dd6 ; --------------------------------------------------------------------------------------
0dd6 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0dd8 03c3       |    |		.DBGLNO	0x03c3
0dd9 ; --------------------------------------------------------------------------------------
0dd9 ; Debug chain
0dd9 ; --------------------------------------------------------------------------------------
0dd9 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0ddb 03cb       |    |		.DBGLNO	0x03cb
0ddc ; --------------------------------------------------------------------------------------
0ddc ; Debug chain
0ddc ; --------------------------------------------------------------------------------------
0ddc 0001 0002  |    |		.DBGLEN	0x0001,0x0002
0dde 03d3 03d5  |    |		.DBGLNO	0x03d3,0x03d5,0x03d7
0de1 ; --------------------------------------------------------------------------------------
0de1 ; Debug chain
0de1 ; --------------------------------------------------------------------------------------
0de1 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0de3 03e4 03e8  |    |		.DBGLNO	0x03e4,0x03e8
0de5 ; --------------------------------------------------------------------------------------
0de5 ; Debug chain
0de5 ; --------------------------------------------------------------------------------------
0de5 0002 002d  |   -|		.DBGLEN	0x0002,0x002d
0de7 03f3 03f5  |    |		.DBGLNO	0x03f3,0x03f5,0x03f9,0x03fe,0x0402,0x0411,0x0413,0x0418,0x041a,0x041e,0x0428,0x042a,0x042e,0x0438,0x043a,0x043e,0x0448,0x044a,0x044f,0x0451,0x045d,0x0467,0x0469,0x046e,0x0470,0x0476,0x047c,0x0485,0x0489,0x0494,0x0496,0x04ab,0x04ad,0x04c2,0x04c4,0x04d9,0x04db,0x04f0,0x04f2,0x0508,0x050a,0x0527,0x0529,0x052e,0x0530,0x0534,0x0538
0e16 0001 0003  |    |		.XXX[0x2d]
0e18 0004 002b  |   +|
0e1a 002c 0005  | ,  |
0e1c 0006 0007  |    |
0e1e 0008 0009  |    |
0e20 000a 000b  |    |
0e22 000c 000d  |    |
0e24 000e 000f  |    |
0e26 0010 0011  |    |
0e28 0012 0013  |    |
0e2a 0014 0015  |    |
0e2c 0016 0017  |    |
0e2e 0018 0019  |    |
0e30 001a 001b  |    |
0e32 001c 001d  |    |
0e34 001e 001f  |    |
0e36 0020 0021  |   !|
0e38 0022 0023  | " #|
0e3a 0024 0025  | $ %|
0e3c 0026 0027  | & '|
0e3e 0028 0029  | ( )|
0e40 002a 002d  | * -|
0e42 0002       |    |
0e43 ; --------------------------------------------------------------------------------------
0e43 ; Debug chain
0e43 ; --------------------------------------------------------------------------------------
0e43 0001 000e  |    |		.DBGLEN	0x0001,0x000e
0e45 0543 0544  | C D|		.DBGLNO	0x0543,0x0544,0x0546,0x054a,0x054e,0x0551,0x055a,0x055c,0x055e,0x0562,0x0571,0x0573,0x0577,0x0585,0x0587
0e54 ; --------------------------------------------------------------------------------------
0e54 ; Debug chain
0e54 ; --------------------------------------------------------------------------------------
0e54 0000 0006  |    |		.DBGLEN	0x0000,0x0006
0e56 0593 0598  |    |		.DBGLNO	0x0593,0x0598,0x059a,0x05a6,0x05b4,0x05b6
0e5c ; --------------------------------------------------------------------------------------
0e5c ; Debug chain
0e5c ; --------------------------------------------------------------------------------------
0e5c 0002 0012  |    |		.DBGLEN	0x0002,0x0012
0e5e 05c3 05c4  |    |		.DBGLNO	0x05c3,0x05c4,0x05c5,0x05c7,0x05cb,0x05d1,0x05d7,0x05e0,0x05e4,0x05e7,0x05ec,0x05f3,0x0603,0x0607,0x0625,0x062e,0x063c,0x064b,0x0654,0x0662
0e72 ; --------------------------------------------------------------------------------------
0e72 ; Debug chain
0e72 ; --------------------------------------------------------------------------------------
0e72 0001 0009  |    |		.DBGLEN	0x0001,0x0009
0e74 066b 0677  | k w|		.DBGLNO	0x066b,0x0677,0x0679,0x067d,0x0689,0x068f,0x0693,0x0697,0x069c,0x06a1
0e7e ; --------------------------------------------------------------------------------------
0e7e ; Debug chain
0e7e ; --------------------------------------------------------------------------------------
0e7e 0001 0009  |    |		.DBGLEN	0x0001,0x0009
0e80 06b3 06bf  |    |		.DBGLNO	0x06b3,0x06bf,0x06c1,0x06c5,0x06d1,0x06d7,0x06db,0x06df,0x06e4,0x06e9
0e8a ; --------------------------------------------------------------------------------------
0e8a ; Debug chain
0e8a ; --------------------------------------------------------------------------------------
0e8a 0001 0009  |    |		.DBGLEN	0x0001,0x0009
0e8c 06fb 0707  |    |		.DBGLNO	0x06fb,0x0707,0x0709,0x070d,0x0719,0x071f,0x0723,0x0727,0x072c,0x0731
0e96 ; --------------------------------------------------------------------------------------
0e96 ; Debug chain
0e96 ; --------------------------------------------------------------------------------------
0e96 0001 0009  |    |		.DBGLEN	0x0001,0x0009
0e98 0743 074f  | C O|		.DBGLNO	0x0743,0x074f,0x0751,0x0755,0x0761,0x0767,0x076b,0x076f,0x0774,0x0779
0ea2 ; --------------------------------------------------------------------------------------
0ea2 ; Debug chain
0ea2 ; --------------------------------------------------------------------------------------
0ea2 0001 0008  |    |		.DBGLEN	0x0001,0x0008
0ea4 078b 0791  |    |		.DBGLNO	0x078b,0x0791,0x0793,0x0797,0x07a9,0x07ad,0x07b2,0x07b6,0x07bd
0ead ; --------------------------------------------------------------------------------------
0ead ; Debug chain
0ead ; --------------------------------------------------------------------------------------
0ead 0001 000a  |    |		.DBGLEN	0x0001,0x000a
0eaf 07cb 07dd  |    |		.DBGLNO	0x07cb,0x07dd,0x07df,0x07e3,0x07fc,0x0800,0x0804,0x0808,0x080d,0x0812,0x0817
0eba ; --------------------------------------------------------------------------------------
0eba ; Debug chain
0eba ; --------------------------------------------------------------------------------------
0eba 0000 0003  |    |		.DBGLEN	0x0000,0x0003
0ebc 082b 082d  | + -|		.DBGLNO	0x082b,0x082d,0x0831
0ebf ; --------------------------------------------------------------------------------------
0ebf ; Debug chain
0ebf ; --------------------------------------------------------------------------------------
0ebf 0000 0003  |    |		.DBGLEN	0x0000,0x0003
0ec1 083b 083d  | ; =|		.DBGLNO	0x083b,0x083d,0x0841
0ec4 ; --------------------------------------------------------------------------------------
0ec4 ; Debug chain
0ec4 ; --------------------------------------------------------------------------------------
0ec4 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0ec6 084b 084d  | K M|		.DBGLNO	0x084b,0x084d
0ec8 ; --------------------------------------------------------------------------------------
0ec8 ; Debug chain
0ec8 ; --------------------------------------------------------------------------------------
0ec8 0000 0006  |    |		.DBGLEN	0x0000,0x0006
0eca 085b 0868  | [ h|		.DBGLNO	0x085b,0x0868,0x086f,0x0875,0x0882,0x0888
0ed0 ; --------------------------------------------------------------------------------------
0ed0 ; Debug chain
0ed0 ; --------------------------------------------------------------------------------------
0ed0 0000 000c  |    |		.DBGLEN	0x0000,0x000c
0ed2 089b 08ac  |    |		.DBGLNO	0x089b,0x08ac,0x08b3,0x08bc,0x08c5,0x08ce,0x08d5,0x08de,0x08e5,0x08f0,0x08f7,0x0900
0ede 0001 000c  |    |		.XXX[0xc]
0ee0 0002 0003  |    |
0ee2 0004 0005  |    |
0ee4 0006 0007  |    |
0ee6 0008 0009  |    |
0ee8 000a 000b  |    |
0eea 0000 0000  |    |		.BLANK	0000[0x116]