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