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

⟦292f2070f⟧

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

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦5a81ac88f⟧ »Space Info Vol 1« 
        └─⟦this⟧ 

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5900       |Y   |		.CONST	0x5900								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0bb0       |    |		.CONST	0x0bb0								; 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 01e3  |    |		Declare_Subprogram	INIT_01e0,For_Outer_Call,Visible,Unelaborated
0017 029a 0203  |    |		Declare_Subprogram	INIT_0200,For_Outer_Call,Visible,Unelaborated
0019 029a 0223  |   #|		Declare_Subprogram	INIT_0220,For_Outer_Call,Visible,Unelaborated
001b 029a 0243  |   C|		Declare_Subprogram	INIT_0240,For_Outer_Call,Visible,Unelaborated
001d 029a 0263  |   c|		Declare_Subprogram	INIT_0260,For_Outer_Call,Visible,Unelaborated
001f 029a 0283  |    |		Declare_Subprogram	INIT_0280,For_Outer_Call,Visible,Unelaborated
0021 029a 02a3  |    |		Declare_Subprogram	INIT_02a0,For_Outer_Call,Visible,Unelaborated
0023 029a 02c3  |    |		Declare_Subprogram	INIT_02c0,For_Outer_Call,Visible,Unelaborated
0025 029a 02e3  |    |		Declare_Subprogram	INIT_02e0,For_Outer_Call,Visible,Unelaborated
0027 029a 0303  |    |		Declare_Subprogram	INIT_0300,For_Outer_Call,Visible,Unelaborated
0029 029a 031b  |    |		Declare_Subprogram	INIT_0318,For_Outer_Call,Visible,Unelaborated
002b 029a 0333  |   3|		Declare_Subprogram	INIT_0330,For_Outer_Call,Visible,Unelaborated
002d 029a 034b  |   K|		Declare_Subprogram	INIT_0348,For_Outer_Call,Visible,Unelaborated
002f 4800       |H   |		Short_Literal	0x0
0030 480b       |H   |		Short_Literal	0xb
0031 029f 0353  |   S|		Declare_Subprogram	INIT_0350,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 0913  |    |		Declare_Subprogram	INIT_0910,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 09e3  |    |		Declare_Subprogram	INIT_09e0,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 037b  |   {|		Declare_Subprogram	INIT_0378,For_Outer_Call
008a 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
008b 00c7       |    |		Action	Elaborate_Subprogram
008c 029d 039b  |    |		Declare_Subprogram	INIT_0398,For_Outer_Call
008e 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
008f 00c7       |    |		Action	Elaborate_Subprogram
0090 029d 03b3  |    |		Declare_Subprogram	INIT_03b0,For_Outer_Call
0092 029d 03bb  |    |		Declare_Subprogram	INIT_03b8,For_Outer_Call
0094 029d 03cb  |    |		Declare_Subprogram	INIT_03c8,For_Outer_Call
0096 029d 03d3  |    |		Declare_Subprogram	INIT_03d0,For_Outer_Call
0098 029d 03db  |    |		Declare_Subprogram	INIT_03d8,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 03eb  |    |		Declare_Subprogram	INIT_03e8,For_Outer_Call
00b4 029d 03fb  |    |		Declare_Subprogram	INIT_03f8,For_Outer_Call
00b6 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
00b7 00c7       |    |		Action	Elaborate_Subprogram
00b8 029b 054b  |   K|		Declare_Subprogram	INIT_0548,For_Outer_Call,Unelaborated
00ba 029b 059b  |    |		Declare_Subprogram	INIT_0598,For_Outer_Call,Unelaborated
00bc 029b 05cb  |    |		Declare_Subprogram	INIT_05c8,For_Outer_Call,Unelaborated
00be 029b 0673  |   s|		Declare_Subprogram	INIT_0670,For_Outer_Call,Unelaborated
00c0 029b 06bb  |    |		Declare_Subprogram	INIT_06b8,For_Outer_Call,Unelaborated
00c2 029b 0703  |    |		Declare_Subprogram	INIT_0700,For_Outer_Call,Unelaborated
00c4 029b 074b  |   K|		Declare_Subprogram	INIT_0748,For_Outer_Call,Unelaborated
00c6 029b 0793  |    |		Declare_Subprogram	INIT_0790,For_Outer_Call,Unelaborated
00c8 029b 07d3  |    |		Declare_Subprogram	INIT_07d0,For_Outer_Call,Unelaborated
00ca 029b 0833  |   3|		Declare_Subprogram	INIT_0830,For_Outer_Call,Unelaborated
00cc 029b 0843  |   C|		Declare_Subprogram	INIT_0840,For_Outer_Call,Unelaborated
00ce 029b 0853  |   S|		Declare_Subprogram	INIT_0850,For_Outer_Call,Unelaborated
00d0 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
00d1 00c7       |    |		Action	Elaborate_Subprogram
00d2 029d 0863  |   c|		Declare_Subprogram	INIT_0860,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 08a3  |    |		Declare_Subprogram	INIT_08a0,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 e5f8       |    |		Load	0x2,-0x8
01d6 0f00       |    |		Execute_Immediate	Equal,0x0
01d7 0279       | y  |		Execute	Discrete,And
01d8 7765       |we  |		Jump_Nonzero	0x13e
01d9 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
01da 0000 0000  |    |		.BLANK	0000[0x6]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01ea       |    |		.CONST	0x01ea								; Address of begin
01e1 0004       |    |		.CONST	0x0004								; Address of exception handler
01e2 0003       |    |		.CONST	0x0003								; Number of locals
01e3			INIT_01e0:
01e3 e20d       |    |		Load	0x1,0xd
01e4 0007       |    |		Action	Break_Optional
01e5 4800       |H   |		Short_Literal	0x0
01e6 e220       |    |		Load	0x1,0x20
01e7 1c08       |    |		Execute_Immediate	Run_Utility,0x8
01e8 00d8       |    |		Load_Top	At_Offset_0
01e9 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01ea			BODY_01e0:
01ea 820e       |    |		Call	0x1,0xe
01eb 003a       | :  |		Store_Top	Access,At_Offset_2
01ec 4800       |H   |		Short_Literal	0x0
01ed 00d9       |    |		Load_Top	At_Offset_1
01ee 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
01ef e5ff       |    |		Load	0x2,-0x1
01f0 00d9       |    |		Load_Top	At_Offset_1
01f1 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
01f2 e5fe       |    |		Load	0x2,-0x2
01f3 00d9       |    |		Load_Top	At_Offset_1
01f4 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
01f5 e5fd       |    |		Load	0x2,-0x3
01f6 00d9       |    |		Load_Top	At_Offset_1
01f7 2a05       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5
01f8 00d9       |    |		Load_Top	At_Offset_1
01f9 00d9       |    |		Load_Top	At_Offset_1
01fa 8228       | (  |		Call	0x1,0x28
01fb 003a       | :  |		Store_Top	Access,At_Offset_2
01fc 00d9       |    |		Load_Top	At_Offset_1
01fd 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
01fe 0000 0000  |    |		.XXX[0x2]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 020a       |    |		.CONST	0x020a								; Address of begin
0201 0004       |    |		.CONST	0x0004								; Address of exception handler
0202 0003       |    |		.CONST	0x0003								; Number of locals
0203			INIT_0200:
0203 e20d       |    |		Load	0x1,0xd
0204 0007       |    |		Action	Break_Optional
0205 4801       |H   |		Short_Literal	0x1
0206 e220       |    |		Load	0x1,0x20
0207 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0208 00d8       |    |		Load_Top	At_Offset_0
0209 1c00       |    |		Execute_Immediate	Run_Utility,0x0
020a			BODY_0200:
020a 4801       |H   |		Short_Literal	0x1
020b 00d9       |    |		Load_Top	At_Offset_1
020c 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
020d e5ff       |    |		Load	0x2,-0x1
020e 00d9       |    |		Load_Top	At_Offset_1
020f 2a06       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6
0210 e5fe       |    |		Load	0x2,-0x2
0211 00d9       |    |		Load_Top	At_Offset_1
0212 2a07       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7
0213 00d9       |    |		Load_Top	At_Offset_1
0214 00d9       |    |		Load_Top	At_Offset_1
0215 8228       | (  |		Call	0x1,0x28
0216 003a       | :  |		Store_Top	Access,At_Offset_2
0217 00d9       |    |		Load_Top	At_Offset_1
0218 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0219 0000 0000  |    |		.BLANK	0000[0x7]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 022a       | *  |		.CONST	0x022a								; Address of begin
0221 0004       |    |		.CONST	0x0004								; Address of exception handler
0222 0003       |    |		.CONST	0x0003								; Number of locals
0223			INIT_0220:
0223 e20d       |    |		Load	0x1,0xd
0224 0007       |    |		Action	Break_Optional
0225 4802       |H   |		Short_Literal	0x2
0226 e220       |    |		Load	0x1,0x20
0227 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0228 00d8       |    |		Load_Top	At_Offset_0
0229 1c00       |    |		Execute_Immediate	Run_Utility,0x0
022a			BODY_0220:
022a 4802       |H   |		Short_Literal	0x2
022b 00d9       |    |		Load_Top	At_Offset_1
022c 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
022d e5ff       |    |		Load	0x2,-0x1
022e 00d9       |    |		Load_Top	At_Offset_1
022f 2a08       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8
0230 e5fe       |    |		Load	0x2,-0x2
0231 00d9       |    |		Load_Top	At_Offset_1
0232 2a09       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x9
0233 e5fd       |    |		Load	0x2,-0x3
0234 00d9       |    |		Load_Top	At_Offset_1
0235 2a0a       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xa
0236 00d9       |    |		Load_Top	At_Offset_1
0237 00d9       |    |		Load_Top	At_Offset_1
0238 8228       | (  |		Call	0x1,0x28
0239 003a       | :  |		Store_Top	Access,At_Offset_2
023a 00d9       |    |		Load_Top	At_Offset_1
023b 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
023c 0000 0000  |    |		.BLANK	0000[0x4]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 024a       | J  |		.CONST	0x024a								; Address of begin
0241 0004       |    |		.CONST	0x0004								; Address of exception handler
0242 0003       |    |		.CONST	0x0003								; Number of locals
0243			INIT_0240:
0243 e20d       |    |		Load	0x1,0xd
0244 0007       |    |		Action	Break_Optional
0245 4803       |H   |		Short_Literal	0x3
0246 e220       |    |		Load	0x1,0x20
0247 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0248 00d8       |    |		Load_Top	At_Offset_0
0249 1c00       |    |		Execute_Immediate	Run_Utility,0x0
024a			BODY_0240:
024a 4803       |H   |		Short_Literal	0x3
024b 00d9       |    |		Load_Top	At_Offset_1
024c 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
024d e5ff       |    |		Load	0x2,-0x1
024e 00d9       |    |		Load_Top	At_Offset_1
024f 2a0b       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xb
0250 e5fe       |    |		Load	0x2,-0x2
0251 00d9       |    |		Load_Top	At_Offset_1
0252 2a0c       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xc
0253 00d9       |    |		Load_Top	At_Offset_1
0254 00d9       |    |		Load_Top	At_Offset_1
0255 8228       | (  |		Call	0x1,0x28
0256 003a       | :  |		Store_Top	Access,At_Offset_2
0257 00d9       |    |		Load_Top	At_Offset_1
0258 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0259 0000 0000  |    |		.BLANK	0000[0x7]
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 026a       | j  |		.CONST	0x026a								; Address of begin
0261 0004       |    |		.CONST	0x0004								; Address of exception handler
0262 0003       |    |		.CONST	0x0003								; Number of locals
0263			INIT_0260:
0263 e20d       |    |		Load	0x1,0xd
0264 0007       |    |		Action	Break_Optional
0265 4804       |H   |		Short_Literal	0x4
0266 e220       |    |		Load	0x1,0x20
0267 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0268 00d8       |    |		Load_Top	At_Offset_0
0269 1c00       |    |		Execute_Immediate	Run_Utility,0x0
026a			BODY_0260:
026a 4804       |H   |		Short_Literal	0x4
026b 00d9       |    |		Load_Top	At_Offset_1
026c 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
026d e5ff       |    |		Load	0x2,-0x1
026e 00d9       |    |		Load_Top	At_Offset_1
026f 2a0b       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xb
0270 e5fe       |    |		Load	0x2,-0x2
0271 00d9       |    |		Load_Top	At_Offset_1
0272 2a0c       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xc
0273 00d9       |    |		Load_Top	At_Offset_1
0274 00d9       |    |		Load_Top	At_Offset_1
0275 8228       | (  |		Call	0x1,0x28
0276 003a       | :  |		Store_Top	Access,At_Offset_2
0277 00d9       |    |		Load_Top	At_Offset_1
0278 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0279 0000 0000  |    |		.BLANK	0000[0x7]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 028a       |    |		.CONST	0x028a								; Address of begin
0281 0004       |    |		.CONST	0x0004								; Address of exception handler
0282 0003       |    |		.CONST	0x0003								; Number of locals
0283			INIT_0280:
0283 e20d       |    |		Load	0x1,0xd
0284 0007       |    |		Action	Break_Optional
0285 4805       |H   |		Short_Literal	0x5
0286 e220       |    |		Load	0x1,0x20
0287 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0288 00d8       |    |		Load_Top	At_Offset_0
0289 1c00       |    |		Execute_Immediate	Run_Utility,0x0
028a			BODY_0280:
028a 4805       |H   |		Short_Literal	0x5
028b 00d9       |    |		Load_Top	At_Offset_1
028c 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
028d e5ff       |    |		Load	0x2,-0x1
028e 00d9       |    |		Load_Top	At_Offset_1
028f 2a0b       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xb
0290 e5fe       |    |		Load	0x2,-0x2
0291 00d9       |    |		Load_Top	At_Offset_1
0292 2a0c       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xc
0293 00d9       |    |		Load_Top	At_Offset_1
0294 00d9       |    |		Load_Top	At_Offset_1
0295 8228       | (  |		Call	0x1,0x28
0296 003a       | :  |		Store_Top	Access,At_Offset_2
0297 00d9       |    |		Load_Top	At_Offset_1
0298 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0299 0000 0000  |    |		.BLANK	0000[0x7]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02aa       |    |		.CONST	0x02aa								; Address of begin
02a1 0004       |    |		.CONST	0x0004								; Address of exception handler
02a2 0003       |    |		.CONST	0x0003								; Number of locals
02a3			INIT_02a0:
02a3 e20d       |    |		Load	0x1,0xd
02a4 0007       |    |		Action	Break_Optional
02a5 4806       |H   |		Short_Literal	0x6
02a6 e220       |    |		Load	0x1,0x20
02a7 1c08       |    |		Execute_Immediate	Run_Utility,0x8
02a8 00d8       |    |		Load_Top	At_Offset_0
02a9 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02aa			BODY_02a0:
02aa 4806       |H   |		Short_Literal	0x6
02ab 00d9       |    |		Load_Top	At_Offset_1
02ac 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
02ad e5ff       |    |		Load	0x2,-0x1
02ae 00d9       |    |		Load_Top	At_Offset_1
02af 2a0b       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xb
02b0 e5fe       |    |		Load	0x2,-0x2
02b1 00d9       |    |		Load_Top	At_Offset_1
02b2 2a0c       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xc
02b3 00d9       |    |		Load_Top	At_Offset_1
02b4 00d9       |    |		Load_Top	At_Offset_1
02b5 8228       | (  |		Call	0x1,0x28
02b6 003a       | :  |		Store_Top	Access,At_Offset_2
02b7 00d9       |    |		Load_Top	At_Offset_1
02b8 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
02b9 0000 0000  |    |		.BLANK	0000[0x7]
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02ca       |    |		.CONST	0x02ca								; Address of begin
02c1 0004       |    |		.CONST	0x0004								; Address of exception handler
02c2 0003       |    |		.CONST	0x0003								; Number of locals
02c3			INIT_02c0:
02c3 e20d       |    |		Load	0x1,0xd
02c4 0007       |    |		Action	Break_Optional
02c5 4808       |H   |		Short_Literal	0x8
02c6 e220       |    |		Load	0x1,0x20
02c7 1c08       |    |		Execute_Immediate	Run_Utility,0x8
02c8 00d8       |    |		Load_Top	At_Offset_0
02c9 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02ca			BODY_02c0:
02ca 4808       |H   |		Short_Literal	0x8
02cb 00d9       |    |		Load_Top	At_Offset_1
02cc 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
02cd e5ff       |    |		Load	0x2,-0x1
02ce 00d9       |    |		Load_Top	At_Offset_1
02cf 2a0f       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xf
02d0 e5fe       |    |		Load	0x2,-0x2
02d1 00d9       |    |		Load_Top	At_Offset_1
02d2 2a10       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x10
02d3 e5fd       |    |		Load	0x2,-0x3
02d4 00d9       |    |		Load_Top	At_Offset_1
02d5 2a11       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x11
02d6 00d9       |    |		Load_Top	At_Offset_1
02d7 00d9       |    |		Load_Top	At_Offset_1
02d8 8228       | (  |		Call	0x1,0x28
02d9 003a       | :  |		Store_Top	Access,At_Offset_2
02da 00d9       |    |		Load_Top	At_Offset_1
02db 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
02dc 0000 0000  |    |		.BLANK	0000[0x4]
02e0 ; --------------------------------------------------------------------------------------
02e0 ; SUBPROGRAM
02e0 ; --------------------------------------------------------------------------------------
02e0 02ea       |    |		.CONST	0x02ea								; Address of begin
02e1 0004       |    |		.CONST	0x0004								; Address of exception handler
02e2 0003       |    |		.CONST	0x0003								; Number of locals
02e3			INIT_02e0:
02e3 e20d       |    |		Load	0x1,0xd
02e4 0007       |    |		Action	Break_Optional
02e5 4807       |H   |		Short_Literal	0x7
02e6 e220       |    |		Load	0x1,0x20
02e7 1c08       |    |		Execute_Immediate	Run_Utility,0x8
02e8 00d8       |    |		Load_Top	At_Offset_0
02e9 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02ea			BODY_02e0:
02ea 4807       |H   |		Short_Literal	0x7
02eb 00d9       |    |		Load_Top	At_Offset_1
02ec 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
02ed e5ff       |    |		Load	0x2,-0x1
02ee 00d9       |    |		Load_Top	At_Offset_1
02ef 2a0d       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xd
02f0 e5fe       |    |		Load	0x2,-0x2
02f1 00d9       |    |		Load_Top	At_Offset_1
02f2 2a0e       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xe
02f3 00d9       |    |		Load_Top	At_Offset_1
02f4 00d9       |    |		Load_Top	At_Offset_1
02f5 8228       | (  |		Call	0x1,0x28
02f6 003a       | :  |		Store_Top	Access,At_Offset_2
02f7 00d9       |    |		Load_Top	At_Offset_1
02f8 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
02f9 0000 0000  |    |		.BLANK	0000[0x7]
0300 ; --------------------------------------------------------------------------------------
0300 ; SUBPROGRAM
0300 ; --------------------------------------------------------------------------------------
0300 030a       |    |		.CONST	0x030a								; Address of begin
0301 0004       |    |		.CONST	0x0004								; Address of exception handler
0302 0003       |    |		.CONST	0x0003								; Number of locals
0303			INIT_0300:
0303 e20d       |    |		Load	0x1,0xd
0304 0007       |    |		Action	Break_Optional
0305 4809       |H   |		Short_Literal	0x9
0306 e220       |    |		Load	0x1,0x20
0307 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0308 00d8       |    |		Load_Top	At_Offset_0
0309 1c00       |    |		Execute_Immediate	Run_Utility,0x0
030a			BODY_0300:
030a 4809       |H   |		Short_Literal	0x9
030b 00d9       |    |		Load_Top	At_Offset_1
030c 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
030d e5ff       |    |		Load	0x2,-0x1
030e 00d9       |    |		Load_Top	At_Offset_1
030f 2a12       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x12
0310 00d9       |    |		Load_Top	At_Offset_1
0311 00d9       |    |		Load_Top	At_Offset_1
0312 8228       | (  |		Call	0x1,0x28
0313 003a       | :  |		Store_Top	Access,At_Offset_2
0314 00d9       |    |		Load_Top	At_Offset_1
0315 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0316 0000 0000  |    |		.XXX[0x2]
0318 ; --------------------------------------------------------------------------------------
0318 ; SUBPROGRAM
0318 ; --------------------------------------------------------------------------------------
0318 0322       | "  |		.CONST	0x0322								; Address of begin
0319 0004       |    |		.CONST	0x0004								; Address of exception handler
031a 0003       |    |		.CONST	0x0003								; Number of locals
031b			INIT_0318:
031b e20d       |    |		Load	0x1,0xd
031c 0007       |    |		Action	Break_Optional
031d 480a       |H   |		Short_Literal	0xa
031e e220       |    |		Load	0x1,0x20
031f 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0320 00d8       |    |		Load_Top	At_Offset_0
0321 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0322			BODY_0318:
0322 480a       |H   |		Short_Literal	0xa
0323 00d9       |    |		Load_Top	At_Offset_1
0324 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0325 00d9       |    |		Load_Top	At_Offset_1
0326 00d9       |    |		Load_Top	At_Offset_1
0327 8228       | (  |		Call	0x1,0x28
0328 003a       | :  |		Store_Top	Access,At_Offset_2
0329 00d9       |    |		Load_Top	At_Offset_1
032a 00ca       |    |		Action	Exit_Nullary_Function
032b 0000 0000  |    |		.BLANK	0000[0x5]
0330 ; --------------------------------------------------------------------------------------
0330 ; SUBPROGRAM
0330 ; --------------------------------------------------------------------------------------
0330 033a       | :  |		.CONST	0x033a								; Address of begin
0331 0004       |    |		.CONST	0x0004								; Address of exception handler
0332 0003       |    |		.CONST	0x0003								; Number of locals
0333			INIT_0330:
0333 e20d       |    |		Load	0x1,0xd
0334 0007       |    |		Action	Break_Optional
0335 480b       |H   |		Short_Literal	0xb
0336 e220       |    |		Load	0x1,0x20
0337 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0338 00d8       |    |		Load_Top	At_Offset_0
0339 1c00       |    |		Execute_Immediate	Run_Utility,0x0
033a			BODY_0330:
033a 480b       |H   |		Short_Literal	0xb
033b 00d9       |    |		Load_Top	At_Offset_1
033c 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
033d 00d9       |    |		Load_Top	At_Offset_1
033e 00d9       |    |		Load_Top	At_Offset_1
033f 8228       | (  |		Call	0x1,0x28
0340 003a       | :  |		Store_Top	Access,At_Offset_2
0341 00d9       |    |		Load_Top	At_Offset_1
0342 00ca       |    |		Action	Exit_Nullary_Function
0343 0000 0000  |    |		.BLANK	0000[0x5]
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 00da       |    |		Load_Top	At_Offset_2
034c 4800       |H   |		Short_Literal	0x0
034d 822f       | /  |		Call	0x1,0x2f
034e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
034f 0000       |    |		.XXX[0x1]
0350 ; --------------------------------------------------------------------------------------
0350 ; SUBPROGRAM
0350 ; --------------------------------------------------------------------------------------
0350 0353       | S  |		.CONST	0x0353								; Address of begin
0351 0004       |    |		.CONST	0x0004								; Address of exception handler
0352 0001       |    |		.CONST	0x0001								; Number of locals
0353			BODY_0350:
0353			INIT_0350:
0353 4607       |F   |		Jump_Case	0x8
0354 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
0355 7807       |x   |		Jump	0x35d								; case 0x1
0356 780a       |x   |		Jump	0x361								; case 0x2
0357 780e       |x   |		Jump	0x366								; case 0x3
0358 7811       |x   |		Jump	0x36a								; case 0x4
0359 7812       |x   |		Jump	0x36c								; case 0x5
035a 7813       |x   |		Jump	0x36e								; case 0x6
035b 7816       |x   |		Jump	0x372								; case 0x7
035c 4302       |C   |		.XXX[0x1]
035d 00da       |    |		Load_Top	At_Offset_2
035e 0091 09ea  |    |		Action	Push_String_Extended_Indexed,0x9ea				; "SI_ALORS_SINON"
0360 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0361 00db       |    |		Load_Top	At_Offset_3
0362 00db       |    |		Load_Top	At_Offset_3
0363 00e0       |    |		Load_Encached	Standard_Cache
0364 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0365 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0366 00da       |    |		Load_Top	At_Offset_2
0367 00e0       |    |		Load_Encached	Standard_Cache
0368 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0369 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
036a 00db       |    |		Load_Top	At_Offset_3
036b 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
036c 00db       |    |		Load_Top	At_Offset_3
036d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
036e e21f       |    |		Load	0x1,0x1f
036f 00dc       |    |		Load_Top	At_Offset_4
0370 0267       | g  |		Execute	Discrete,Predecessor
0371 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0372 e21f       |    |		Load	0x1,0x1f
0373 00dc       |    |		Load_Top	At_Offset_4
0374 0268       | h  |		Execute	Discrete,Successor
0375 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0376 0000 0000  |    |		.XXX[0x2]
0378 ; --------------------------------------------------------------------------------------
0378 ; SUBPROGRAM
0378 ; --------------------------------------------------------------------------------------
0378 037f       |    |		.CONST	0x037f								; Address of begin
0379 0004       |    |		.CONST	0x0004								; Address of exception handler
037a 0003       |    |		.CONST	0x0003								; Number of locals
037b			INIT_0378:
037b e20d       |    |		Load	0x1,0xd
037c 0007       |    |		Action	Break_Optional
037d 00d8       |    |		Load_Top	At_Offset_0
037e 0007       |    |		Action	Break_Optional
037f			BODY_0378:
037f e5ff       |    |		Load	0x2,-0x1
0380 7002       |p   |		Jump_Nonzero	0x383
0381 e20d       |    |		Load	0x1,0xd
0382 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0383 e5ff       |    |		Load	0x2,-0x1
0384 003a       | :  |		Store_Top	Access,At_Offset_2
0385 00cf       |    |		Action	Mark_Auxiliary
0386 7807       |x   |		Jump	0x38e
0387 00da       |    |		Load_Top	At_Offset_2
0388 003a       | :  |		Store_Top	Access,At_Offset_2
0389 00da       |    |		Load_Top	At_Offset_2
038a 0227       | '  |		Execute	Access,All_Reference
038b 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
038c 003b       | ;  |		Store_Top	Access,At_Offset_3
038d 00c9       |    |		Action	Pop_Auxiliary_Loop
038e 00da       |    |		Load_Top	At_Offset_2
038f 77f7       |w   |		Jump_Nonzero	0x387
0390 00ce       |    |		Action	Pop_Auxiliary
0391 00d8       |    |		Load_Top	At_Offset_0
0392 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0393 0000 0000  |    |		.BLANK	0000[0x5]
0398 ; --------------------------------------------------------------------------------------
0398 ; SUBPROGRAM
0398 ; --------------------------------------------------------------------------------------
0398 039d       |    |		.CONST	0x039d								; Address of begin
0399 0004       |    |		.CONST	0x0004								; Address of exception handler
039a 0002       |    |		.CONST	0x0002								; Number of locals
039b			INIT_0398:
039b e20d       |    |		Load	0x1,0xd
039c 0007       |    |		Action	Break_Optional
039d			BODY_0398:
039d e221       | !  |		Load	0x1,0x21
039e 0322       | "  |		Declare_Variable	Record
039f e5ff       |    |		Load	0x2,-0x1
03a0 00d9       |    |		Load_Top	At_Offset_1
03a1 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
03a2 e20d       |    |		Load	0x1,0xd
03a3 00d9       |    |		Load_Top	At_Offset_1
03a4 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
03a5 e20d       |    |		Load	0x1,0xd
03a6 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
03a7 0039       | 9  |		Store_Top	Access,At_Offset_1
03a8 e5fe       |    |		Load	0x2,-0x2
03a9 00d9       |    |		Load_Top	At_Offset_1
03aa 8210       |    |		Call	0x1,0x10
03ab c5fe       |    |		Store	0x2,-0x2
03ac 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
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 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03b5 0000 0000  |    |		.XXX[0x3]
03b7 0000       |    |
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03bb       |    |		.CONST	0x03bb								; Address of begin
03b9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ba 0001       |    |		.CONST	0x0001								; Number of locals
03bb			BODY_03b8:
03bb			INIT_03b8:
03bb 00da       |    |		Load_Top	At_Offset_2
03bc 6804       |h   |		Jump_Zero	0x3c1
03bd 00da       |    |		Load_Top	At_Offset_2
03be 0227       | '  |		Execute	Access,All_Reference
03bf 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
03c0 003b       | ;  |		Store_Top	Access,At_Offset_3
03c1 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03c2 0000 0000  |    |		.BLANK	0000[0x6]
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 022d       | -  |		Execute	Access,Is_Null
03cd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03ce 0000 0000  |    |		.XXX[0x2]
03d0 ; --------------------------------------------------------------------------------------
03d0 ; SUBPROGRAM
03d0 ; --------------------------------------------------------------------------------------
03d0 03d3       |    |		.CONST	0x03d3								; Address of begin
03d1 0004       |    |		.CONST	0x0004								; Address of exception handler
03d2 0001       |    |		.CONST	0x0001								; Number of locals
03d3			BODY_03d0:
03d3			INIT_03d0:
03d3 00da       |    |		Load_Top	At_Offset_2
03d4 022c       | ,  |		Execute	Access,Not_Null
03d5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03d6 0000 0000  |    |		.XXX[0x2]
03d8 ; --------------------------------------------------------------------------------------
03d8 ; SUBPROGRAM
03d8 ; --------------------------------------------------------------------------------------
03d8 03dd       |    |		.CONST	0x03dd								; Address of begin
03d9 0004       |    |		.CONST	0x0004								; Address of exception handler
03da 0002       |    |		.CONST	0x0002								; Number of locals
03db			INIT_03d8:
03db e20d       |    |		Load	0x1,0xd
03dc 0007       |    |		Action	Break_Optional
03dd			BODY_03d8:
03dd 00db       |    |		Load_Top	At_Offset_3
03de 0039       | 9  |		Store_Top	Access,At_Offset_1
03df 00d8       |    |		Load_Top	At_Offset_0
03e0 0227       | '  |		Execute	Access,All_Reference
03e1 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
03e2 02fd       |    |		Declare_Variable	Variant_Record,Duplicate
03e3 00cd       |    |		Action	Spare6_Action
03e4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03e5 0000 0000  |    |		.XXX[0x3]
03e7 0000       |    |
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03eb       |    |		.CONST	0x03eb								; Address of begin
03e9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ea 0001       |    |		.CONST	0x0001								; Number of locals
03eb			BODY_03e8:
03eb			INIT_03e8:
03eb 00cf       |    |		Action	Mark_Auxiliary
03ec 00db       |    |		Load_Top	At_Offset_3
03ed 4801       |H   |		Short_Literal	0x1
03ee 0263       | c  |		Execute	Discrete,Above_Bound
03ef 7006       |p   |		Jump_Nonzero	0x3f6
03f0 0092 09f6  |    |		Action	Push_String_Extended,0x9f6					; " "
03f2 e009       |    |		Load	0x0,0x9
03f3 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
03f4 00c8       |    |		Action	Pop_Auxiliary_Range
03f5 3ffa       |?   |		Loop_Increasing	0x3f0
03f6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
03f7 0000       |    |		.XXX[0x1]
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 0401       |    |		.CONST	0x0401								; Address of begin
03f9 0004       |    |		.CONST	0x0004								; Address of exception handler
03fa 0003       |    |		.CONST	0x0003								; Number of locals
03fb			INIT_03f8:
03fb e20d       |    |		Load	0x1,0xd
03fc 0007       |    |		Action	Break_Optional
03fd e220       |    |		Load	0x1,0x20
03fe 02ff       |    |		Declare_Variable	Variant_Record
03ff 00d8       |    |		Load_Top	At_Offset_0
0400 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0401			BODY_03f8:
0401 e5fe       |    |		Load	0x2,-0x2
0402 8229       | )  |		Call	0x1,0x29
0403 003a       | :  |		Store_Top	Access,At_Offset_2
0404 00cf       |    |		Action	Mark_Auxiliary
0405 793a       |y:  |		Jump	0x540
0406 00da       |    |		Load_Top	At_Offset_2
0407 822d       | -  |		Call	0x1,0x2d
0408 00da       |    |		Load_Top	At_Offset_2
0409 016d       | m  |		Execute	Variant_Record,Structure_Write
040a 00d9       |    |		Load_Top	At_Offset_1
040b 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
040c 460b       |F   |		Jump_Case	0xc
040d 7812       |x   |		Jump	0x420								; case 0x0
040e 7848       |xH  |		Jump	0x457								; case 0x1
040f 7866       |xf  |		Jump	0x476								; case 0x2
0410 788b       |x   |		Jump	0x49c								; case 0x3
0411 78a1       |x   |		Jump	0x4b3								; case 0x4
0412 78b7       |x   |		Jump	0x4ca								; case 0x5
0413 78cd       |x   |		Jump	0x4e1								; case 0x6
0414 78e3       |x   |		Jump	0x4f8								; case 0x7
0415 78fa       |x   |		Jump	0x510								; case 0x8
0416 7918       |y   |		Jump	0x52f								; case 0x9
0417 791e       |y   |		Jump	0x536								; case 0xa
0418 7800       |x   |		Jump	0x419								; case 0xb
0419 e5ff       |    |		Load	0x2,-0x1
041a 822e       | .  |		Call	0x1,0x2e
041b 0092 09f7  |    |		Action	Push_String_Extended,0x9f7					; "-- Vide"
041d e009       |    |		Load	0x0,0x9
041e 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
041f 791c       |y   |		Jump	0x53c
0420 e5ff       |    |		Load	0x2,-0x1
0421 822e       | .  |		Call	0x1,0x2e
0422 0092 09f8  |    |		Action	Push_String_Extended,0x9f8					; "SI"
0424 e009       |    |		Load	0x0,0x9
0425 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0426 00d9       |    |		Load_Top	At_Offset_1
0427 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0428 e5ff       |    |		Load	0x2,-0x1
0429 0a02       |    |		Execute_Immediate	Plus,0x2
042a 00d8       |    |		Load_Top	At_Offset_0
042b 00e2       |    |		Load_Encached	Integer_Cache
042c 0260       | `  |		Execute	Discrete,In_Type
042d 7001       |p   |		Jump_Nonzero	0x42f
042e 0801       |    |		Execute_Immediate	Raise,0x1
042f 800a       |    |		Call	0x0,0xa
0430 e5ff       |    |		Load	0x2,-0x1
0431 822e       | .  |		Call	0x1,0x2e
0432 0092 09f9  |    |		Action	Push_String_Extended,0x9f9					; "ALORS"
0434 e009       |    |		Load	0x0,0x9
0435 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0436 00d9       |    |		Load_Top	At_Offset_1
0437 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0438 e5ff       |    |		Load	0x2,-0x1
0439 0a02       |    |		Execute_Immediate	Plus,0x2
043a 00d8       |    |		Load_Top	At_Offset_0
043b 00e2       |    |		Load_Encached	Integer_Cache
043c 0260       | `  |		Execute	Discrete,In_Type
043d 7001       |p   |		Jump_Nonzero	0x43f
043e 0801       |    |		Execute_Immediate	Raise,0x1
043f 822f       | /  |		Call	0x1,0x2f
0440 e5ff       |    |		Load	0x2,-0x1
0441 822e       | .  |		Call	0x1,0x2e
0442 0092 09fa  |    |		Action	Push_String_Extended,0x9fa					; "SINON"
0444 e009       |    |		Load	0x0,0x9
0445 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0446 00d9       |    |		Load_Top	At_Offset_1
0447 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
0448 e5ff       |    |		Load	0x2,-0x1
0449 0a02       |    |		Execute_Immediate	Plus,0x2
044a 00d8       |    |		Load_Top	At_Offset_0
044b 00e2       |    |		Load_Encached	Integer_Cache
044c 0260       | `  |		Execute	Discrete,In_Type
044d 7001       |p   |		Jump_Nonzero	0x44f
044e 0801       |    |		Execute_Immediate	Raise,0x1
044f 822f       | /  |		Call	0x1,0x2f
0450 e5ff       |    |		Load	0x2,-0x1
0451 822e       | .  |		Call	0x1,0x2e
0452 0092 09fb  |    |		Action	Push_String_Extended,0x9fb					; "FIN_SI"
0454 e009       |    |		Load	0x0,0x9
0455 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0456 78e5       |x   |		Jump	0x53c
0457 e5ff       |    |		Load	0x2,-0x1
0458 822e       | .  |		Call	0x1,0x2e
0459 0092 09fc  |    |		Action	Push_String_Extended,0x9fc					; "POUR "
045b 00da       |    |		Load_Top	At_Offset_2
045c 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
045d 00e0       |    |		Load_Encached	Standard_Cache
045e 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
045f 01cc       |    |		Execute	Vector,Catenate
0460 0092 09fd  |    |		Action	Push_String_Extended,0x9fd					; " ENTREE FAIRE "
0462 01cc       |    |		Execute	Vector,Catenate
0463 e009       |    |		Load	0x0,0x9
0464 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0465 00d9       |    |		Load_Top	At_Offset_1
0466 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
0467 e5ff       |    |		Load	0x2,-0x1
0468 0a02       |    |		Execute_Immediate	Plus,0x2
0469 00d8       |    |		Load_Top	At_Offset_0
046a 00e2       |    |		Load_Encached	Integer_Cache
046b 0260       | `  |		Execute	Discrete,In_Type
046c 7001       |p   |		Jump_Nonzero	0x46e
046d 0801       |    |		Execute_Immediate	Raise,0x1
046e 822f       | /  |		Call	0x1,0x2f
046f e5ff       |    |		Load	0x2,-0x1
0470 822e       | .  |		Call	0x1,0x2e
0471 0092 09fe  |    |		Action	Push_String_Extended,0x9fe					; "FIN_POUR"
0473 e009       |    |		Load	0x0,0x9
0474 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0475 78c6       |x   |		Jump	0x53c
0476 e5ff       |    |		Load	0x2,-0x1
0477 822e       | .  |		Call	0x1,0x2e
0478 00d9       |    |		Load_Top	At_Offset_1
0479 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
047a e003       |    |		Load	0x0,0x3
047b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
047c e009       |    |		Load	0x0,0x9
047d 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
047e 00d9       |    |		Load_Top	At_Offset_1
047f 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
0480 e003       |    |		Load	0x0,0x3
0481 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0482 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0483 6809       |h   |		Jump_Zero	0x48d
0484 0092 09ff  |    |		Action	Push_String_Extended,0x9ff					; "."
0486 00da       |    |		Load_Top	At_Offset_2
0487 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
0488 e003       |    |		Load	0x0,0x3
0489 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
048a 01cc       |    |		Execute	Vector,Catenate
048b e009       |    |		Load	0x0,0x9
048c 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
048d 0092 0a00  |    |		Action	Push_String_Extended,0xa00					; " = "
048f e009       |    |		Load	0x0,0x9
0490 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0491 00d9       |    |		Load_Top	At_Offset_1
0492 2e0a       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa
0493 e5ff       |    |		Load	0x2,-0x1
0494 0a02       |    |		Execute_Immediate	Plus,0x2
0495 00d8       |    |		Load_Top	At_Offset_0
0496 00e2       |    |		Load_Encached	Integer_Cache
0497 0260       | `  |		Execute	Discrete,In_Type
0498 7001       |p   |		Jump_Nonzero	0x49a
0499 0801       |    |		Execute_Immediate	Raise,0x1
049a 800a       |    |		Call	0x0,0xa
049b 78a0       |x   |		Jump	0x53c
049c e5ff       |    |		Load	0x2,-0x1
049d 822e       | .  |		Call	0x1,0x2e
049e 0092 0a01  |    |		Action	Push_String_Extended,0xa01					; "LIE_CONNEXION ( "
04a0 00da       |    |		Load_Top	At_Offset_2
04a1 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
04a2 e003       |    |		Load	0x0,0x3
04a3 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04a4 01cc       |    |		Execute	Vector,Catenate
04a5 0092 0a02  |    |		Action	Push_String_Extended,0xa02					; ", "
04a7 01cc       |    |		Execute	Vector,Catenate
04a8 00da       |    |		Load_Top	At_Offset_2
04a9 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
04aa e003       |    |		Load	0x0,0x3
04ab 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04ac 01cc       |    |		Execute	Vector,Catenate
04ad 0092 0a03  |    |		Action	Push_String_Extended,0xa03					; " )"
04af 01cc       |    |		Execute	Vector,Catenate
04b0 e009       |    |		Load	0x0,0x9
04b1 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
04b2 7889       |x   |		Jump	0x53c
04b3 e5ff       |    |		Load	0x2,-0x1
04b4 822e       | .  |		Call	0x1,0x2e
04b5 0092 0a04  |    |		Action	Push_String_Extended,0xa04					; "DELIE_CONNEXION ( "
04b7 00da       |    |		Load_Top	At_Offset_2
04b8 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
04b9 e003       |    |		Load	0x0,0x3
04ba 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04bb 01cc       |    |		Execute	Vector,Catenate
04bc 0092 0a02  |    |		Action	Push_String_Extended,0xa02					; ", "
04be 01cc       |    |		Execute	Vector,Catenate
04bf 00da       |    |		Load_Top	At_Offset_2
04c0 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
04c1 e003       |    |		Load	0x0,0x3
04c2 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04c3 01cc       |    |		Execute	Vector,Catenate
04c4 0092 0a03  |    |		Action	Push_String_Extended,0xa03					; " )"
04c6 01cc       |    |		Execute	Vector,Catenate
04c7 e009       |    |		Load	0x0,0x9
04c8 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
04c9 7872       |xr  |		Jump	0x53c
04ca e5ff       |    |		Load	0x2,-0x1
04cb 822e       | .  |		Call	0x1,0x2e
04cc 0092 0a05  |    |		Action	Push_String_Extended,0xa05					; "LIE_LIEN ( "
04ce 00da       |    |		Load_Top	At_Offset_2
04cf 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
04d0 e003       |    |		Load	0x0,0x3
04d1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04d2 01cc       |    |		Execute	Vector,Catenate
04d3 0092 0a02  |    |		Action	Push_String_Extended,0xa02					; ", "
04d5 01cc       |    |		Execute	Vector,Catenate
04d6 00da       |    |		Load_Top	At_Offset_2
04d7 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
04d8 e003       |    |		Load	0x0,0x3
04d9 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04da 01cc       |    |		Execute	Vector,Catenate
04db 0092 0a03  |    |		Action	Push_String_Extended,0xa03					; " )"
04dd 01cc       |    |		Execute	Vector,Catenate
04de e009       |    |		Load	0x0,0x9
04df 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
04e0 785b       |x[  |		Jump	0x53c
04e1 e5ff       |    |		Load	0x2,-0x1
04e2 822e       | .  |		Call	0x1,0x2e
04e3 0092 0a06  |    |		Action	Push_String_Extended,0xa06					; "DELIE_LIEN ( "
04e5 00da       |    |		Load_Top	At_Offset_2
04e6 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
04e7 e003       |    |		Load	0x0,0x3
04e8 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04e9 01cc       |    |		Execute	Vector,Catenate
04ea 0092 0a02  |    |		Action	Push_String_Extended,0xa02					; ", "
04ec 01cc       |    |		Execute	Vector,Catenate
04ed 00da       |    |		Load_Top	At_Offset_2
04ee 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
04ef e003       |    |		Load	0x0,0x3
04f0 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04f1 01cc       |    |		Execute	Vector,Catenate
04f2 0092 0a03  |    |		Action	Push_String_Extended,0xa03					; " )"
04f4 01cc       |    |		Execute	Vector,Catenate
04f5 e009       |    |		Load	0x0,0x9
04f6 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
04f7 7844       |xD  |		Jump	0x53c
04f8 e5ff       |    |		Load	0x2,-0x1
04f9 822e       | .  |		Call	0x1,0x2e
04fa 0092 0a07  |    |		Action	Push_String_Extended,0xa07					; "LISTE_LIEN ( "
04fc 00da       |    |		Load_Top	At_Offset_2
04fd 260d       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xd
04fe e003       |    |		Load	0x0,0x3
04ff 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0500 01cc       |    |		Execute	Vector,Catenate
0501 0092 0a02  |    |		Action	Push_String_Extended,0xa02					; ", "
0503 01cc       |    |		Execute	Vector,Catenate
0504 00da       |    |		Load_Top	At_Offset_2
0505 2e0e       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xe
0506 e004       |    |		Load	0x0,0x4
0507 011c       |    |		Execute	Any,Convert_Unchecked
0508 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0509 01cc       |    |		Execute	Vector,Catenate
050a 0092 0a03  |    |		Action	Push_String_Extended,0xa03					; " )"
050c 01cc       |    |		Execute	Vector,Catenate
050d e009       |    |		Load	0x0,0x9
050e 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
050f 782c       |x,  |		Jump	0x53c
0510 e5ff       |    |		Load	0x2,-0x1
0511 822e       | .  |		Call	0x1,0x2e
0512 0092 0a08  |    |		Action	Push_String_Extended,0xa08					; "ECHANGER_LIEN ( "
0514 00da       |    |		Load_Top	At_Offset_2
0515 260f       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xf
0516 e003       |    |		Load	0x0,0x3
0517 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0518 01cc       |    |		Execute	Vector,Catenate
0519 0092 0a02  |    |		Action	Push_String_Extended,0xa02					; ", "
051b 01cc       |    |		Execute	Vector,Catenate
051c 00da       |    |		Load_Top	At_Offset_2
051d 2610       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x10
051e e003       |    |		Load	0x0,0x3
051f 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0520 01cc       |    |		Execute	Vector,Catenate
0521 0092 0a02  |    |		Action	Push_String_Extended,0xa02					; ", "
0523 01cc       |    |		Execute	Vector,Catenate
0524 00da       |    |		Load_Top	At_Offset_2
0525 2611       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x11
0526 e003       |    |		Load	0x0,0x3
0527 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0528 01cc       |    |		Execute	Vector,Catenate
0529 0092 0a03  |    |		Action	Push_String_Extended,0xa03					; " )"
052b 01cc       |    |		Execute	Vector,Catenate
052c e009       |    |		Load	0x0,0x9
052d 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
052e 780d       |x   |		Jump	0x53c
052f e5ff       |    |		Load	0x2,-0x1
0530 822e       | .  |		Call	0x1,0x2e
0531 0092 0a09  |    |		Action	Push_String_Extended,0xa09					; " -- Afficher -- "
0533 e009       |    |		Load	0x0,0x9
0534 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0535 7806       |x   |		Jump	0x53c
0536 e5ff       |    |		Load	0x2,-0x1
0537 822e       | .  |		Call	0x1,0x2e
0538 0092 09f4  |    |		Action	Push_String_Extended,0x9f4					; "FIN"
053a e009       |    |		Load	0x0,0x9
053b 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
053c 00da       |    |		Load_Top	At_Offset_2
053d 822a       | *  |		Call	0x1,0x2a
053e 003b       | ;  |		Store_Top	Access,At_Offset_3
053f 00c9       |    |		Action	Pop_Auxiliary_Loop
0540 00da       |    |		Load_Top	At_Offset_2
0541 822c       | ,  |		Call	0x1,0x2c
0542 76c3       |v   |		Jump_Nonzero	0x406
0543 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0544 0000 0000  |    |		.BLANK	0000[0x4]
0548 ; --------------------------------------------------------------------------------------
0548 ; SUBPROGRAM
0548 ; --------------------------------------------------------------------------------------
0548 054c       | L  |		.CONST	0x054c								; Address of begin
0549 0004       |    |		.CONST	0x0004								; Address of exception handler
054a 0002       |    |		.CONST	0x0002								; Number of locals
054b			INIT_0548:
054b 00e1       |    |		Load_Encached	Boolean_Cache
054c			BODY_0548:
054c e5fc       |    |		Load	0x2,-0x4
054d 680b       |h   |		Jump_Zero	0x559
054e 0092 0a0a  |    |		Action	Push_String_Extended,0xa0a					; ">> Execution SI <<"
0550 e009       |    |		Load	0x0,0x9
0551 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0552 0092 0a0b  |    |		Action	Push_String_Extended,0xa0b					; ">> Condition:"
0554 e009       |    |		Load	0x0,0x9
0555 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0556 00db       |    |		Load_Top	At_Offset_3
0557 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0558 800b       |    |		Call	0x0,0xb
0559 e5fd       |    |		Load	0x2,-0x3
055a e5f9       |    |		Load	0x2,-0x7
055b e5fa       |    |		Load	0x2,-0x6
055c e5fb       |    |		Load	0x2,-0x5
055d e5fe       |    |		Load	0x2,-0x2
055e e5ff       |    |		Load	0x2,-0x1
055f 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0560 800c       |    |		Call	0x0,0xc
0561 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0562 00d8       |    |		Load_Top	At_Offset_0
0563 6815       |h   |		Jump_Zero	0x579
0564 e5fc       |    |		Load	0x2,-0x4
0565 6804       |h   |		Jump_Zero	0x56a
0566 0092 0a0c  |    |		Action	Push_String_Extended,0xa0c					; ">> Execution ALORS <<"
0568 e009       |    |		Load	0x0,0x9
0569 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
056a e5f7       |    |		Load	0x2,-0x9
056b e5f8       |    |		Load	0x2,-0x8
056c e5f9       |    |		Load	0x2,-0x7
056d e5fa       |    |		Load	0x2,-0x6
056e e5fb       |    |		Load	0x2,-0x5
056f e5fc       |    |		Load	0x2,-0x4
0570 e5fd       |    |		Load	0x2,-0x3
0571 e5fe       |    |		Load	0x2,-0x2
0572 e5ff       |    |		Load	0x2,-0x1
0573 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0574 8211       |    |		Call	0x1,0x11
0575 00d3       |    |		Pop_Control	Pop_Count_3
0576 c5f8       |    |		Store	0x2,-0x8
0577 c5f7       |    |		Store	0x2,-0x9
0578 7814       |x   |		Jump	0x58d
0579 e5fc       |    |		Load	0x2,-0x4
057a 6804       |h   |		Jump_Zero	0x57f
057b 0092 0a0d  |    |		Action	Push_String_Extended,0xa0d					; ">> Execution SINON <<"
057d e009       |    |		Load	0x0,0x9
057e 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
057f e5f7       |    |		Load	0x2,-0x9
0580 e5f8       |    |		Load	0x2,-0x8
0581 e5f9       |    |		Load	0x2,-0x7
0582 e5fa       |    |		Load	0x2,-0x6
0583 e5fb       |    |		Load	0x2,-0x5
0584 e5fc       |    |		Load	0x2,-0x4
0585 e5fd       |    |		Load	0x2,-0x3
0586 e5fe       |    |		Load	0x2,-0x2
0587 e5ff       |    |		Load	0x2,-0x1
0588 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
0589 8211       |    |		Call	0x1,0x11
058a 00d3       |    |		Pop_Control	Pop_Count_3
058b c5f8       |    |		Store	0x2,-0x8
058c c5f7       |    |		Store	0x2,-0x9
058d e5fc       |    |		Load	0x2,-0x4
058e 6804       |h   |		Jump_Zero	0x593
058f 0092 0a0e  |    |		Action	Push_String_Extended,0xa0e					; ">> FIN SI <<"
0591 e009       |    |		Load	0x0,0x9
0592 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0593 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0594 0000 0000  |    |		.BLANK	0000[0x4]
0598 ; --------------------------------------------------------------------------------------
0598 ; SUBPROGRAM
0598 ; --------------------------------------------------------------------------------------
0598 059b       |    |		.CONST	0x059b								; Address of begin
0599 0004       |    |		.CONST	0x0004								; Address of exception handler
059a 0001       |    |		.CONST	0x0001								; Number of locals
059b			BODY_0598:
059b			INIT_0598:
059b 800d       |    |		Call	0x0,0xd
059c 00db       |    |		Load_Top	At_Offset_3
059d 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
059e 026e       | n  |		Execute	Discrete,Modulo
059f 7022       |p"  |		Jump_Nonzero	0x5c2
05a0 e5fc       |    |		Load	0x2,-0x4
05a1 680c       |h   |		Jump_Zero	0x5ae
05a2 0092 0a0f  |    |		Action	Push_String_Extended,0xa0f					; ">> Execution POUR ("
05a4 00db       |    |		Load_Top	At_Offset_3
05a5 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
05a6 00e0       |    |		Load_Encached	Standard_Cache
05a7 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
05a8 01cc       |    |		Execute	Vector,Catenate
05a9 0092 0a10  |    |		Action	Push_String_Extended,0xa10					; ")"
05ab 01cc       |    |		Execute	Vector,Catenate
05ac e009       |    |		Load	0x0,0x9
05ad 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
05ae e5f7       |    |		Load	0x2,-0x9
05af e5f8       |    |		Load	0x2,-0x8
05b0 e5f9       |    |		Load	0x2,-0x7
05b1 e5fa       |    |		Load	0x2,-0x6
05b2 e5fb       |    |		Load	0x2,-0x5
05b3 e5fc       |    |		Load	0x2,-0x4
05b4 e5fd       |    |		Load	0x2,-0x3
05b5 e5fe       |    |		Load	0x2,-0x2
05b6 e5ff       |    |		Load	0x2,-0x1
05b7 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
05b8 8211       |    |		Call	0x1,0x11
05b9 00d3       |    |		Pop_Control	Pop_Count_3
05ba c5f8       |    |		Store	0x2,-0x8
05bb c5f7       |    |		Store	0x2,-0x9
05bc e5fc       |    |		Load	0x2,-0x4
05bd 6804       |h   |		Jump_Zero	0x5c2
05be 0092 0a11  |    |		Action	Push_String_Extended,0xa11					; ">> FIN POUR <<"
05c0 e009       |    |		Load	0x0,0x9
05c1 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
05c2 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
05c3 0000 0000  |    |		.BLANK	0000[0x5]
05c8 ; --------------------------------------------------------------------------------------
05c8 ; SUBPROGRAM
05c8 ; --------------------------------------------------------------------------------------
05c8 05cd       |    |		.CONST	0x05cd								; Address of begin
05c9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ca 0003       |    |		.CONST	0x0003								; Number of locals
05cb			INIT_05c8:
05cb 00e2       |    |		Load_Encached	Integer_Cache
05cc 00e1       |    |		Load_Encached	Boolean_Cache
05cd			BODY_05c8:
05cd e5fc       |    |		Load	0x2,-0x4
05ce 6820       |h   |		Jump_Zero	0x5ef
05cf 0092 0a12  |    |		Action	Push_String_Extended,0xa12					; ">> Execution AFFECTATION <<"
05d1 e009       |    |		Load	0x0,0x9
05d2 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
05d3 e5ff       |    |		Load	0x2,-0x1
05d4 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
05d5 e003       |    |		Load	0x0,0x3
05d6 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
05d7 e009       |    |		Load	0x0,0x9
05d8 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
05d9 e5ff       |    |		Load	0x2,-0x1
05da 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
05db e003       |    |		Load	0x0,0x3
05dc 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
05dd 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
05de 6809       |h   |		Jump_Zero	0x5e8
05df 0092 09ff  |    |		Action	Push_String_Extended,0x9ff					; "."
05e1 e5ff       |    |		Load	0x2,-0x1
05e2 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
05e3 e003       |    |		Load	0x0,0x3
05e4 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
05e5 01cc       |    |		Execute	Vector,Catenate
05e6 e009       |    |		Load	0x0,0x9
05e7 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
05e8 0092 0a13  |    |		Action	Push_String_Extended,0xa13					; " := "
05ea e009       |    |		Load	0x0,0x9
05eb 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
05ec e5ff       |    |		Load	0x2,-0x1
05ed 2e0a       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa
05ee 800b       |    |		Call	0x0,0xb
05ef e5ff       |    |		Load	0x2,-0x1
05f0 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
05f1 e003       |    |		Load	0x0,0x3
05f2 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
05f3 701b       |p   |		Jump_Nonzero	0x60f
05f4 e5ff       |    |		Load	0x2,-0x1
05f5 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
05f6 e003       |    |		Load	0x0,0x3
05f7 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
05f8 e5fb       |    |		Load	0x2,-0x5
05f9 800e       |    |		Call	0x0,0xe
05fa 6810       |h   |		Jump_Zero	0x60b
05fb e5fb       |    |		Load	0x2,-0x5
05fc e5fd       |    |		Load	0x2,-0x3
05fd e5f9       |    |		Load	0x2,-0x7
05fe e5fa       |    |		Load	0x2,-0x6
05ff e5fb       |    |		Load	0x2,-0x5
0600 e5fe       |    |		Load	0x2,-0x2
0601 e5ff       |    |		Load	0x2,-0x1
0602 2e0a       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa
0603 800f       |    |		Call	0x0,0xf
0604 e5ff       |    |		Load	0x2,-0x1
0605 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
0606 e003       |    |		Load	0x0,0x3
0607 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0608 8010       |    |		Call	0x0,0x10
0609 00d1       |    |		Pop_Control	Pop_Count_1
060a 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
060b 0092 0a14  |    |		Action	Push_String_Extended,0xa14					; "Manque l'extension pour l'acces a la variable !!!"
060d 8011       |    |		Call	0x0,0x11
060e 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
060f e5ff       |    |		Load	0x2,-0x1
0610 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
0611 e003       |    |		Load	0x0,0x3
0612 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0613 e5ff       |    |		Load	0x2,-0x1
0614 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
0615 e003       |    |		Load	0x0,0x3
0616 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0617 e5fe       |    |		Load	0x2,-0x2
0618 e5fb       |    |		Load	0x2,-0x5
0619 8012       |    |		Call	0x0,0x12
061a 0092 0a15  |    |		Action	Push_String_Extended,0xa15					; "ENTIER"
061c 01df       |    |		Execute	Vector,Equal
061d e5ff       |    |		Load	0x2,-0x1
061e 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
061f e003       |    |		Load	0x0,0x3
0620 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0621 e5ff       |    |		Load	0x2,-0x1
0622 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
0623 e003       |    |		Load	0x0,0x3
0624 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0625 e5fe       |    |		Load	0x2,-0x2
0626 e5fb       |    |		Load	0x2,-0x5
0627 8012       |    |		Call	0x0,0x12
0628 0092 0a16  |    |		Action	Push_String_Extended,0xa16					; "ENUMERE"
062a 01df       |    |		Execute	Vector,Equal
062b 0278       | x  |		Execute	Discrete,Or
062c 6817       |h   |		Jump_Zero	0x644
062d e5fd       |    |		Load	0x2,-0x3
062e e5f9       |    |		Load	0x2,-0x7
062f e5fa       |    |		Load	0x2,-0x6
0630 e5fb       |    |		Load	0x2,-0x5
0631 e5fe       |    |		Load	0x2,-0x2
0632 e5ff       |    |		Load	0x2,-0x1
0633 2e0a       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa
0634 8013       |    |		Call	0x0,0x13
0635 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0636 e5fb       |    |		Load	0x2,-0x5
0637 00da       |    |		Load_Top	At_Offset_2
0638 e5ff       |    |		Load	0x2,-0x1
0639 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
063a e003       |    |		Load	0x0,0x3
063b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
063c e5ff       |    |		Load	0x2,-0x1
063d 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
063e e003       |    |		Load	0x0,0x3
063f 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0640 e5fe       |    |		Load	0x2,-0x2
0641 8014       |    |		Call	0x0,0x14
0642 00d1       |    |		Pop_Control	Pop_Count_1
0643 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0644 e5ff       |    |		Load	0x2,-0x1
0645 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
0646 e003       |    |		Load	0x0,0x3
0647 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0648 e5ff       |    |		Load	0x2,-0x1
0649 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
064a e003       |    |		Load	0x0,0x3
064b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
064c e5fe       |    |		Load	0x2,-0x2
064d e5fb       |    |		Load	0x2,-0x5
064e 8012       |    |		Call	0x0,0x12
064f 0092 0a17  |    |		Action	Push_String_Extended,0xa17					; "BOOLEEN"
0651 01df       |    |		Execute	Vector,Equal
0652 6817       |h   |		Jump_Zero	0x66a
0653 e5fd       |    |		Load	0x2,-0x3
0654 e5f9       |    |		Load	0x2,-0x7
0655 e5fa       |    |		Load	0x2,-0x6
0656 e5fb       |    |		Load	0x2,-0x5
0657 e5fe       |    |		Load	0x2,-0x2
0658 e5ff       |    |		Load	0x2,-0x1
0659 2e0a       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa
065a 800c       |    |		Call	0x0,0xc
065b 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
065c e5fb       |    |		Load	0x2,-0x5
065d 00d9       |    |		Load_Top	At_Offset_1
065e e5ff       |    |		Load	0x2,-0x1
065f 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
0660 e003       |    |		Load	0x0,0x3
0661 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0662 e5ff       |    |		Load	0x2,-0x1
0663 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
0664 e003       |    |		Load	0x0,0x3
0665 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0666 e5fe       |    |		Load	0x2,-0x2
0667 8015       |    |		Call	0x0,0x15
0668 00d1       |    |		Pop_Control	Pop_Count_1
0669 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
066a 0092 0a18  |    |		Action	Push_String_Extended,0xa18					; "Affectation non valide !!!"
066c 8011       |    |		Call	0x0,0x11
066d 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
066e 0000 0000  |    |		.XXX[0x2]
0670 ; --------------------------------------------------------------------------------------
0670 ; SUBPROGRAM
0670 ; --------------------------------------------------------------------------------------
0670 067f       |    |		.CONST	0x067f								; Address of begin
0671 0004       |    |		.CONST	0x0004								; Address of exception handler
0672 0003       |    |		.CONST	0x0003								; Number of locals
0673			INIT_0670:
0673 4820       |H   |		Short_Literal	0x20
0674 e003       |    |		Load	0x0,0x3
0675 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0676 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0677 00d8       |    |		Load_Top	At_Offset_0
0678 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0679 4820       |H   |		Short_Literal	0x20
067a e003       |    |		Load	0x0,0x3
067b 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
067c 1c08       |    |		Execute_Immediate	Run_Utility,0x8
067d 00d8       |    |		Load_Top	At_Offset_0
067e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
067f			BODY_0670:
067f e5fb       |    |		Load	0x2,-0x5
0680 6816       |h   |		Jump_Zero	0x697
0681 0092 0a19  |    |		Action	Push_String_Extended,0xa19					; ">> Execution LIE_CONNEXION <<"
0683 e009       |    |		Load	0x0,0x9
0684 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0685 0092 0a1a  |    |		Action	Push_String_Extended,0xa1a					; ">> Parametres: "
0687 e5ff       |    |		Load	0x2,-0x1
0688 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
0689 e003       |    |		Load	0x0,0x3
068a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
068b 01cc       |    |		Execute	Vector,Catenate
068c 0092 0a1b  |    |		Action	Push_String_Extended,0xa1b					; " , "
068e 01cc       |    |		Execute	Vector,Catenate
068f e009       |    |		Load	0x0,0x9
0690 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0691 e5ff       |    |		Load	0x2,-0x1
0692 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
0693 e003       |    |		Load	0x0,0x3
0694 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0695 e009       |    |		Load	0x0,0x9
0696 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0697 e5ff       |    |		Load	0x2,-0x1
0698 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
0699 00da       |    |		Load_Top	At_Offset_2
069a 016d       | m  |		Execute	Variant_Record,Structure_Write
069b e5ff       |    |		Load	0x2,-0x1
069c 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
069d 00d9       |    |		Load_Top	At_Offset_1
069e 016d       | m  |		Execute	Variant_Record,Structure_Write
069f 00d9       |    |		Load_Top	At_Offset_1
06a0 e5fd       |    |		Load	0x2,-0x3
06a1 e5fc       |    |		Load	0x2,-0x4
06a2 823c       | <  |		Call	0x1,0x3c
06a3 00d1       |    |		Pop_Control	Pop_Count_1
06a4 00d8       |    |		Load_Top	At_Offset_0
06a5 e5fd       |    |		Load	0x2,-0x3
06a6 e5fc       |    |		Load	0x2,-0x4
06a7 823c       | <  |		Call	0x1,0x3c
06a8 00d1       |    |		Pop_Control	Pop_Count_1
06a9 e5fa       |    |		Load	0x2,-0x6
06aa 4801       |H   |		Short_Literal	0x1
06ab 00da       |    |		Load_Top	At_Offset_2
06ac e003       |    |		Load	0x0,0x3
06ad 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06ae e402       |    |		Load	0x2,0x2
06af e003       |    |		Load	0x0,0x3
06b0 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06b1 8016       |    |		Call	0x0,0x16
06b2 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
06b3 0000 0000  |    |		.BLANK	0000[0x5]
06b8 ; --------------------------------------------------------------------------------------
06b8 ; SUBPROGRAM
06b8 ; --------------------------------------------------------------------------------------
06b8 06c7       |    |		.CONST	0x06c7								; Address of begin
06b9 0004       |    |		.CONST	0x0004								; Address of exception handler
06ba 0003       |    |		.CONST	0x0003								; Number of locals
06bb			INIT_06b8:
06bb 4820       |H   |		Short_Literal	0x20
06bc e003       |    |		Load	0x0,0x3
06bd 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
06be 1c08       |    |		Execute_Immediate	Run_Utility,0x8
06bf 00d8       |    |		Load_Top	At_Offset_0
06c0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
06c1 4820       |H   |		Short_Literal	0x20
06c2 e003       |    |		Load	0x0,0x3
06c3 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
06c4 1c08       |    |		Execute_Immediate	Run_Utility,0x8
06c5 00d8       |    |		Load_Top	At_Offset_0
06c6 1c00       |    |		Execute_Immediate	Run_Utility,0x0
06c7			BODY_06b8:
06c7 e5fb       |    |		Load	0x2,-0x5
06c8 6816       |h   |		Jump_Zero	0x6df
06c9 0092 0a1c  |    |		Action	Push_String_Extended,0xa1c					; ">> Execution DELIE_CONNEXION <<"
06cb e009       |    |		Load	0x0,0x9
06cc 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
06cd 0092 0a1a  |    |		Action	Push_String_Extended,0xa1a					; ">> Parametres: "
06cf e5ff       |    |		Load	0x2,-0x1
06d0 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
06d1 e003       |    |		Load	0x0,0x3
06d2 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06d3 01cc       |    |		Execute	Vector,Catenate
06d4 0092 0a1b  |    |		Action	Push_String_Extended,0xa1b					; " , "
06d6 01cc       |    |		Execute	Vector,Catenate
06d7 e009       |    |		Load	0x0,0x9
06d8 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
06d9 e5ff       |    |		Load	0x2,-0x1
06da 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
06db e003       |    |		Load	0x0,0x3
06dc 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06dd e009       |    |		Load	0x0,0x9
06de 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
06df e5ff       |    |		Load	0x2,-0x1
06e0 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
06e1 00da       |    |		Load_Top	At_Offset_2
06e2 016d       | m  |		Execute	Variant_Record,Structure_Write
06e3 e5ff       |    |		Load	0x2,-0x1
06e4 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
06e5 00d9       |    |		Load_Top	At_Offset_1
06e6 016d       | m  |		Execute	Variant_Record,Structure_Write
06e7 00d9       |    |		Load_Top	At_Offset_1
06e8 e5fd       |    |		Load	0x2,-0x3
06e9 e5fc       |    |		Load	0x2,-0x4
06ea 823c       | <  |		Call	0x1,0x3c
06eb 00d1       |    |		Pop_Control	Pop_Count_1
06ec 00d8       |    |		Load_Top	At_Offset_0
06ed e5fd       |    |		Load	0x2,-0x3
06ee e5fc       |    |		Load	0x2,-0x4
06ef 823c       | <  |		Call	0x1,0x3c
06f0 00d1       |    |		Pop_Control	Pop_Count_1
06f1 e5fa       |    |		Load	0x2,-0x6
06f2 4802       |H   |		Short_Literal	0x2
06f3 00da       |    |		Load_Top	At_Offset_2
06f4 e003       |    |		Load	0x0,0x3
06f5 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06f6 e402       |    |		Load	0x2,0x2
06f7 e003       |    |		Load	0x0,0x3
06f8 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06f9 8016       |    |		Call	0x0,0x16
06fa 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
06fb 0000 0000  |    |		.BLANK	0000[0x5]
0700 ; --------------------------------------------------------------------------------------
0700 ; SUBPROGRAM
0700 ; --------------------------------------------------------------------------------------
0700 070f       |    |		.CONST	0x070f								; Address of begin
0701 0004       |    |		.CONST	0x0004								; Address of exception handler
0702 0003       |    |		.CONST	0x0003								; Number of locals
0703			INIT_0700:
0703 4820       |H   |		Short_Literal	0x20
0704 e003       |    |		Load	0x0,0x3
0705 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0706 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0707 00d8       |    |		Load_Top	At_Offset_0
0708 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0709 4820       |H   |		Short_Literal	0x20
070a e003       |    |		Load	0x0,0x3
070b 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
070c 1c08       |    |		Execute_Immediate	Run_Utility,0x8
070d 00d8       |    |		Load_Top	At_Offset_0
070e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
070f			BODY_0700:
070f e5fb       |    |		Load	0x2,-0x5
0710 6816       |h   |		Jump_Zero	0x727
0711 0092 0a1d  |    |		Action	Push_String_Extended,0xa1d					; ">> Execution LIE_LIEN <<"
0713 e009       |    |		Load	0x0,0x9
0714 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0715 0092 0a1a  |    |		Action	Push_String_Extended,0xa1a					; ">> Parametres: "
0717 e5ff       |    |		Load	0x2,-0x1
0718 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
0719 e003       |    |		Load	0x0,0x3
071a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
071b 01cc       |    |		Execute	Vector,Catenate
071c 0092 0a1b  |    |		Action	Push_String_Extended,0xa1b					; " , "
071e 01cc       |    |		Execute	Vector,Catenate
071f e009       |    |		Load	0x0,0x9
0720 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0721 e5ff       |    |		Load	0x2,-0x1
0722 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
0723 e003       |    |		Load	0x0,0x3
0724 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0725 e009       |    |		Load	0x0,0x9
0726 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0727 e5ff       |    |		Load	0x2,-0x1
0728 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
0729 00da       |    |		Load_Top	At_Offset_2
072a 016d       | m  |		Execute	Variant_Record,Structure_Write
072b e5ff       |    |		Load	0x2,-0x1
072c 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
072d 00d9       |    |		Load_Top	At_Offset_1
072e 016d       | m  |		Execute	Variant_Record,Structure_Write
072f 00d9       |    |		Load_Top	At_Offset_1
0730 e5fd       |    |		Load	0x2,-0x3
0731 e5fc       |    |		Load	0x2,-0x4
0732 823c       | <  |		Call	0x1,0x3c
0733 00d1       |    |		Pop_Control	Pop_Count_1
0734 00d8       |    |		Load_Top	At_Offset_0
0735 e5fd       |    |		Load	0x2,-0x3
0736 e5fc       |    |		Load	0x2,-0x4
0737 823c       | <  |		Call	0x1,0x3c
0738 00d1       |    |		Pop_Control	Pop_Count_1
0739 e5fa       |    |		Load	0x2,-0x6
073a 4801       |H   |		Short_Literal	0x1
073b 00da       |    |		Load_Top	At_Offset_2
073c e003       |    |		Load	0x0,0x3
073d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
073e e402       |    |		Load	0x2,0x2
073f e003       |    |		Load	0x0,0x3
0740 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0741 8017       |    |		Call	0x0,0x17
0742 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0743 0000 0000  |    |		.BLANK	0000[0x5]
0748 ; --------------------------------------------------------------------------------------
0748 ; SUBPROGRAM
0748 ; --------------------------------------------------------------------------------------
0748 0757       | W  |		.CONST	0x0757								; Address of begin
0749 0004       |    |		.CONST	0x0004								; Address of exception handler
074a 0003       |    |		.CONST	0x0003								; Number of locals
074b			INIT_0748:
074b 4820       |H   |		Short_Literal	0x20
074c e003       |    |		Load	0x0,0x3
074d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
074e 1c08       |    |		Execute_Immediate	Run_Utility,0x8
074f 00d8       |    |		Load_Top	At_Offset_0
0750 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0751 4820       |H   |		Short_Literal	0x20
0752 e003       |    |		Load	0x0,0x3
0753 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0754 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0755 00d8       |    |		Load_Top	At_Offset_0
0756 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0757			BODY_0748:
0757 e5fb       |    |		Load	0x2,-0x5
0758 6816       |h   |		Jump_Zero	0x76f
0759 0092 0a1e  |    |		Action	Push_String_Extended,0xa1e					; ">> Execution DELIE_LIEN <<"
075b e009       |    |		Load	0x0,0x9
075c 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
075d 0092 0a1a  |    |		Action	Push_String_Extended,0xa1a					; ">> Parametres: "
075f e5ff       |    |		Load	0x2,-0x1
0760 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
0761 e003       |    |		Load	0x0,0x3
0762 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0763 01cc       |    |		Execute	Vector,Catenate
0764 0092 0a1b  |    |		Action	Push_String_Extended,0xa1b					; " , "
0766 01cc       |    |		Execute	Vector,Catenate
0767 e009       |    |		Load	0x0,0x9
0768 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0769 e5ff       |    |		Load	0x2,-0x1
076a 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
076b e003       |    |		Load	0x0,0x3
076c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
076d e009       |    |		Load	0x0,0x9
076e 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
076f e5ff       |    |		Load	0x2,-0x1
0770 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
0771 00da       |    |		Load_Top	At_Offset_2
0772 016d       | m  |		Execute	Variant_Record,Structure_Write
0773 e5ff       |    |		Load	0x2,-0x1
0774 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
0775 00d9       |    |		Load_Top	At_Offset_1
0776 016d       | m  |		Execute	Variant_Record,Structure_Write
0777 00d9       |    |		Load_Top	At_Offset_1
0778 e5fd       |    |		Load	0x2,-0x3
0779 e5fc       |    |		Load	0x2,-0x4
077a 823c       | <  |		Call	0x1,0x3c
077b 00d1       |    |		Pop_Control	Pop_Count_1
077c 00d8       |    |		Load_Top	At_Offset_0
077d e5fd       |    |		Load	0x2,-0x3
077e e5fc       |    |		Load	0x2,-0x4
077f 823c       | <  |		Call	0x1,0x3c
0780 00d1       |    |		Pop_Control	Pop_Count_1
0781 e5fa       |    |		Load	0x2,-0x6
0782 4802       |H   |		Short_Literal	0x2
0783 00da       |    |		Load_Top	At_Offset_2
0784 e003       |    |		Load	0x0,0x3
0785 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0786 e402       |    |		Load	0x2,0x2
0787 e003       |    |		Load	0x0,0x3
0788 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0789 8017       |    |		Call	0x0,0x17
078a 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
078b 0000 0000  |    |		.BLANK	0000[0x5]
0790 ; --------------------------------------------------------------------------------------
0790 ; SUBPROGRAM
0790 ; --------------------------------------------------------------------------------------
0790 0799       |    |		.CONST	0x0799								; Address of begin
0791 0004       |    |		.CONST	0x0004								; Address of exception handler
0792 0002       |    |		.CONST	0x0002								; Number of locals
0793			INIT_0790:
0793 4820       |H   |		Short_Literal	0x20
0794 e003       |    |		Load	0x0,0x3
0795 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0796 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0797 00d8       |    |		Load_Top	At_Offset_0
0798 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0799			BODY_0790:
0799 e5fb       |    |		Load	0x2,-0x5
079a 6816       |h   |		Jump_Zero	0x7b1
079b 0092 0a1f  |    |		Action	Push_String_Extended,0xa1f					; ">> Execution LISTE_LIEN <<"
079d e009       |    |		Load	0x0,0x9
079e 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
079f 0092 0a1a  |    |		Action	Push_String_Extended,0xa1a					; ">> Parametres: "
07a1 e5ff       |    |		Load	0x2,-0x1
07a2 260d       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xd
07a3 e003       |    |		Load	0x0,0x3
07a4 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
07a5 01cc       |    |		Execute	Vector,Catenate
07a6 0092 0a02  |    |		Action	Push_String_Extended,0xa02					; ", "
07a8 01cc       |    |		Execute	Vector,Catenate
07a9 e5ff       |    |		Load	0x2,-0x1
07aa 2e0e       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xe
07ab e004       |    |		Load	0x0,0x4
07ac 011c       |    |		Execute	Any,Convert_Unchecked
07ad 1c01       |    |		Execute_Immediate	Run_Utility,0x1
07ae 01cc       |    |		Execute	Vector,Catenate
07af e009       |    |		Load	0x0,0x9
07b0 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
07b1 00db       |    |		Load_Top	At_Offset_3
07b2 260d       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xd
07b3 00d9       |    |		Load_Top	At_Offset_1
07b4 016d       | m  |		Execute	Variant_Record,Structure_Write
07b5 00d8       |    |		Load_Top	At_Offset_0
07b6 e5fd       |    |		Load	0x2,-0x3
07b7 e5fc       |    |		Load	0x2,-0x4
07b8 823c       | <  |		Call	0x1,0x3c
07b9 00d1       |    |		Pop_Control	Pop_Count_1
07ba 00db       |    |		Load_Top	At_Offset_3
07bb 2e0e       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xe
07bc 0f2d       | -  |		Execute_Immediate	Equal,0x2d
07bd 6807       |h   |		Jump_Zero	0x7c5
07be e5fa       |    |		Load	0x2,-0x6
07bf 4801       |H   |		Short_Literal	0x1
07c0 00da       |    |		Load_Top	At_Offset_2
07c1 e003       |    |		Load	0x0,0x3
07c2 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
07c3 8018       |    |		Call	0x0,0x18
07c4 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
07c5 e5fa       |    |		Load	0x2,-0x6
07c6 4802       |H   |		Short_Literal	0x2
07c7 00da       |    |		Load_Top	At_Offset_2
07c8 e003       |    |		Load	0x0,0x3
07c9 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
07ca 8018       |    |		Call	0x0,0x18
07cb 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
07cc 0000 0000  |    |		.BLANK	0000[0x4]
07d0 ; --------------------------------------------------------------------------------------
07d0 ; SUBPROGRAM
07d0 ; --------------------------------------------------------------------------------------
07d0 07e5       |    |		.CONST	0x07e5								; Address of begin
07d1 0004       |    |		.CONST	0x0004								; Address of exception handler
07d2 0004       |    |		.CONST	0x0004								; Number of locals
07d3			INIT_07d0:
07d3 4820       |H   |		Short_Literal	0x20
07d4 e003       |    |		Load	0x0,0x3
07d5 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
07d6 1c08       |    |		Execute_Immediate	Run_Utility,0x8
07d7 00d8       |    |		Load_Top	At_Offset_0
07d8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
07d9 4820       |H   |		Short_Literal	0x20
07da e003       |    |		Load	0x0,0x3
07db 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
07dc 1c08       |    |		Execute_Immediate	Run_Utility,0x8
07dd 00d8       |    |		Load_Top	At_Offset_0
07de 1c00       |    |		Execute_Immediate	Run_Utility,0x0
07df 4820       |H   |		Short_Literal	0x20
07e0 e003       |    |		Load	0x0,0x3
07e1 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
07e2 1c08       |    |		Execute_Immediate	Run_Utility,0x8
07e3 00d8       |    |		Load_Top	At_Offset_0
07e4 1c00       |    |		Execute_Immediate	Run_Utility,0x0
07e5			BODY_07d0:
07e5 e5fb       |    |		Load	0x2,-0x5
07e6 681d       |h   |		Jump_Zero	0x804
07e7 0092 0a20  |    |		Action	Push_String_Extended,0xa20					; ">> Execution ECHANGER_LIEN <<"
07e9 e009       |    |		Load	0x0,0x9
07ea 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
07eb 0092 0a1a  |    |		Action	Push_String_Extended,0xa1a					; ">> Parametres: "
07ed e5ff       |    |		Load	0x2,-0x1
07ee 260f       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xf
07ef e003       |    |		Load	0x0,0x3
07f0 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
07f1 01cc       |    |		Execute	Vector,Catenate
07f2 0092 0a02  |    |		Action	Push_String_Extended,0xa02					; ", "
07f4 01cc       |    |		Execute	Vector,Catenate
07f5 e5ff       |    |		Load	0x2,-0x1
07f6 2610       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x10
07f7 e003       |    |		Load	0x0,0x3
07f8 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
07f9 01cc       |    |		Execute	Vector,Catenate
07fa 0092 0a02  |    |		Action	Push_String_Extended,0xa02					; ", "
07fc 01cc       |    |		Execute	Vector,Catenate
07fd e5ff       |    |		Load	0x2,-0x1
07fe 2611       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x11
07ff e003       |    |		Load	0x0,0x3
0800 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0801 01cc       |    |		Execute	Vector,Catenate
0802 e009       |    |		Load	0x0,0x9
0803 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0804 e5ff       |    |		Load	0x2,-0x1
0805 260f       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xf
0806 00db       |    |		Load_Top	At_Offset_3
0807 016d       | m  |		Execute	Variant_Record,Structure_Write
0808 e5ff       |    |		Load	0x2,-0x1
0809 2610       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x10
080a 00da       |    |		Load_Top	At_Offset_2
080b 016d       | m  |		Execute	Variant_Record,Structure_Write
080c e5ff       |    |		Load	0x2,-0x1
080d 2611       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x11
080e 00d9       |    |		Load_Top	At_Offset_1
080f 016d       | m  |		Execute	Variant_Record,Structure_Write
0810 00da       |    |		Load_Top	At_Offset_2
0811 e5fd       |    |		Load	0x2,-0x3
0812 e5fc       |    |		Load	0x2,-0x4
0813 823c       | <  |		Call	0x1,0x3c
0814 00d1       |    |		Pop_Control	Pop_Count_1
0815 00d9       |    |		Load_Top	At_Offset_1
0816 e5fd       |    |		Load	0x2,-0x3
0817 e5fc       |    |		Load	0x2,-0x4
0818 823c       | <  |		Call	0x1,0x3c
0819 00d1       |    |		Pop_Control	Pop_Count_1
081a 00d8       |    |		Load_Top	At_Offset_0
081b e5fd       |    |		Load	0x2,-0x3
081c e5fc       |    |		Load	0x2,-0x4
081d 823c       | <  |		Call	0x1,0x3c
081e 00d1       |    |		Pop_Control	Pop_Count_1
081f e5fa       |    |		Load	0x2,-0x6
0820 00d9       |    |		Load_Top	At_Offset_1
0821 e003       |    |		Load	0x0,0x3
0822 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0823 00db       |    |		Load_Top	At_Offset_3
0824 e003       |    |		Load	0x0,0x3
0825 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0826 e402       |    |		Load	0x2,0x2
0827 e003       |    |		Load	0x0,0x3
0828 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0829 8019       |    |		Call	0x0,0x19
082a 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
082b 0000 0000  |    |		.BLANK	0000[0x5]
0830 ; --------------------------------------------------------------------------------------
0830 ; SUBPROGRAM
0830 ; --------------------------------------------------------------------------------------
0830 0833       | 3  |		.CONST	0x0833								; Address of begin
0831 0004       |    |		.CONST	0x0004								; Address of exception handler
0832 0001       |    |		.CONST	0x0001								; Number of locals
0833			BODY_0830:
0833			INIT_0830:
0833 e5fb       |    |		Load	0x2,-0x5
0834 6804       |h   |		Jump_Zero	0x839
0835 0092 0a21  |   !|		Action	Push_String_Extended,0xa21					; ">> Execution AFFICHER <<"
0837 e009       |    |		Load	0x0,0x9
0838 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0839 e5fc       |    |		Load	0x2,-0x4
083a e5fe       |    |		Load	0x2,-0x2
083b e5fd       |    |		Load	0x2,-0x3
083c e5ff       |    |		Load	0x2,-0x1
083d 2612       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x12
083e 801a       |    |		Call	0x0,0x1a
083f 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0840 ; --------------------------------------------------------------------------------------
0840 ; SUBPROGRAM
0840 ; --------------------------------------------------------------------------------------
0840 0843       | C  |		.CONST	0x0843								; Address of begin
0841 0004       |    |		.CONST	0x0004								; Address of exception handler
0842 0001       |    |		.CONST	0x0001								; Number of locals
0843			BODY_0840:
0843			INIT_0840:
0843 00db       |    |		Load_Top	At_Offset_3
0844 6804       |h   |		Jump_Zero	0x849
0845 0092 0a22  |   "|		Action	Push_String_Extended,0xa22					; ">> Execution FIN <<"
0847 e009       |    |		Load	0x0,0x9
0848 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0849 4801       |H   |		Short_Literal	0x1
084a a5fd       |    |		Store_Unchecked	0x2,-0x3
084b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
084c 0000 0000  |    |		.BLANK	0000[0x4]
0850 ; --------------------------------------------------------------------------------------
0850 ; SUBPROGRAM
0850 ; --------------------------------------------------------------------------------------
0850 0853       | S  |		.CONST	0x0853								; Address of begin
0851 0004       |    |		.CONST	0x0004								; Address of exception handler
0852 0001       |    |		.CONST	0x0001								; Number of locals
0853			BODY_0850:
0853			INIT_0850:
0853 00db       |    |		Load_Top	At_Offset_3
0854 6804       |h   |		Jump_Zero	0x859
0855 0092 0a23  |   #|		Action	Push_String_Extended,0xa23					; ">> Execution VIDE <<"
0857 e009       |    |		Load	0x0,0x9
0858 184f       | O  |		Execute	Package,Field_Execute,Field_Number 0x4f
0859 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
085a 0000 0000  |    |		.BLANK	0000[0x6]
0860 ; --------------------------------------------------------------------------------------
0860 ; SUBPROGRAM
0860 ; --------------------------------------------------------------------------------------
0860 0863       | c  |		.CONST	0x0863								; Address of begin
0861 0004       |    |		.CONST	0x0004								; Address of exception handler
0862 0001       |    |		.CONST	0x0001								; Number of locals
0863			BODY_0860:
0863			INIT_0860:
0863 e5fd       |    |		Load	0x2,-0x3
0864 e003       |    |		Load	0x0,0x3
0865 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0866 e5fe       |    |		Load	0x2,-0x2
0867 801b       |    |		Call	0x0,0x1b
0868 00db       |    |		Load_Top	At_Offset_3
0869 e5fd       |    |		Load	0x2,-0x3
086a e003       |    |		Load	0x0,0x3
086b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
086c 801c       |    |		Call	0x0,0x1c
086d 0f00       |    |		Execute_Immediate	Equal,0x0
086e 0278       | x  |		Execute	Discrete,Or
086f 6829       |h)  |		Jump_Zero	0x899
0870 e5fd       |    |		Load	0x2,-0x3
0871 e003       |    |		Load	0x0,0x3
0872 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0873 0092 0a24  |   $|		Action	Push_String_Extended,0xa24					; "COMP"
0875 01df       |    |		Execute	Vector,Equal
0876 6806       |h   |		Jump_Zero	0x87d
0877 e5fd       |    |		Load	0x2,-0x3
0878 00db       |    |		Load_Top	At_Offset_3
0879 801d       |    |		Call	0x0,0x1d
087a e003       |    |		Load	0x0,0x3
087b 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
087c 00d1       |    |		Pop_Control	Pop_Count_1
087d e5fd       |    |		Load	0x2,-0x3
087e e003       |    |		Load	0x0,0x3
087f 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0880 e5fe       |    |		Load	0x2,-0x2
0881 801b       |    |		Call	0x0,0x1b
0882 00db       |    |		Load_Top	At_Offset_3
0883 e5fd       |    |		Load	0x2,-0x3
0884 e003       |    |		Load	0x0,0x3
0885 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0886 801c       |    |		Call	0x0,0x1c
0887 0f00       |    |		Execute_Immediate	Equal,0x0
0888 0278       | x  |		Execute	Discrete,Or
0889 680f       |h   |		Jump_Zero	0x899
088a e5fd       |    |		Load	0x2,-0x3
088b e003       |    |		Load	0x0,0x3
088c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
088d e5fe       |    |		Load	0x2,-0x2
088e 800e       |    |		Call	0x0,0xe
088f 6809       |h   |		Jump_Zero	0x899
0890 e5fd       |    |		Load	0x2,-0x3
0891 00d8       |    |		Load_Top	At_Offset_0
0892 e003       |    |		Load	0x0,0x3
0893 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0894 e5fe       |    |		Load	0x2,-0x2
0895 801e       |    |		Call	0x0,0x1e
0896 e003       |    |		Load	0x0,0x3
0897 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0898 00d1       |    |		Pop_Control	Pop_Count_1
0899 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
089a 0000 0000  |    |		.BLANK	0000[0x6]
08a0 ; --------------------------------------------------------------------------------------
08a0 ; SUBPROGRAM
08a0 ; --------------------------------------------------------------------------------------
08a0 08a3       |    |		.CONST	0x08a3								; Address of begin
08a1 0004       |    |		.CONST	0x0004								; Address of exception handler
08a2 0001       |    |		.CONST	0x0001								; Number of locals
08a3			BODY_08a0:
08a3			INIT_08a0:
08a3 00da       |    |		Load_Top	At_Offset_2
08a4 0227       | '  |		Execute	Access,All_Reference
08a5 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
08a6 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
08a7 460b       |F   |		Jump_Case	0xc
08a8 7812       |x   |		Jump	0x8bb								; case 0x0
08a9 7833       |x3  |		Jump	0x8dd								; case 0x1
08aa 7854       |xT  |		Jump	0x8ff								; case 0x2
08ab 7808       |x   |		Jump	0x8b4								; case 0x3
08ac 7807       |x   |		Jump	0x8b4								; case 0x4
08ad 7806       |x   |		Jump	0x8b4								; case 0x5
08ae 7805       |x   |		Jump	0x8b4								; case 0x6
08af 7804       |x   |		Jump	0x8b4								; case 0x7
08b0 7803       |x   |		Jump	0x8b4								; case 0x8
08b1 783b       |x;  |		Jump	0x8ed								; case 0x9
08b2 7801       |x   |		Jump	0x8b4								; case 0xa
08b3 7800       |x   |		Jump	0x8b4								; case 0xb
08b4 00da       |    |		Load_Top	At_Offset_2
08b5 e222       | "  |		Load	0x1,0x22
08b6 e223       | #  |		Load	0x1,0x23
08b7 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
08b8 8006       |    |		Call	0x0,0x6
08b9 003b       | ;  |		Store_Top	Access,At_Offset_3
08ba 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
08bb 00da       |    |		Load_Top	At_Offset_2
08bc 0229       | )  |		Execute	Access,All_Read
08bd 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
08be 00d8       |    |		Load_Top	At_Offset_0
08bf 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
08c0 801f       |    |		Call	0x0,0x1f
08c1 00d9       |    |		Load_Top	At_Offset_1
08c2 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
08c3 00d1       |    |		Pop_Control	Pop_Count_1
08c4 00da       |    |		Load_Top	At_Offset_2
08c5 0229       | )  |		Execute	Access,All_Read
08c6 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
08c7 00d8       |    |		Load_Top	At_Offset_0
08c8 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
08c9 820f       |    |		Call	0x1,0xf
08ca 00d9       |    |		Load_Top	At_Offset_1
08cb 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
08cc 00d1       |    |		Pop_Control	Pop_Count_1
08cd 00da       |    |		Load_Top	At_Offset_2
08ce 0229       | )  |		Execute	Access,All_Read
08cf 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
08d0 00d8       |    |		Load_Top	At_Offset_0
08d1 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
08d2 820f       |    |		Call	0x1,0xf
08d3 00d9       |    |		Load_Top	At_Offset_1
08d4 2a05       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5
08d5 00d1       |    |		Pop_Control	Pop_Count_1
08d6 00da       |    |		Load_Top	At_Offset_2
08d7 e222       | "  |		Load	0x1,0x22
08d8 e223       | #  |		Load	0x1,0x23
08d9 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
08da 8006       |    |		Call	0x0,0x6
08db 003b       | ;  |		Store_Top	Access,At_Offset_3
08dc 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
08dd 00da       |    |		Load_Top	At_Offset_2
08de 0229       | )  |		Execute	Access,All_Read
08df 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
08e0 00d8       |    |		Load_Top	At_Offset_0
08e1 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
08e2 820f       |    |		Call	0x1,0xf
08e3 00d9       |    |		Load_Top	At_Offset_1
08e4 2a07       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7
08e5 00d1       |    |		Pop_Control	Pop_Count_1
08e6 00da       |    |		Load_Top	At_Offset_2
08e7 e222       | "  |		Load	0x1,0x22
08e8 e223       | #  |		Load	0x1,0x23
08e9 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
08ea 8006       |    |		Call	0x0,0x6
08eb 003b       | ;  |		Store_Top	Access,At_Offset_3
08ec 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
08ed 00da       |    |		Load_Top	At_Offset_2
08ee 0229       | )  |		Execute	Access,All_Read
08ef 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
08f0 00d8       |    |		Load_Top	At_Offset_0
08f1 2e12       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x12
08f2 00d8       |    |		Load_Top	At_Offset_0
08f3 00d8       |    |		Load_Top	At_Offset_0
08f4 8020       |    |		Call	0x0,0x20
08f5 00d2       |    |		Pop_Control	Pop_Count_2
08f6 00d0       |    |		Action	Swap_Control
08f7 2a12       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x12
08f8 00da       |    |		Load_Top	At_Offset_2
08f9 e222       | "  |		Load	0x1,0x22
08fa e223       | #  |		Load	0x1,0x23
08fb 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
08fc 8006       |    |		Call	0x0,0x6
08fd 003b       | ;  |		Store_Top	Access,At_Offset_3
08fe 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
08ff 00da       |    |		Load_Top	At_Offset_2
0900 0229       | )  |		Execute	Access,All_Read
0901 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0902 00d8       |    |		Load_Top	At_Offset_0
0903 2e0a       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa
0904 801f       |    |		Call	0x0,0x1f
0905 00d9       |    |		Load_Top	At_Offset_1
0906 2a0a       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xa
0907 00d1       |    |		Pop_Control	Pop_Count_1
0908 00da       |    |		Load_Top	At_Offset_2
0909 e222       | "  |		Load	0x1,0x22
090a e223       | #  |		Load	0x1,0x23
090b 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
090c 8006       |    |		Call	0x0,0x6
090d 003b       | ;  |		Store_Top	Access,At_Offset_3
090e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
090f 0000       |    |		.XXX[0x1]
0910 ; --------------------------------------------------------------------------------------
0910 ; SUBPROGRAM
0910 ; --------------------------------------------------------------------------------------
0910 0913       |    |		.CONST	0x0913								; Address of begin
0911 0004       |    |		.CONST	0x0004								; Address of exception handler
0912 0001       |    |		.CONST	0x0001								; Number of locals
0913			BODY_0910:
0913			INIT_0910:
0913 4609       |F   |		Jump_Case	0xa
0914 7809       |x   |		Jump	0x91e								; case 0x0
0915 7854       |xT  |		Jump	0x96a								; case 0x1
0916 7872       |xr  |		Jump	0x989								; case 0x2
0917 7875       |xu  |		Jump	0x98d								; case 0x3
0918 78c6       |x   |		Jump	0x9df								; case 0x4
0919 78c5       |x   |		Jump	0x9df								; case 0x5
091a 7878       |xx  |		Jump	0x993								; case 0x6
091b 7895       |x   |		Jump	0x9b1								; case 0x7
091c 78b7       |x   |		Jump	0x9d4								; case 0x8
091d 78bd       |x   |		Jump	0x9db								; case 0x9
091e 00da       |    |		Load_Top	At_Offset_2
091f 016c       | l  |		Execute	Variant_Record,Is_Constrained
0920 7009       |p   |		Jump_Nonzero	0x92a
0921 00cf       |    |		Action	Mark_Auxiliary
0922 480b       |H   |		Short_Literal	0xb
0923 e5ff       |    |		Load	0x2,-0x1
0924 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0925 00d8       |    |		Load_Top	At_Offset_0
0926 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0927 c5ff       |    |		Store	0x2,-0x1
0928 00ce       |    |		Action	Pop_Auxiliary
0929 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
092a 00da       |    |		Load_Top	At_Offset_2
092b 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
092c 00db       |    |		Load_Top	At_Offset_3
092d 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
092e 00da       |    |		Load_Top	At_Offset_2
092f 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0930 460b       |F   |		Jump_Case	0xc
0931 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
0932 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
0933 780a       |x   |		Jump	0x93e								; case 0x2
0934 7814       |x   |		Jump	0x949								; case 0x3
0935 7813       |x   |		Jump	0x949								; case 0x4
0936 7812       |x   |		Jump	0x949								; case 0x5
0937 7811       |x   |		Jump	0x949								; case 0x6
0938 781b       |x   |		Jump	0x954								; case 0x7
0939 7820       |x   |		Jump	0x95a								; case 0x8
093a 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x9
093b 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0xa
093c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0xb
093d 4302       |C   |		.XXX[0x1]
093e 00da       |    |		Load_Top	At_Offset_2
093f 2208       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x8
0940 00da       |    |		Load_Top	At_Offset_2
0941 2608       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x8
0942 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0943 00da       |    |		Load_Top	At_Offset_2
0944 2209       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x9
0945 00da       |    |		Load_Top	At_Offset_2
0946 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
0947 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0948 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0949 00da       |    |		Load_Top	At_Offset_2
094a 220b       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0xb
094b 00da       |    |		Load_Top	At_Offset_2
094c 260b       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb
094d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
094e 00da       |    |		Load_Top	At_Offset_2
094f 220c       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0xc
0950 00da       |    |		Load_Top	At_Offset_2
0951 260c       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc
0952 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0953 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0954 00da       |    |		Load_Top	At_Offset_2
0955 220d       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0xd
0956 00da       |    |		Load_Top	At_Offset_2
0957 260d       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xd
0958 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0959 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
095a 00da       |    |		Load_Top	At_Offset_2
095b 220f       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0xf
095c 00da       |    |		Load_Top	At_Offset_2
095d 260f       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xf
095e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
095f 00da       |    |		Load_Top	At_Offset_2
0960 2210       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x10
0961 00da       |    |		Load_Top	At_Offset_2
0962 2610       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x10
0963 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0964 00da       |    |		Load_Top	At_Offset_2
0965 2211       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x11
0966 00da       |    |		Load_Top	At_Offset_2
0967 2611       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x11
0968 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0969 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
096a 00da       |    |		Load_Top	At_Offset_2
096b 016b       | k  |		Execute	Variant_Record,Read_Variant
096c 00d8       |    |		Load_Top	At_Offset_0
096d 0f03       |    |		Execute_Immediate	Equal,0x3
096e 6804       |h   |		Jump_Zero	0x973
096f 00db       |    |		Load_Top	At_Offset_3
0970 2208       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x8
0971 00db       |    |		Load_Top	At_Offset_3
0972 2209       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x9
0973 00d8       |    |		Load_Top	At_Offset_0
0974 0f04       |    |		Execute_Immediate	Equal,0x4
0975 6804       |h   |		Jump_Zero	0x97a
0976 00db       |    |		Load_Top	At_Offset_3
0977 220b       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0xb
0978 00db       |    |		Load_Top	At_Offset_3
0979 220c       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0xc
097a 00d8       |    |		Load_Top	At_Offset_0
097b 0f05       |    |		Execute_Immediate	Equal,0x5
097c 6802       |h   |		Jump_Zero	0x97f
097d 00db       |    |		Load_Top	At_Offset_3
097e 220d       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0xd
097f 00d8       |    |		Load_Top	At_Offset_0
0980 0f06       |    |		Execute_Immediate	Equal,0x6
0981 6806       |h   |		Jump_Zero	0x988
0982 00db       |    |		Load_Top	At_Offset_3
0983 220f       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0xf
0984 00db       |    |		Load_Top	At_Offset_3
0985 2210       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x10
0986 00db       |    |		Load_Top	At_Offset_3
0987 2211       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x11
0988 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0989 4801       |H   |		Short_Literal	0x1
098a 4812       |H   |		Short_Literal	0x12
098b 0311       |    |		Declare_Type	Variant_Record,Constrained_Incomplete
098c 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
098d e5fd       |    |		Load	0x2,-0x3
098e 00db       |    |		Load_Top	At_Offset_3
098f 1c07       |    |		Execute_Immediate	Run_Utility,0x7
0990 e5fe       |    |		Load	0x2,-0x2
0991 0306       |    |		Complete_Type	Variant_Record,By_Renaming
0992 4304       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x4
0993 00db       |    |		Load_Top	At_Offset_3
0994 460b       |F   |		Jump_Case	0xc
0995 780d       |x   |		Jump	0x9a3								; case 0x0
0996 780e       |x   |		Jump	0x9a5								; case 0x1
0997 780f       |x   |		Jump	0x9a7								; case 0x2
0998 7810       |x   |		Jump	0x9a9								; case 0x3
0999 780f       |x   |		Jump	0x9a9								; case 0x4
099a 780e       |x   |		Jump	0x9a9								; case 0x5
099b 780d       |x   |		Jump	0x9a9								; case 0x6
099c 780e       |x   |		Jump	0x9ab								; case 0x7
099d 780f       |x   |		Jump	0x9ad								; case 0x8
099e 7810       |x   |		Jump	0x9af								; case 0x9
099f 7801       |x   |		Jump	0x9a1								; case 0xa
09a0 7800       |x   |		Jump	0x9a1								; case 0xb
09a1 48ff       |H   |		Short_Literal	0xff
09a2 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
09a3 4801       |H   |		Short_Literal	0x1
09a4 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
09a5 4802       |H   |		Short_Literal	0x2
09a6 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
09a7 4803       |H   |		Short_Literal	0x3
09a8 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
09a9 4804       |H   |		Short_Literal	0x4
09aa 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
09ab 4805       |H   |		Short_Literal	0x5
09ac 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
09ad 4806       |H   |		Short_Literal	0x6
09ae 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
09af 4807       |H   |		Short_Literal	0x7
09b0 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
09b1 00db       |    |		Load_Top	At_Offset_3
09b2 e5fe       |    |		Load	0x2,-0x2
09b3 460b       |F   |		Jump_Case	0xc
09b4 780d       |x   |		Jump	0x9c2								; case 0x0
09b5 780e       |x   |		Jump	0x9c4								; case 0x1
09b6 780f       |x   |		Jump	0x9c6								; case 0x2
09b7 7810       |x   |		Jump	0x9c8								; case 0x3
09b8 780f       |x   |		Jump	0x9c8								; case 0x4
09b9 780e       |x   |		Jump	0x9c8								; case 0x5
09ba 780d       |x   |		Jump	0x9c8								; case 0x6
09bb 780e       |x   |		Jump	0x9ca								; case 0x7
09bc 780f       |x   |		Jump	0x9cc								; case 0x8
09bd 7810       |x   |		Jump	0x9ce								; case 0x9
09be 7811       |x   |		Jump	0x9d0								; case 0xa
09bf 7800       |x   |		Jump	0x9c0								; case 0xb
09c0 48ff       |H   |		Short_Literal	0xff
09c1 780f       |x   |		Jump	0x9d1
09c2 4801       |H   |		Short_Literal	0x1
09c3 780d       |x   |		Jump	0x9d1
09c4 4802       |H   |		Short_Literal	0x2
09c5 780b       |x   |		Jump	0x9d1
09c6 4803       |H   |		Short_Literal	0x3
09c7 7809       |x   |		Jump	0x9d1
09c8 4804       |H   |		Short_Literal	0x4
09c9 7807       |x   |		Jump	0x9d1
09ca 4805       |H   |		Short_Literal	0x5
09cb 7805       |x   |		Jump	0x9d1
09cc 4806       |H   |		Short_Literal	0x6
09cd 7803       |x   |		Jump	0x9d1
09ce 4807       |H   |		Short_Literal	0x7
09cf 7801       |x   |		Jump	0x9d1
09d0 48ff       |H   |		Short_Literal	0xff
09d1 e5ff       |    |		Load	0x2,-0x1
09d2 031b       |    |		Declare_Type	Variant_Record,Constrained
09d3 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
09d4 00db       |    |		Load_Top	At_Offset_3
09d5 e5fe       |    |		Load	0x2,-0x2
09d6 e5ff       |    |		Load	0x2,-0x1
09d7 1c06       |    |		Execute_Immediate	Run_Utility,0x6
09d8 e5ff       |    |		Load	0x2,-0x1
09d9 02fc       |    |		Declare_Variable	Variant_Record,With_Constraint
09da 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
09db 480b       |H   |		Short_Literal	0xb
09dc 00db       |    |		Load_Top	At_Offset_3
09dd 1c07       |    |		Execute_Immediate	Run_Utility,0x7
09de 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
09df 0869       | i  |		Execute_Immediate	Raise,0x69
09e0 ; --------------------------------------------------------------------------------------
09e0 ; SUBPROGRAM
09e0 ; --------------------------------------------------------------------------------------
09e0 09e3       |    |		.CONST	0x09e3								; Address of begin
09e1 0004       |    |		.CONST	0x0004								; Address of exception handler
09e2 0001       |    |		.CONST	0x0001								; Number of locals
09e3			BODY_09e0:
09e3			INIT_09e0:
09e3 4601       |F   |		Jump_Case	0x2
09e4 7801       |x   |		Jump	0x9e6								; case 0x0
09e5 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
09e6 00da       |    |		Load_Top	At_Offset_2
09e7 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
09e8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
09e9 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
09ea ; --------------------------------------------------------------------------------------
09ea ; STRING TABLE
09ea ; --------------------------------------------------------------------------------------
09ea 0078       | x  |		.STRTAB	0x0078->0x0a26							; "SI_ALORS_SINON"
09eb 0084       |    |		.STRTAB	0x0084->0x0a2d							; "POUR_FAIRE"
09ec 008c       |    |		.STRTAB	0x008c->0x0a32							; "AFFECTATION"
09ed 0095       |    |		.STRTAB	0x0095->0x0a37							; "LIE_CONNEXION"
09ee 00a0       |    |		.STRTAB	0x00a0->0x0a3e							; "DELIE_CONNEXION"
09ef 00ad       |    |		.STRTAB	0x00ad->0x0a45							; "LIE_LIEN"
09f0 00b3       |    |		.STRTAB	0x00b3->0x0a49							; "DELIE_LIEN"
09f1 00bb       |    |		.STRTAB	0x00bb->0x0a4e							; "LISTE_LIEN"
09f2 00c3       |    |		.STRTAB	0x00c3->0x0a53							; "ECHANGER_LIEN"
09f3 00ce       |    |		.STRTAB	0x00ce->0x0a5a							; "AFFICHER"
09f4 00d4       |    |		.STRTAB	0x00d4->0x0a5e							; "FIN"
09f5 00d5       |    |		.STRTAB	0x00d5->0x0a5f							; "VIDE"
09f6 00d7       |    |		.STRTAB	0x00d7->0x0a61							; " "
09f7 00d6       |    |		.STRTAB	0x00d6->0x0a62							; "-- Vide"
09f8 00db       |    |		.STRTAB	0x00db->0x0a65							; "SI"
09f9 00db       |    |		.STRTAB	0x00db->0x0a66							; "ALORS"
09fa 00de       |    |		.STRTAB	0x00de->0x0a69							; "SINON"
09fb 00e1       |    |		.STRTAB	0x00e1->0x0a6b							; "FIN_SI"
09fc 00e5       |    |		.STRTAB	0x00e5->0x0a6e							; "POUR "
09fd 00e8       |    |		.STRTAB	0x00e8->0x0a71							; " ENTREE FAIRE "
09fe 00f4       |    |		.STRTAB	0x00f4->0x0a78							; "FIN_POUR"
09ff 00fa       |    |		.STRTAB	0x00fa->0x0a7c							; "."
0a00 00f9       |    |		.STRTAB	0x00f9->0x0a7c							; " = "
0a01 00fa       |    |		.STRTAB	0x00fa->0x0a7e							; "LIE_CONNEXION ( "
0a02 0108       |    |		.STRTAB	0x0108->0x0a86							; ", "
0a03 0108       |    |		.STRTAB	0x0108->0x0a87							; " )"
0a04 0108       |    |		.STRTAB	0x0108->0x0a88							; "DELIE_CONNEXION ( "
0a05 0118       |    |		.STRTAB	0x0118->0x0a91							; "LIE_LIEN ( "
0a06 0121       | !  |		.STRTAB	0x0121->0x0a96							; "DELIE_LIEN ( "
0a07 012c       | ,  |		.STRTAB	0x012c->0x0a9d							; "LISTE_LIEN ( "
0a08 0137       | 7  |		.STRTAB	0x0137->0x0aa3							; "ECHANGER_LIEN ( "
0a09 0145       | E  |		.STRTAB	0x0145->0x0aab							; " -- Afficher -- "
0a0a 0153       | S  |		.STRTAB	0x0153->0x0ab3							; ">> Execution SI <<"
0a0b 0163       | c  |		.STRTAB	0x0163->0x0abc							; ">> Condition:"
0a0c 016e       | n  |		.STRTAB	0x016e->0x0ac3							; ">> Execution ALORS <<"
0a0d 0181       |    |		.STRTAB	0x0181->0x0acd							; ">> Execution SINON <<"
0a0e 0194       |    |		.STRTAB	0x0194->0x0ad8							; ">> FIN SI <<"
0a0f 019e       |    |		.STRTAB	0x019e->0x0ade							; ">> Execution POUR ("
0a10 01af       |    |		.STRTAB	0x01af->0x0ae7							; ")"
0a11 01ae       |    |		.STRTAB	0x01ae->0x0ae8							; ">> FIN POUR <<"
0a12 01ba       |    |		.STRTAB	0x01ba->0x0aef							; ">> Execution AFFECTATION <<"
0a13 01d3       |    |		.STRTAB	0x01d3->0x0afc							; " := "
0a14 01d5       |    |		.STRTAB	0x01d5->0x0afe							; "Manque l'extension pour l'acces a la variable !!!"
0a15 0204       |    |		.STRTAB	0x0204->0x0b17							; "ENTIER"
0a16 0208       |    |		.STRTAB	0x0208->0x0b1a							; "ENUMERE"
0a17 020d       |    |		.STRTAB	0x020d->0x0b1d							; "BOOLEEN"
0a18 0212       |    |		.STRTAB	0x0212->0x0b21							; "Affectation non valide !!!"
0a19 022a       | *  |		.STRTAB	0x022a->0x0b2e							; ">> Execution LIE_CONNEXION <<"
0a1a 0245       | E  |		.STRTAB	0x0245->0x0b3c							; ">> Parametres: "
0a1b 0252       | R  |		.STRTAB	0x0252->0x0b44							; " , "
0a1c 0253       | S  |		.STRTAB	0x0253->0x0b45							; ">> Execution DELIE_CONNEXION <<"
0a1d 0270       | p  |		.STRTAB	0x0270->0x0b55							; ">> Execution LIE_LIEN <<"
0a1e 0286       |    |		.STRTAB	0x0286->0x0b61							; ">> Execution DELIE_LIEN <<"
0a1f 029e       |    |		.STRTAB	0x029e->0x0b6e							; ">> Execution LISTE_LIEN <<"
0a20 02b6       |    |		.STRTAB	0x02b6->0x0b7b							; ">> Execution ECHANGER_LIEN <<"
0a21 02d1       |    |		.STRTAB	0x02d1->0x0b89							; ">> Execution AFFICHER <<"
0a22 02e7       |    |		.STRTAB	0x02e7->0x0b95							; ">> Execution FIN <<"
0a23 02f8       |    |		.STRTAB	0x02f8->0x0b9f							; ">> Execution VIDE <<"
0a24 030a       |    |		.STRTAB	0x030a->0x0ba9							; "COMP"
0a25 030c       |    |		.STREND 0x030c->0x0bab
0a26 5349 5f41  |SI_A|		.STRTAB_STRINGS
0bab 0000 0000  |    |		.BLANK	0000[0x5]
0bb0 ; --------------------------------------------------------------------------------------
0bb0 ; Debug Table
0bb0 ; --------------------------------------------------------------------------------------
0bb0 0004 0008  |    |		.DEBUG4	0x0004,0x0008,0xd854,0x0000,0x0001,0x002d
0bb6 000b 0c6a  |   j|		.DBG4T	0x000b,0x0c6a,0x8000,0x8000
0bba 0080 0c96  |    |		.DBG4T	0x0080,0x0c96,0x8000,0x8000
0bbe 00fb 0d02  |    |		.DBG4T	0x00fb,0x0d02,0x0002,0x0000
0bc2 0103 0d05  |    |		.DBG4T	0x0103,0x0d05,0x0001,0x4000
0bc6 011b 0d12  |    |		.DBG4T	0x011b,0x0d12,0x0001,0x0000
0bca 0133 0d1a  | 3  |		.DBG4T	0x0133,0x0d1a,0x0001,0x4000
0bce 01e3 0d52  |   R|		.DBG4T	0x01e3,0x0d52,0x0002,0x0000
0bd2 0203 0d5d  |   ]|		.DBG4T	0x0203,0x0d5d,0x0002,0x0000
0bd6 0223 0d66  | # f|		.DBG4T	0x0223,0x0d66,0x0002,0x0000
0bda 0243 0d70  | C p|		.DBG4T	0x0243,0x0d70,0x0002,0x0000
0bde 0263 0d79  | c y|		.DBG4T	0x0263,0x0d79,0x0002,0x0000
0be2 0283 0d82  |    |		.DBG4T	0x0283,0x0d82,0x0002,0x0000
0be6 02a3 0d8b  |    |		.DBG4T	0x02a3,0x0d8b,0x0002,0x0000
0bea 02c3 0d94  |    |		.DBG4T	0x02c3,0x0d94,0x0002,0x0000
0bee 02e3 0d9e  |    |		.DBG4T	0x02e3,0x0d9e,0x0002,0x0000
0bf2 0303 0da7  |    |		.DBG4T	0x0303,0x0da7,0x0002,0x0000
0bf6 031b 0daf  |    |		.DBG4T	0x031b,0x0daf,0x0002,0x0000
0bfa 0333 0db6  | 3  |		.DBG4T	0x0333,0x0db6,0x0002,0x0000
0bfe 034b 0dbd  | K  |		.DBG4T	0x034b,0x0dbd,0x0001,0x0000
0c02 0353 0000  | S  |		.DBG4T	0x0353,0x0000,0x0005,0x0000
0c06 037b 0dc0  | {  |		.DBG4T	0x037b,0x0dc0,0x0002,0x4000
0c0a 039b 0dd2  |    |		.DBG4T	0x039b,0x0dd2,0x0001,0x0000
0c0e 03b3 0dd7  |    |		.DBG4T	0x03b3,0x0dd7,0x0002,0x0000
0c12 03bb 0dda  |    |		.DBG4T	0x03bb,0x0dda,0x0001,0x0000
0c16 03cb 0dde  |    |		.DBG4T	0x03cb,0x0dde,0x0002,0x0000
0c1a 03d3 0de1  |    |		.DBG4T	0x03d3,0x0de1,0x0002,0x0000
0c1e 03db 0de4  |    |		.DBG4T	0x03db,0x0de4,0x0002,0x0000
0c22 03eb 0de9  |    |		.DBG4T	0x03eb,0x0de9,0x0001,0x0000
0c26 03fb 0ded  |    |		.DBG4T	0x03fb,0x0ded,0x0001,0x4000
0c2a 054b 0e4b  | K K|		.DBG4T	0x054b,0x0e4b,0x0001,0x0000
0c2e 059b 0e5c  |   \|		.DBG4T	0x059b,0x0e5c,0x0001,0x0000
0c32 05cb 0e64  |   d|		.DBG4T	0x05cb,0x0e64,0x0001,0x0000
0c36 0673 0e7a  | s z|		.DBG4T	0x0673,0x0e7a,0x0001,0x0000
0c3a 06bb 0e86  |    |		.DBG4T	0x06bb,0x0e86,0x0001,0x0000
0c3e 0703 0e92  |    |		.DBG4T	0x0703,0x0e92,0x0001,0x0000
0c42 074b 0e9e  | K  |		.DBG4T	0x074b,0x0e9e,0x0001,0x0000
0c46 0793 0eaa  |    |		.DBG4T	0x0793,0x0eaa,0x0001,0x0000
0c4a 07d3 0eb5  |    |		.DBG4T	0x07d3,0x0eb5,0x0001,0x0000
0c4e 0833 0ec2  | 3  |		.DBG4T	0x0833,0x0ec2,0x0001,0x0000
0c52 0843 0ec7  | C  |		.DBG4T	0x0843,0x0ec7,0x0001,0x0000
0c56 0853 0ecc  | S  |		.DBG4T	0x0853,0x0ecc,0x0001,0x0000
0c5a 0863 0ed0  | c  |		.DBG4T	0x0863,0x0ed0,0x0001,0x0000
0c5e 08a3 0ed8  |    |		.DBG4T	0x08a3,0x0ed8,0x0001,0x4000
0c62 0913 0000  |    |		.DBG4T	0x0913,0x0000,0x0005,0x0000
0c66 09e3 0000  |    |		.DBG4T	0x09e3,0x0000,0x0005,0x0000
0c6a ; --------------------------------------------------------------------------------------
0c6a ; Debug chain
0c6a ; --------------------------------------------------------------------------------------
0c6a 0015 0000  |    |		.DBGLEN	0x0015,0x0000
0c6c 000b 000d  |    |		.DBGLNO	0x000b,0x000d,0x000f,0x0011,0x0013,0x0015,0x0017,0x0019,0x001b,0x001d,0x001f,0x0021,0x0023,0x0025,0x0027,0x0029,0x002b,0x002d,0x002f,0x0034,0x0075
0c81 0001 0002  |    |		.XXX[0x15]
0c83 0003 0004  |    |
0c85 0005 0006  |    |
0c87 0007 0008  |    |
0c89 0009 000a  |    |
0c8b 000b 000c  |    |
0c8d 000d 000e  |    |
0c8f 000f 0010  |    |
0c91 0011 0012  |    |
0c93 0013 0014  |    |
0c95 0017       |    |
0c96 ; --------------------------------------------------------------------------------------
0c96 ; Debug chain
0c96 ; --------------------------------------------------------------------------------------
0c96 0035 0000  | 5  |		.DBGLEN	0x0035,0x0000
0c98 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
0ccd 0001 0003  |    |		.XXX[0x35]
0ccf 0004 0005  |    |
0cd1 0006 0007  |    |
0cd3 0008 0009  |    |
0cd5 000a 000b  |    |
0cd7 000c 000d  |    |
0cd9 000e 000f  |    |
0cdb 0010 0011  |    |
0cdd 0012 0013  |    |
0cdf 0014 0015  |    |
0ce1 0016 0017  |    |
0ce3 0018 0019  |    |
0ce5 001a 001b  |    |
0ce7 001c 001d  |    |
0ce9 001e 001f  |    |
0ceb 0020 0021  |   !|
0ced 0022 0023  | " #|
0cef 0024 0025  | $ %|
0cf1 0026 0027  | & '|
0cf3 0028 0029  | ( )|
0cf5 002a 002b  | * +|
0cf7 002c 002d  | , -|
0cf9 002e 002f  | . /|
0cfb 0030 0031  | 0 1|
0cfd 0032 0033  | 2 3|
0cff 0034 0035  | 4 5|
0d01 0036       | 6  |
0d02 ; --------------------------------------------------------------------------------------
0d02 ; Debug chain
0d02 ; --------------------------------------------------------------------------------------
0d02 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0d04 00fb       |    |		.DBGLNO	0x00fb
0d05 ; --------------------------------------------------------------------------------------
0d05 ; Debug chain
0d05 ; --------------------------------------------------------------------------------------
0d05 0001 0005  |    |		.DBGLEN	0x0001,0x0005
0d07 0103 0105  |    |		.DBGLNO	0x0103,0x0105,0x0109,0x010d,0x0110,0x0113
0d0d 0001 0003  |    |		.XXX[0x5]
0d0f 0004 0005  |    |
0d11 0002       |    |
0d12 ; --------------------------------------------------------------------------------------
0d12 ; Debug chain
0d12 ; --------------------------------------------------------------------------------------
0d12 0001 0005  |    |		.DBGLEN	0x0001,0x0005
0d14 011b 011d  |    |		.DBGLNO	0x011b,0x011d,0x011f,0x0121,0x0122,0x0125
0d1a ; --------------------------------------------------------------------------------------
0d1a ; Debug chain
0d1a ; --------------------------------------------------------------------------------------
0d1a 0002 001a  |    |		.DBGLEN	0x0002,0x001a
0d1c 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
0d38 0001 0003  |    |		.XXX[0x1a]
0d3a 0004 0019  |    |
0d3c 0005 0006  |    |
0d3e 0007 0008  |    |
0d40 0009 000a  |    |
0d42 000b 000c  |    |
0d44 000d 000e  |    |
0d46 000f 0010  |    |
0d48 0011 0012  |    |
0d4a 0013 0014  |    |
0d4c 0015 0016  |    |
0d4e 0017 0018  |    |
0d50 001a 0002  |    |
0d52 ; --------------------------------------------------------------------------------------
0d52 ; Debug chain
0d52 ; --------------------------------------------------------------------------------------
0d52 0002 0007  |    |		.DBGLEN	0x0002,0x0007
0d54 01e3 01e5  |    |		.DBGLNO	0x01e3,0x01e5,0x01ea,0x01ec,0x01ef,0x01f2,0x01f5,0x01f8,0x01fc
0d5d ; --------------------------------------------------------------------------------------
0d5d ; Debug chain
0d5d ; --------------------------------------------------------------------------------------
0d5d 0002 0005  |    |		.DBGLEN	0x0002,0x0005
0d5f 0203 0205  |    |		.DBGLNO	0x0203,0x0205,0x020a,0x020d,0x0210,0x0213,0x0217
0d66 ; --------------------------------------------------------------------------------------
0d66 ; Debug chain
0d66 ; --------------------------------------------------------------------------------------
0d66 0002 0006  |    |		.DBGLEN	0x0002,0x0006
0d68 0223 0225  | # %|		.DBGLNO	0x0223,0x0225,0x022a,0x022d,0x0230,0x0233,0x0236,0x023a
0d70 ; --------------------------------------------------------------------------------------
0d70 ; Debug chain
0d70 ; --------------------------------------------------------------------------------------
0d70 0002 0005  |    |		.DBGLEN	0x0002,0x0005
0d72 0243 0245  | C E|		.DBGLNO	0x0243,0x0245,0x024a,0x024d,0x0250,0x0253,0x0257
0d79 ; --------------------------------------------------------------------------------------
0d79 ; Debug chain
0d79 ; --------------------------------------------------------------------------------------
0d79 0002 0005  |    |		.DBGLEN	0x0002,0x0005
0d7b 0263 0265  | c e|		.DBGLNO	0x0263,0x0265,0x026a,0x026d,0x0270,0x0273,0x0277
0d82 ; --------------------------------------------------------------------------------------
0d82 ; Debug chain
0d82 ; --------------------------------------------------------------------------------------
0d82 0002 0005  |    |		.DBGLEN	0x0002,0x0005
0d84 0283 0285  |    |		.DBGLNO	0x0283,0x0285,0x028a,0x028d,0x0290,0x0293,0x0297
0d8b ; --------------------------------------------------------------------------------------
0d8b ; Debug chain
0d8b ; --------------------------------------------------------------------------------------
0d8b 0002 0005  |    |		.DBGLEN	0x0002,0x0005
0d8d 02a3 02a5  |    |		.DBGLNO	0x02a3,0x02a5,0x02aa,0x02ad,0x02b0,0x02b3,0x02b7
0d94 ; --------------------------------------------------------------------------------------
0d94 ; Debug chain
0d94 ; --------------------------------------------------------------------------------------
0d94 0002 0006  |    |		.DBGLEN	0x0002,0x0006
0d96 02c3 02c5  |    |		.DBGLNO	0x02c3,0x02c5,0x02ca,0x02cd,0x02d0,0x02d3,0x02d6,0x02da
0d9e ; --------------------------------------------------------------------------------------
0d9e ; Debug chain
0d9e ; --------------------------------------------------------------------------------------
0d9e 0002 0005  |    |		.DBGLEN	0x0002,0x0005
0da0 02e3 02e5  |    |		.DBGLNO	0x02e3,0x02e5,0x02ea,0x02ed,0x02f0,0x02f3,0x02f7
0da7 ; --------------------------------------------------------------------------------------
0da7 ; Debug chain
0da7 ; --------------------------------------------------------------------------------------
0da7 0002 0004  |    |		.DBGLEN	0x0002,0x0004
0da9 0303 0305  |    |		.DBGLNO	0x0303,0x0305,0x030a,0x030d,0x0310,0x0314
0daf ; --------------------------------------------------------------------------------------
0daf ; Debug chain
0daf ; --------------------------------------------------------------------------------------
0daf 0002 0003  |    |		.DBGLEN	0x0002,0x0003
0db1 031b 031d  |    |		.DBGLNO	0x031b,0x031d,0x0322,0x0325,0x0329
0db6 ; --------------------------------------------------------------------------------------
0db6 ; Debug chain
0db6 ; --------------------------------------------------------------------------------------
0db6 0002 0003  |    |		.DBGLEN	0x0002,0x0003
0db8 0333 0335  | 3 5|		.DBGLNO	0x0333,0x0335,0x033a,0x033d,0x0341
0dbd ; --------------------------------------------------------------------------------------
0dbd ; Debug chain
0dbd ; --------------------------------------------------------------------------------------
0dbd 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0dbf 034b       | K  |		.DBGLNO	0x034b
0dc0 ; --------------------------------------------------------------------------------------
0dc0 ; Debug chain
0dc0 ; --------------------------------------------------------------------------------------
0dc0 0002 0007  |    |		.DBGLEN	0x0002,0x0007
0dc2 037b 037d  | { }|		.DBGLNO	0x037b,0x037d,0x037f,0x0381,0x0383,0x0387,0x0389,0x038e,0x0391
0dcb 0001 0002  |    |		.XXX[0x7]
0dcd 0003 0005  |    |
0dcf 0006 0004  |    |
0dd1 0007       |    |
0dd2 ; --------------------------------------------------------------------------------------
0dd2 ; Debug chain
0dd2 ; --------------------------------------------------------------------------------------
0dd2 0001 0002  |    |		.DBGLEN	0x0001,0x0002
0dd4 039b 039d  |    |		.DBGLNO	0x039b,0x039d,0x03a8
0dd7 ; --------------------------------------------------------------------------------------
0dd7 ; Debug chain
0dd7 ; --------------------------------------------------------------------------------------
0dd7 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0dd9 03b3       |    |		.DBGLNO	0x03b3
0dda ; --------------------------------------------------------------------------------------
0dda ; Debug chain
0dda ; --------------------------------------------------------------------------------------
0dda 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0ddc 03bb 03bd  |    |		.DBGLNO	0x03bb,0x03bd
0dde ; --------------------------------------------------------------------------------------
0dde ; Debug chain
0dde ; --------------------------------------------------------------------------------------
0dde 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0de0 03cb       |    |		.DBGLNO	0x03cb
0de1 ; --------------------------------------------------------------------------------------
0de1 ; Debug chain
0de1 ; --------------------------------------------------------------------------------------
0de1 0000 0001  |    |		.DBGLEN	0x0000,0x0001
0de3 03d3       |    |		.DBGLNO	0x03d3
0de4 ; --------------------------------------------------------------------------------------
0de4 ; Debug chain
0de4 ; --------------------------------------------------------------------------------------
0de4 0001 0002  |    |		.DBGLEN	0x0001,0x0002
0de6 03db 03dd  |    |		.DBGLNO	0x03db,0x03dd,0x03df
0de9 ; --------------------------------------------------------------------------------------
0de9 ; Debug chain
0de9 ; --------------------------------------------------------------------------------------
0de9 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0deb 03ec 03f0  |    |		.DBGLNO	0x03ec,0x03f0
0ded ; --------------------------------------------------------------------------------------
0ded ; Debug chain
0ded ; --------------------------------------------------------------------------------------
0ded 0002 002d  |   -|		.DBGLEN	0x0002,0x002d
0def 03fb 03fd  |    |		.DBGLNO	0x03fb,0x03fd,0x0401,0x0406,0x040a,0x0419,0x041b,0x0420,0x0422,0x0426,0x0430,0x0432,0x0436,0x0440,0x0442,0x0446,0x0450,0x0452,0x0457,0x0459,0x0465,0x046f,0x0471,0x0476,0x0478,0x047e,0x0484,0x048d,0x0491,0x049c,0x049e,0x04b3,0x04b5,0x04ca,0x04cc,0x04e1,0x04e3,0x04f8,0x04fa,0x0510,0x0512,0x052f,0x0531,0x0536,0x0538,0x053c,0x0540
0e1e 0001 0003  |    |		.XXX[0x2d]
0e20 0004 002b  |   +|
0e22 002c 0005  | ,  |
0e24 0006 0007  |    |
0e26 0008 0009  |    |
0e28 000a 000b  |    |
0e2a 000c 000d  |    |
0e2c 000e 000f  |    |
0e2e 0010 0011  |    |
0e30 0012 0013  |    |
0e32 0014 0015  |    |
0e34 0016 0017  |    |
0e36 0018 0019  |    |
0e38 001a 001b  |    |
0e3a 001c 001d  |    |
0e3c 001e 001f  |    |
0e3e 0020 0021  |   !|
0e40 0022 0023  | " #|
0e42 0024 0025  | $ %|
0e44 0026 0027  | & '|
0e46 0028 0029  | ( )|
0e48 002a 002d  | * -|
0e4a 0002       |    |
0e4b ; --------------------------------------------------------------------------------------
0e4b ; Debug chain
0e4b ; --------------------------------------------------------------------------------------
0e4b 0001 000e  |    |		.DBGLEN	0x0001,0x000e
0e4d 054b 054c  | K L|		.DBGLNO	0x054b,0x054c,0x054e,0x0552,0x0556,0x0559,0x0562,0x0564,0x0566,0x056a,0x0579,0x057b,0x057f,0x058d,0x058f
0e5c ; --------------------------------------------------------------------------------------
0e5c ; Debug chain
0e5c ; --------------------------------------------------------------------------------------
0e5c 0000 0006  |    |		.DBGLEN	0x0000,0x0006
0e5e 059b 05a0  |    |		.DBGLNO	0x059b,0x05a0,0x05a2,0x05ae,0x05bc,0x05be
0e64 ; --------------------------------------------------------------------------------------
0e64 ; Debug chain
0e64 ; --------------------------------------------------------------------------------------
0e64 0002 0012  |    |		.DBGLEN	0x0002,0x0012
0e66 05cb 05cc  |    |		.DBGLNO	0x05cb,0x05cc,0x05cd,0x05cf,0x05d3,0x05d9,0x05df,0x05e8,0x05ec,0x05ef,0x05f4,0x05fb,0x060b,0x060f,0x062d,0x0636,0x0644,0x0653,0x065c,0x066a
0e7a ; --------------------------------------------------------------------------------------
0e7a ; Debug chain
0e7a ; --------------------------------------------------------------------------------------
0e7a 0001 0009  |    |		.DBGLEN	0x0001,0x0009
0e7c 0673 067f  | s  |		.DBGLNO	0x0673,0x067f,0x0681,0x0685,0x0691,0x0697,0x069b,0x069f,0x06a4,0x06a9
0e86 ; --------------------------------------------------------------------------------------
0e86 ; Debug chain
0e86 ; --------------------------------------------------------------------------------------
0e86 0001 0009  |    |		.DBGLEN	0x0001,0x0009
0e88 06bb 06c7  |    |		.DBGLNO	0x06bb,0x06c7,0x06c9,0x06cd,0x06d9,0x06df,0x06e3,0x06e7,0x06ec,0x06f1
0e92 ; --------------------------------------------------------------------------------------
0e92 ; Debug chain
0e92 ; --------------------------------------------------------------------------------------
0e92 0001 0009  |    |		.DBGLEN	0x0001,0x0009
0e94 0703 070f  |    |		.DBGLNO	0x0703,0x070f,0x0711,0x0715,0x0721,0x0727,0x072b,0x072f,0x0734,0x0739
0e9e ; --------------------------------------------------------------------------------------
0e9e ; Debug chain
0e9e ; --------------------------------------------------------------------------------------
0e9e 0001 0009  |    |		.DBGLEN	0x0001,0x0009
0ea0 074b 0757  | K W|		.DBGLNO	0x074b,0x0757,0x0759,0x075d,0x0769,0x076f,0x0773,0x0777,0x077c,0x0781
0eaa ; --------------------------------------------------------------------------------------
0eaa ; Debug chain
0eaa ; --------------------------------------------------------------------------------------
0eaa 0001 0008  |    |		.DBGLEN	0x0001,0x0008
0eac 0793 0799  |    |		.DBGLNO	0x0793,0x0799,0x079b,0x079f,0x07b1,0x07b5,0x07ba,0x07be,0x07c5
0eb5 ; --------------------------------------------------------------------------------------
0eb5 ; Debug chain
0eb5 ; --------------------------------------------------------------------------------------
0eb5 0001 000a  |    |		.DBGLEN	0x0001,0x000a
0eb7 07d3 07e5  |    |		.DBGLNO	0x07d3,0x07e5,0x07e7,0x07eb,0x0804,0x0808,0x080c,0x0810,0x0815,0x081a,0x081f
0ec2 ; --------------------------------------------------------------------------------------
0ec2 ; Debug chain
0ec2 ; --------------------------------------------------------------------------------------
0ec2 0000 0003  |    |		.DBGLEN	0x0000,0x0003
0ec4 0833 0835  | 3 5|		.DBGLNO	0x0833,0x0835,0x0839
0ec7 ; --------------------------------------------------------------------------------------
0ec7 ; Debug chain
0ec7 ; --------------------------------------------------------------------------------------
0ec7 0000 0003  |    |		.DBGLEN	0x0000,0x0003
0ec9 0843 0845  | C E|		.DBGLNO	0x0843,0x0845,0x0849
0ecc ; --------------------------------------------------------------------------------------
0ecc ; Debug chain
0ecc ; --------------------------------------------------------------------------------------
0ecc 0000 0002  |    |		.DBGLEN	0x0000,0x0002
0ece 0853 0855  | S U|		.DBGLNO	0x0853,0x0855
0ed0 ; --------------------------------------------------------------------------------------
0ed0 ; Debug chain
0ed0 ; --------------------------------------------------------------------------------------
0ed0 0000 0006  |    |		.DBGLEN	0x0000,0x0006
0ed2 0863 0870  | c p|		.DBGLNO	0x0863,0x0870,0x0877,0x087d,0x088a,0x0890
0ed8 ; --------------------------------------------------------------------------------------
0ed8 ; Debug chain
0ed8 ; --------------------------------------------------------------------------------------
0ed8 0000 000c  |    |		.DBGLEN	0x0000,0x000c
0eda 08a3 08b4  |    |		.DBGLNO	0x08a3,0x08b4,0x08bb,0x08c4,0x08cd,0x08d6,0x08dd,0x08e6,0x08ed,0x08f8,0x08ff,0x0908
0ee6 0001 000c  |    |		.XXX[0xc]
0ee8 0002 0003  |    |
0eea 0004 0005  |    |
0eec 0006 0007  |    |
0eee 0008 0009  |    |
0ef0 000a 000b  |    |
0ef2 0000 0000  |    |		.BLANK	0000[0x10e]