|
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: 6144 (0x1800) Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_3618a3
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦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 0868 | h | .CONST 0x0868 ; Offset of debug table 0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction 0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion 0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments) 0007 0005 | | .CONST 0x0005 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 00e6 | | .CONST 0x00e6 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0040 | @ | .CONST 0x0040 ; Number of locals 000b INIT_0008: 000b 4800 |H | Short_Literal 0x0 000c 4801 |H | Short_Literal 0x1 000d 029f 00eb | | Declare_Subprogram INIT_00e8,For_Call 000f 03fe | | Declare_Type Discrete,Defined,Visible 0010 00d8 | | Load_Top At_Offset_0 0011 4802 |H | Short_Literal 0x2 0012 4800 |H | Short_Literal 0x0 0013 4801 |H | Short_Literal 0x1 0014 4806 |H | Short_Literal 0x6 0015 0319 | | Declare_Type Variant_Record,Incomplete,Visible 0016 029f 0703 | | Declare_Subprogram INIT_0700,For_Call 0018 00d9 | | Load_Top At_Offset_1 0019 012a | * | Execute Any,Change_Utility 001a 0007 | | Action Break_Optional 001b 00d8 | | Load_Top At_Offset_0 001c 02a0 | | Declare_Subprogram Null_Subprogram 001d 4818 |H | Short_Literal 0x18 001e 03d4 | | Declare_Type Access,Defined,Visible,Accesses_Protected 001f 029a 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call,Visible,Unelaborated 0021 029a 0163 | c| Declare_Subprogram INIT_0160,For_Outer_Call,Visible,Unelaborated 0023 029a 0183 | | Declare_Subprogram INIT_0180,For_Outer_Call,Visible,Unelaborated 0025 029a 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call,Visible,Unelaborated 0027 029a 01e3 | | Declare_Subprogram INIT_01e0,For_Outer_Call,Visible,Unelaborated 0029 029a 01f3 | | Declare_Subprogram INIT_01f0,For_Outer_Call,Visible,Unelaborated 002b 029a 020b | | Declare_Subprogram INIT_0208,For_Outer_Call,Visible,Unelaborated 002d 029a 0223 | #| Declare_Subprogram INIT_0220,For_Outer_Call,Visible,Unelaborated 002f 029a 024b | K| Declare_Subprogram INIT_0248,For_Outer_Call,Visible,Unelaborated 0031 029a 0263 | c| Declare_Subprogram INIT_0260,For_Outer_Call,Visible,Unelaborated 0033 029a 02e3 | | Declare_Subprogram INIT_02e0,For_Outer_Call,Visible,Unelaborated 0035 029a 033b | ;| Declare_Subprogram INIT_0338,For_Outer_Call,Visible,Unelaborated 0037 029a 042b | +| Declare_Subprogram INIT_0428,For_Outer_Call,Visible,Unelaborated 0039 029a 0453 | S| Declare_Subprogram INIT_0450,For_Outer_Call,Visible,Unelaborated 003b 029a 045b | [| Declare_Subprogram INIT_0458,For_Outer_Call,Visible,Unelaborated 003d 029a 0463 | c| Declare_Subprogram INIT_0460,For_Outer_Call,Visible,Unelaborated 003f e20f | | Load 0x1,0xf 0040 4803 |H | Short_Literal 0x3 0041 e20f | | Load 0x1,0xf 0042 00d8 | | Load_Top At_Offset_0 0043 e002 | | Load 0x0,0x2 0044 4801 |H | Short_Literal 0x1 0045 e003 | | Load 0x0,0x3 0046 029f 0703 | | Declare_Subprogram INIT_0700,For_Call 0048 4804 |H | Short_Literal 0x4 0049 4801 |H | Short_Literal 0x1 004a e20e | | Load 0x1,0xe 004b 0307 | | Complete_Type Variant_Record,By_Defining 004c e20f | | Load 0x1,0xf 004d 03c4 | | Complete_Type Access,By_Component_Completion 004e 00bf | | Action Accept_Activation 004f e20f | | Load 0x1,0xf 0050 0007 | | Action Break_Optional 0051 0093 0000 | | push_full_address 0x0 0053 60c4 |` | Indirect_Literal Discrete,0x118,{0x80000000, 0x00030000} 0054 0273 | s | Execute Discrete,Plus 0055 e004 | | Load 0x0,0x4 0056 0273 | s | Execute Discrete,Plus 0057 e005 | | Load 0x0,0x5 0058 0273 | s | Execute Discrete,Plus 0059 e20f | | Load 0x1,0xf 005a 00da | | Load_Top At_Offset_2 005b e006 | | Load 0x0,0x6 005c 0387 | | Declare_Variable Package 005d 00d8 | | Load_Top At_Offset_0 005e 020f | | Execute Module,Activate 005f 0093 0000 | | push_full_address 0x0 0061 60b2 |` | Indirect_Literal Discrete,0x114,{0x80000000, 0x00020000} 0062 0273 | s | Execute Discrete,Plus 0063 e004 | | Load 0x0,0x4 0064 0273 | s | Execute Discrete,Plus 0065 e007 | | Load 0x0,0x7 0066 0273 | s | Execute Discrete,Plus 0067 e20f | | Load 0x1,0xf 0068 00db | | Load_Top At_Offset_3 0069 e006 | | Load 0x0,0x6 006a 0387 | | Declare_Variable Package 006b 00d8 | | Load_Top At_Offset_0 006c 020f | | Execute Module,Activate 006d 0093 0000 | | push_full_address 0x0 006f 60a0 |` | Indirect_Literal Discrete,0x110,{0x80000000, 0x00010000} 0070 0273 | s | Execute Discrete,Plus 0071 e004 | | Load 0x0,0x4 0072 0273 | s | Execute Discrete,Plus 0073 e008 | | Load 0x0,0x8 0074 0273 | s | Execute Discrete,Plus 0075 e20f | | Load 0x1,0xf 0076 e220 | | Load 0x1,0x20 0077 e006 | | Load 0x0,0x6 0078 0387 | | Declare_Variable Package 0079 00d8 | | Load_Top At_Offset_0 007a 020f | | Execute Module,Activate 007b e009 | | Load 0x0,0x9 007c 00da | | Load_Top At_Offset_2 007d 0098 | | Execute Package,Field_Read_Dynamic 007e 1b10 | | Execute Package,Field_Read,Field_Number 0x10 007f e009 | | Load 0x0,0x9 0080 e221 | ! | Load 0x1,0x21 0081 0098 | | Execute Package,Field_Read_Dynamic 0082 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0083 e009 | | Load 0x0,0x9 0084 00db | | Load_Top At_Offset_3 0085 0098 | | Execute Package,Field_Read_Dynamic 0086 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0087 e20f | | Load 0x1,0xf 0088 0007 | | Action Break_Optional 0089 00d8 | | Load_Top At_Offset_0 008a 0007 | | Action Break_Optional 008b 00e1 | | Load_Encached Boolean_Cache 008c e002 | | Load 0x0,0x2 008d 0007 | | Action Break_Optional 008e e00a | | Load 0x0,0xa 008f 0007 | | Action Break_Optional 0090 e00b | | Load 0x0,0xb 0091 0337 | 7 | Declare_Variable Array 0092 e00b | | Load 0x0,0xb 0093 0337 | 7 | Declare_Variable Array 0094 e00c | | Load 0x0,0xc 0095 0007 | | Action Break_Optional 0096 00e1 | | Load_Encached Boolean_Cache 0097 00e1 | | Load_Encached Boolean_Cache 0098 e00d | | Load 0x0,0xd 0099 02ff | | Declare_Variable Variant_Record 009a 00d8 | | Load_Top At_Offset_0 009b 1c00 | | Execute_Immediate Run_Utility,0x0 009c 00e2 | | Load_Encached Integer_Cache 009d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 009e 00e2 | | Load_Encached Integer_Cache 009f 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 00a0 e00e | | Load 0x0,0xe 00a1 0337 | 7 | Declare_Variable Array 00a2 00d8 | | Load_Top At_Offset_0 00a3 0335 | 5 | Declare_Variable Array,Duplicate 00a4 00cd | | Action Spare6_Action 00a5 4804 |H | Short_Literal 0x4 00a6 4800 |H | Short_Literal 0x0 00a7 4800 |H | Short_Literal 0x0 00a8 00d9 | | Load_Top At_Offset_1 00a9 e235 | 5 | Load 0x1,0x35 00aa 01d6 | | Execute Vector,Field_Write 00ab 3ffb |? | Loop_Increasing 0xa7 00ac 00d9 | | Load_Top At_Offset_1 00ad 01d4 | | Execute Vector,Structure_Write 00ae 00e2 | | Load_Encached Integer_Cache 00af 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 00b0 00e4 | | Load_Encached Positive_Cache 00b1 00e4 | | Load_Encached Positive_Cache 00b2 029d 04d3 | | Declare_Subprogram INIT_04d0,For_Outer_Call 00b4 029d 04f3 | | Declare_Subprogram INIT_04f0,For_Outer_Call 00b6 029d 051b | | Declare_Subprogram INIT_0518,For_Outer_Call 00b8 1d10 | | Execute_Immediate Reference_Lex_1,0x10 00b9 00c7 | | Action Elaborate_Subprogram 00ba 1d11 | | Execute_Immediate Reference_Lex_1,0x11 00bb 00c7 | | Action Elaborate_Subprogram 00bc 029d 0533 | 3| Declare_Subprogram INIT_0530,For_Outer_Call 00be 1d12 | | Execute_Immediate Reference_Lex_1,0x12 00bf 00c7 | | Action Elaborate_Subprogram 00c0 1d13 | | Execute_Immediate Reference_Lex_1,0x13 00c1 00c7 | | Action Elaborate_Subprogram 00c2 029b 053b | ;| Declare_Subprogram INIT_0538,For_Outer_Call,Unelaborated 00c4 1d15 | | Execute_Immediate Reference_Lex_1,0x15 00c5 00c7 | | Action Elaborate_Subprogram 00c6 1d14 | | Execute_Immediate Reference_Lex_1,0x14 00c7 00c7 | | Action Elaborate_Subprogram 00c8 1d16 | | Execute_Immediate Reference_Lex_1,0x16 00c9 00c7 | | Action Elaborate_Subprogram 00ca 1d17 | | Execute_Immediate Reference_Lex_1,0x17 00cb 00c7 | | Action Elaborate_Subprogram 00cc 1d18 | | Execute_Immediate Reference_Lex_1,0x18 00cd 00c7 | | Action Elaborate_Subprogram 00ce 1d19 | | Execute_Immediate Reference_Lex_1,0x19 00cf 00c7 | | Action Elaborate_Subprogram 00d0 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 00d1 00c7 | | Action Elaborate_Subprogram 00d2 029d 058b | | Declare_Subprogram INIT_0588,For_Outer_Call 00d4 029d 05cb | | Declare_Subprogram INIT_05c8,For_Outer_Call 00d6 029d 060b | | Declare_Subprogram INIT_0608,For_Outer_Call 00d8 029d 06c3 | | Declare_Subprogram INIT_06c0,For_Outer_Call 00da 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 00db 00c7 | | Action Elaborate_Subprogram 00dc 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 00dd 00c7 | | Action Elaborate_Subprogram 00de 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 00df 00c7 | | Action Elaborate_Subprogram 00e0 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 00e1 00c7 | | Action Elaborate_Subprogram 00e2 1d3c | < | Execute_Immediate Reference_Lex_1,0x3c 00e3 00c7 | | Action Elaborate_Subprogram 00e4 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 00e5 00c7 | | Action Elaborate_Subprogram 00e6 BODY_0008: 00e6 00bc | | Action Signal_Activated 00e7 00bb | | Action Signal_Completion 00e8 ; -------------------------------------------------------------------------------------- 00e8 ; SUBPROGRAM 00e8 ; -------------------------------------------------------------------------------------- 00e8 00eb | | .CONST 0x00eb ; Address of begin 00e9 0004 | | .CONST 0x0004 ; Address of exception handler 00ea 0001 | | .CONST 0x0001 ; Number of locals 00eb BODY_00e8: 00eb INIT_00e8: 00eb 4607 |F | Jump_Case 0x8 00ec 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 00ed 7807 |x | Jump 0xf5 ; case 0x1 00ee 780a |x | Jump 0xf9 ; case 0x2 00ef 780e |x | Jump 0xfe ; case 0x3 00f0 7811 |x | Jump 0x102 ; case 0x4 00f1 7812 |x | Jump 0x104 ; case 0x5 00f2 7813 |x | Jump 0x106 ; case 0x6 00f3 7816 |x | Jump 0x10a ; case 0x7 00f4 4302 |C | .XXX[0x1] 00f5 00da | | Load_Top At_Offset_2 00f6 0091 0757 | W| Action Push_String_Extended_Indexed,0x757 ; "TYPE_REGLE" 00f8 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 00f9 00db | | Load_Top At_Offset_3 00fa 00db | | Load_Top At_Offset_3 00fb 00e0 | | Load_Encached Standard_Cache 00fc 181b | | Execute Package,Field_Execute,Field_Number 0x1b 00fd 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 00fe 00da | | Load_Top At_Offset_2 00ff 00e0 | | Load_Encached Standard_Cache 0100 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0101 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0102 00db | | Load_Top At_Offset_3 0103 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0104 00db | | Load_Top At_Offset_3 0105 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0106 e20d | | Load 0x1,0xd 0107 00dc | | Load_Top At_Offset_4 0108 0267 | g | Execute Discrete,Predecessor 0109 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 010a e20d | | Load 0x1,0xd 010b 00dc | | Load_Top At_Offset_4 010c 0268 | h | Execute Discrete,Successor 010d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 010e 0000 0000 | | .XXX[0x2] 0110 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 0114 8000 0000 | | .LITERAL {0x80000000, 0x00020000} 0118 8000 0000 | | .LITERAL {0x80000000, 0x00030000} 011c 0000 0000 | | .BLANK 0000[0x4] 0120 ; -------------------------------------------------------------------------------------- 0120 ; SUBPROGRAM 0120 ; -------------------------------------------------------------------------------------- 0120 0123 | # | .CONST 0x0123 ; Address of begin 0121 0004 | | .CONST 0x0004 ; Address of exception handler 0122 0001 | | .CONST 0x0001 ; Number of locals 0123 BODY_0120: 0123 INIT_0120: 0123 e232 | 2 | Load 0x1,0x32 0124 0a01 | | Execute_Immediate Plus,0x1 0125 c232 | 2 | Store 0x1,0x32 0126 0092 0759 | Y| Action Push_String_Extended,0x759 ; "level is now: " 0128 e232 | 2 | Load 0x1,0x32 0129 00e0 | | Load_Encached Standard_Cache 012a 1818 | | Execute Package,Field_Execute,Field_Number 0x18 012b 01cc | | Execute Vector,Catenate 012c e00f | | Load 0x0,0xf 012d 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 012e 0092 075a | Z| Action Push_String_Extended,0x75a ; "----------------------------------------" 0130 e00f | | Load 0x0,0xf 0131 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0132 4800 |H | Short_Literal 0x0 0133 a233 | 3 | Store_Unchecked 0x1,0x33 0134 4801 |H | Short_Literal 0x1 0135 a236 | 6 | Store_Unchecked 0x1,0x36 0136 4800 |H | Short_Literal 0x0 0137 a22f | / | Store_Unchecked 0x1,0x2f 0138 e229 | ) | Load 0x1,0x29 0139 7001 |p | Jump_Nonzero 0x13b 013a 823a | : | Call 0x1,0x3a 013b e224 | $ | Load 0x1,0x24 013c e227 | ' | Load 0x1,0x27 013d e010 | | Load 0x0,0x10 013e e222 | " | Load 0x1,0x22 013f 0096 | | Execute Package,Entry 0140 c224 | $ | Store 0x1,0x24 0141 4800 |H | Short_Literal 0x0 0142 4801 |H | Short_Literal 0x1 0143 e20f | | Load 0x1,0xf 0144 03ba | | Declare_Variable Access,By_Allocation,With_Constraint 0145 00d8 | | Load_Top At_Offset_0 0146 0227 | ' | Execute Access,All_Reference 0147 1c00 | | Execute_Immediate Run_Utility,0x0 0148 a228 | ( | Store_Unchecked 0x1,0x28 0149 e229 | ) | Load 0x1,0x29 014a 6808 |h | Jump_Zero 0x153 014b e226 | & | Load 0x1,0x26 014c e228 | ( | Load 0x1,0x28 014d e010 | | Load 0x0,0x10 014e e223 | # | Load 0x1,0x23 014f 0096 | | Execute Package,Entry 0150 c226 | & | Store 0x1,0x26 0151 4800 |H | Short_Literal 0x0 0152 a229 | ) | Store_Unchecked 0x1,0x29 0153 e225 | % | Load 0x1,0x25 0154 e228 | ( | Load 0x1,0x28 0155 e010 | | Load 0x0,0x10 0156 e221 | ! | Load 0x1,0x21 0157 0096 | | Execute Package,Entry 0158 c225 | % | Store 0x1,0x25 0159 e20f | | Load 0x1,0xf 015a a227 | ' | Store_Unchecked 0x1,0x27 015b 4801 |H | Short_Literal 0x1 015c a229 | ) | Store_Unchecked 0x1,0x29 015d 4501 |E | Exit_Suprogram New_Top_Offset 0x1 015e 0000 0000 | | .XXX[0x2] 0160 ; -------------------------------------------------------------------------------------- 0160 ; SUBPROGRAM 0160 ; -------------------------------------------------------------------------------------- 0160 0163 | c | .CONST 0x0163 ; Address of begin 0161 0004 | | .CONST 0x0004 ; Address of exception handler 0162 0001 | | .CONST 0x0001 ; Number of locals 0163 BODY_0160: 0163 INIT_0160: 0163 e229 | ) | Load 0x1,0x29 0164 7001 |p | Jump_Nonzero 0x166 0165 823a | : | Call 0x1,0x3a 0166 4801 |H | Short_Literal 0x1 0167 4802 |H | Short_Literal 0x2 0168 e20f | | Load 0x1,0xf 0169 03ba | | Declare_Variable Access,By_Allocation,With_Constraint 016a 00d8 | | Load_Top At_Offset_0 016b 0227 | ' | Execute Access,All_Reference 016c 1c00 | | Execute_Immediate Run_Utility,0x0 016d a228 | ( | Store_Unchecked 0x1,0x28 016e e229 | ) | Load 0x1,0x29 016f 6808 |h | Jump_Zero 0x178 0170 e226 | & | Load 0x1,0x26 0171 e228 | ( | Load 0x1,0x28 0172 e010 | | Load 0x0,0x10 0173 e223 | # | Load 0x1,0x23 0174 0096 | | Execute Package,Entry 0175 c226 | & | Store 0x1,0x26 0176 4800 |H | Short_Literal 0x0 0177 a229 | ) | Store_Unchecked 0x1,0x29 0178 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0179 0000 0000 | | .BLANK 0000[0x7] 0180 ; -------------------------------------------------------------------------------------- 0180 ; SUBPROGRAM 0180 ; -------------------------------------------------------------------------------------- 0180 0185 | | .CONST 0x0185 ; Address of begin 0181 0004 | | .CONST 0x0004 ; Address of exception handler 0182 0002 | | .CONST 0x0002 ; Number of locals 0183 INIT_0180: 0183 e20f | | Load 0x1,0xf 0184 0007 | | Action Break_Optional 0185 BODY_0180: 0185 823a | : | Call 0x1,0x3a 0186 e221 | ! | Load 0x1,0x21 0187 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0188 e225 | % | Load 0x1,0x25 0189 e011 | | Load 0x0,0x11 018a e221 | ! | Load 0x1,0x21 018b 0096 | | Execute Package,Entry 018c c225 | % | Store 0x1,0x25 018d c228 | ( | Store 0x1,0x28 018e e223 | # | Load 0x1,0x23 018f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0190 e226 | & | Load 0x1,0x26 0191 e011 | | Load 0x0,0x11 0192 e223 | # | Load 0x1,0x23 0193 0096 | | Execute Package,Entry 0194 c226 | & | Store 0x1,0x26 0195 0039 | 9 | Store_Top Access,At_Offset_1 0196 00d8 | | Load_Top At_Offset_0 0197 e228 | ( | Load 0x1,0x28 0198 0227 | ' | Execute Access,All_Reference 0199 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3 019a e20f | | Load 0x1,0xf 019b a227 | ' | Store_Unchecked 0x1,0x27 019c 4801 |H | Short_Literal 0x1 019d a229 | ) | Store_Unchecked 0x1,0x29 019e e225 | % | Load 0x1,0x25 019f e228 | ( | Load 0x1,0x28 01a0 e010 | | Load 0x0,0x10 01a1 e221 | ! | Load 0x1,0x21 01a2 0096 | | Execute Package,Entry 01a3 c225 | % | Store 0x1,0x25 01a4 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01a5 0000 0000 | | .XXX[0x3] 01a7 0000 | | 01a8 ; -------------------------------------------------------------------------------------- 01a8 ; SUBPROGRAM 01a8 ; -------------------------------------------------------------------------------------- 01a8 01ad | | .CONST 0x01ad ; Address of begin 01a9 0004 | | .CONST 0x0004 ; Address of exception handler 01aa 0002 | | .CONST 0x0002 ; Number of locals 01ab INIT_01a8: 01ab e20f | | Load 0x1,0xf 01ac 0007 | | Action Break_Optional 01ad BODY_01a8: 01ad 823a | : | Call 0x1,0x3a 01ae e223 | # | Load 0x1,0x23 01af 1b0e | | Execute Package,Field_Read,Field_Number 0xe 01b0 e226 | & | Load 0x1,0x26 01b1 e011 | | Load 0x0,0x11 01b2 e223 | # | Load 0x1,0x23 01b3 0096 | | Execute Package,Entry 01b4 c226 | & | Store 0x1,0x26 01b5 0039 | 9 | Store_Top Access,At_Offset_1 01b6 e221 | ! | Load 0x1,0x21 01b7 1b0e | | Execute Package,Field_Read,Field_Number 0xe 01b8 e225 | % | Load 0x1,0x25 01b9 e011 | | Load 0x0,0x11 01ba e221 | ! | Load 0x1,0x21 01bb 0096 | | Execute Package,Entry 01bc c225 | % | Store 0x1,0x25 01bd c228 | ( | Store 0x1,0x28 01be e228 | ( | Load 0x1,0x28 01bf 0227 | ' | Execute Access,All_Reference 01c0 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 01c1 6805 |h | Jump_Zero 0x1c7 01c2 00d8 | | Load_Top At_Offset_0 01c3 e228 | ( | Load 0x1,0x28 01c4 0227 | ' | Execute Access,All_Reference 01c5 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4 01c6 7804 |x | Jump 0x1cb 01c7 00d8 | | Load_Top At_Offset_0 01c8 e228 | ( | Load 0x1,0x28 01c9 0227 | ' | Execute Access,All_Reference 01ca 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3 01cb e222 | " | Load 0x1,0x22 01cc 1b0e | | Execute Package,Field_Read,Field_Number 0xe 01cd e224 | $ | Load 0x1,0x24 01ce e011 | | Load 0x0,0x11 01cf e222 | " | Load 0x1,0x22 01d0 0096 | | Execute Package,Entry 01d1 c224 | $ | Store 0x1,0x24 01d2 c227 | ' | Store 0x1,0x27 01d3 e232 | 2 | Load 0x1,0x32 01d4 8238 | 8 | Call 0x1,0x38 01d5 e232 | 2 | Load 0x1,0x32 01d6 0aff | | Execute_Immediate Plus,-0x1 01d7 c232 | 2 | Store 0x1,0x32 01d8 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01d9 0000 0000 | | .BLANK 0000[0x7] 01e0 ; -------------------------------------------------------------------------------------- 01e0 ; SUBPROGRAM 01e0 ; -------------------------------------------------------------------------------------- 01e0 01e3 | | .CONST 0x01e3 ; Address of begin 01e1 0004 | | .CONST 0x0004 ; Address of exception handler 01e2 0001 | | .CONST 0x0001 ; Number of locals 01e3 BODY_01e0: 01e3 INIT_01e0: 01e3 e220 | | Load 0x1,0x20 01e4 a228 | ( | Store_Unchecked 0x1,0x28 01e5 e220 | | Load 0x1,0x20 01e6 a227 | ' | Store_Unchecked 0x1,0x27 01e7 4801 |H | Short_Literal 0x1 01e8 a229 | ) | Store_Unchecked 0x1,0x29 01e9 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01ea 0000 0000 | | .BLANK 0000[0x6] 01f0 ; -------------------------------------------------------------------------------------- 01f0 ; SUBPROGRAM 01f0 ; -------------------------------------------------------------------------------------- 01f0 01f5 | | .CONST 0x01f5 ; Address of begin 01f1 0004 | | .CONST 0x0004 ; Address of exception handler 01f2 0002 | | .CONST 0x0002 ; Number of locals 01f3 INIT_01f0: 01f3 e20f | | Load 0x1,0xf 01f4 0007 | | Action Break_Optional 01f5 BODY_01f0: 01f5 823a | : | Call 0x1,0x3a 01f6 e223 | # | Load 0x1,0x23 01f7 1b0e | | Execute Package,Field_Read,Field_Number 0xe 01f8 e226 | & | Load 0x1,0x26 01f9 e011 | | Load 0x0,0x11 01fa e223 | # | Load 0x1,0x23 01fb 0096 | | Execute Package,Entry 01fc c226 | & | Store 0x1,0x26 01fd 0039 | 9 | Store_Top Access,At_Offset_1 01fe 00d8 | | Load_Top At_Offset_0 01ff a5ff | | Store_Unchecked 0x2,-0x1 0200 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0201 0000 0000 | | .BLANK 0000[0x7] 0208 ; -------------------------------------------------------------------------------------- 0208 ; SUBPROGRAM 0208 ; -------------------------------------------------------------------------------------- 0208 020e | | .CONST 0x020e ; Address of begin 0209 0004 | | .CONST 0x0004 ; Address of exception handler 020a 0002 | | .CONST 0x0002 ; Number of locals 020b INIT_0208: 020b 4800 |H | Short_Literal 0x0 020c e003 | | Load 0x0,0x3 020d 1c08 | | Execute_Immediate Run_Utility,0x8 020e BODY_0208: 020e 00db | | Load_Top At_Offset_3 020f 8012 | | Call 0x0,0x12 0210 0e01 | | Execute_Immediate Not_Equal,0x1 0211 6802 |h | Jump_Zero 0x214 0212 4801 |H | Short_Literal 0x1 0213 8013 | | Call 0x0,0x13 0214 00d8 | | Load_Top At_Offset_0 0215 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0216 e5ff | | Load 0x2,-0x1 0217 8014 | | Call 0x0,0x14 0218 00d9 | | Load_Top At_Offset_1 0219 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 021a 00d8 | | Load_Top At_Offset_0 021b e228 | ( | Load 0x1,0x28 021c 0227 | ' | Execute Access,All_Reference 021d 2a06 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6 021e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 021f 0000 | | .XXX[0x1] 0220 ; -------------------------------------------------------------------------------------- 0220 ; SUBPROGRAM 0220 ; -------------------------------------------------------------------------------------- 0220 0223 | # | .CONST 0x0223 ; Address of begin 0221 0004 | | .CONST 0x0004 ; Address of exception handler 0222 0001 | | .CONST 0x0001 ; Number of locals 0223 BODY_0220: 0223 INIT_0220: 0223 00da | | Load_Top At_Offset_2 0224 e228 | ( | Load 0x1,0x28 0225 0227 | ' | Execute Access,All_Reference 0226 2606 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6 0227 2a05 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5 0228 0092 075b | [| Action Push_String_Extended,0x75b ; "------------------------------------------" 022a e00f | | Load 0x0,0xf 022b 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 022c 0092 075c | \| Action Push_String_Extended,0x75c ; " go to modifie " 022e e228 | ( | Load 0x1,0x28 022f 0227 | ' | Execute Access,All_Reference 0230 2606 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6 0231 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0232 e015 | | Load 0x0,0x15 0233 011c | | Execute Any,Convert_Unchecked 0234 1c01 | | Execute_Immediate Run_Utility,0x1 0235 01cc | | Execute Vector,Catenate 0236 0092 075d | ]| Action Push_String_Extended,0x75d ; " " 0238 01cc | | Execute Vector,Catenate 0239 e00f | | Load 0x0,0xf 023a 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 023b e228 | ( | Load 0x1,0x28 023c 0227 | ' | Execute Access,All_Reference 023d 2606 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6 023e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 023f 8016 | | Call 0x0,0x16 0240 0092 075b | [| Action Push_String_Extended,0x75b ; "------------------------------------------" 0242 e00f | | Load 0x0,0xf 0243 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0244 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0245 0000 0000 | | .XXX[0x3] 0247 0000 | | 0248 ; -------------------------------------------------------------------------------------- 0248 ; SUBPROGRAM 0248 ; -------------------------------------------------------------------------------------- 0248 024e | N | .CONST 0x024e ; Address of begin 0249 0004 | | .CONST 0x0004 ; Address of exception handler 024a 0002 | | .CONST 0x0002 ; Number of locals 024b INIT_0248: 024b 4801 |H | Short_Literal 0x1 024c e003 | | Load 0x0,0x3 024d 1c08 | | Execute_Immediate Run_Utility,0x8 024e BODY_0248: 024e 4801 |H | Short_Literal 0x1 024f a236 | 6 | Store_Unchecked 0x1,0x36 0250 00d8 | | Load_Top At_Offset_0 0251 e228 | ( | Load 0x1,0x28 0252 0227 | ' | Execute Access,All_Reference 0253 2a06 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6 0254 e228 | ( | Load 0x1,0x28 0255 0229 | ) | Execute Access,All_Read 0256 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 0257 00d8 | | Load_Top At_Offset_0 0258 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0259 e5ff | | Load 0x2,-0x1 025a 8014 | | Call 0x0,0x14 025b 00d9 | | Load_Top At_Offset_1 025c 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 025d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 025e 0000 0000 | | .XXX[0x2] 0260 ; -------------------------------------------------------------------------------------- 0260 ; SUBPROGRAM 0260 ; -------------------------------------------------------------------------------------- 0260 0265 | e | .CONST 0x0265 ; Address of begin 0261 0004 | | .CONST 0x0004 ; Address of exception handler 0262 0002 | | .CONST 0x0002 ; Number of locals 0263 INIT_0260: 0263 e017 | | Load 0x0,0x17 0264 0007 | | Action Break_Optional 0265 BODY_0260: 0265 e5fe | | Load 0x2,-0x2 0266 6803 |h | Jump_Zero 0x26a 0267 480f |H | Short_Literal 0xf 0268 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0269 781b |x | Jump 0x285 026a 00db | | Load_Top At_Offset_3 026b 8012 | | Call 0x0,0x12 026c 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 026d 00d8 | | Load_Top At_Offset_0 026e 0f10 | | Execute_Immediate Equal,0x10 026f 6815 |h | Jump_Zero 0x285 0270 e236 | 6 | Load 0x1,0x36 0271 0c02 | | Execute_Immediate Greater_Equal,0x2 0272 6810 |h | Jump_Zero 0x283 0273 e236 | 6 | Load 0x1,0x36 0274 0aff | | Execute_Immediate Plus,-0x1 0275 e228 | ( | Load 0x1,0x28 0276 0227 | ' | Execute Access,All_Reference 0277 2606 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6 0278 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0279 01d5 | | Execute Vector,Field_Reference 027a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 027b 0f07 | | Execute_Immediate Equal,0x7 027c 6803 |h | Jump_Zero 0x280 027d 480f |H | Short_Literal 0xf 027e 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 027f 7805 |x | Jump 0x285 0280 480c |H | Short_Literal 0xc 0281 8013 | | Call 0x0,0x13 0282 7802 |x | Jump 0x285 0283 480c |H | Short_Literal 0xc 0284 8013 | | Call 0x0,0x13 0285 e236 | 6 | Load 0x1,0x36 0286 0c02 | | Execute_Immediate Greater_Equal,0x2 0287 6819 |h | Jump_Zero 0x2a1 0288 00d8 | | Load_Top At_Offset_0 0289 e236 | 6 | Load 0x1,0x36 028a 0aff | | Execute_Immediate Plus,-0x1 028b e228 | ( | Load 0x1,0x28 028c 0227 | ' | Execute Access,All_Reference 028d 2606 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6 028e 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 028f 01d5 | | Execute Vector,Field_Reference 0290 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0291 8018 | | Call 0x0,0x18 0292 700e |p | Jump_Nonzero 0x2a1 0293 e5fe | | Load 0x2,-0x2 0294 0092 075e | ^| Action Push_String_Extended,0x75e ; "modifierdescription" 0296 e019 | | Load 0x0,0x19 0297 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0298 e228 | ( | Load 0x1,0x28 0299 0227 | ' | Execute Access,All_Reference 029a 2606 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6 029b 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 029c 801a | | Call 0x0,0x1a 029d 0279 | y | Execute Discrete,And 029e 7002 |p | Jump_Nonzero 0x2a1 029f 4807 |H | Short_Literal 0x7 02a0 8013 | | Call 0x0,0x13 02a1 00db | | Load_Top At_Offset_3 02a2 801b | | Call 0x0,0x1b 02a3 6809 |h | Jump_Zero 0x2ad 02a4 00db | | Load_Top At_Offset_3 02a5 801c | | Call 0x0,0x1c 02a6 e234 | 4 | Load 0x1,0x34 02a7 01d7 | | Execute Vector,Field_Read 02a8 e232 | 2 | Load 0x1,0x32 02a9 027d | } | Execute Discrete,Greater 02aa 6802 |h | Jump_Zero 0x2ad 02ab 4806 |H | Short_Literal 0x6 02ac 8013 | | Call 0x0,0x13 02ad 00d8 | | Load_Top At_Offset_0 02ae 0f0d | | Execute_Immediate Equal,0xd 02af 6809 |h | Jump_Zero 0x2b9 02b0 e235 | 5 | Load 0x1,0x35 02b1 0f00 | | Execute_Immediate Equal,0x0 02b2 e235 | 5 | Load 0x1,0x35 02b3 e232 | 2 | Load 0x1,0x32 02b4 027d | } | Execute Discrete,Greater 02b5 0278 | x | Execute Discrete,Or 02b6 6802 |h | Jump_Zero 0x2b9 02b7 480b |H | Short_Literal 0xb 02b8 8013 | | Call 0x0,0x13 02b9 e228 | ( | Load 0x1,0x28 02ba 0229 | ) | Execute Access,All_Read 02bb 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 02bc 00d8 | | Load_Top At_Offset_0 02bd 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 02be 00d8 | | Load_Top At_Offset_0 02bf e236 | 6 | Load 0x1,0x36 02c0 00d9 | | Load_Top At_Offset_1 02c1 01d5 | | Execute Vector,Field_Reference 02c2 00cd | | Action Spare6_Action 02c3 00db | | Load_Top At_Offset_3 02c4 00d9 | | Load_Top At_Offset_1 02c5 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 02c6 00d1 | | Pop_Control Pop_Count_1 02c7 00d0 | | Action Swap_Control 02c8 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3 02c9 e228 | ( | Load 0x1,0x28 02ca 0229 | ) | Execute Access,All_Read 02cb 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 02cc 00d8 | | Load_Top At_Offset_0 02cd 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 02ce 00d8 | | Load_Top At_Offset_0 02cf e236 | 6 | Load 0x1,0x36 02d0 00d9 | | Load_Top At_Offset_1 02d1 01d5 | | Execute Vector,Field_Reference 02d2 00cd | | Action Spare6_Action 02d3 00d8 | | Load_Top At_Offset_0 02d4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02d5 e5ff | | Load 0x2,-0x1 02d6 8014 | | Call 0x0,0x14 02d7 00d9 | | Load_Top At_Offset_1 02d8 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 02d9 00d1 | | Pop_Control Pop_Count_1 02da 00d0 | | Action Swap_Control 02db 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3 02dc e236 | 6 | Load 0x1,0x36 02dd 0a01 | | Execute_Immediate Plus,0x1 02de c236 | 6 | Store 0x1,0x36 02df 4503 |E | Exit_Suprogram New_Top_Offset 0x3 02e0 ; -------------------------------------------------------------------------------------- 02e0 ; SUBPROGRAM 02e0 ; -------------------------------------------------------------------------------------- 02e0 02e5 | | .CONST 0x02e5 ; Address of begin 02e1 0004 | | .CONST 0x0004 ; Address of exception handler 02e2 0002 | | .CONST 0x0002 ; Number of locals 02e3 INIT_02e0: 02e3 00e2 | | Load_Encached Integer_Cache 02e4 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 02e5 BODY_02e0: 02e5 e236 | 6 | Load 0x1,0x36 02e6 0aff | | Execute_Immediate Plus,-0x1 02e7 e228 | ( | Load 0x1,0x28 02e8 0227 | ' | Execute Access,All_Reference 02e9 2606 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6 02ea 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4 02eb 0092 075d | ]| Action Push_String_Extended,0x75d ; " " 02ed e00f | | Load 0x0,0xf 02ee 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 02ef 0092 075a | Z| Action Push_String_Extended,0x75a ; "----------------------------------------" 02f1 e00f | | Load 0x0,0xf 02f2 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 02f3 0092 075f | _| Action Push_String_Extended,0x75f ; "LEVEL " 02f5 e232 | 2 | Load 0x1,0x32 02f6 00e0 | | Load_Encached Standard_Cache 02f7 1818 | | Execute Package,Field_Execute,Field_Number 0x18 02f8 01cc | | Execute Vector,Catenate 02f9 0092 075d | ]| Action Push_String_Extended,0x75d ; " " 02fb 01cc | | Execute Vector,Catenate 02fc e00f | | Load 0x0,0xf 02fd 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 02fe e228 | ( | Load 0x1,0x28 02ff 0227 | ' | Execute Access,All_Reference 0300 2606 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6 0301 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0302 801d | | Call 0x0,0x1d 0303 00cf | | Action Mark_Auxiliary 0304 00d9 | | Load_Top At_Offset_1 0305 e228 | ( | Load 0x1,0x28 0306 0227 | ' | Execute Access,All_Reference 0307 2606 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6 0308 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0309 01d5 | | Execute Vector,Field_Reference 030a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 030b 801d | | Call 0x0,0x1d 030c 00d9 | | Load_Top At_Offset_1 030d e228 | ( | Load 0x1,0x28 030e 0227 | ' | Execute Access,All_Reference 030f 2606 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6 0310 2603 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x3 0311 01d5 | | Execute Vector,Field_Reference 0312 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0313 e017 | | Load 0x0,0x17 0314 011c | | Execute Any,Convert_Unchecked 0315 1c01 | | Execute_Immediate Run_Utility,0x1 0316 0092 075d | ]| Action Push_String_Extended,0x75d ; " " 0318 01cc | | Execute Vector,Catenate 0319 e00f | | Load 0x0,0xf 031a 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 031b 00d9 | | Load_Top At_Offset_1 031c 0a01 | | Execute_Immediate Plus,0x1 031d 005a | Z | Store_Top Discrete,At_Offset_2 031e 00d9 | | Load_Top At_Offset_1 031f e228 | ( | Load 0x1,0x28 0320 0227 | ' | Execute Access,All_Reference 0321 2606 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6 0322 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 0323 027d | } | Execute Discrete,Greater 0324 7002 |p | Jump_Nonzero 0x327 0325 00c9 | | Action Pop_Auxiliary_Loop 0326 7fdd | | Jump 0x304 0327 00ce | | Action Pop_Auxiliary 0328 0092 075d | ]| Action Push_String_Extended,0x75d ; " " 032a e00f | | Load 0x0,0xf 032b 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 032c 0092 075a | Z| Action Push_String_Extended,0x75a ; "----------------------------------------" 032e e00f | | Load 0x0,0xf 032f 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0330 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0331 0000 0000 | | .BLANK 0000[0x7] 0338 ; -------------------------------------------------------------------------------------- 0338 ; SUBPROGRAM 0338 ; -------------------------------------------------------------------------------------- 0338 033e | > | .CONST 0x033e ; Address of begin 0339 0004 | | .CONST 0x0004 ; Address of exception handler 033a 0003 | | .CONST 0x0003 ; Number of locals 033b INIT_0338: 033b e01e | | Load 0x0,0x1e 033c 0007 | | Action Break_Optional 033d 00e1 | | Load_Encached Boolean_Cache 033e BODY_0338: 033e e5fe | | Load 0x2,-0x2 033f 6803 |h | Jump_Zero 0x343 0340 4818 |H | Short_Literal 0x18 0341 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0342 781b |x | Jump 0x35e 0343 e5ff | | Load 0x2,-0x1 0344 801f | | Call 0x0,0x1f 0345 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0346 00d9 | | Load_Top At_Offset_1 0347 0f19 | | Execute_Immediate Equal,0x19 0348 6815 |h | Jump_Zero 0x35e 0349 e5ff | | Load 0x2,-0x1 034a 8020 | | Call 0x0,0x20 034b 7012 |p | Jump_Nonzero 0x35e 034c e236 | 6 | Load 0x1,0x36 034d 0c02 | | Execute_Immediate Greater_Equal,0x2 034e 680d |h | Jump_Zero 0x35c 034f e236 | 6 | Load 0x1,0x36 0350 0aff | | Execute_Immediate Plus,-0x1 0351 e22c | , | Load 0x1,0x2c 0352 01d5 | | Execute Vector,Field_Reference 0353 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0354 0f09 | | Execute_Immediate Equal,0x9 0355 6803 |h | Jump_Zero 0x359 0356 4814 |H | Short_Literal 0x14 0357 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0358 7805 |x | Jump 0x35e 0359 480c |H | Short_Literal 0xc 035a 8013 | | Call 0x0,0x13 035b 7802 |x | Jump 0x35e 035c 480c |H | Short_Literal 0xc 035d 8013 | | Call 0x0,0x13 035e 00d9 | | Load_Top At_Offset_1 035f 0f13 | | Execute_Immediate Equal,0x13 0360 00da | | Load_Top At_Offset_2 0361 0f12 | | Execute_Immediate Equal,0x12 0362 0278 | x | Execute Discrete,Or 0363 00da | | Load_Top At_Offset_2 0364 0f0e | | Execute_Immediate Equal,0xe 0365 0278 | x | Execute Discrete,Or 0366 6817 |h | Jump_Zero 0x37e 0367 e232 | 2 | Load 0x1,0x32 0368 a235 | 5 | Store_Unchecked 0x1,0x35 0369 0092 075a | Z| Action Push_String_Extended,0x75a ; "----------------------------------------" 036b e00f | | Load 0x0,0xf 036c 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 036d 0092 0760 | `| Action Push_String_Extended,0x760 ; " Can_Use_Sortie_At_Level" 036f e00f | | Load 0x0,0xf 0370 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0371 e235 | 5 | Load 0x1,0x35 0372 00e0 | | Load_Encached Standard_Cache 0373 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0374 e00f | | Load 0x0,0xf 0375 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0376 0092 075d | ]| Action Push_String_Extended,0x75d ; " " 0378 e00f | | Load 0x0,0xf 0379 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 037a 0092 075a | Z| Action Push_String_Extended,0x75a ; "----------------------------------------" 037c e00f | | Load 0x0,0xf 037d 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 037e e5ff | | Load 0x2,-0x1 037f 801b | | Call 0x0,0x1b 0380 6854 |hT | Jump_Zero 0x3d5 0381 e5ff | | Load 0x2,-0x1 0382 801c | | Call 0x0,0x1c 0383 e234 | 4 | Load 0x1,0x34 0384 01d7 | | Execute Vector,Field_Read 0385 7042 |pB | Jump_Nonzero 0x3c8 0386 4800 |H | Short_Literal 0x0 0387 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0388 00cf | | Action Mark_Auxiliary 0389 e234 | 4 | Load 0x1,0x34 038a 01d9 | | Execute Vector,Reverse_Bounds 038b 0007 | | Action Break_Optional 038c 00d8 | | Load_Top At_Offset_0 038d e234 | 4 | Load 0x1,0x34 038e 01d7 | | Execute Vector,Field_Read 038f 0c01 | | Execute_Immediate Greater_Equal,0x1 0390 6802 |h | Jump_Zero 0x393 0391 4801 |H | Short_Literal 0x1 0392 a403 | | Store_Unchecked 0x2,0x3 0393 00c8 | | Action Pop_Auxiliary_Range 0394 3ff7 |? | Loop_Increasing 0x38c 0395 00ce | | Action Pop_Auxiliary 0396 00d8 | | Load_Top At_Offset_0 0397 6803 |h | Jump_Zero 0x39b 0398 4804 |H | Short_Literal 0x4 0399 8013 | | Call 0x0,0x13 039a 783a |x: | Jump 0x3d5 039b e233 | 3 | Load 0x1,0x33 039c 7028 |p( | Jump_Nonzero 0x3c5 039d 4801 |H | Short_Literal 0x1 039e e22c | , | Load 0x1,0x2c 039f 01d5 | | Execute Vector,Field_Reference 03a0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03a1 0f05 | | Execute_Immediate Equal,0x5 03a2 681f |h | Jump_Zero 0x3c2 03a3 e232 | 2 | Load 0x1,0x32 03a4 e5ff | | Load 0x2,-0x1 03a5 801c | | Call 0x0,0x1c 03a6 e234 | 4 | Load 0x1,0x34 03a7 01d6 | | Execute Vector,Field_Write 03a8 0092 0761 | a| Action Push_String_Extended,0x761 ; "GENERIQUE:" 03aa e5ff | | Load 0x2,-0x1 03ab 801c | | Call 0x0,0x1c 03ac e021 | ! | Load 0x0,0x21 03ad 011c | | Execute Any,Convert_Unchecked 03ae 1c01 | | Execute_Immediate Run_Utility,0x1 03af 01cc | | Execute Vector,Catenate 03b0 0092 0762 | b| Action Push_String_Extended,0x762 ; " is declare at level " 03b2 01cc | | Execute Vector,Catenate 03b3 e232 | 2 | Load 0x1,0x32 03b4 00e0 | | Load_Encached Standard_Cache 03b5 1818 | | Execute Package,Field_Execute,Field_Number 0x18 03b6 01cc | | Execute Vector,Catenate 03b7 e00f | | Load 0x0,0xf 03b8 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 03b9 0092 075d | ]| Action Push_String_Extended,0x75d ; " " 03bb e00f | | Load 0x0,0xf 03bc 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 03bd 0092 075a | Z| Action Push_String_Extended,0x75a ; "----------------------------------------" 03bf e00f | | Load 0x0,0xf 03c0 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 03c1 7813 |x | Jump 0x3d5 03c2 4805 |H | Short_Literal 0x5 03c3 8013 | | Call 0x0,0x13 03c4 7810 |x | Jump 0x3d5 03c5 4805 |H | Short_Literal 0x5 03c6 8013 | | Call 0x0,0x13 03c7 780d |x | Jump 0x3d5 03c8 e5ff | | Load 0x2,-0x1 03c9 801c | | Call 0x0,0x1c 03ca e234 | 4 | Load 0x1,0x34 03cb 01d7 | | Execute Vector,Field_Read 03cc e232 | 2 | Load 0x1,0x32 03cd 027d | } | Execute Discrete,Greater 03ce 6802 |h | Jump_Zero 0x3d1 03cf 4806 |H | Short_Literal 0x6 03d0 8013 | | Call 0x0,0x13 03d1 e233 | 3 | Load 0x1,0x33 03d2 7002 |p | Jump_Nonzero 0x3d5 03d3 4804 |H | Short_Literal 0x4 03d4 8013 | | Call 0x0,0x13 03d5 e5ff | | Load 0x2,-0x1 03d6 8020 | | Call 0x0,0x20 03d7 680e |h | Jump_Zero 0x3e6 03d8 e5ff | | Load 0x2,-0x1 03d9 8022 | " | Call 0x0,0x22 03da a22e | . | Store_Unchecked 0x1,0x2e 03db e22d | - | Load 0x1,0x2d 03dc e22c | , | Load 0x1,0x2c 03dd 8023 | # | Call 0x0,0x23 03de 00d1 | | Pop_Control Pop_Count_1 03df 4801 |H | Short_Literal 0x1 03e0 a22f | / | Store_Unchecked 0x1,0x2f 03e1 e236 | 6 | Load 0x1,0x36 03e2 a237 | 7 | Store_Unchecked 0x1,0x37 03e3 4801 |H | Short_Literal 0x1 03e4 a236 | 6 | Store_Unchecked 0x1,0x36 03e5 4503 |E | Exit_Suprogram New_Top_Offset 0x3 03e6 e236 | 6 | Load 0x1,0x36 03e7 0c02 | | Execute_Immediate Greater_Equal,0x2 03e8 680b |h | Jump_Zero 0x3f4 03e9 00d9 | | Load_Top At_Offset_1 03ea e236 | 6 | Load 0x1,0x36 03eb 0aff | | Execute_Immediate Plus,-0x1 03ec e22c | , | Load 0x1,0x2c 03ed 01d5 | | Execute Vector,Field_Reference 03ee 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03ef 8024 | $ | Call 0x0,0x24 03f0 700b |p | Jump_Nonzero 0x3fc 03f1 4809 |H | Short_Literal 0x9 03f2 8013 | | Call 0x0,0x13 03f3 7808 |x | Jump 0x3fc 03f4 00d9 | | Load_Top At_Offset_1 03f5 0f05 | | Execute_Immediate Equal,0x5 03f6 6803 |h | Jump_Zero 0x3fa 03f7 4801 |H | Short_Literal 0x1 03f8 a230 | 0 | Store_Unchecked 0x1,0x30 03f9 7802 |x | Jump 0x3fc 03fa 4800 |H | Short_Literal 0x0 03fb a230 | 0 | Store_Unchecked 0x1,0x30 03fc 00d9 | | Load_Top At_Offset_1 03fd 0f05 | | Execute_Immediate Equal,0x5 03fe 00da | | Load_Top At_Offset_2 03ff 0f06 | | Execute_Immediate Equal,0x6 0400 0278 | x | Execute Discrete,Or 0401 680c |h | Jump_Zero 0x40e 0402 e236 | 6 | Load 0x1,0x36 0403 e22c | , | Load 0x1,0x2c 0404 01d5 | | Execute Vector,Field_Reference 0405 00d8 | | Load_Top At_Offset_0 0406 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0407 e5ff | | Load 0x2,-0x1 0408 8025 | % | Call 0x0,0x25 0409 8014 | | Call 0x0,0x14 040a 00d9 | | Load_Top At_Offset_1 040b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 040c 00d1 | | Pop_Control Pop_Count_1 040d 780a |x | Jump 0x418 040e e236 | 6 | Load 0x1,0x36 040f e22c | , | Load 0x1,0x2c 0410 01d5 | | Execute Vector,Field_Reference 0411 00d8 | | Load_Top At_Offset_0 0412 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0413 e5ff | | Load 0x2,-0x1 0414 8014 | | Call 0x0,0x14 0415 00d9 | | Load_Top At_Offset_1 0416 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0417 00d1 | | Pop_Control Pop_Count_1 0418 00d9 | | Load_Top At_Offset_1 0419 e236 | 6 | Load 0x1,0x36 041a e22c | , | Load 0x1,0x2c 041b 01d5 | | Execute Vector,Field_Reference 041c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 041d e236 | 6 | Load 0x1,0x36 041e 0a01 | | Execute_Immediate Plus,0x1 041f c236 | 6 | Store 0x1,0x36 0420 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0421 0000 0000 | | .BLANK 0000[0x7] 0428 ; -------------------------------------------------------------------------------------- 0428 ; SUBPROGRAM 0428 ; -------------------------------------------------------------------------------------- 0428 042b | + | .CONST 0x042b ; Address of begin 0429 0004 | | .CONST 0x0004 ; Address of exception handler 042a 0001 | | .CONST 0x0001 ; Number of locals 042b BODY_0428: 042b INIT_0428: 042b e233 | 3 | Load 0x1,0x33 042c 0a01 | | Execute_Immediate Plus,0x1 042d c233 | 3 | Store 0x1,0x33 042e e230 | 0 | Load 0x1,0x30 042f 6804 |h | Jump_Zero 0x434 0430 823d | = | Call 0x1,0x3d 0431 e231 | 1 | Load 0x1,0x31 0432 016d | m | Execute Variant_Record,Structure_Write 0433 7813 |x | Jump 0x447 0434 e22f | / | Load 0x1,0x2f 0435 680e |h | Jump_Zero 0x444 0436 4801 |H | Short_Literal 0x1 0437 e22d | - | Load 0x1,0x2d 0438 01d5 | | Execute Vector,Field_Reference 0439 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 043a 0f01 | | Execute_Immediate Equal,0x1 043b 6804 |h | Jump_Zero 0x440 043c 8240 | @ | Call 0x1,0x40 043d e231 | 1 | Load 0x1,0x31 043e 016d | m | Execute Variant_Record,Structure_Write 043f 7807 |x | Jump 0x447 0440 823f | ? | Call 0x1,0x3f 0441 e231 | 1 | Load 0x1,0x31 0442 016d | m | Execute Variant_Record,Structure_Write 0443 7803 |x | Jump 0x447 0444 823e | > | Call 0x1,0x3e 0445 e231 | 1 | Load 0x1,0x31 0446 016d | m | Execute Variant_Record,Structure_Write 0447 4801 |H | Short_Literal 0x1 0448 a236 | 6 | Store_Unchecked 0x1,0x36 0449 4800 |H | Short_Literal 0x0 044a a22f | / | Store_Unchecked 0x1,0x2f 044b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 044c 0000 0000 | | .BLANK 0000[0x4] 0450 ; -------------------------------------------------------------------------------------- 0450 ; SUBPROGRAM 0450 ; -------------------------------------------------------------------------------------- 0450 0453 | S | .CONST 0x0453 ; Address of begin 0451 0004 | | .CONST 0x0004 ; Address of exception handler 0452 0001 | | .CONST 0x0001 ; Number of locals 0453 BODY_0450: 0453 INIT_0450: 0453 00da | | Load_Top At_Offset_2 0454 e228 | ( | Load 0x1,0x28 0455 0227 | ' | Execute Access,All_Reference 0456 2a05 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5 0457 4502 |E | Exit_Suprogram New_Top_Offset 0x2 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 e231 | 1 | Load 0x1,0x31 045c 02fd | | Declare_Variable Variant_Record,Duplicate 045d 00cd | | Action Spare6_Action 045e 00ca | | Action Exit_Nullary_Function 045f 0000 | | .XXX[0x1] 0460 ; -------------------------------------------------------------------------------------- 0460 ; SUBPROGRAM 0460 ; -------------------------------------------------------------------------------------- 0460 0467 | g | .CONST 0x0467 ; Address of begin 0461 0004 | | .CONST 0x0004 ; Address of exception handler 0462 0003 | | .CONST 0x0003 ; Number of locals 0463 INIT_0460: 0463 00e2 | | Load_Encached Integer_Cache 0464 e20f | | Load 0x1,0xf 0465 e5ff | | Load 0x2,-0x1 0466 0039 | 9 | Store_Top Access,At_Offset_1 0467 BODY_0460: 0467 00cf | | Action Mark_Auxiliary 0468 785f |x_ | Jump 0x4c8 0469 00d9 | | Load_Top At_Offset_1 046a 0227 | ' | Execute Access,All_Reference 046b 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 046c e20d | | Load 0x1,0xd 046d 011c | | Execute Any,Convert_Unchecked 046e 1c01 | | Execute_Immediate Run_Utility,0x1 046f e00f | | Load 0x0,0xf 0470 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0471 00d9 | | Load_Top At_Offset_1 0472 0227 | ' | Execute Access,All_Reference 0473 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0474 0f01 | | Execute_Immediate Equal,0x1 0475 701b |p | Jump_Nonzero 0x491 0476 0092 0763 | c| Action Push_String_Extended,0x763 ; "go to evalue the condition" 0478 e00f | | Load 0x0,0xf 0479 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 047a 00d9 | | Load_Top At_Offset_1 047b 0227 | ' | Execute Access,All_Reference 047c 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 047d 8026 | & | Call 0x0,0x26 047e 6809 |h | Jump_Zero 0x488 047f 0092 0764 | d| Action Push_String_Extended,0x764 ; "condition is realise" 0481 e00f | | Load 0x0,0xf 0482 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0483 00d9 | | Load_Top At_Offset_1 0484 0227 | ' | Execute Access,All_Reference 0485 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 0486 821f | | Call 0x1,0x1f 0487 783b |x; | Jump 0x4c3 0488 0092 0765 | e| Action Push_String_Extended,0x765 ; "condition is not realise" 048a e00f | | Load 0x0,0xf 048b 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 048c 00d9 | | Load_Top At_Offset_1 048d 0227 | ' | Execute Access,All_Reference 048e 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 048f 821f | | Call 0x1,0x1f 0490 7832 |x2 | Jump 0x4c3 0491 00d9 | | Load_Top At_Offset_1 0492 0227 | ' | Execute Access,All_Reference 0493 2606 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6 0494 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0495 e015 | | Load 0x0,0x15 0496 011c | | Execute Any,Convert_Unchecked 0497 1c01 | | Execute_Immediate Run_Utility,0x1 0498 e00f | | Load 0x0,0xf 0499 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 049a 00d9 | | Load_Top At_Offset_1 049b 0227 | ' | Execute Access,All_Reference 049c 2606 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6 049d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 049e 0f01 | | Execute_Immediate Equal,0x1 049f 7015 |p | Jump_Nonzero 0x4b5 04a0 0092 0766 | f| Action Push_String_Extended,0x766 ; "go to evaluate" 04a2 e00f | | Load 0x0,0xf 04a3 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 04a4 00d9 | | Load_Top At_Offset_1 04a5 0227 | ' | Execute Access,All_Reference 04a6 2606 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6 04a7 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 04a8 8027 | ' | Call 0x0,0x27 04a9 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 04aa 00da | | Load_Top At_Offset_2 04ab 00da | | Load_Top At_Offset_2 04ac 0227 | ' | Execute Access,All_Reference 04ad 2606 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6 04ae 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 04af 8028 | ( | Call 0x0,0x28 04b0 0092 0767 | g| Action Push_String_Extended,0x767 ; "affectation is done" 04b2 e00f | | Load 0x0,0xf 04b3 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 04b4 780e |x | Jump 0x4c3 04b5 0092 0768 | h| Action Push_String_Extended,0x768 ; "go to execute function" 04b7 e00f | | Load 0x0,0xf 04b8 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 04b9 00d9 | | Load_Top At_Offset_1 04ba 0227 | ' | Execute Access,All_Reference 04bb 2606 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6 04bc e029 | ) | Load 0x0,0x29 04bd 0161 | a | Execute Variant_Record,Check_In_Formal_Type 04be 802a | * | Call 0x0,0x2a 04bf 0092 0769 | i| Action Push_String_Extended,0x769 ; "execution is done" 04c1 e00f | | Load 0x0,0xf 04c2 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 04c3 00d9 | | Load_Top At_Offset_1 04c4 0227 | ' | Execute Access,All_Reference 04c5 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 04c6 003a | : | Store_Top Access,At_Offset_2 04c7 00c9 | | Action Pop_Auxiliary_Loop 04c8 00d9 | | Load_Top At_Offset_1 04c9 779f |w | Jump_Nonzero 0x469 04ca 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04cb 0000 0000 | | .BLANK 0000[0x5] 04d0 ; -------------------------------------------------------------------------------------- 04d0 ; SUBPROGRAM 04d0 ; -------------------------------------------------------------------------------------- 04d0 04d3 | | .CONST 0x04d3 ; Address of begin 04d1 0004 | | .CONST 0x0004 ; Address of exception handler 04d2 0001 | | .CONST 0x0001 ; Number of locals 04d3 BODY_04d0: 04d3 INIT_04d0: 04d3 00cf | | Action Mark_Auxiliary 04d4 e021 | ! | Load 0x0,0x21 04d5 0265 | e | Execute Discrete,Reverse_Bounds 04d6 0007 | | Action Break_Optional 04d7 00d8 | | Load_Top At_Offset_0 04d8 e234 | 4 | Load 0x1,0x34 04d9 01d7 | | Execute Vector,Field_Read 04da e5ff | | Load 0x2,-0x1 04db 027f | | Execute Discrete,Equal 04dc 6804 |h | Jump_Zero 0x4e1 04dd 4800 |H | Short_Literal 0x0 04de 00d9 | | Load_Top At_Offset_1 04df e234 | 4 | Load 0x1,0x34 04e0 01d6 | | Execute Vector,Field_Write 04e1 00c8 | | Action Pop_Auxiliary_Range 04e2 3ff4 |? | Loop_Increasing 0x4d7 04e3 00ce | | Action Pop_Auxiliary 04e4 e235 | 5 | Load 0x1,0x35 04e5 00db | | Load_Top At_Offset_3 04e6 027f | | Execute Discrete,Equal 04e7 6802 |h | Jump_Zero 0x4ea 04e8 4800 |H | Short_Literal 0x0 04e9 a235 | 5 | Store_Unchecked 0x1,0x35 04ea 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04eb 0000 0000 | | .BLANK 0000[0x5] 04f0 ; -------------------------------------------------------------------------------------- 04f0 ; SUBPROGRAM 04f0 ; -------------------------------------------------------------------------------------- 04f0 04f3 | | .CONST 0x04f3 ; Address of begin 04f1 0004 | | .CONST 0x0004 ; Address of exception handler 04f2 0001 | | .CONST 0x0001 ; Number of locals 04f3 BODY_04f0: 04f3 INIT_04f0: 04f3 00da | | Load_Top At_Offset_2 04f4 0227 | ' | Execute Access,All_Reference 04f5 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 04f6 6815 |h | Jump_Zero 0x50c 04f7 0092 076a | j| Action Push_String_Extended,0x76a ; "une instruction: " 04f9 00db | | Load_Top At_Offset_3 04fa 0227 | ' | Execute Access,All_Reference 04fb 2606 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6 04fc 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 04fd e015 | | Load 0x0,0x15 04fe 011c | | Execute Any,Convert_Unchecked 04ff 1c01 | | Execute_Immediate Run_Utility,0x1 0500 01cc | | Execute Vector,Catenate 0501 0092 076b | k| Action Push_String_Extended,0x76b ; " " 0503 01cc | | Execute Vector,Catenate 0504 e00f | | Load 0x0,0xf 0505 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0506 00da | | Load_Top At_Offset_2 0507 0227 | ' | Execute Access,All_Reference 0508 2606 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6 0509 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 050a 8016 | | Call 0x0,0x16 050b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 050c 0092 076c | l| Action Push_String_Extended,0x76c ; " une regle " 050e e00f | | Load 0x0,0xf 050f 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0510 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0511 0000 0000 | | .BLANK 0000[0x7] 0518 ; -------------------------------------------------------------------------------------- 0518 ; SUBPROGRAM 0518 ; -------------------------------------------------------------------------------------- 0518 051b | | .CONST 0x051b ; Address of begin 0519 0004 | | .CONST 0x0004 ; Address of exception handler 051a 0001 | | .CONST 0x0001 ; Number of locals 051b BODY_0518: 051b INIT_0518: 051b e227 | ' | Load 0x1,0x27 051c 6809 |h | Jump_Zero 0x526 051d e228 | ( | Load 0x1,0x28 051e e227 | ' | Load 0x1,0x27 051f 0227 | ' | Execute Access,All_Reference 0520 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 0521 e227 | ' | Load 0x1,0x27 0522 0227 | ' | Execute Access,All_Reference 0523 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0524 a227 | ' | Store_Unchecked 0x1,0x27 0525 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0526 e228 | ( | Load 0x1,0x28 0527 a227 | ' | Store_Unchecked 0x1,0x27 0528 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0529 0000 0000 | | .BLANK 0000[0x7] 0530 ; -------------------------------------------------------------------------------------- 0530 ; SUBPROGRAM 0530 ; -------------------------------------------------------------------------------------- 0530 0533 | 3 | .CONST 0x0533 ; Address of begin 0531 0004 | | .CONST 0x0004 ; Address of exception handler 0532 0001 | | .CONST 0x0001 ; Number of locals 0533 BODY_0530: 0533 INIT_0530: 0533 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0534 0000 0000 | | .BLANK 0000[0x4] 0538 ; -------------------------------------------------------------------------------------- 0538 ; SUBPROGRAM 0538 ; -------------------------------------------------------------------------------------- 0538 053e | > | .CONST 0x053e ; Address of begin 0539 0004 | | .CONST 0x0004 ; Address of exception handler 053a 0002 | | .CONST 0x0002 ; Number of locals 053b INIT_0538: 053b e20f | | Load 0x1,0xf 053c 00db | | Load_Top At_Offset_3 053d 0039 | 9 | Store_Top Access,At_Offset_1 053e BODY_0538: 053e 00cf | | Action Mark_Auxiliary 053f 783f |x? | Jump 0x57f 0540 00d9 | | Load_Top At_Offset_1 0541 0227 | ' | Execute Access,All_Reference 0542 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0543 e20d | | Load 0x1,0xd 0544 011c | | Execute Any,Convert_Unchecked 0545 1c01 | | Execute_Immediate Run_Utility,0x1 0546 e00f | | Load 0x0,0xf 0547 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0548 00d9 | | Load_Top At_Offset_1 0549 0227 | ' | Execute Access,All_Reference 054a 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 054b 0f01 | | Execute_Immediate Equal,0x1 054c 7019 |p | Jump_Nonzero 0x566 054d 0092 076b | k| Action Push_String_Extended,0x76b ; " " 054f e00f | | Load 0x0,0xf 0550 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0551 0092 076d | m| Action Push_String_Extended,0x76d ; "if condition" 0553 e00f | | Load 0x0,0xf 0554 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0555 00d9 | | Load_Top At_Offset_1 0556 0227 | ' | Execute Access,All_Reference 0557 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 0558 823c | < | Call 0x1,0x3c 0559 0092 076e | n| Action Push_String_Extended,0x76e ; "else" 055b e00f | | Load 0x0,0xf 055c 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 055d 00d9 | | Load_Top At_Offset_1 055e 0227 | ' | Execute Access,All_Reference 055f 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 0560 823c | < | Call 0x1,0x3c 0561 0092 076f | o| Action Push_String_Extended,0x76f ; "fin si" 0563 e00f | | Load 0x0,0xf 0564 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0565 7814 |x | Jump 0x57a 0566 0092 076b | k| Action Push_String_Extended,0x76b ; " " 0568 00da | | Load_Top At_Offset_2 0569 0227 | ' | Execute Access,All_Reference 056a 2606 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6 056b 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 056c e015 | | Load 0x0,0x15 056d 011c | | Execute Any,Convert_Unchecked 056e 1c01 | | Execute_Immediate Run_Utility,0x1 056f 01cc | | Execute Vector,Catenate 0570 0092 076b | k| Action Push_String_Extended,0x76b ; " " 0572 01cc | | Execute Vector,Catenate 0573 e00f | | Load 0x0,0xf 0574 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0575 00d9 | | Load_Top At_Offset_1 0576 0227 | ' | Execute Access,All_Reference 0577 2606 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6 0578 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0579 8016 | | Call 0x0,0x16 057a 00d9 | | Load_Top At_Offset_1 057b 0227 | ' | Execute Access,All_Reference 057c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 057d 003a | : | Store_Top Access,At_Offset_2 057e 00c9 | | Action Pop_Auxiliary_Loop 057f 00d9 | | Load_Top At_Offset_1 0580 77bf |w | Jump_Nonzero 0x540 0581 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0582 0000 0000 | | .BLANK 0000[0x6] 0588 ; -------------------------------------------------------------------------------------- 0588 ; SUBPROGRAM 0588 ; -------------------------------------------------------------------------------------- 0588 0590 | | .CONST 0x0590 ; Address of begin 0589 0004 | | .CONST 0x0004 ; Address of exception handler 058a 0003 | | .CONST 0x0003 ; Number of locals 058b INIT_0588: 058b 4800 |H | Short_Literal 0x0 058c e00d | | Load 0x0,0xd 058d 1c08 | | Execute_Immediate Run_Utility,0x8 058e 00e2 | | Load_Encached Integer_Cache 058f 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 0590 BODY_0588: 0590 00d9 | | Load_Top At_Offset_1 0591 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0592 e22c | , | Load 0x1,0x2c 0593 8023 | # | Call 0x0,0x23 0594 00d1 | | Pop_Control Pop_Count_1 0595 e236 | 6 | Load 0x1,0x36 0596 0aff | | Execute_Immediate Plus,-0x1 0597 00da | | Load_Top At_Offset_2 0598 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3 0599 0092 0770 | p| Action Push_String_Extended,0x770 ; "ACTION : " 059b e00f | | Load 0x0,0xf 059c 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 059d 00cf | | Action Mark_Auxiliary 059e 00d9 | | Load_Top At_Offset_1 059f 00db | | Load_Top At_Offset_3 05a0 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 05a1 01d5 | | Execute Vector,Field_Reference 05a2 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 05a3 801d | | Call 0x0,0x1d 05a4 00d9 | | Load_Top At_Offset_1 05a5 00db | | Load_Top At_Offset_3 05a6 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 05a7 01d5 | | Execute Vector,Field_Reference 05a8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 05a9 e01e | | Load 0x0,0x1e 05aa 011c | | Execute Any,Convert_Unchecked 05ab 1c01 | | Execute_Immediate Run_Utility,0x1 05ac 0092 075d | ]| Action Push_String_Extended,0x75d ; " " 05ae 01cc | | Execute Vector,Catenate 05af e00f | | Load 0x0,0xf 05b0 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 05b1 00d9 | | Load_Top At_Offset_1 05b2 0a01 | | Execute_Immediate Plus,0x1 05b3 005a | Z | Store_Top Discrete,At_Offset_2 05b4 00d9 | | Load_Top At_Offset_1 05b5 00db | | Load_Top At_Offset_3 05b6 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 05b7 027d | } | Execute Discrete,Greater 05b8 7002 |p | Jump_Nonzero 0x5bb 05b9 00c9 | | Action Pop_Auxiliary_Loop 05ba 7fe3 | | Jump 0x59e 05bb 00ce | | Action Pop_Auxiliary 05bc 0092 075d | ]| Action Push_String_Extended,0x75d ; " " 05be e00f | | Load 0x0,0xf 05bf 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 05c0 0092 075a | Z| Action Push_String_Extended,0x75a ; "----------------------------------------" 05c2 e00f | | Load 0x0,0xf 05c3 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 05c4 00d9 | | Load_Top At_Offset_1 05c5 00ca | | Action Exit_Nullary_Function 05c6 0000 0000 | | .XXX[0x2] 05c8 ; -------------------------------------------------------------------------------------- 05c8 ; SUBPROGRAM 05c8 ; -------------------------------------------------------------------------------------- 05c8 05d0 | | .CONST 0x05d0 ; Address of begin 05c9 0004 | | .CONST 0x0004 ; Address of exception handler 05ca 0003 | | .CONST 0x0003 ; Number of locals 05cb INIT_05c8: 05cb 4801 |H | Short_Literal 0x1 05cc e00d | | Load 0x0,0xd 05cd 1c08 | | Execute_Immediate Run_Utility,0x8 05ce 00e2 | | Load_Encached Integer_Cache 05cf 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 05d0 BODY_05c8: 05d0 00d9 | | Load_Top At_Offset_1 05d1 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 05d2 e22c | , | Load 0x1,0x2c 05d3 8023 | # | Call 0x0,0x23 05d4 00d1 | | Pop_Control Pop_Count_1 05d5 e236 | 6 | Load 0x1,0x36 05d6 0aff | | Execute_Immediate Plus,-0x1 05d7 00da | | Load_Top At_Offset_2 05d8 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3 05d9 0092 0771 | q| Action Push_String_Extended,0x771 ; "RECHERCHE : " 05db e00f | | Load 0x0,0xf 05dc 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 05dd 00cf | | Action Mark_Auxiliary 05de 00d9 | | Load_Top At_Offset_1 05df 00db | | Load_Top At_Offset_3 05e0 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 05e1 01d5 | | Execute Vector,Field_Reference 05e2 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 05e3 801d | | Call 0x0,0x1d 05e4 00d9 | | Load_Top At_Offset_1 05e5 00db | | Load_Top At_Offset_3 05e6 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 05e7 01d5 | | Execute Vector,Field_Reference 05e8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 05e9 e01e | | Load 0x0,0x1e 05ea 011c | | Execute Any,Convert_Unchecked 05eb 1c01 | | Execute_Immediate Run_Utility,0x1 05ec 0092 075d | ]| Action Push_String_Extended,0x75d ; " " 05ee 01cc | | Execute Vector,Catenate 05ef e00f | | Load 0x0,0xf 05f0 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 05f1 00d9 | | Load_Top At_Offset_1 05f2 0a01 | | Execute_Immediate Plus,0x1 05f3 005a | Z | Store_Top Discrete,At_Offset_2 05f4 00d9 | | Load_Top At_Offset_1 05f5 00db | | Load_Top At_Offset_3 05f6 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 05f7 027d | } | Execute Discrete,Greater 05f8 7002 |p | Jump_Nonzero 0x5fb 05f9 00c9 | | Action Pop_Auxiliary_Loop 05fa 7fe3 | | Jump 0x5de 05fb 00ce | | Action Pop_Auxiliary 05fc 0092 075d | ]| Action Push_String_Extended,0x75d ; " " 05fe e00f | | Load 0x0,0xf 05ff 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0600 0092 075a | Z| Action Push_String_Extended,0x75a ; "----------------------------------------" 0602 e00f | | Load 0x0,0xf 0603 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0604 00d9 | | Load_Top At_Offset_1 0605 00ca | | Action Exit_Nullary_Function 0606 0000 0000 | | .XXX[0x2] 0608 ; -------------------------------------------------------------------------------------- 0608 ; SUBPROGRAM 0608 ; -------------------------------------------------------------------------------------- 0608 0610 | | .CONST 0x0610 ; Address of begin 0609 0004 | | .CONST 0x0004 ; Address of exception handler 060a 0003 | | .CONST 0x0003 ; Number of locals 060b INIT_0608: 060b 4802 |H | Short_Literal 0x2 060c e00d | | Load 0x0,0xd 060d 1c08 | | Execute_Immediate Run_Utility,0x8 060e 00e2 | | Load_Encached Integer_Cache 060f 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 0610 BODY_0608: 0610 00d9 | | Load_Top At_Offset_1 0611 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 0612 e22d | - | Load 0x1,0x2d 0613 8023 | # | Call 0x0,0x23 0614 00d1 | | Pop_Control Pop_Count_1 0615 00d9 | | Load_Top At_Offset_1 0616 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 0617 e22c | , | Load 0x1,0x2c 0618 8023 | # | Call 0x0,0x23 0619 00d1 | | Pop_Control Pop_Count_1 061a e237 | 7 | Load 0x1,0x37 061b 0aff | | Execute_Immediate Plus,-0x1 061c 00da | | Load_Top At_Offset_2 061d 2a06 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6 061e e236 | 6 | Load 0x1,0x36 061f 0aff | | Execute_Immediate Plus,-0x1 0620 00da | | Load_Top At_Offset_2 0621 2a07 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7 0622 e237 | 7 | Load 0x1,0x37 0623 e236 | 6 | Load 0x1,0x36 0624 027f | | Execute Discrete,Equal 0625 682b |h+ | Jump_Zero 0x651 0626 e236 | 6 | Load 0x1,0x36 0627 0aff | | Execute_Immediate Plus,-0x1 0628 e22d | - | Load 0x1,0x2d 0629 01d5 | | Execute Vector,Field_Reference 062a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 062b 0f0b | | Execute_Immediate Equal,0xb 062c 680a |h | Jump_Zero 0x637 062d e236 | 6 | Load 0x1,0x36 062e 0aff | | Execute_Immediate Plus,-0x1 062f e22c | , | Load 0x1,0x2c 0630 01d5 | | Execute Vector,Field_Reference 0631 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0632 0e0b | | Execute_Immediate Not_Equal,0xb 0633 682c |h, | Jump_Zero 0x660 0634 4808 |H | Short_Literal 0x8 0635 8013 | | Call 0x0,0x13 0636 7829 |x) | Jump 0x660 0637 4801 |H | Short_Literal 0x1 0638 a236 | 6 | Store_Unchecked 0x1,0x36 0639 00cf | | Action Mark_Auxiliary 063a 7810 |x | Jump 0x64b 063b e236 | 6 | Load 0x1,0x36 063c e22d | - | Load 0x1,0x2d 063d 01d5 | | Execute Vector,Field_Reference 063e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 063f e236 | 6 | Load 0x1,0x36 0640 e22c | , | Load 0x1,0x2c 0641 01d5 | | Execute Vector,Field_Reference 0642 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0643 027e | ~ | Execute Discrete,Not_Equal 0644 6802 |h | Jump_Zero 0x647 0645 4808 |H | Short_Literal 0x8 0646 8013 | | Call 0x0,0x13 0647 e236 | 6 | Load 0x1,0x36 0648 0a01 | | Execute_Immediate Plus,0x1 0649 c236 | 6 | Store 0x1,0x36 064a 00c9 | | Action Pop_Auxiliary_Loop 064b e236 | 6 | Load 0x1,0x36 064c e237 | 7 | Load 0x1,0x37 064d 027c | | | Execute Discrete,Less 064e 77ec |w | Jump_Nonzero 0x63b 064f 00ce | | Action Pop_Auxiliary 0650 780f |x | Jump 0x660 0651 e237 | 7 | Load 0x1,0x37 0652 0aff | | Execute_Immediate Plus,-0x1 0653 e22d | - | Load 0x1,0x2d 0654 01d5 | | Execute Vector,Field_Reference 0655 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0656 0e0b | | Execute_Immediate Not_Equal,0xb 0657 4801 |H | Short_Literal 0x1 0658 e22c | , | Load 0x1,0x2c 0659 01d5 | | Execute Vector,Field_Reference 065a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 065b 0e02 | | Execute_Immediate Not_Equal,0x2 065c 0279 | y | Execute Discrete,And 065d 6802 |h | Jump_Zero 0x660 065e 4808 |H | Short_Literal 0x8 065f 8013 | | Call 0x0,0x13 0660 4801 |H | Short_Literal 0x1 0661 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0662 0092 0772 | r| Action Push_String_Extended,0x772 ; "EGALITE : " 0664 e00f | | Load 0x0,0xf 0665 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0666 0092 0773 | s| Action Push_String_Extended,0x773 ; "MEMBRE1 :" 0668 e00f | | Load 0x0,0xf 0669 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 066a 00cf | | Action Mark_Auxiliary 066b 00d9 | | Load_Top At_Offset_1 066c 00db | | Load_Top At_Offset_3 066d 2604 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x4 066e 01d5 | | Execute Vector,Field_Reference 066f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0670 801d | | Call 0x0,0x1d 0671 00d9 | | Load_Top At_Offset_1 0672 00db | | Load_Top At_Offset_3 0673 2604 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x4 0674 01d5 | | Execute Vector,Field_Reference 0675 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0676 e01e | | Load 0x0,0x1e 0677 011c | | Execute Any,Convert_Unchecked 0678 1c01 | | Execute_Immediate Run_Utility,0x1 0679 0092 075d | ]| Action Push_String_Extended,0x75d ; " " 067b 01cc | | Execute Vector,Catenate 067c e00f | | Load 0x0,0xf 067d 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 067e 00d9 | | Load_Top At_Offset_1 067f 0a01 | | Execute_Immediate Plus,0x1 0680 005a | Z | Store_Top Discrete,At_Offset_2 0681 00d9 | | Load_Top At_Offset_1 0682 00db | | Load_Top At_Offset_3 0683 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 0684 027d | } | Execute Discrete,Greater 0685 7002 |p | Jump_Nonzero 0x688 0686 00c9 | | Action Pop_Auxiliary_Loop 0687 7fe3 | | Jump 0x66b 0688 00ce | | Action Pop_Auxiliary 0689 4801 |H | Short_Literal 0x1 068a 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 068b 0092 075d | ]| Action Push_String_Extended,0x75d ; " " 068d e00f | | Load 0x0,0xf 068e 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 068f 0092 0774 | t| Action Push_String_Extended,0x774 ; "MEMBRE2 :" 0691 e00f | | Load 0x0,0xf 0692 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0693 00cf | | Action Mark_Auxiliary 0694 00d9 | | Load_Top At_Offset_1 0695 00db | | Load_Top At_Offset_3 0696 2605 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5 0697 01d5 | | Execute Vector,Field_Reference 0698 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0699 801d | | Call 0x0,0x1d 069a 00d9 | | Load_Top At_Offset_1 069b 00db | | Load_Top At_Offset_3 069c 2605 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5 069d 01d5 | | Execute Vector,Field_Reference 069e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 069f e01e | | Load 0x0,0x1e 06a0 011c | | Execute Any,Convert_Unchecked 06a1 1c01 | | Execute_Immediate Run_Utility,0x1 06a2 0092 075d | ]| Action Push_String_Extended,0x75d ; " " 06a4 01cc | | Execute Vector,Catenate 06a5 e00f | | Load 0x0,0xf 06a6 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 06a7 00d9 | | Load_Top At_Offset_1 06a8 0a01 | | Execute_Immediate Plus,0x1 06a9 005a | Z | Store_Top Discrete,At_Offset_2 06aa 00d9 | | Load_Top At_Offset_1 06ab 00db | | Load_Top At_Offset_3 06ac 2e07 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7 06ad 027d | } | Execute Discrete,Greater 06ae 7002 |p | Jump_Nonzero 0x6b1 06af 00c9 | | Action Pop_Auxiliary_Loop 06b0 7fe3 | | Jump 0x694 06b1 00ce | | Action Pop_Auxiliary 06b2 0092 075d | ]| Action Push_String_Extended,0x75d ; " " 06b4 e00f | | Load 0x0,0xf 06b5 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 06b6 0092 075a | Z| Action Push_String_Extended,0x75a ; "----------------------------------------" 06b8 e00f | | Load 0x0,0xf 06b9 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 06ba 00d9 | | Load_Top At_Offset_1 06bb 00ca | | Action Exit_Nullary_Function 06bc 0000 0000 | | .BLANK 0000[0x4] 06c0 ; -------------------------------------------------------------------------------------- 06c0 ; SUBPROGRAM 06c0 ; -------------------------------------------------------------------------------------- 06c0 06c6 | | .CONST 0x06c6 ; Address of begin 06c1 0004 | | .CONST 0x0004 ; Address of exception handler 06c2 0002 | | .CONST 0x0002 ; Number of locals 06c3 INIT_06c0: 06c3 4803 |H | Short_Literal 0x3 06c4 e00d | | Load 0x0,0xd 06c5 1c08 | | Execute_Immediate Run_Utility,0x8 06c6 BODY_06c0: 06c6 4801 |H | Short_Literal 0x1 06c7 e22d | - | Load 0x1,0x2d 06c8 01d5 | | Execute Vector,Field_Reference 06c9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 06ca 00d9 | | Load_Top At_Offset_1 06cb 2a08 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8 06cc e22e | . | Load 0x1,0x2e 06cd 00d9 | | Load_Top At_Offset_1 06ce 2a0a |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0xa 06cf 4801 |H | Short_Literal 0x1 06d0 e22c | , | Load 0x1,0x2c 06d1 01d5 | | Execute Vector,Field_Reference 06d2 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 06d3 e019 | | Load 0x0,0x19 06d4 1816 | | Execute Package,Field_Execute,Field_Number 0x16 06d5 00e2 | | Load_Encached Integer_Cache 06d6 00e0 | | Load_Encached Standard_Cache 06d7 1819 | | Execute Package,Field_Execute,Field_Number 0x19 06d8 00d9 | | Load_Top At_Offset_1 06d9 2a09 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x9 06da 0092 0775 | u| Action Push_String_Extended,0x775 ; "COMPARAISON :" 06dc e00f | | Load 0x0,0xf 06dd 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 06de 00d8 | | Load_Top At_Offset_0 06df 2e08 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8 06e0 801d | | Call 0x0,0x1d 06e1 00d8 | | Load_Top At_Offset_0 06e2 2e0a |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa 06e3 e00c | | Load 0x0,0xc 06e4 011c | | Execute Any,Convert_Unchecked 06e5 1c01 | | Execute_Immediate Run_Utility,0x1 06e6 e00f | | Load 0x0,0xf 06e7 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 06e8 0092 076b | k| Action Push_String_Extended,0x76b ; " " 06ea 00d9 | | Load_Top At_Offset_1 06eb 2e09 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9 06ec 00e0 | | Load_Encached Standard_Cache 06ed 1818 | | Execute Package,Field_Execute,Field_Number 0x18 06ee 01cc | | Execute Vector,Catenate 06ef e00f | | Load 0x0,0xf 06f0 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 06f1 0092 075d | ]| Action Push_String_Extended,0x75d ; " " 06f3 e00f | | Load 0x0,0xf 06f4 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 06f5 0092 075a | Z| Action Push_String_Extended,0x75a ; "----------------------------------------" 06f7 e00f | | Load 0x0,0xf 06f8 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 06f9 00d8 | | Load_Top At_Offset_0 06fa 00ca | | Action Exit_Nullary_Function 06fb 0000 0000 | | .BLANK 0000[0x5] 0700 ; -------------------------------------------------------------------------------------- 0700 ; SUBPROGRAM 0700 ; SUBPROGRAM 0700 ; -------------------------------------------------------------------------------------- 0700 0703 | | .CONST 0x0703 ; Address of begin 0701 0004 | | .CONST 0x0004 ; Address of exception handler 0702 0001 | | .CONST 0x0001 ; Number of locals 0703 BODY_0700: 0703 BODY_0700: 0703 INIT_0700: 0703 INIT_0700: 0703 4609 |F | Jump_Case 0xa 0704 7809 |x | Jump 0x70e ; case 0x0 0705 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0706 781a |x | Jump 0x721 ; case 0x2 0707 781d |x | Jump 0x725 ; case 0x3 0708 7822 |x" | Jump 0x72b ; case 0x4 0709 782c |x, | Jump 0x736 ; case 0x5 070a 7832 |x2 | Jump 0x73d ; case 0x6 070b 7837 |x7 | Jump 0x743 ; case 0x7 070c 783f |x? | Jump 0x74c ; case 0x8 070d 7845 |xE | Jump 0x753 ; case 0x9 070e 00da | | Load_Top At_Offset_2 070f 016c | l | Execute Variant_Record,Is_Constrained 0710 7009 |p | Jump_Nonzero 0x71a 0711 00cf | | Action Mark_Auxiliary 0712 4801 |H | Short_Literal 0x1 0713 e5ff | | Load 0x2,-0x1 0714 1c08 | | Execute_Immediate Run_Utility,0x8 0715 00d8 | | Load_Top At_Offset_0 0716 1c00 | | Execute_Immediate Run_Utility,0x0 0717 c5ff | | Store 0x2,-0x1 0718 00ce | | Action Pop_Auxiliary 0719 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 071a 00da | | Load_Top At_Offset_2 071b 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 071c 6803 |h | Jump_Zero 0x720 071d 00da | | Load_Top At_Offset_2 071e 2606 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6 071f 1c00 | | Execute_Immediate Run_Utility,0x0 0720 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0721 4801 |H | Short_Literal 0x1 0722 4806 |H | Short_Literal 0x6 0723 0311 | | Declare_Type Variant_Record,Constrained_Incomplete 0724 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0725 e5fd | | Load 0x2,-0x3 0726 00db | | Load_Top At_Offset_3 0727 1c07 | | Execute_Immediate Run_Utility,0x7 0728 e5fe | | Load 0x2,-0x2 0729 0306 | | Complete_Type Variant_Record,By_Renaming 072a 4304 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x4 072b 4801 |H | Short_Literal 0x1 072c 4806 |H | Short_Literal 0x6 072d 0311 | | Declare_Type Variant_Record,Constrained_Incomplete 072e e5fe | | Load 0x2,-0x2 072f 00d8 | | Load_Top At_Offset_0 0730 e5ff | | Load 0x2,-0x1 0731 1c06 | | Execute_Immediate Run_Utility,0x6 0732 e5ff | | Load 0x2,-0x1 0733 00db | | Load_Top At_Offset_3 0734 0305 | | Complete_Type Variant_Record,By_Constraining_Incomplete 0735 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0736 4801 |H | Short_Literal 0x1 0737 00db | | Load_Top At_Offset_3 0738 0169 | i | Execute Variant_Record,Read_Discriminant_Constraint 0739 6800 |h | Jump_Zero 0x73a 073a e5ff | | Load 0x2,-0x1 073b 0304 | | Complete_Type Variant_Record,By_Completing_Constraint 073c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 073d 00db | | Load_Top At_Offset_3 073e 6802 |h | Jump_Zero 0x741 073f 4802 |H | Short_Literal 0x2 0740 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0741 4801 |H | Short_Literal 0x1 0742 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0743 00db | | Load_Top At_Offset_3 0744 e5fe | | Load 0x2,-0x2 0745 6802 |h | Jump_Zero 0x748 0746 4802 |H | Short_Literal 0x2 0747 7801 |x | Jump 0x749 0748 4801 |H | Short_Literal 0x1 0749 e5ff | | Load 0x2,-0x1 074a 031b | | Declare_Type Variant_Record,Constrained 074b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 074c 00db | | Load_Top At_Offset_3 074d e5fe | | Load 0x2,-0x2 074e e5ff | | Load 0x2,-0x1 074f 1c06 | | Execute_Immediate Run_Utility,0x6 0750 e5ff | | Load 0x2,-0x1 0751 02fc | | Declare_Variable Variant_Record,With_Constraint 0752 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0753 4801 |H | Short_Literal 0x1 0754 00db | | Load_Top At_Offset_3 0755 1c07 | | Execute_Immediate Run_Utility,0x7 0756 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0757 ; -------------------------------------------------------------------------------------- 0757 ; STRING TABLE 0757 ; -------------------------------------------------------------------------------------- 0757 0040 | @ | .STRTAB 0x0040->0x0777 ; "TYPE_REGLE" 0758 0048 | H | .STRTAB 0x0048->0x077c ; "TYPE_INSTRUCTION" 0759 0056 | V | .STRTAB 0x0056->0x0784 ; "level is now: " 075a 0062 | b | .STRTAB 0x0062->0x078b ; "----------------------------------------" 075b 0088 | | .STRTAB 0x0088->0x079f ; "------------------------------------------" 075c 00b0 | | .STRTAB 0x00b0->0x07b4 ; " go to modifie " 075d 00bd | | .STRTAB 0x00bd->0x07bb ; " " 075e 00bc | | .STRTAB 0x00bc->0x07bc ; "modifierdescription" 075f 00cd | | .STRTAB 0x00cd->0x07c5 ; "LEVEL " 0760 00d1 | | .STRTAB 0x00d1->0x07c8 ; " Can_Use_Sortie_At_Level" 0761 00e7 | | .STRTAB 0x00e7->0x07d4 ; "GENERIQUE:" 0762 00ef | | .STRTAB 0x00ef->0x07d9 ; " is declare at level " 0763 0102 | | .STRTAB 0x0102->0x07e4 ; "go to evalue the condition" 0764 011a | | .STRTAB 0x011a->0x07f1 ; "condition is realise" 0765 012c | , | .STRTAB 0x012c->0x07fb ; "condition is not realise" 0766 0142 | B | .STRTAB 0x0142->0x0807 ; "go to evaluate" 0767 014e | N | .STRTAB 0x014e->0x080e ; "affectation is done" 0768 015f | _ | .STRTAB 0x015f->0x0817 ; "go to execute function" 0769 0173 | s | .STRTAB 0x0173->0x0822 ; "execution is done" 076a 0182 | | .STRTAB 0x0182->0x082b ; "une instruction: " 076b 0192 | | .STRTAB 0x0192->0x0834 ; " " 076c 0192 | | .STRTAB 0x0192->0x0835 ; " une regle " 076d 019b | | .STRTAB 0x019b->0x083a ; "if condition" 076e 01a6 | | .STRTAB 0x01a6->0x0841 ; "else" 076f 01a8 | | .STRTAB 0x01a8->0x0843 ; "fin si" 0770 01ac | | .STRTAB 0x01ac->0x0846 ; "ACTION : " 0771 01b3 | | .STRTAB 0x01b3->0x084a ; "RECHERCHE : " 0772 01bd | | .STRTAB 0x01bd->0x0850 ; "EGALITE : " 0773 01c5 | | .STRTAB 0x01c5->0x0855 ; "MEMBRE1 :" 0774 01cc | | .STRTAB 0x01cc->0x085a ; "MEMBRE2 :" 0775 01d3 | | .STRTAB 0x01d3->0x085e ; "COMPARAISON :" 0776 01de | | .STREND 0x01de->0x0865 0777 5459 5045 |TYPE| .STRTAB_STRINGS 0865 0000 0000 | | .XXX[0x3] 0867 0000 | | 0868 ; -------------------------------------------------------------------------------------- 0868 ; Debug Table 0868 ; -------------------------------------------------------------------------------------- 0868 0004 0008 | | .DEBUG4 0x0004,0x0008,0xb9de,0x0000,0x0001,0x001d 086e 000b 08e2 | | .DBG4T 0x000b,0x08e2,0x8000,0x0000 0872 004f 08f8 | O | .DBG4T 0x004f,0x08f8,0x8000,0x0000 0876 00eb 0000 | | .DBG4T 0x00eb,0x0000,0x0005,0x0000 087a 0123 092c | # ,| .DBG4T 0x0123,0x092c,0x0001,0x0000 087e 0163 093e | c >| .DBG4T 0x0163,0x093e,0x0001,0x0000 0882 0183 0946 | F| .DBG4T 0x0183,0x0946,0x0001,0x0000 0886 01ab 0950 | P| .DBG4T 0x01ab,0x0950,0x0001,0x0000 088a 01e3 095c | \| .DBG4T 0x01e3,0x095c,0x0001,0x0000 088e 01f3 0961 | a| .DBG4T 0x01f3,0x0961,0x0001,0x0000 0892 020b 0967 | g| .DBG4T 0x020b,0x0967,0x0001,0x0000 0896 0223 096e | # n| .DBG4T 0x0223,0x096e,0x0001,0x0000 089a 024b 0975 | K u| .DBG4T 0x024b,0x0975,0x0001,0x0000 089e 0263 097b | c {| .DBG4T 0x0263,0x097b,0x0001,0x0000 08a2 02e3 0994 | | .DBG4T 0x02e3,0x0994,0x0001,0x4000 08a6 033b 09ad | ; | .DBG4T 0x033b,0x09ad,0x0001,0x0000 08aa 042b 09e7 | + | .DBG4T 0x042b,0x09e7,0x0001,0x0000 08ae 0453 09f3 | S | .DBG4T 0x0453,0x09f3,0x0001,0x0000 08b2 045b 09f6 | [ | .DBG4T 0x045b,0x09f6,0x0002,0x0000 08b6 0463 09f9 | c | .DBG4T 0x0463,0x09f9,0x0001,0x4000 08ba 04d3 0a23 | #| .DBG4T 0x04d3,0x0a23,0x0001,0x0000 08be 04f3 0a2a | *| .DBG4T 0x04f3,0x0a2a,0x0001,0x4000 08c2 051b 0a34 | 4| .DBG4T 0x051b,0x0a34,0x0001,0x0000 08c6 0533 0a3a | 3 :| .DBG4T 0x0533,0x0a3a,0x0001,0x0000 08ca 053b 0a3d | ; =| .DBG4T 0x053b,0x0a3d,0x0001,0x4000 08ce 058b 0a58 | X| .DBG4T 0x058b,0x0a58,0x0002,0x4000 08d2 05cb 0a70 | p| .DBG4T 0x05cb,0x0a70,0x0002,0x4000 08d6 060b 0a88 | | .DBG4T 0x060b,0x0a88,0x0002,0x4000 08da 06c3 0acc | | .DBG4T 0x06c3,0x0acc,0x0002,0x0000 08de 0703 0000 | | .DBG4T 0x0703,0x0000,0x0005,0x0000 08e2 ; -------------------------------------------------------------------------------------- 08e2 ; Debug chain 08e2 ; -------------------------------------------------------------------------------------- 08e2 0014 0000 | | .DBGLEN 0x0014,0x0000 08e4 000b 0010 | | .DBGLNO 0x000b,0x0010,0x001b,0x001f,0x0021,0x0023,0x0025,0x0027,0x0029,0x002b,0x002d,0x002f,0x0031,0x0033,0x0035,0x0037,0x0039,0x003b,0x003d,0x003f 08f8 ; -------------------------------------------------------------------------------------- 08f8 ; Debug chain 08f8 ; -------------------------------------------------------------------------------------- 08f8 0032 0000 | 2 | .DBGLEN 0x0032,0x0000 08fa 004f 0051 | O Q| .DBGLNO 0x004f,0x0051,0x005f,0x006d,0x007b,0x007f,0x0083,0x0087,0x0089,0x008b,0x008c,0x008e,0x0090,0x0092,0x0094,0x0096,0x0097,0x0098,0x009c,0x009e,0x00a0,0x00ae,0x00b0,0x00b1,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 092c ; -------------------------------------------------------------------------------------- 092c ; Debug chain 092c ; -------------------------------------------------------------------------------------- 092c 0000 0010 | | .DBGLEN 0x0000,0x0010 092e 0123 0126 | # &| .DBGLNO 0x0123,0x0126,0x012e,0x0132,0x0134,0x0136,0x0138,0x013a,0x013b,0x0141,0x0149,0x014b,0x0151,0x0153,0x0159,0x015b 093e ; -------------------------------------------------------------------------------------- 093e ; Debug chain 093e ; -------------------------------------------------------------------------------------- 093e 0000 0006 | | .DBGLEN 0x0000,0x0006 0940 0163 0165 | c e| .DBGLNO 0x0163,0x0165,0x0166,0x016e,0x0170,0x0176 0946 ; -------------------------------------------------------------------------------------- 0946 ; Debug chain 0946 ; -------------------------------------------------------------------------------------- 0946 0001 0007 | | .DBGLEN 0x0001,0x0007 0948 0183 0185 | | .DBGLNO 0x0183,0x0185,0x0186,0x018e,0x0196,0x019a,0x019c,0x019e 0950 ; -------------------------------------------------------------------------------------- 0950 ; Debug chain 0950 ; -------------------------------------------------------------------------------------- 0950 0001 0009 | | .DBGLEN 0x0001,0x0009 0952 01ab 01ad | | .DBGLNO 0x01ab,0x01ad,0x01ae,0x01b6,0x01be,0x01c2,0x01c7,0x01cb,0x01d3,0x01d5 095c ; -------------------------------------------------------------------------------------- 095c ; Debug chain 095c ; -------------------------------------------------------------------------------------- 095c 0000 0003 | | .DBGLEN 0x0000,0x0003 095e 01e3 01e5 | | .DBGLNO 0x01e3,0x01e5,0x01e7 0961 ; -------------------------------------------------------------------------------------- 0961 ; Debug chain 0961 ; -------------------------------------------------------------------------------------- 0961 0001 0003 | | .DBGLEN 0x0001,0x0003 0963 01f3 01f5 | | .DBGLNO 0x01f3,0x01f5,0x01f6,0x01fe 0967 ; -------------------------------------------------------------------------------------- 0967 ; Debug chain 0967 ; -------------------------------------------------------------------------------------- 0967 0001 0004 | | .DBGLEN 0x0001,0x0004 0969 020b 020e | | .DBGLNO 0x020b,0x020e,0x0212,0x0214,0x021a 096e ; -------------------------------------------------------------------------------------- 096e ; Debug chain 096e ; -------------------------------------------------------------------------------------- 096e 0000 0005 | | .DBGLEN 0x0000,0x0005 0970 0223 0228 | # (| .DBGLNO 0x0223,0x0228,0x022c,0x023b,0x0240 0975 ; -------------------------------------------------------------------------------------- 0975 ; Debug chain 0975 ; -------------------------------------------------------------------------------------- 0975 0001 0003 | | .DBGLEN 0x0001,0x0003 0977 024b 024e | K N| .DBGLNO 0x024b,0x024e,0x0250,0x0254 097b ; -------------------------------------------------------------------------------------- 097b ; Debug chain 097b ; -------------------------------------------------------------------------------------- 097b 0001 0016 | | .DBGLEN 0x0001,0x0016 097d 0263 0265 | c e| .DBGLNO 0x0263,0x0265,0x0267,0x026a,0x026d,0x0270,0x0273,0x027d,0x0280,0x0283,0x0285,0x0288,0x0293,0x029f,0x02a1,0x02a4,0x02ab,0x02ad,0x02b0,0x02b7,0x02b9,0x02c9,0x02dc 0994 ; -------------------------------------------------------------------------------------- 0994 ; Debug chain 0994 ; -------------------------------------------------------------------------------------- 0994 0001 000b | | .DBGLEN 0x0001,0x000b 0996 02e3 02e5 | | .DBGLNO 0x02e3,0x02e5,0x02eb,0x02ef,0x02f3,0x02fe,0x0304,0x030c,0x031b,0x031e,0x0328,0x032c 09a2 0001 0002 | | .XXX[0xb] 09a4 0003 0004 | | 09a6 0005 0007 | | 09a8 0008 0009 | | 09aa 000a 000b | | 09ac 000c | | 09ad ; -------------------------------------------------------------------------------------- 09ad ; Debug chain 09ad ; -------------------------------------------------------------------------------------- 09ad 0002 0036 | 6| .DBGLEN 0x0002,0x0036 09af 033b 033d | ; =| .DBGLNO 0x033b,0x033d,0x033e,0x0340,0x0343,0x0346,0x0349,0x034c,0x034f,0x0356,0x0359,0x035c,0x035e,0x0367,0x0369,0x036d,0x0371,0x0376,0x037a,0x037e,0x0381,0x0386,0x0389,0x038c,0x0391,0x0396,0x0398,0x039b,0x039d,0x03a3,0x03a8,0x03b9,0x03bd,0x03c2,0x03c5,0x03c8,0x03cf,0x03d1,0x03d3,0x03d5,0x03d8,0x03db,0x03df,0x03e1,0x03e3,0x03e6,0x03e9,0x03f1,0x03f4,0x03f7,0x03fa,0x03fc,0x0402,0x040e,0x0418,0x041d 09e7 ; -------------------------------------------------------------------------------------- 09e7 ; Debug chain 09e7 ; -------------------------------------------------------------------------------------- 09e7 0000 000a | | .DBGLEN 0x0000,0x000a 09e9 042b 042e | + .| .DBGLNO 0x042b,0x042e,0x0430,0x0434,0x0436,0x043c,0x0440,0x0444,0x0447,0x0449 09f3 ; -------------------------------------------------------------------------------------- 09f3 ; Debug chain 09f3 ; -------------------------------------------------------------------------------------- 09f3 0000 0001 | | .DBGLEN 0x0000,0x0001 09f5 0453 | S | .DBGLNO 0x0453 09f6 ; -------------------------------------------------------------------------------------- 09f6 ; Debug chain 09f6 ; -------------------------------------------------------------------------------------- 09f6 0000 0001 | | .DBGLEN 0x0000,0x0001 09f8 045b | [ | .DBGLNO 0x045b 09f9 ; -------------------------------------------------------------------------------------- 09f9 ; Debug chain 09f9 ; -------------------------------------------------------------------------------------- 09f9 0002 0013 | | .DBGLEN 0x0002,0x0013 09fb 0463 0464 | c d| .DBGLNO 0x0463,0x0464,0x0469,0x0471,0x0476,0x047a,0x047f,0x0483,0x0488,0x048c,0x0491,0x049a,0x04a0,0x04a4,0x04aa,0x04b0,0x04b5,0x04b9,0x04bf,0x04c3,0x04c8 0a10 0002 0003 | | .XXX[0x13] 0a12 000d 000e | | 0a14 000f 0010 | | 0a16 0011 0012 | | 0a18 0004 0005 | | 0a1a 0009 000a | | 0a1c 000b 000c | | 0a1e 0006 0007 | | 0a20 0008 0013 | | 0a22 0001 | | 0a23 ; -------------------------------------------------------------------------------------- 0a23 ; Debug chain 0a23 ; -------------------------------------------------------------------------------------- 0a23 0000 0005 | | .DBGLEN 0x0000,0x0005 0a25 04d4 04d7 | | .DBGLNO 0x04d4,0x04d7,0x04dd,0x04e4,0x04e8 0a2a ; -------------------------------------------------------------------------------------- 0a2a ; Debug chain 0a2a ; -------------------------------------------------------------------------------------- 0a2a 0000 0004 | | .DBGLEN 0x0000,0x0004 0a2c 04f3 04f7 | | .DBGLNO 0x04f3,0x04f7,0x0506,0x050c 0a30 0001 0003 | | .XXX[0x4] 0a32 0004 0002 | | 0a34 ; -------------------------------------------------------------------------------------- 0a34 ; Debug chain 0a34 ; -------------------------------------------------------------------------------------- 0a34 0000 0004 | | .DBGLEN 0x0000,0x0004 0a36 051b 051d | | .DBGLNO 0x051b,0x051d,0x0521,0x0526 0a3a ; -------------------------------------------------------------------------------------- 0a3a ; Debug chain 0a3a ; -------------------------------------------------------------------------------------- 0a3a 0000 0001 | | .DBGLEN 0x0000,0x0001 0a3c 0533 | 3 | .DBGLNO 0x0533 0a3d ; -------------------------------------------------------------------------------------- 0a3d ; Debug chain 0a3d ; -------------------------------------------------------------------------------------- 0a3d 0001 000c | | .DBGLEN 0x0001,0x000c 0a3f 053b 0540 | ; @| .DBGLNO 0x053b,0x0540,0x0548,0x054d,0x0551,0x0555,0x0559,0x055d,0x0561,0x0566,0x0575,0x057a,0x057f 0a4c 0002 0003 | | .XXX[0xc] 0a4e 0006 0007 | | 0a50 0008 0009 | | 0a52 000a 000b | | 0a54 0004 0005 | | 0a56 000c 0001 | | 0a58 ; -------------------------------------------------------------------------------------- 0a58 ; Debug chain 0a58 ; -------------------------------------------------------------------------------------- 0a58 0002 000a | | .DBGLEN 0x0002,0x000a 0a5a 058b 058e | | .DBGLNO 0x058b,0x058e,0x0590,0x0595,0x0599,0x059e,0x05a4,0x05b1,0x05b4,0x05bc,0x05c0,0x05c4 0a66 0001 0002 | | .XXX[0xa] 0a68 0003 0005 | | 0a6a 0006 0007 | | 0a6c 0008 0009 | | 0a6e 000a 000b | | 0a70 ; -------------------------------------------------------------------------------------- 0a70 ; Debug chain 0a70 ; -------------------------------------------------------------------------------------- 0a70 0002 000a | | .DBGLEN 0x0002,0x000a 0a72 05cb 05ce | | .DBGLNO 0x05cb,0x05ce,0x05d0,0x05d5,0x05d9,0x05de,0x05e4,0x05f1,0x05f4,0x05fc,0x0600,0x0604 0a7e 0001 0002 | | .XXX[0xa] 0a80 0003 0005 | | 0a82 0006 0007 | | 0a84 0008 0009 | | 0a86 000a 000b | | 0a88 ; -------------------------------------------------------------------------------------- 0a88 ; Debug chain 0a88 ; -------------------------------------------------------------------------------------- 0a88 0002 0020 | | .DBGLEN 0x0002,0x0020 0a8a 060b 060e | | .DBGLNO 0x060b,0x060e,0x0610,0x0615,0x061a,0x061e,0x0622,0x0626,0x062d,0x0634,0x0637,0x063b,0x0645,0x0647,0x064b,0x0651,0x065e,0x0660,0x0662,0x0666,0x066b,0x0671,0x067e,0x0681,0x0689,0x068b,0x068f,0x0694,0x069a,0x06a7,0x06aa,0x06b2,0x06b6,0x06ba 0aac 0001 0002 | | .XXX[0x20] 0aae 0003 0004 | | 0ab0 0005 0006 | | 0ab2 0007 0008 | | 0ab4 0009 000b | | 0ab6 000c 000d | | 0ab8 000a 000e | | 0aba 000f 0010 | | 0abc 0011 0012 | | 0abe 0014 0015 | | 0ac0 0016 0017 | | 0ac2 0018 0019 | | 0ac4 001a 001c | | 0ac6 001d 001e | | 0ac8 001f 0020 | | 0aca 0021 0022 | ! "| 0acc ; -------------------------------------------------------------------------------------- 0acc ; Debug chain 0acc ; -------------------------------------------------------------------------------------- 0acc 0001 000a | | .DBGLEN 0x0001,0x000a 0ace 06c3 06c6 | | .DBGLNO 0x06c3,0x06c6,0x06cc,0x06cf,0x06da,0x06de,0x06e1,0x06e8,0x06f1,0x06f5,0x06f9 0ad9 0000 0000 | | .BLANK 0000[0x127]