|
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: 3072 (0xc00) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_09dc33
└─⟦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 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 04e0 | | .CONST 0x04e0 ; 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 0002 | | .CONST 0x0002 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0010 | | .CONST 0x0010 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0001 | | .CONST 0x0001 ; Number of locals 000b INIT_0008: 000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated 000d 00bf | | Action Accept_Activation 000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd 000f 00c7 | | Action Elaborate_Subprogram 0010 BODY_0008: 0010 00bc | | Action Signal_Activated 0011 00bb | | Action Signal_Completion 0012 0000 0000 | | .BLANK 0000[0x6] 0018 ; -------------------------------------------------------------------------------------- 0018 ; SUBPROGRAM 0018 ; -------------------------------------------------------------------------------------- 0018 0033 | 3 | .CONST 0x0033 ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 0002 | | .CONST 0x0002 ; Number of locals 001b INIT_0018: 001b 4800 |H | Short_Literal 0x0 001c 0093 004b | K| push_full_address INIT_0048 001e 02a0 | | Declare_Subprogram Null_Subprogram 001f 038e | | Declare_Type Package,Defined 0020 0387 | | Declare_Variable Package 0021 e001 | | Load 0x0,0x1 0022 e002 | | Load 0x0,0x2 0023 e003 | | Load 0x0,0x3 0024 e004 | | Load 0x0,0x4 0025 e005 | | Load 0x0,0x5 0026 e006 | | Load 0x0,0x6 0027 e007 | | Load 0x0,0x7 0028 e008 | | Load 0x0,0x8 0029 e009 | | Load 0x0,0x9 002a e00a | | Load 0x0,0xa 002b e00b | | Load 0x0,0xb 002c e00c | | Load 0x0,0xc 002d e00d | | Load 0x0,0xd 002e 480d |H | Short_Literal 0xd 002f e402 | | Load 0x2,0x2 0030 020e | | Execute Module,Augment_Imports 0031 00d8 | | Load_Top At_Offset_0 0032 020f | | Execute Module,Activate 0033 BODY_0018: 0033 4800 |H | Short_Literal 0x0 0034 e001 | | Load 0x0,0x1 0035 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0036 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0037 480b |H | Short_Literal 0xb 0038 e001 | | Load 0x0,0x1 0039 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 003a 181a | | Execute Package,Field_Execute,Field_Number 0x1a 003b e001 | | Load 0x0,0x1 003c 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 003d 181f | | Execute Package,Field_Execute,Field_Number 0x1f 003e 4804 |H | Short_Literal 0x4 003f e001 | | Load 0x0,0x1 0040 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0041 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0042 00d8 | | Load_Top At_Offset_0 0043 180d | | Execute Package,Field_Execute,Field_Number 0xd 0044 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0045 0000 0000 | | .XXX[0x3] 0047 0000 | | 0048 ; -------------------------------------------------------------------------------------- 0048 ; SUBPROGRAM 0048 ; -------------------------------------------------------------------------------------- 0048 01d4 | | .CONST 0x01d4 ; Address of begin 0049 0004 | | .CONST 0x0004 ; Address of exception handler 004a 002a | * | .CONST 0x002a ; Number of locals 004b INIT_0048: 004b 029a 01db | | Declare_Subprogram INIT_01d8,For_Outer_Call,Visible,Unelaborated 004d 00bf | | Action Accept_Activation 004e 029d 01f3 | | Declare_Subprogram INIT_01f0,For_Outer_Call 0050 e001 | | Load 0x0,0x1 0051 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 0052 1913 | | Execute Package,Field_Reference,Field_Number 0x13 0053 00c6 | | Action Check_Subprogram_Elaborated 0054 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0055 e002 | | Load 0x0,0x2 0056 e003 | | Load 0x0,0x3 0057 4800 |H | Short_Literal 0x0 0058 0007 | | Action Break_Optional 0059 029d 0213 | | Declare_Subprogram INIT_0210,For_Outer_Call 005b 029d 0223 | #| Declare_Subprogram INIT_0220,For_Outer_Call 005d 029d 0263 | c| Declare_Subprogram INIT_0260,For_Outer_Call 005f e001 | | Load 0x0,0x1 0060 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 0061 1913 | | Execute Package,Field_Reference,Field_Number 0x13 0062 00c6 | | Action Check_Subprogram_Elaborated 0063 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0064 e004 | | Load 0x0,0x4 0065 e005 | | Load 0x0,0x5 0066 4800 |H | Short_Literal 0x0 0067 0007 | | Action Break_Optional 0068 029d 027b | {| Declare_Subprogram INIT_0278,For_Outer_Call 006a 029d 028b | | Declare_Subprogram INIT_0288,For_Outer_Call 006c 029d 02cb | | Declare_Subprogram INIT_02c8,For_Outer_Call 006e e001 | | Load 0x0,0x1 006f 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 0070 1913 | | Execute Package,Field_Reference,Field_Number 0x13 0071 00c6 | | Action Check_Subprogram_Elaborated 0072 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 0073 e006 | | Load 0x0,0x6 0074 e007 | | Load 0x0,0x7 0075 4800 |H | Short_Literal 0x0 0076 0007 | | Action Break_Optional 0077 029d 02db | | Declare_Subprogram INIT_02d8,For_Outer_Call 0079 029d 02eb | | Declare_Subprogram INIT_02e8,For_Outer_Call 007b 029d 034b | K| Declare_Subprogram INIT_0348,For_Outer_Call 007d e001 | | Load 0x0,0x1 007e 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 007f 1912 | | Execute Package,Field_Reference,Field_Number 0x12 0080 00c6 | | Action Check_Subprogram_Elaborated 0081 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 0082 e008 | | Load 0x0,0x8 0083 e009 | | Load 0x0,0x9 0084 4800 |H | Short_Literal 0x0 0085 0007 | | Action Break_Optional 0086 029d 0353 | S| Declare_Subprogram INIT_0350,For_Outer_Call 0088 029d 0363 | c| Declare_Subprogram INIT_0360,For_Outer_Call 008a e00a | | Load 0x0,0xa 008b e00b | | Load 0x0,0xb 008c 0092 036c | l| Action Push_String_Extended,0x36c ; "BricAndBox" 008e e001 | | Load 0x0,0x1 008f 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0090 01c7 | | Execute Vector,Convert 0091 4801 |H | Short_Literal 0x1 0092 0092 036d | m| Action Push_String_Extended,0x36d ; "saisir " 0094 e001 | | Load 0x0,0x1 0095 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0096 01c7 | | Execute Vector,Convert 0097 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0098 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0099 0092 036e | n| Action Push_String_Extended,0x36e ; "tenir " 009b e001 | | Load 0x0,0x1 009c 1b11 | | Execute Package,Field_Read,Field_Number 0x11 009d 01c7 | | Execute Vector,Convert 009e 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 009f 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 00a0 0092 036f | o| Action Push_String_Extended,0x36f ; "caser " 00a2 e001 | | Load 0x0,0x1 00a3 1b11 | | Execute Package,Field_Read,Field_Number 0x11 00a4 01c7 | | Execute Vector,Convert 00a5 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 00a6 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 00a7 0092 0370 | p| Action Push_String_Extended,0x370 ; "arreter " 00a9 e001 | | Load 0x0,0x1 00aa 1b11 | | Execute Package,Field_Read,Field_Number 0x11 00ab 01c7 | | Execute Vector,Convert 00ac 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28 00ad 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29 00ae 0092 0371 | q| Action Push_String_Extended,0x371 ; "Rule number 05" 00b0 e001 | | Load 0x0,0x1 00b1 1b11 | | Execute Package,Field_Read,Field_Number 0x11 00b2 01c7 | | Execute Vector,Convert 00b3 e001 | | Load 0x0,0x1 00b4 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 00b5 190e | | Execute Package,Field_Reference,Field_Number 0xe 00b6 e001 | | Load 0x0,0x1 00b7 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 00b8 190f | | Execute Package,Field_Reference,Field_Number 0xf 00b9 0092 0372 | r| Action Push_String_Extended,0x372 ; "Rule number 06" 00bb e001 | | Load 0x0,0x1 00bc 1b11 | | Execute Package,Field_Read,Field_Number 0x11 00bd 01c7 | | Execute Vector,Convert 00be e001 | | Load 0x0,0x1 00bf 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 00c0 190e | | Execute Package,Field_Reference,Field_Number 0xe 00c1 e001 | | Load 0x0,0x1 00c2 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 00c3 190f | | Execute Package,Field_Reference,Field_Number 0xf 00c4 0092 0373 | s| Action Push_String_Extended,0x373 ; "Rule number 07" 00c6 e001 | | Load 0x0,0x1 00c7 1b11 | | Execute Package,Field_Read,Field_Number 0x11 00c8 01c7 | | Execute Vector,Convert 00c9 e001 | | Load 0x0,0x1 00ca 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 00cb 190e | | Execute Package,Field_Reference,Field_Number 0xe 00cc e001 | | Load 0x0,0x1 00cd 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 00ce 190f | | Execute Package,Field_Reference,Field_Number 0xf 00cf 0092 0374 | t| Action Push_String_Extended,0x374 ; "Rule number 08" 00d1 e001 | | Load 0x0,0x1 00d2 1b11 | | Execute Package,Field_Read,Field_Number 0x11 00d3 01c7 | | Execute Vector,Convert 00d4 e001 | | Load 0x0,0x1 00d5 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 00d6 190e | | Execute Package,Field_Reference,Field_Number 0xe 00d7 e001 | | Load 0x0,0x1 00d8 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 00d9 190f | | Execute Package,Field_Reference,Field_Number 0xf 00da 0092 0375 | u| Action Push_String_Extended,0x375 ; "Rule number 09" 00dc e001 | | Load 0x0,0x1 00dd 1b11 | | Execute Package,Field_Read,Field_Number 0x11 00de 01c7 | | Execute Vector,Convert 00df e001 | | Load 0x0,0x1 00e0 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 00e1 190e | | Execute Package,Field_Reference,Field_Number 0xe 00e2 e001 | | Load 0x0,0x1 00e3 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 00e4 190f | | Execute Package,Field_Reference,Field_Number 0xf 00e5 0092 0376 | v| Action Push_String_Extended,0x376 ; "Rule number 10" 00e7 e001 | | Load 0x0,0x1 00e8 1b11 | | Execute Package,Field_Read,Field_Number 0x11 00e9 01c7 | | Execute Vector,Convert 00ea e001 | | Load 0x0,0x1 00eb 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 00ec 190e | | Execute Package,Field_Reference,Field_Number 0xe 00ed e001 | | Load 0x0,0x1 00ee 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 00ef 190f | | Execute Package,Field_Reference,Field_Number 0xf 00f0 0092 0377 | w| Action Push_String_Extended,0x377 ; "Rule number 11" 00f2 e001 | | Load 0x0,0x1 00f3 1b11 | | Execute Package,Field_Read,Field_Number 0x11 00f4 01c7 | | Execute Vector,Convert 00f5 e001 | | Load 0x0,0x1 00f6 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 00f7 190e | | Execute Package,Field_Reference,Field_Number 0xe 00f8 e001 | | Load 0x0,0x1 00f9 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 00fa 190f | | Execute Package,Field_Reference,Field_Number 0xf 00fb 0092 0378 | x| Action Push_String_Extended,0x378 ; "Rule number 12" 00fd e001 | | Load 0x0,0x1 00fe 1b11 | | Execute Package,Field_Read,Field_Number 0x11 00ff 01c7 | | Execute Vector,Convert 0100 e001 | | Load 0x0,0x1 0101 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0102 190e | | Execute Package,Field_Reference,Field_Number 0xe 0103 e001 | | Load 0x0,0x1 0104 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0105 190f | | Execute Package,Field_Reference,Field_Number 0xf 0106 0092 0379 | y| Action Push_String_Extended,0x379 ; "Rule number 13" 0108 e001 | | Load 0x0,0x1 0109 1b11 | | Execute Package,Field_Read,Field_Number 0x11 010a 01c7 | | Execute Vector,Convert 010b e001 | | Load 0x0,0x1 010c 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 010d 190e | | Execute Package,Field_Reference,Field_Number 0xe 010e e001 | | Load 0x0,0x1 010f 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0110 190f | | Execute Package,Field_Reference,Field_Number 0xf 0111 0092 037a | z| Action Push_String_Extended,0x37a ; "Rule number 14" 0113 e001 | | Load 0x0,0x1 0114 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0115 01c7 | | Execute Vector,Convert 0116 e001 | | Load 0x0,0x1 0117 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0118 190e | | Execute Package,Field_Reference,Field_Number 0xe 0119 e001 | | Load 0x0,0x1 011a 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 011b 190f | | Execute Package,Field_Reference,Field_Number 0xf 011c 0092 037b | {| Action Push_String_Extended,0x37b ; "Rule number 15" 011e e001 | | Load 0x0,0x1 011f 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0120 01c7 | | Execute Vector,Convert 0121 e001 | | Load 0x0,0x1 0122 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0123 190e | | Execute Package,Field_Reference,Field_Number 0xe 0124 e001 | | Load 0x0,0x1 0125 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0126 190f | | Execute Package,Field_Reference,Field_Number 0xf 0127 0092 037c | || Action Push_String_Extended,0x37c ; "Rule number 16" 0129 e001 | | Load 0x0,0x1 012a 1b11 | | Execute Package,Field_Read,Field_Number 0x11 012b 01c7 | | Execute Vector,Convert 012c e001 | | Load 0x0,0x1 012d 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 012e 190e | | Execute Package,Field_Reference,Field_Number 0xe 012f e001 | | Load 0x0,0x1 0130 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0131 190f | | Execute Package,Field_Reference,Field_Number 0xf 0132 0092 037d | }| Action Push_String_Extended,0x37d ; "Rule number 17" 0134 e001 | | Load 0x0,0x1 0135 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0136 01c7 | | Execute Vector,Convert 0137 e001 | | Load 0x0,0x1 0138 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0139 190e | | Execute Package,Field_Reference,Field_Number 0xe 013a e001 | | Load 0x0,0x1 013b 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 013c 190f | | Execute Package,Field_Reference,Field_Number 0xf 013d 0092 037e | ~| Action Push_String_Extended,0x37e ; "Rule number 18" 013f e001 | | Load 0x0,0x1 0140 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0141 01c7 | | Execute Vector,Convert 0142 e001 | | Load 0x0,0x1 0143 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0144 190e | | Execute Package,Field_Reference,Field_Number 0xe 0145 e001 | | Load 0x0,0x1 0146 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0147 190f | | Execute Package,Field_Reference,Field_Number 0xf 0148 0092 037f | | Action Push_String_Extended,0x37f ; "Rule number 19" 014a e001 | | Load 0x0,0x1 014b 1b11 | | Execute Package,Field_Read,Field_Number 0x11 014c 01c7 | | Execute Vector,Convert 014d e001 | | Load 0x0,0x1 014e 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 014f 190e | | Execute Package,Field_Reference,Field_Number 0xe 0150 e001 | | Load 0x0,0x1 0151 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0152 190f | | Execute Package,Field_Reference,Field_Number 0xf 0153 0092 0380 | | Action Push_String_Extended,0x380 ; "Rule number 20" 0155 e001 | | Load 0x0,0x1 0156 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0157 01c7 | | Execute Vector,Convert 0158 e001 | | Load 0x0,0x1 0159 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 015a 190e | | Execute Package,Field_Reference,Field_Number 0xe 015b e001 | | Load 0x0,0x1 015c 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 015d 190f | | Execute Package,Field_Reference,Field_Number 0xf 015e 0092 0381 | | Action Push_String_Extended,0x381 ; "Rule number 21" 0160 e001 | | Load 0x0,0x1 0161 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0162 01c7 | | Execute Vector,Convert 0163 e001 | | Load 0x0,0x1 0164 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0165 190e | | Execute Package,Field_Reference,Field_Number 0xe 0166 e001 | | Load 0x0,0x1 0167 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0168 190f | | Execute Package,Field_Reference,Field_Number 0xf 0169 0092 0382 | | Action Push_String_Extended,0x382 ; "Rule number 22" 016b e001 | | Load 0x0,0x1 016c 1b11 | | Execute Package,Field_Read,Field_Number 0x11 016d 01c7 | | Execute Vector,Convert 016e e001 | | Load 0x0,0x1 016f 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0170 190e | | Execute Package,Field_Reference,Field_Number 0xe 0171 e001 | | Load 0x0,0x1 0172 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0173 190f | | Execute Package,Field_Reference,Field_Number 0xf 0174 0092 0383 | | Action Push_String_Extended,0x383 ; "Rule number 23" 0176 e001 | | Load 0x0,0x1 0177 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0178 01c7 | | Execute Vector,Convert 0179 e001 | | Load 0x0,0x1 017a 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 017b 190e | | Execute Package,Field_Reference,Field_Number 0xe 017c e001 | | Load 0x0,0x1 017d 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 017e 190f | | Execute Package,Field_Reference,Field_Number 0xf 017f 0092 0384 | | Action Push_String_Extended,0x384 ; "Rule number 24" 0181 e001 | | Load 0x0,0x1 0182 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0183 01c7 | | Execute Vector,Convert 0184 e001 | | Load 0x0,0x1 0185 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0186 190e | | Execute Package,Field_Reference,Field_Number 0xe 0187 e001 | | Load 0x0,0x1 0188 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0189 190f | | Execute Package,Field_Reference,Field_Number 0xf 018a 0092 0385 | | Action Push_String_Extended,0x385 ; "Rule number 25" 018c e001 | | Load 0x0,0x1 018d 1b11 | | Execute Package,Field_Read,Field_Number 0x11 018e 01c7 | | Execute Vector,Convert 018f e001 | | Load 0x0,0x1 0190 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0191 190e | | Execute Package,Field_Reference,Field_Number 0xe 0192 e001 | | Load 0x0,0x1 0193 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0194 190f | | Execute Package,Field_Reference,Field_Number 0xf 0195 0092 0386 | | Action Push_String_Extended,0x386 ; "Rule number 26" 0197 e001 | | Load 0x0,0x1 0198 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0199 01c7 | | Execute Vector,Convert 019a e001 | | Load 0x0,0x1 019b 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 019c 190e | | Execute Package,Field_Reference,Field_Number 0xe 019d e001 | | Load 0x0,0x1 019e 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 019f 190f | | Execute Package,Field_Reference,Field_Number 0xf 01a0 0092 0387 | | Action Push_String_Extended,0x387 ; "Rule number 27" 01a2 e001 | | Load 0x0,0x1 01a3 1b11 | | Execute Package,Field_Read,Field_Number 0x11 01a4 01c7 | | Execute Vector,Convert 01a5 e001 | | Load 0x0,0x1 01a6 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 01a7 190e | | Execute Package,Field_Reference,Field_Number 0xe 01a8 e001 | | Load 0x0,0x1 01a9 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 01aa 190f | | Execute Package,Field_Reference,Field_Number 0xf 01ab 0092 0388 | | Action Push_String_Extended,0x388 ; "Rule number 28" 01ad e001 | | Load 0x0,0x1 01ae 1b11 | | Execute Package,Field_Read,Field_Number 0x11 01af 01c7 | | Execute Vector,Convert 01b0 e001 | | Load 0x0,0x1 01b1 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 01b2 190e | | Execute Package,Field_Reference,Field_Number 0xe 01b3 e001 | | Load 0x0,0x1 01b4 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 01b5 190f | | Execute Package,Field_Reference,Field_Number 0xf 01b6 0092 0389 | | Action Push_String_Extended,0x389 ; "Rule number 29" 01b8 e001 | | Load 0x0,0x1 01b9 1b11 | | Execute Package,Field_Read,Field_Number 0x11 01ba 01c7 | | Execute Vector,Convert 01bb e001 | | Load 0x0,0x1 01bc 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 01bd 190e | | Execute Package,Field_Reference,Field_Number 0xe 01be e001 | | Load 0x0,0x1 01bf 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 01c0 190f | | Execute Package,Field_Reference,Field_Number 0xf 01c1 0092 038a | | Action Push_String_Extended,0x38a ; "Rule number 30" 01c3 e001 | | Load 0x0,0x1 01c4 1b11 | | Execute Package,Field_Read,Field_Number 0x11 01c5 01c7 | | Execute Vector,Convert 01c6 e001 | | Load 0x0,0x1 01c7 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 01c8 190e | | Execute Package,Field_Reference,Field_Number 0xe 01c9 e001 | | Load 0x0,0x1 01ca 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 01cb 190f | | Execute Package,Field_Reference,Field_Number 0xf 01cc 4804 |H | Short_Literal 0x4 01cd e001 | | Load 0x0,0x1 01ce 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 01cf 0387 | | Declare_Variable Package 01d0 00d8 | | Load_Top At_Offset_0 01d1 020f | | Execute Module,Activate 01d2 1d0d | | Execute_Immediate Reference_Lex_1,0xd 01d3 00c7 | | Action Elaborate_Subprogram 01d4 BODY_0048: 01d4 00bc | | Action Signal_Activated 01d5 00bb | | Action Signal_Completion 01d6 0000 0000 | | .XXX[0x2] 01d8 ; -------------------------------------------------------------------------------------- 01d8 ; SUBPROGRAM 01d8 ; -------------------------------------------------------------------------------------- 01d8 01dc | | .CONST 0x01dc ; Address of begin 01d9 0004 | | .CONST 0x0004 ; Address of exception handler 01da 0002 | | .CONST 0x0002 ; Number of locals 01db INIT_01d8: 01db 00e1 | | Load_Encached Boolean_Cache 01dc BODY_01d8: 01dc 0092 038b | | Action Push_String_Extended,0x38b ; "-------------------------------------------------" 01de e001 | | Load 0x0,0x1 01df 181c | | Execute Package,Field_Execute,Field_Number 0x1c 01e0 e00c | | Load 0x0,0xc 01e1 181b | | Execute Package,Field_Execute,Field_Number 0x1b 01e2 e00d | | Load 0x0,0xd 01e3 1819 | | Execute Package,Field_Execute,Field_Number 0x19 01e4 4800 |H | Short_Literal 0x0 01e5 e22a | * | Load 0x1,0x2a 01e6 186c | l | Execute Package,Field_Execute,Field_Number 0x6c 01e7 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 01e8 0092 038b | | Action Push_String_Extended,0x38b ; "-------------------------------------------------" 01ea e001 | | Load 0x0,0x1 01eb 181c | | Execute Package,Field_Execute,Field_Number 0x1c 01ec 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01ed 0000 0000 | | .XXX[0x3] 01ef 0000 | | 01f0 ; -------------------------------------------------------------------------------------- 01f0 ; SUBPROGRAM 01f0 ; -------------------------------------------------------------------------------------- 01f0 01f3 | | .CONST 0x01f3 ; Address of begin 01f1 0004 | | .CONST 0x0004 ; Address of exception handler 01f2 0001 | | .CONST 0x0001 ; Number of locals 01f3 BODY_01f0: 01f3 INIT_01f0: 01f3 4800 |H | Short_Literal 0x0 01f4 00db | | Load_Top At_Offset_3 01f5 e00c | | Load 0x0,0xc 01f6 1816 | | Execute Package,Field_Execute,Field_Number 0x16 01f7 6811 |h | Jump_Zero 0x209 01f8 00da | | Load_Top At_Offset_2 01f9 e00c | | Load 0x0,0xc 01fa 1815 | | Execute Package,Field_Execute,Field_Number 0x15 01fb 700b |p | Jump_Nonzero 0x207 01fc 4800 |H | Short_Literal 0x0 01fd e5fe | | Load 0x2,-0x2 01fe e00d | | Load 0x0,0xd 01ff 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0200 6804 |h | Jump_Zero 0x205 0201 00db | | Load_Top At_Offset_3 0202 e00d | | Load 0x0,0xd 0203 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0204 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0205 4800 |H | Short_Literal 0x0 0206 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0207 4800 |H | Short_Literal 0x0 0208 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0209 4800 |H | Short_Literal 0x0 020a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 020b 0000 0000 | | .BLANK 0000[0x5] 0210 ; -------------------------------------------------------------------------------------- 0210 ; SUBPROGRAM 0210 ; -------------------------------------------------------------------------------------- 0210 0213 | | .CONST 0x0213 ; Address of begin 0211 0004 | | .CONST 0x0004 ; Address of exception handler 0212 0001 | | .CONST 0x0001 ; Number of locals 0213 BODY_0210: 0213 INIT_0210: 0213 4801 |H | Short_Literal 0x1 0214 e00d | | Load 0x0,0xd 0215 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0216 e00c | | Load 0x0,0xc 0217 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0218 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0219 1d10 | | Execute_Immediate Reference_Lex_1,0x10 021a e001 | | Load 0x0,0x1 021b 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 021c 1813 | | Execute Package,Field_Execute,Field_Number 0x13 021d 00ca | | Action Exit_Nullary_Function 021e 0000 0000 | | .XXX[0x2] 0220 ; -------------------------------------------------------------------------------------- 0220 ; SUBPROGRAM 0220 ; -------------------------------------------------------------------------------------- 0220 022d | - | .CONST 0x022d ; Address of begin 0221 0004 | | .CONST 0x0004 ; Address of exception handler 0222 0003 | | .CONST 0x0003 ; Number of locals 0223 INIT_0220: 0223 e001 | | Load 0x0,0x1 0224 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0225 02c7 | | Declare_Variable Any 0226 00d8 | | Load_Top At_Offset_0 0227 1c00 | | Execute_Immediate Run_Utility,0x0 0228 e001 | | Load 0x0,0x1 0229 1b0d | | Execute Package,Field_Read,Field_Number 0xd 022a 02c7 | | Declare_Variable Any 022b 00d8 | | Load_Top At_Offset_0 022c 1c00 | | Execute_Immediate Run_Utility,0x0 022d BODY_0220: 022d e5ff | | Load 0x2,-0x1 022e e001 | | Load 0x0,0x1 022f 1b20 | | Execute Package,Field_Read,Field_Number 0x20 0230 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0231 c402 | | Store 0x2,0x2 0232 e5ff | | Load 0x2,-0x1 0233 e001 | | Load 0x0,0x1 0234 1b20 | | Execute Package,Field_Read,Field_Number 0x20 0235 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0236 c403 | | Store 0x2,0x3 0237 4801 |H | Short_Literal 0x1 0238 00d9 | | Load_Top At_Offset_1 0239 e00d | | Load 0x0,0xd 023a 1817 | | Execute Package,Field_Execute,Field_Number 0x17 023b 4801 |H | Short_Literal 0x1 023c 00da | | Load_Top At_Offset_2 023d e00c | | Load 0x0,0xc 023e 1817 | | Execute Package,Field_Execute,Field_Number 0x17 023f 0092 038c | | Action Push_String_Extended,0x38c ; "RegleSaisir : " 0241 00da | | Load_Top At_Offset_2 0242 e00c | | Load 0x0,0xc 0243 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0244 01cc | | Execute Vector,Catenate 0245 0092 038d | | Action Push_String_Extended,0x38d ; " prend brique (" 0247 01cc | | Execute Vector,Catenate 0248 00d9 | | Load_Top At_Offset_1 0249 e00d | | Load 0x0,0xd 024a 1814 | | Execute Package,Field_Execute,Field_Number 0x14 024b 00e0 | | Load_Encached Standard_Cache 024c 1818 | | Execute Package,Field_Execute,Field_Number 0x18 024d 01cc | | Execute Vector,Catenate 024e 0092 038e | | Action Push_String_Extended,0x38e ; " / " 0250 01cc | | Execute Vector,Catenate 0251 00d9 | | Load_Top At_Offset_1 0252 e00d | | Load 0x0,0xd 0253 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0254 e00d | | Load 0x0,0xd 0255 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0256 011c | | Execute Any,Convert_Unchecked 0257 1c01 | | Execute_Immediate Run_Utility,0x1 0258 01cc | | Execute Vector,Catenate 0259 0092 038f | | Action Push_String_Extended,0x38f ; ")" 025b 01cc | | Execute Vector,Catenate 025c e001 | | Load 0x0,0x1 025d 181c | | Execute Package,Field_Execute,Field_Number 0x1c 025e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 025f 0000 | | .XXX[0x1] 0260 ; -------------------------------------------------------------------------------------- 0260 ; SUBPROGRAM 0260 ; -------------------------------------------------------------------------------------- 0260 0263 | c | .CONST 0x0263 ; Address of begin 0261 0004 | | .CONST 0x0004 ; Address of exception handler 0262 0001 | | .CONST 0x0001 ; Number of locals 0263 BODY_0260: 0263 INIT_0260: 0263 4800 |H | Short_Literal 0x0 0264 00db | | Load_Top At_Offset_3 0265 e00c | | Load 0x0,0xc 0266 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0267 680b |h | Jump_Zero 0x273 0268 00da | | Load_Top At_Offset_2 0269 e00c | | Load 0x0,0xc 026a 1815 | | Execute Package,Field_Execute,Field_Number 0x15 026b 6805 |h | Jump_Zero 0x271 026c 4801 |H | Short_Literal 0x1 026d e5fe | | Load 0x2,-0x2 026e e00d | | Load 0x0,0xd 026f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0270 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0271 4800 |H | Short_Literal 0x0 0272 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0273 4800 |H | Short_Literal 0x0 0274 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0275 0000 0000 | | .XXX[0x3] 0277 0000 | | 0278 ; -------------------------------------------------------------------------------------- 0278 ; SUBPROGRAM 0278 ; -------------------------------------------------------------------------------------- 0278 027b | { | .CONST 0x027b ; Address of begin 0279 0004 | | .CONST 0x0004 ; Address of exception handler 027a 0001 | | .CONST 0x0001 ; Number of locals 027b BODY_0278: 027b INIT_0278: 027b 4801 |H | Short_Literal 0x1 027c e00d | | Load 0x0,0xd 027d 1812 | | Execute Package,Field_Execute,Field_Number 0x12 027e e00c | | Load 0x0,0xc 027f 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0280 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0281 1d17 | | Execute_Immediate Reference_Lex_1,0x17 0282 e001 | | Load 0x0,0x1 0283 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 0284 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0285 00ca | | Action Exit_Nullary_Function 0286 0000 0000 | | .XXX[0x2] 0288 ; -------------------------------------------------------------------------------------- 0288 ; SUBPROGRAM 0288 ; -------------------------------------------------------------------------------------- 0288 0295 | | .CONST 0x0295 ; Address of begin 0289 0004 | | .CONST 0x0004 ; Address of exception handler 028a 0003 | | .CONST 0x0003 ; Number of locals 028b INIT_0288: 028b e001 | | Load 0x0,0x1 028c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 028d 02c7 | | Declare_Variable Any 028e 00d8 | | Load_Top At_Offset_0 028f 1c00 | | Execute_Immediate Run_Utility,0x0 0290 e001 | | Load 0x0,0x1 0291 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0292 02c7 | | Declare_Variable Any 0293 00d8 | | Load_Top At_Offset_0 0294 1c00 | | Execute_Immediate Run_Utility,0x0 0295 BODY_0288: 0295 e5ff | | Load 0x2,-0x1 0296 e001 | | Load 0x0,0x1 0297 1b20 | | Execute Package,Field_Read,Field_Number 0x20 0298 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0299 c402 | | Store 0x2,0x2 029a e5ff | | Load 0x2,-0x1 029b e001 | | Load 0x0,0x1 029c 1b20 | | Execute Package,Field_Read,Field_Number 0x20 029d 1814 | | Execute Package,Field_Execute,Field_Number 0x14 029e c403 | | Store 0x2,0x3 029f 4801 |H | Short_Literal 0x1 02a0 00da | | Load_Top At_Offset_2 02a1 e00c | | Load 0x0,0xc 02a2 1818 | | Execute Package,Field_Execute,Field_Number 0x18 02a3 0092 0390 | | Action Push_String_Extended,0x390 ; "RegleTenir : " 02a5 00da | | Load_Top At_Offset_2 02a6 e00c | | Load 0x0,0xc 02a7 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02a8 01cc | | Execute Vector,Catenate 02a9 0092 0391 | | Action Push_String_Extended,0x391 ; " tient brique (" 02ab 01cc | | Execute Vector,Catenate 02ac 00d9 | | Load_Top At_Offset_1 02ad e00d | | Load 0x0,0xd 02ae 1814 | | Execute Package,Field_Execute,Field_Number 0x14 02af 00e0 | | Load_Encached Standard_Cache 02b0 1818 | | Execute Package,Field_Execute,Field_Number 0x18 02b1 01cc | | Execute Vector,Catenate 02b2 0092 038e | | Action Push_String_Extended,0x38e ; " / " 02b4 01cc | | Execute Vector,Catenate 02b5 00d9 | | Load_Top At_Offset_1 02b6 e00d | | Load 0x0,0xd 02b7 1815 | | Execute Package,Field_Execute,Field_Number 0x15 02b8 e00d | | Load 0x0,0xd 02b9 1b0e | | Execute Package,Field_Read,Field_Number 0xe 02ba 011c | | Execute Any,Convert_Unchecked 02bb 1c01 | | Execute_Immediate Run_Utility,0x1 02bc 01cc | | Execute Vector,Catenate 02bd 0092 038f | | Action Push_String_Extended,0x38f ; ")" 02bf 01cc | | Execute Vector,Catenate 02c0 e001 | | Load 0x0,0x1 02c1 181c | | Execute Package,Field_Execute,Field_Number 0x1c 02c2 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02c3 0000 0000 | | .BLANK 0000[0x5] 02c8 ; -------------------------------------------------------------------------------------- 02c8 ; SUBPROGRAM 02c8 ; -------------------------------------------------------------------------------------- 02c8 02cb | | .CONST 0x02cb ; Address of begin 02c9 0004 | | .CONST 0x0004 ; Address of exception handler 02ca 0001 | | .CONST 0x0001 ; Number of locals 02cb BODY_02c8: 02cb INIT_02c8: 02cb 4801 |H | Short_Literal 0x1 02cc 00db | | Load_Top At_Offset_3 02cd e00c | | Load 0x0,0xc 02ce 1816 | | Execute Package,Field_Execute,Field_Number 0x16 02cf 6805 |h | Jump_Zero 0x2d5 02d0 4801 |H | Short_Literal 0x1 02d1 e5fe | | Load 0x2,-0x2 02d2 e00d | | Load 0x0,0xd 02d3 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02d4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 02d5 4800 |H | Short_Literal 0x0 02d6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 02d7 0000 | | .XXX[0x1] 02d8 ; -------------------------------------------------------------------------------------- 02d8 ; SUBPROGRAM 02d8 ; -------------------------------------------------------------------------------------- 02d8 02db | | .CONST 0x02db ; Address of begin 02d9 0004 | | .CONST 0x0004 ; Address of exception handler 02da 0001 | | .CONST 0x0001 ; Number of locals 02db BODY_02d8: 02db INIT_02d8: 02db 4801 |H | Short_Literal 0x1 02dc e00d | | Load 0x0,0xd 02dd 1812 | | Execute Package,Field_Execute,Field_Number 0x12 02de e00c | | Load 0x0,0xc 02df 1811 | | Execute Package,Field_Execute,Field_Number 0x11 02e0 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 02e1 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 02e2 e001 | | Load 0x0,0x1 02e3 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 02e4 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02e5 00ca | | Action Exit_Nullary_Function 02e6 0000 0000 | | .XXX[0x2] 02e8 ; -------------------------------------------------------------------------------------- 02e8 ; SUBPROGRAM 02e8 ; -------------------------------------------------------------------------------------- 02e8 02f5 | | .CONST 0x02f5 ; Address of begin 02e9 0004 | | .CONST 0x0004 ; Address of exception handler 02ea 0003 | | .CONST 0x0003 ; Number of locals 02eb INIT_02e8: 02eb e001 | | Load 0x0,0x1 02ec 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02ed 02c7 | | Declare_Variable Any 02ee 00d8 | | Load_Top At_Offset_0 02ef 1c00 | | Execute_Immediate Run_Utility,0x0 02f0 e001 | | Load 0x0,0x1 02f1 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02f2 02c7 | | Declare_Variable Any 02f3 00d8 | | Load_Top At_Offset_0 02f4 1c00 | | Execute_Immediate Run_Utility,0x0 02f5 BODY_02e8: 02f5 e5ff | | Load 0x2,-0x1 02f6 e001 | | Load 0x0,0x1 02f7 1b20 | | Execute Package,Field_Read,Field_Number 0x20 02f8 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02f9 c403 | | Store 0x2,0x3 02fa e5ff | | Load 0x2,-0x1 02fb e001 | | Load 0x0,0x1 02fc 1b20 | | Execute Package,Field_Read,Field_Number 0x20 02fd 1814 | | Execute Package,Field_Execute,Field_Number 0x14 02fe c402 | | Store 0x2,0x2 02ff 4800 |H | Short_Literal 0x0 0300 00d9 | | Load_Top At_Offset_1 0301 e00c | | Load 0x0,0xc 0302 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0303 e00c | | Load 0x0,0xc 0304 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0305 00d9 | | Load_Top At_Offset_1 0306 e00c | | Load 0x0,0xc 0307 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0308 4802 |H | Short_Literal 0x2 0309 00da | | Load_Top At_Offset_2 030a e00d | | Load 0x0,0xd 030b 1817 | | Execute Package,Field_Execute,Field_Number 0x17 030c 00d8 | | Load_Top At_Offset_0 030d e00c | | Load 0x0,0xc 030e 1814 | | Execute Package,Field_Execute,Field_Number 0x14 030f 00da | | Load_Top At_Offset_2 0310 e00d | | Load 0x0,0xd 0311 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0312 0092 0392 | | Action Push_String_Extended,0x392 ; "RegleCaser : " 0314 00d9 | | Load_Top At_Offset_1 0315 e00c | | Load 0x0,0xc 0316 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0317 01cc | | Execute Vector,Catenate 0318 0092 0393 | | Action Push_String_Extended,0x393 ; " depose brique (" 031a 01cc | | Execute Vector,Catenate 031b 00da | | Load_Top At_Offset_2 031c e00d | | Load 0x0,0xd 031d 1814 | | Execute Package,Field_Execute,Field_Number 0x14 031e 00e0 | | Load_Encached Standard_Cache 031f 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0320 01cc | | Execute Vector,Catenate 0321 0092 038e | | Action Push_String_Extended,0x38e ; " / " 0323 01cc | | Execute Vector,Catenate 0324 00da | | Load_Top At_Offset_2 0325 e00d | | Load 0x0,0xd 0326 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0327 e00d | | Load 0x0,0xd 0328 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0329 011c | | Execute Any,Convert_Unchecked 032a 1c01 | | Execute_Immediate Run_Utility,0x1 032b 01cc | | Execute Vector,Catenate 032c 0092 038f | | Action Push_String_Extended,0x38f ; ")" 032e 01cc | | Execute Vector,Catenate 032f 0092 0394 | | Action Push_String_Extended,0x394 ; " dans case " 0331 01cc | | Execute Vector,Catenate 0332 00d9 | | Load_Top At_Offset_1 0333 e00c | | Load 0x0,0xc 0334 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0335 00e0 | | Load_Encached Standard_Cache 0336 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0337 01cc | | Execute Vector,Catenate 0338 e001 | | Load 0x0,0x1 0339 181c | | Execute Package,Field_Execute,Field_Number 0x1c 033a 0092 0395 | | Action Push_String_Extended,0x395 ; " " 033c e001 | | Load 0x0,0x1 033d 181c | | Execute Package,Field_Execute,Field_Number 0x1c 033e 4800 |H | Short_Literal 0x0 033f 00d9 | | Load_Top At_Offset_1 0340 e00c | | Load 0x0,0xc 0341 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0342 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0343 0000 0000 | | .BLANK 0000[0x5] 0348 ; -------------------------------------------------------------------------------------- 0348 ; SUBPROGRAM 0348 ; -------------------------------------------------------------------------------------- 0348 034b | K | .CONST 0x034b ; Address of begin 0349 0004 | | .CONST 0x0004 ; Address of exception handler 034a 0001 | | .CONST 0x0001 ; Number of locals 034b BODY_0348: 034b INIT_0348: 034b 4800 |H | Short_Literal 0x0 034c 00db | | Load_Top At_Offset_3 034d e00d | | Load 0x0,0xd 034e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 034f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0350 ; -------------------------------------------------------------------------------------- 0350 ; SUBPROGRAM 0350 ; -------------------------------------------------------------------------------------- 0350 0353 | S | .CONST 0x0353 ; Address of begin 0351 0004 | | .CONST 0x0004 ; Address of exception handler 0352 0001 | | .CONST 0x0001 ; Number of locals 0353 BODY_0350: 0353 INIT_0350: 0353 4801 |H | Short_Literal 0x1 0354 e00c | | Load 0x0,0xc 0355 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0356 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 0357 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 0358 e001 | | Load 0x0,0x1 0359 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 035a 1812 | | Execute Package,Field_Execute,Field_Number 0x12 035b 00ca | | Action Exit_Nullary_Function 035c 0000 0000 | | .BLANK 0000[0x4] 0360 ; -------------------------------------------------------------------------------------- 0360 ; SUBPROGRAM 0360 ; -------------------------------------------------------------------------------------- 0360 0363 | c | .CONST 0x0363 ; Address of begin 0361 0004 | | .CONST 0x0004 ; Address of exception handler 0362 0001 | | .CONST 0x0001 ; Number of locals 0363 BODY_0360: 0363 INIT_0360: 0363 0092 0396 | | Action Push_String_Extended,0x396 ; "RegleArreter : Fin de recherche" 0365 e001 | | Load 0x0,0x1 0366 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0367 0092 0395 | | Action Push_String_Extended,0x395 ; " " 0369 e001 | | Load 0x0,0x1 036a 181c | | Execute Package,Field_Execute,Field_Number 0x1c 036b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 036c ; -------------------------------------------------------------------------------------- 036c ; STRING TABLE 036c ; -------------------------------------------------------------------------------------- 036c 0058 | X | .STRTAB 0x0058->0x0398 ; "BricAndBox" 036d 0060 | ` | .STRTAB 0x0060->0x039d ; "saisir " 036e 006d | m | .STRTAB 0x006d->0x03a4 ; "tenir " 036f 007a | z | .STRTAB 0x007a->0x03ac ; "caser " 0370 0087 | | .STRTAB 0x0087->0x03b3 ; "arreter " 0371 0094 | | .STRTAB 0x0094->0x03bb ; "Rule number 05" 0372 00a1 | | .STRTAB 0x00a1->0x03c2 ; "Rule number 06" 0373 00ae | | .STRTAB 0x00ae->0x03ca ; "Rule number 07" 0374 00bb | | .STRTAB 0x00bb->0x03d1 ; "Rule number 08" 0375 00c8 | | .STRTAB 0x00c8->0x03d9 ; "Rule number 09" 0376 00d5 | | .STRTAB 0x00d5->0x03e0 ; "Rule number 10" 0377 00e2 | | .STRTAB 0x00e2->0x03e8 ; "Rule number 11" 0378 00ef | | .STRTAB 0x00ef->0x03ef ; "Rule number 12" 0379 00fc | | .STRTAB 0x00fc->0x03f7 ; "Rule number 13" 037a 0109 | | .STRTAB 0x0109->0x03fe ; "Rule number 14" 037b 0116 | | .STRTAB 0x0116->0x0406 ; "Rule number 15" 037c 0123 | # | .STRTAB 0x0123->0x040d ; "Rule number 16" 037d 0130 | 0 | .STRTAB 0x0130->0x0415 ; "Rule number 17" 037e 013d | = | .STRTAB 0x013d->0x041c ; "Rule number 18" 037f 014a | J | .STRTAB 0x014a->0x0424 ; "Rule number 19" 0380 0157 | W | .STRTAB 0x0157->0x042b ; "Rule number 20" 0381 0164 | d | .STRTAB 0x0164->0x0433 ; "Rule number 21" 0382 0171 | q | .STRTAB 0x0171->0x043a ; "Rule number 22" 0383 017e | ~ | .STRTAB 0x017e->0x0442 ; "Rule number 23" 0384 018b | | .STRTAB 0x018b->0x0449 ; "Rule number 24" 0385 0198 | | .STRTAB 0x0198->0x0451 ; "Rule number 25" 0386 01a5 | | .STRTAB 0x01a5->0x0458 ; "Rule number 26" 0387 01b2 | | .STRTAB 0x01b2->0x0460 ; "Rule number 27" 0388 01bf | | .STRTAB 0x01bf->0x0467 ; "Rule number 28" 0389 01cc | | .STRTAB 0x01cc->0x046f ; "Rule number 29" 038a 01d9 | | .STRTAB 0x01d9->0x0476 ; "Rule number 30" 038b 01e6 | | .STRTAB 0x01e6->0x047e ; "-------------------------------------------------" 038c 0215 | | .STRTAB 0x0215->0x0496 ; "RegleSaisir : " 038d 0222 | " | .STRTAB 0x0222->0x049e ; " prend brique (" 038e 022f | / | .STRTAB 0x022f->0x04a5 ; " / " 038f 0230 | 0 | .STRTAB 0x0230->0x04a7 ; ")" 0390 022f | / | .STRTAB 0x022f->0x04a7 ; "RegleTenir : " 0391 023c | < | .STRTAB 0x023c->0x04af ; " tient brique (" 0392 0249 | I | .STRTAB 0x0249->0x04b6 ; "RegleCaser : " 0393 0256 | V | .STRTAB 0x0256->0x04be ; " depose brique (" 0394 0264 | d | .STRTAB 0x0264->0x04c6 ; " dans case " 0395 026d | m | .STRTAB 0x026d->0x04cb ; " " 0396 026c | l | .STRTAB 0x026c->0x04cc ; "RegleArreter : Fin de recherche" 0397 0289 | | .STREND 0x0289->0x04db 0398 4272 6963 |Bric| .STRTAB_STRINGS 04dc 0000 0000 | | .BLANK 0000[0x4] 04e0 ; -------------------------------------------------------------------------------------- 04e0 ; Debug Table 04e0 ; -------------------------------------------------------------------------------------- 04e0 0004 0001 | | .DEBUG4 0x0004,0x0001,0x8a14,0x0000,0x0001,0x0011 04e6 000b 0000 | | .DBG4T 0x000b,0x0000,0x8000,0x0000 04ea 001b 052a | *| .DBG4T 0x001b,0x052a,0x8001,0x0000 04ee 004b 0533 | K 3| .DBG4T 0x004b,0x0533,0x0000,0x0000 04f2 004e 0536 | N 6| .DBG4T 0x004e,0x0536,0x0000,0x0000 04f6 01db 054a | J| .DBG4T 0x01db,0x054a,0x0001,0x0000 04fa 01f3 0552 | R| .DBG4T 0x01f3,0x0552,0x0002,0x0000 04fe 0213 0555 | U| .DBG4T 0x0213,0x0555,0x0002,0x0000 0502 0223 0558 | # X| .DBG4T 0x0223,0x0558,0x0001,0x0000 0506 0263 0560 | c `| .DBG4T 0x0263,0x0560,0x0002,0x0000 050a 027b 0563 | { c| .DBG4T 0x027b,0x0563,0x0002,0x0000 050e 028b 0566 | f| .DBG4T 0x028b,0x0566,0x0001,0x0000 0512 02cb 056d | m| .DBG4T 0x02cb,0x056d,0x0002,0x0000 0516 02db 0570 | p| .DBG4T 0x02db,0x0570,0x0002,0x0000 051a 02eb 0573 | s| .DBG4T 0x02eb,0x0573,0x0001,0x0000 051e 034b 057f | K | .DBG4T 0x034b,0x057f,0x0002,0x0000 0522 0353 0582 | S | .DBG4T 0x0353,0x0582,0x0002,0x0000 0526 0363 0585 | c | .DBG4T 0x0363,0x0585,0x0001,0x0000 052a ; -------------------------------------------------------------------------------------- 052a ; Debug chain 052a ; -------------------------------------------------------------------------------------- 052a 0002 0005 | | .DBGLEN 0x0002,0x0005 052c 001b 0021 | !| .DBGLNO 0x001b,0x0021,0x0033,0x0037,0x003b,0x003e,0x0042 0533 ; -------------------------------------------------------------------------------------- 0533 ; Debug chain 0533 ; -------------------------------------------------------------------------------------- 0533 0001 0000 | | .DBGLEN 0x0001,0x0000 0535 004b | K | .DBGLNO 0x004b 0536 ; -------------------------------------------------------------------------------------- 0536 ; Debug chain 0536 ; -------------------------------------------------------------------------------------- 0536 0012 0000 | | .DBGLEN 0x0012,0x0000 0538 004e 0050 | N P| .DBGLNO 0x004e,0x0050,0x0059,0x005b,0x005d,0x005f,0x0068,0x006a,0x006c,0x006e,0x0077,0x0079,0x007b,0x007d,0x0086,0x0088,0x008a,0x01d2 054a ; -------------------------------------------------------------------------------------- 054a ; Debug chain 054a ; -------------------------------------------------------------------------------------- 054a 0001 0005 | | .DBGLEN 0x0001,0x0005 054c 01db 01dc | | .DBGLNO 0x01db,0x01dc,0x01e0,0x01e2,0x01e4,0x01e8 0552 ; -------------------------------------------------------------------------------------- 0552 ; Debug chain 0552 ; -------------------------------------------------------------------------------------- 0552 0000 0001 | | .DBGLEN 0x0000,0x0001 0554 01f3 | | .DBGLNO 0x01f3 0555 ; -------------------------------------------------------------------------------------- 0555 ; Debug chain 0555 ; -------------------------------------------------------------------------------------- 0555 0000 0001 | | .DBGLEN 0x0000,0x0001 0557 0213 | | .DBGLNO 0x0213 0558 ; -------------------------------------------------------------------------------------- 0558 ; Debug chain 0558 ; -------------------------------------------------------------------------------------- 0558 0001 0005 | | .DBGLEN 0x0001,0x0005 055a 0223 022d | # -| .DBGLNO 0x0223,0x022d,0x0232,0x0237,0x023b,0x023f 0560 ; -------------------------------------------------------------------------------------- 0560 ; Debug chain 0560 ; -------------------------------------------------------------------------------------- 0560 0000 0001 | | .DBGLEN 0x0000,0x0001 0562 0263 | c | .DBGLNO 0x0263 0563 ; -------------------------------------------------------------------------------------- 0563 ; Debug chain 0563 ; -------------------------------------------------------------------------------------- 0563 0000 0001 | | .DBGLEN 0x0000,0x0001 0565 027b | { | .DBGLNO 0x027b 0566 ; -------------------------------------------------------------------------------------- 0566 ; Debug chain 0566 ; -------------------------------------------------------------------------------------- 0566 0001 0004 | | .DBGLEN 0x0001,0x0004 0568 028b 0295 | | .DBGLNO 0x028b,0x0295,0x029a,0x029f,0x02a3 056d ; -------------------------------------------------------------------------------------- 056d ; Debug chain 056d ; -------------------------------------------------------------------------------------- 056d 0000 0001 | | .DBGLEN 0x0000,0x0001 056f 02cb | | .DBGLNO 0x02cb 0570 ; -------------------------------------------------------------------------------------- 0570 ; Debug chain 0570 ; -------------------------------------------------------------------------------------- 0570 0000 0001 | | .DBGLEN 0x0000,0x0001 0572 02db | | .DBGLNO 0x02db 0573 ; -------------------------------------------------------------------------------------- 0573 ; Debug chain 0573 ; -------------------------------------------------------------------------------------- 0573 0001 0009 | | .DBGLEN 0x0001,0x0009 0575 02eb 02f5 | | .DBGLNO 0x02eb,0x02f5,0x02fa,0x02ff,0x0303,0x0308,0x030c,0x0312,0x033a,0x033e 057f ; -------------------------------------------------------------------------------------- 057f ; Debug chain 057f ; -------------------------------------------------------------------------------------- 057f 0000 0001 | | .DBGLEN 0x0000,0x0001 0581 034b | K | .DBGLNO 0x034b 0582 ; -------------------------------------------------------------------------------------- 0582 ; Debug chain 0582 ; -------------------------------------------------------------------------------------- 0582 0000 0001 | | .DBGLEN 0x0000,0x0001 0584 0353 | S | .DBGLNO 0x0353 0585 ; -------------------------------------------------------------------------------------- 0585 ; Debug chain 0585 ; -------------------------------------------------------------------------------------- 0585 0000 0002 | | .DBGLEN 0x0000,0x0002 0587 0363 0367 | c g| .DBGLNO 0x0363,0x0367 0589 0000 0000 | | .BLANK 0000[0x77]