1 /* This C file is generated by NIT to compile module compiling___table_computation. */
2 #include "compiling___table_computation._sep.h"
3 val_t
compiling___table_computation___ColorContext___color(val_t p0
, val_t p1
){
4 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
7 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
8 fra
.me
.file
= LOCATE_compiling___table_computation
;
10 fra
.me
.meth
= LOCATE_compiling___table_computation___ColorContext___color
;
13 fra
.me
.nitni_local_ref_head
= NULL
;
14 fra
.me
.REG
[0] = NIT_NULL
;
15 fra
.me
.REG
[1] = NIT_NULL
;
18 /* compiling/table_computation.nit:32 */
19 REGB0
= TAG_Bool(ATTR_compiling___table_computation___ColorContext____colors(fra
.me
.REG
[0])!=NIT_NULL
);
20 if (UNTAG_Bool(REGB0
)) {
22 nit_abort("Uninitialized attribute %s", "_colors", LOCATE_compiling___table_computation
, 32);
24 fra
.me
.REG
[0] = ATTR_compiling___table_computation___ColorContext____colors(fra
.me
.REG
[0]);
25 fra
.me
.REG
[1] = CALL_standard___collection___abstract_collection___MapRead_____bra(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1]);
26 REGB0
= fra
.me
.REG
[1];
29 stack_frame_head
= fra
.me
.prev
;
32 val_t
compiling___table_computation___ColorContext___has_color(val_t p0
, val_t p1
){
33 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
36 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
37 fra
.me
.file
= LOCATE_compiling___table_computation
;
39 fra
.me
.meth
= LOCATE_compiling___table_computation___ColorContext___has_color
;
42 fra
.me
.nitni_local_ref_head
= NULL
;
43 fra
.me
.REG
[0] = NIT_NULL
;
44 fra
.me
.REG
[1] = NIT_NULL
;
47 /* compiling/table_computation.nit:38 */
48 REGB0
= TAG_Bool(ATTR_compiling___table_computation___ColorContext____colors(fra
.me
.REG
[0])!=NIT_NULL
);
49 if (UNTAG_Bool(REGB0
)) {
51 nit_abort("Uninitialized attribute %s", "_colors", LOCATE_compiling___table_computation
, 38);
53 fra
.me
.REG
[0] = ATTR_compiling___table_computation___ColorContext____colors(fra
.me
.REG
[0]);
54 REGB0
= CALL_standard___collection___abstract_collection___MapRead___has_key(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1]);
57 stack_frame_head
= fra
.me
.prev
;
60 void compiling___table_computation___ColorContext___color__eq(val_t p0
, val_t p1
, val_t p2
){
61 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
68 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
69 fra
.me
.file
= LOCATE_compiling___table_computation
;
71 fra
.me
.meth
= LOCATE_compiling___table_computation___ColorContext___color__eq
;
74 fra
.me
.nitni_local_ref_head
= NULL
;
75 fra
.me
.REG
[0] = NIT_NULL
;
76 fra
.me
.REG
[1] = NIT_NULL
;
77 fra
.me
.REG
[2] = NIT_NULL
;
78 fra
.me
.REG
[3] = NIT_NULL
;
82 /* compiling/table_computation.nit:44 */
83 REGB1
= TAG_Bool(ATTR_compiling___table_computation___ColorContext____colors(fra
.me
.REG
[0])!=NIT_NULL
);
84 if (UNTAG_Bool(REGB1
)) {
86 nit_abort("Uninitialized attribute %s", "_colors", LOCATE_compiling___table_computation
, 44);
88 fra
.me
.REG
[2] = ATTR_compiling___table_computation___ColorContext____colors(fra
.me
.REG
[0]);
89 CALL_standard___collection___abstract_collection___Map_____braeq(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[1], REGB0
);
90 /* compiling/table_computation.nit:46 */
92 REGB2
= CALL_compiling___table_computation___TableElt___length(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
93 /* ../lib/standard/kernel.nit:352 */
95 REGB3
= TAG_Bool(VAL_ISA(REGB2
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1
), VTID_standard___kernel___Comparable___OTHER(REGB1
))) /*cast OTHER*/;
96 if (UNTAG_Bool(REGB3
)) {
98 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
100 /* ../lib/standard/kernel.nit:232 */
101 REGB3
= TAG_Bool(UNTAG_Int(REGB1
)<UNTAG_Int(REGB2
));
102 /* ../lib/standard/kernel.nit:352 */
103 if (UNTAG_Bool(REGB3
)) {
104 /* compiling/table_computation.nit:46 */
106 /* compiling/table_computation.nit:47 */
107 REGB4
= TAG_Bool(ATTR_compiling___table_computation___ColorContext____colors(fra
.me
.REG
[0])!=NIT_NULL
);
108 if (UNTAG_Bool(REGB4
)) {
110 nit_abort("Uninitialized attribute %s", "_colors", LOCATE_compiling___table_computation
, 47);
112 fra
.me
.REG
[2] = ATTR_compiling___table_computation___ColorContext____colors(fra
.me
.REG
[0]);
113 fra
.me
.REG
[3] = CALL_compiling___table_computation___TableElt___item(fra
.me
.REG
[1])(fra
.me
.REG
[1], REGB3
);
114 CALL_standard___collection___abstract_collection___Map_____braeq(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3], REGB0
);
115 /* compiling/table_computation.nit:48 */
117 /* ../lib/standard/kernel.nit:235 */
118 REGB3
= TAG_Int(UNTAG_Int(REGB0
)+UNTAG_Int(REGB3
));
119 /* compiling/table_computation.nit:48 */
121 /* ../lib/standard/kernel.nit:354 */
123 /* ../lib/standard/kernel.nit:235 */
124 REGB3
= TAG_Int(UNTAG_Int(REGB1
)+UNTAG_Int(REGB3
));
125 /* ../lib/standard/kernel.nit:354 */
128 /* ../lib/standard/kernel.nit:352 */
133 stack_frame_head
= fra
.me
.prev
;
136 void compiling___table_computation___ColorContext___init(val_t p0
, int* init_table
){
137 int itpos0
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_compiling___table_computation___ColorContext
].i
;
138 struct {struct stack_frame_t me
;} fra
;
140 if (init_table
[itpos0
]) return;
141 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
142 fra
.me
.file
= LOCATE_compiling___table_computation
;
144 fra
.me
.meth
= LOCATE_compiling___table_computation___ColorContext___init
;
145 fra
.me
.has_broke
= 0;
147 fra
.me
.nitni_local_ref_head
= NULL
;
148 stack_frame_head
= fra
.me
.prev
;
149 init_table
[itpos0
] = 1;
152 val_t
compiling___table_computation___TableInformation___max_class_table_length(val_t p0
){
153 struct {struct stack_frame_t me
;} fra
;
156 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
157 fra
.me
.file
= LOCATE_compiling___table_computation
;
159 fra
.me
.meth
= LOCATE_compiling___table_computation___TableInformation___max_class_table_length
;
160 fra
.me
.has_broke
= 0;
162 fra
.me
.nitni_local_ref_head
= NULL
;
163 fra
.me
.REG
[0] = NIT_NULL
;
165 /* compiling/table_computation.nit:56 */
166 REGB0
= TAG_Bool(ATTR_compiling___table_computation___TableInformation____max_class_table_length(fra
.me
.REG
[0])!=NIT_NULL
);
167 if (UNTAG_Bool(REGB0
)) {
169 nit_abort("Uninitialized attribute %s", "_max_class_table_length", LOCATE_compiling___table_computation
, 56);
171 REGB0
= ATTR_compiling___table_computation___TableInformation____max_class_table_length(fra
.me
.REG
[0]);
172 stack_frame_head
= fra
.me
.prev
;
175 void compiling___table_computation___TableInformation___max_class_table_length__eq(val_t p0
, val_t p1
){
176 struct {struct stack_frame_t me
;} fra
;
179 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
180 fra
.me
.file
= LOCATE_compiling___table_computation
;
182 fra
.me
.meth
= LOCATE_compiling___table_computation___TableInformation___max_class_table_length__eq
;
183 fra
.me
.has_broke
= 0;
185 fra
.me
.nitni_local_ref_head
= NULL
;
186 fra
.me
.REG
[0] = NIT_NULL
;
189 /* compiling/table_computation.nit:56 */
190 ATTR_compiling___table_computation___TableInformation____max_class_table_length(fra
.me
.REG
[0]) = REGB0
;
191 stack_frame_head
= fra
.me
.prev
;
194 val_t
compiling___table_computation___CompiledClass___local_class(val_t p0
){
195 struct {struct stack_frame_t me
;} fra
;
198 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
199 fra
.me
.file
= LOCATE_compiling___table_computation
;
201 fra
.me
.meth
= LOCATE_compiling___table_computation___CompiledClass___local_class
;
202 fra
.me
.has_broke
= 0;
204 fra
.me
.nitni_local_ref_head
= NULL
;
205 fra
.me
.REG
[0] = NIT_NULL
;
207 /* compiling/table_computation.nit:63 */
208 REGB0
= TAG_Bool(ATTR_compiling___table_computation___CompiledClass____local_class(fra
.me
.REG
[0])!=NIT_NULL
);
209 if (UNTAG_Bool(REGB0
)) {
211 nit_abort("Uninitialized attribute %s", "_local_class", LOCATE_compiling___table_computation
, 63);
213 fra
.me
.REG
[0] = ATTR_compiling___table_computation___CompiledClass____local_class(fra
.me
.REG
[0]);
214 stack_frame_head
= fra
.me
.prev
;
215 return fra
.me
.REG
[0];
217 val_t
compiling___table_computation___CompiledClass___id(val_t p0
){
218 struct {struct stack_frame_t me
;} fra
;
221 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
222 fra
.me
.file
= LOCATE_compiling___table_computation
;
224 fra
.me
.meth
= LOCATE_compiling___table_computation___CompiledClass___id
;
225 fra
.me
.has_broke
= 0;
227 fra
.me
.nitni_local_ref_head
= NULL
;
228 fra
.me
.REG
[0] = NIT_NULL
;
230 /* compiling/table_computation.nit:66 */
231 REGB0
= TAG_Bool(ATTR_compiling___table_computation___CompiledClass____id(fra
.me
.REG
[0])!=NIT_NULL
);
232 if (UNTAG_Bool(REGB0
)) {
234 nit_abort("Uninitialized attribute %s", "_id", LOCATE_compiling___table_computation
, 66);
236 REGB0
= ATTR_compiling___table_computation___CompiledClass____id(fra
.me
.REG
[0]);
237 stack_frame_head
= fra
.me
.prev
;
240 void compiling___table_computation___CompiledClass___id__eq(val_t p0
, val_t p1
){
241 struct {struct stack_frame_t me
;} fra
;
244 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
245 fra
.me
.file
= LOCATE_compiling___table_computation
;
247 fra
.me
.meth
= LOCATE_compiling___table_computation___CompiledClass___id__eq
;
248 fra
.me
.has_broke
= 0;
250 fra
.me
.nitni_local_ref_head
= NULL
;
251 fra
.me
.REG
[0] = NIT_NULL
;
254 /* compiling/table_computation.nit:66 */
255 ATTR_compiling___table_computation___CompiledClass____id(fra
.me
.REG
[0]) = REGB0
;
256 stack_frame_head
= fra
.me
.prev
;
259 val_t
compiling___table_computation___CompiledClass___class_table(val_t p0
){
260 struct {struct stack_frame_t me
;} fra
;
263 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
264 fra
.me
.file
= LOCATE_compiling___table_computation
;
266 fra
.me
.meth
= LOCATE_compiling___table_computation___CompiledClass___class_table
;
267 fra
.me
.has_broke
= 0;
269 fra
.me
.nitni_local_ref_head
= NULL
;
270 fra
.me
.REG
[0] = NIT_NULL
;
272 /* compiling/table_computation.nit:69 */
273 REGB0
= TAG_Bool(ATTR_compiling___table_computation___CompiledClass____class_table(fra
.me
.REG
[0])!=NIT_NULL
);
274 if (UNTAG_Bool(REGB0
)) {
276 nit_abort("Uninitialized attribute %s", "_class_table", LOCATE_compiling___table_computation
, 69);
278 fra
.me
.REG
[0] = ATTR_compiling___table_computation___CompiledClass____class_table(fra
.me
.REG
[0]);
279 stack_frame_head
= fra
.me
.prev
;
280 return fra
.me
.REG
[0];
282 val_t
compiling___table_computation___CompiledClass___instance_table(val_t p0
){
283 struct {struct stack_frame_t me
;} fra
;
286 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
287 fra
.me
.file
= LOCATE_compiling___table_computation
;
289 fra
.me
.meth
= LOCATE_compiling___table_computation___CompiledClass___instance_table
;
290 fra
.me
.has_broke
= 0;
292 fra
.me
.nitni_local_ref_head
= NULL
;
293 fra
.me
.REG
[0] = NIT_NULL
;
295 /* compiling/table_computation.nit:72 */
296 REGB0
= TAG_Bool(ATTR_compiling___table_computation___CompiledClass____instance_table(fra
.me
.REG
[0])!=NIT_NULL
);
297 if (UNTAG_Bool(REGB0
)) {
299 nit_abort("Uninitialized attribute %s", "_instance_table", LOCATE_compiling___table_computation
, 72);
301 fra
.me
.REG
[0] = ATTR_compiling___table_computation___CompiledClass____instance_table(fra
.me
.REG
[0]);
302 stack_frame_head
= fra
.me
.prev
;
303 return fra
.me
.REG
[0];
305 val_t
compiling___table_computation___CompiledClass___class_layout(val_t p0
){
306 struct {struct stack_frame_t me
;} fra
;
309 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
310 fra
.me
.file
= LOCATE_compiling___table_computation
;
312 fra
.me
.meth
= LOCATE_compiling___table_computation___CompiledClass___class_layout
;
313 fra
.me
.has_broke
= 0;
315 fra
.me
.nitni_local_ref_head
= NULL
;
316 fra
.me
.REG
[0] = NIT_NULL
;
318 /* compiling/table_computation.nit:75 */
319 REGB0
= TAG_Bool(ATTR_compiling___table_computation___CompiledClass____class_layout(fra
.me
.REG
[0])!=NIT_NULL
);
320 if (UNTAG_Bool(REGB0
)) {
322 nit_abort("Uninitialized attribute %s", "_class_layout", LOCATE_compiling___table_computation
, 75);
324 fra
.me
.REG
[0] = ATTR_compiling___table_computation___CompiledClass____class_layout(fra
.me
.REG
[0]);
325 stack_frame_head
= fra
.me
.prev
;
326 return fra
.me
.REG
[0];
328 void compiling___table_computation___CompiledClass___class_layout__eq(val_t p0
, val_t p1
){
329 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
331 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
332 fra
.me
.file
= LOCATE_compiling___table_computation
;
334 fra
.me
.meth
= LOCATE_compiling___table_computation___CompiledClass___class_layout__eq
;
335 fra
.me
.has_broke
= 0;
337 fra
.me
.nitni_local_ref_head
= NULL
;
338 fra
.me
.REG
[0] = NIT_NULL
;
339 fra
.me
.REG
[1] = NIT_NULL
;
342 /* compiling/table_computation.nit:75 */
343 ATTR_compiling___table_computation___CompiledClass____class_layout(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
344 stack_frame_head
= fra
.me
.prev
;
347 val_t
compiling___table_computation___CompiledClass___instance_layout(val_t p0
){
348 struct {struct stack_frame_t me
;} fra
;
351 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
352 fra
.me
.file
= LOCATE_compiling___table_computation
;
354 fra
.me
.meth
= LOCATE_compiling___table_computation___CompiledClass___instance_layout
;
355 fra
.me
.has_broke
= 0;
357 fra
.me
.nitni_local_ref_head
= NULL
;
358 fra
.me
.REG
[0] = NIT_NULL
;
360 /* compiling/table_computation.nit:78 */
361 REGB0
= TAG_Bool(ATTR_compiling___table_computation___CompiledClass____instance_layout(fra
.me
.REG
[0])!=NIT_NULL
);
362 if (UNTAG_Bool(REGB0
)) {
364 nit_abort("Uninitialized attribute %s", "_instance_layout", LOCATE_compiling___table_computation
, 78);
366 fra
.me
.REG
[0] = ATTR_compiling___table_computation___CompiledClass____instance_layout(fra
.me
.REG
[0]);
367 stack_frame_head
= fra
.me
.prev
;
368 return fra
.me
.REG
[0];
370 void compiling___table_computation___CompiledClass___instance_layout__eq(val_t p0
, val_t p1
){
371 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
373 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
374 fra
.me
.file
= LOCATE_compiling___table_computation
;
376 fra
.me
.meth
= LOCATE_compiling___table_computation___CompiledClass___instance_layout__eq
;
377 fra
.me
.has_broke
= 0;
379 fra
.me
.nitni_local_ref_head
= NULL
;
380 fra
.me
.REG
[0] = NIT_NULL
;
381 fra
.me
.REG
[1] = NIT_NULL
;
384 /* compiling/table_computation.nit:78 */
385 ATTR_compiling___table_computation___CompiledClass____instance_layout(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
386 stack_frame_head
= fra
.me
.prev
;
389 void compiling___table_computation___CompiledClass___init(val_t p0
, val_t p1
, int* init_table
){
390 int itpos1
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_compiling___table_computation___CompiledClass
].i
;
391 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
393 if (init_table
[itpos1
]) return;
394 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
395 fra
.me
.file
= LOCATE_compiling___table_computation
;
397 fra
.me
.meth
= LOCATE_compiling___table_computation___CompiledClass___init
;
398 fra
.me
.has_broke
= 0;
400 fra
.me
.nitni_local_ref_head
= NULL
;
401 fra
.me
.REG
[0] = NIT_NULL
;
402 fra
.me
.REG
[1] = NIT_NULL
;
403 fra
.me
.REG
[2] = NIT_NULL
;
406 /* compiling/table_computation.nit:81 */
407 fra
.me
.REG
[2] = fra
.me
.REG
[0];
408 CALL_compiling___table_computation___ColorContext___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], init_table
);
409 ATTR_compiling___table_computation___CompiledClass____local_class(fra
.me
.REG
[2]) = fra
.me
.REG
[1];
410 stack_frame_head
= fra
.me
.prev
;
411 init_table
[itpos1
] = 1;
414 val_t
compiling___table_computation___MMConcreteClass___class_color_pos(val_t p0
){
415 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
418 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
419 fra
.me
.file
= LOCATE_compiling___table_computation
;
421 fra
.me
.meth
= LOCATE_compiling___table_computation___MMConcreteClass___class_color_pos
;
422 fra
.me
.has_broke
= 0;
424 fra
.me
.nitni_local_ref_head
= NULL
;
425 fra
.me
.REG
[0] = NIT_NULL
;
426 fra
.me
.REG
[1] = NIT_NULL
;
428 /* compiling/table_computation.nit:85 */
429 fra
.me
.REG
[1] = fra
.me
.REG
[0];
430 /* compiling/table_computation.nit:86 */
431 fra
.me
.REG
[1] = ATTR_compiling___table_computation___MMConcreteClass____class_color_pos(fra
.me
.REG
[1]);
432 REGB0
= TAG_Bool(fra
.me
.REG
[1]!=NIT_NULL
);
433 if (UNTAG_Bool(REGB0
)) {
435 nit_abort("Cast failed", NULL
, LOCATE_compiling___table_computation
, 86);
439 stack_frame_head
= fra
.me
.prev
;
440 return fra
.me
.REG
[1];
442 val_t
compiling___table_computation___MMConcreteClass___class_layout(val_t p0
){
443 struct {struct stack_frame_t me
;} fra
;
446 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
447 fra
.me
.file
= LOCATE_compiling___table_computation
;
449 fra
.me
.meth
= LOCATE_compiling___table_computation___MMConcreteClass___class_layout
;
450 fra
.me
.has_broke
= 0;
452 fra
.me
.nitni_local_ref_head
= NULL
;
453 fra
.me
.REG
[0] = NIT_NULL
;
455 /* compiling/table_computation.nit:89 */
456 REGB0
= TAG_Bool(ATTR_compiling___table_computation___MMConcreteClass____class_layout(fra
.me
.REG
[0])!=NIT_NULL
);
457 if (UNTAG_Bool(REGB0
)) {
459 nit_abort("Uninitialized attribute %s", "_class_layout", LOCATE_compiling___table_computation
, 89);
461 fra
.me
.REG
[0] = ATTR_compiling___table_computation___MMConcreteClass____class_layout(fra
.me
.REG
[0]);
462 stack_frame_head
= fra
.me
.prev
;
463 return fra
.me
.REG
[0];
465 val_t
compiling___table_computation___MMConcreteClass___instance_layout(val_t p0
){
466 struct {struct stack_frame_t me
;} fra
;
469 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
470 fra
.me
.file
= LOCATE_compiling___table_computation
;
472 fra
.me
.meth
= LOCATE_compiling___table_computation___MMConcreteClass___instance_layout
;
473 fra
.me
.has_broke
= 0;
475 fra
.me
.nitni_local_ref_head
= NULL
;
476 fra
.me
.REG
[0] = NIT_NULL
;
478 /* compiling/table_computation.nit:92 */
479 REGB0
= TAG_Bool(ATTR_compiling___table_computation___MMConcreteClass____instance_layout(fra
.me
.REG
[0])!=NIT_NULL
);
480 if (UNTAG_Bool(REGB0
)) {
482 nit_abort("Uninitialized attribute %s", "_instance_layout", LOCATE_compiling___table_computation
, 92);
484 fra
.me
.REG
[0] = ATTR_compiling___table_computation___MMConcreteClass____instance_layout(fra
.me
.REG
[0]);
485 stack_frame_head
= fra
.me
.prev
;
486 return fra
.me
.REG
[0];
488 void compiling___table_computation___MMConcreteClass___build_layout_in(val_t p0
, val_t p1
){
489 struct {struct stack_frame_t me
; val_t MORE_REG
[4];} fra
;
493 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
494 fra
.me
.file
= LOCATE_compiling___table_computation
;
496 fra
.me
.meth
= LOCATE_compiling___table_computation___MMConcreteClass___build_layout_in
;
497 fra
.me
.has_broke
= 0;
499 fra
.me
.nitni_local_ref_head
= NULL
;
500 fra
.me
.REG
[0] = NIT_NULL
;
501 fra
.me
.REG
[1] = NIT_NULL
;
502 fra
.me
.REG
[2] = NIT_NULL
;
503 fra
.me
.REG
[3] = NIT_NULL
;
504 fra
.me
.REG
[4] = NIT_NULL
;
507 /* compiling/table_computation.nit:98 */
508 REGB0
= TAG_Bool(ATTR_compiling___table_computation___MMConcreteClass____class_layout(fra
.me
.REG
[0])!=NIT_NULL
);
509 if (UNTAG_Bool(REGB0
)) {
511 nit_abort("Uninitialized attribute %s", "_class_layout", LOCATE_compiling___table_computation
, 98);
513 fra
.me
.REG
[2] = ATTR_compiling___table_computation___MMConcreteClass____class_layout(fra
.me
.REG
[0]);
514 /* compiling/table_computation.nit:99 */
515 REGB0
= TAG_Bool(ATTR_compiling___table_computation___MMConcreteClass____instance_layout(fra
.me
.REG
[0])!=NIT_NULL
);
516 if (UNTAG_Bool(REGB0
)) {
518 nit_abort("Uninitialized attribute %s", "_instance_layout", LOCATE_compiling___table_computation
, 99);
520 fra
.me
.REG
[3] = ATTR_compiling___table_computation___MMConcreteClass____instance_layout(fra
.me
.REG
[0]);
521 /* compiling/table_computation.nit:101 */
522 fra
.me
.REG
[4] = CALL_metamodel___abstractmetamodel___MMLocalClass___global(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
523 fra
.me
.REG
[4] = CALL_metamodel___abstractmetamodel___MMGlobalClass___intro(fra
.me
.REG
[4])(fra
.me
.REG
[4]);
524 REGB0
= TAG_Bool(IS_EQUAL_OO(fra
.me
.REG
[4],fra
.me
.REG
[0]));
525 if (UNTAG_Bool(REGB0
)) {
527 REGB1
= CALL_standard___kernel___Object_____eqeq(fra
.me
.REG
[4])(fra
.me
.REG
[4], fra
.me
.REG
[0]);
530 if (UNTAG_Bool(REGB0
)) {
531 /* compiling/table_computation.nit:102 */
532 fra
.me
.REG
[4] = NEW_TableEltClassId_compiling___table_computation___AbsTableEltClass___init(fra
.me
.REG
[0]);
533 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[4]);
534 /* compiling/table_computation.nit:103 */
535 fra
.me
.REG
[4] = NEW_TableEltClassColor_compiling___table_computation___AbsTableEltClass___init(fra
.me
.REG
[0]);
536 /* compiling/table_computation.nit:104 */
537 ATTR_compiling___table_computation___MMConcreteClass____class_color_pos(fra
.me
.REG
[0]) = fra
.me
.REG
[4];
538 /* compiling/table_computation.nit:105 */
539 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[4]);
540 /* compiling/table_computation.nit:106 */
541 fra
.me
.REG
[4] = NEW_TableEltClassInitTable_compiling___table_computation___AbsTableEltClass___init(fra
.me
.REG
[0]);
542 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[4]);
544 /* compiling/table_computation.nit:108 */
545 fra
.me
.REG
[4] = CALL_metamodel___abstractmetamodel___MMLocalClass___local_local_properties(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
546 CALL_standard___collection___abstract_collection___Collection___iterate(fra
.me
.REG
[4])(fra
.me
.REG
[4], (&(fra
.me
)), ((fun_t
)OC_compiling___table_computation___MMConcreteClass___build_layout_in_1
));
547 /* compiling/table_computation.nit:125 */
548 REGB0
= CALL_standard___collection___abstract_collection___Collection___is_empty(fra
.me
.REG
[3])(fra
.me
.REG
[3]);
549 REGB0
= TAG_Bool(!UNTAG_Bool(REGB0
));
550 if (UNTAG_Bool(REGB0
)) {
551 /* compiling/table_computation.nit:126 */
552 fra
.me
.REG
[0] = NEW_ModuleTableEltGroup_compiling___table_computation___ModuleTableEltGroup___init();
553 /* compiling/table_computation.nit:127 */
554 fra
.me
.REG
[4] = CALL_compiling___table_computation___ModuleTableEltGroup___elements(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
555 CALL_standard___collection___abstract_collection___Sequence___append(fra
.me
.REG
[4])(fra
.me
.REG
[4], fra
.me
.REG
[3]);
556 /* compiling/table_computation.nit:128 */
557 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[0]);
559 /* compiling/table_computation.nit:131 */
560 REGB0
= CALL_standard___collection___abstract_collection___Collection___is_empty(fra
.me
.REG
[2])(fra
.me
.REG
[2]);
561 REGB0
= TAG_Bool(!UNTAG_Bool(REGB0
));
562 if (UNTAG_Bool(REGB0
)) {
563 /* compiling/table_computation.nit:132 */
564 fra
.me
.REG
[0] = NEW_ModuleTableEltGroup_compiling___table_computation___ModuleTableEltGroup___init();
565 /* compiling/table_computation.nit:133 */
566 fra
.me
.REG
[3] = CALL_compiling___table_computation___ModuleTableEltGroup___elements(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
567 CALL_standard___collection___abstract_collection___Sequence___append(fra
.me
.REG
[3])(fra
.me
.REG
[3], fra
.me
.REG
[2]);
568 /* compiling/table_computation.nit:134 */
569 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[0]);
571 stack_frame_head
= fra
.me
.prev
;
574 void OC_compiling___table_computation___MMConcreteClass___build_layout_in_1(struct stack_frame_t
*closctx
, val_t p0
, struct stack_frame_t
*closctx_param
, fun_t clos_fun0
){
575 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
580 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
581 fra
.me
.file
= LOCATE_compiling___table_computation
;
583 fra
.me
.meth
= LOCATE_compiling___table_computation___MMConcreteClass___build_layout_in
;
584 fra
.me
.has_broke
= 0;
586 fra
.me
.nitni_local_ref_head
= NULL
;
587 fra
.me
.REG
[0] = NIT_NULL
;
588 fra
.me
.REG
[1] = NIT_NULL
;
589 fra
.me
.closure_ctx
= closctx_param
;
590 fra
.me
.closure_funs
= CREG
;
593 /* compiling/table_computation.nit:109 */
594 fra
.me
.REG
[1] = CALL_metamodel___abstractmetamodel___MMLocalProperty___global(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
595 /* compiling/table_computation.nit:110 */
596 fra
.me
.REG
[1] = CALL_metamodel___abstractmetamodel___MMGlobalProperty___intro(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
597 REGB0
= TAG_Bool(IS_EQUAL_OO(fra
.me
.REG
[1],fra
.me
.REG
[0]));
598 if (UNTAG_Bool(REGB0
)) {
600 REGB1
= CALL_standard___kernel___Object_____eqeq(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[0]);
603 if (UNTAG_Bool(REGB0
)) {
604 /* compiling/table_computation.nit:111 */
605 REGB0
= TAG_Bool(VAL_ISA(fra
.me
.REG
[0], COLOR_metamodel___abstractmetamodel___MMAttribute
, ID_metamodel___abstractmetamodel___MMAttribute
)) /*cast MMAttribute*/;
606 if (UNTAG_Bool(REGB0
)) {
607 /* compiling/table_computation.nit:112 */
608 fra
.me
.REG
[1] = NEW_TableEltAttr_compiling___table_computation___TableEltProp___init(fra
.me
.REG
[0]);
609 CALL_standard___collection___abstract_collection___SimpleCollection___add(closctx
->REG
[3])(closctx
->REG
[3], fra
.me
.REG
[1]);
611 /* compiling/table_computation.nit:113 */
612 REGB0
= TAG_Bool(VAL_ISA(fra
.me
.REG
[0], COLOR_metamodel___abstractmetamodel___MMMethod
, ID_metamodel___abstractmetamodel___MMMethod
)) /*cast MMMethod*/;
613 if (UNTAG_Bool(REGB0
)) {
614 /* compiling/table_computation.nit:114 */
615 fra
.me
.REG
[1] = NEW_TableEltMeth_compiling___table_computation___TableEltProp___init(fra
.me
.REG
[0]);
616 CALL_standard___collection___abstract_collection___SimpleCollection___add(closctx
->REG
[2])(closctx
->REG
[2], fra
.me
.REG
[1]);
618 /* compiling/table_computation.nit:115 */
619 REGB0
= TAG_Bool(VAL_ISA(fra
.me
.REG
[0], COLOR_metamodel___virtualtype___MMTypeProperty
, ID_metamodel___virtualtype___MMTypeProperty
)) /*cast MMTypeProperty*/;
620 if (UNTAG_Bool(REGB0
)) {
621 /* compiling/table_computation.nit:116 */
622 fra
.me
.REG
[1] = NEW_TableEltVTClassId_compiling___table_computation___TableEltProp___init(fra
.me
.REG
[0]);
623 CALL_standard___collection___abstract_collection___SimpleCollection___add(closctx
->REG
[2])(closctx
->REG
[2], fra
.me
.REG
[1]);
624 /* compiling/table_computation.nit:117 */
625 fra
.me
.REG
[1] = NEW_TableEltVTClassColor_compiling___table_computation___TableEltProp___init(fra
.me
.REG
[0]);
626 CALL_standard___collection___abstract_collection___SimpleCollection___add(closctx
->REG
[2])(closctx
->REG
[2], fra
.me
.REG
[1]);
631 /* compiling/table_computation.nit:120 */
632 REGB0
= TAG_Bool(VAL_ISA(fra
.me
.REG
[0], COLOR_metamodel___abstractmetamodel___MMMethod
, ID_metamodel___abstractmetamodel___MMMethod
)) /*cast MMMethod*/;
633 if (UNTAG_Bool(REGB0
)) {
634 REGB0
= CALL_metamodel___abstractmetamodel___MMLocalProperty___need_super(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
636 REGB1
= TAG_Bool(false);
639 if (UNTAG_Bool(REGB0
)) {
640 /* compiling/table_computation.nit:121 */
641 fra
.me
.REG
[0] = NEW_TableEltSuper_compiling___table_computation___TableEltProp___init(fra
.me
.REG
[0]);
642 CALL_standard___collection___abstract_collection___SimpleCollection___add(closctx
->REG
[2])(closctx
->REG
[2], fra
.me
.REG
[0]);
644 stack_frame_head
= fra
.me
.prev
;
647 val_t
compiling___table_computation___Program___table_information(val_t p0
){
648 struct {struct stack_frame_t me
;} fra
;
651 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
652 fra
.me
.file
= LOCATE_compiling___table_computation
;
654 fra
.me
.meth
= LOCATE_compiling___table_computation___Program___table_information
;
655 fra
.me
.has_broke
= 0;
657 fra
.me
.nitni_local_ref_head
= NULL
;
658 fra
.me
.REG
[0] = NIT_NULL
;
660 /* compiling/table_computation.nit:140 */
661 REGB0
= TAG_Bool(ATTR_compiling___table_computation___Program____table_information(fra
.me
.REG
[0])!=NIT_NULL
);
662 if (UNTAG_Bool(REGB0
)) {
664 nit_abort("Uninitialized attribute %s", "_table_information", LOCATE_compiling___table_computation
, 140);
666 fra
.me
.REG
[0] = ATTR_compiling___table_computation___Program____table_information(fra
.me
.REG
[0]);
667 stack_frame_head
= fra
.me
.prev
;
668 return fra
.me
.REG
[0];
670 val_t
compiling___table_computation___Program___compiled_classes(val_t p0
){
671 struct {struct stack_frame_t me
;} fra
;
674 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
675 fra
.me
.file
= LOCATE_compiling___table_computation
;
677 fra
.me
.meth
= LOCATE_compiling___table_computation___Program___compiled_classes
;
678 fra
.me
.has_broke
= 0;
680 fra
.me
.nitni_local_ref_head
= NULL
;
681 fra
.me
.REG
[0] = NIT_NULL
;
683 /* compiling/table_computation.nit:143 */
684 REGB0
= TAG_Bool(ATTR_compiling___table_computation___Program____compiled_classes(fra
.me
.REG
[0])!=NIT_NULL
);
685 if (UNTAG_Bool(REGB0
)) {
687 nit_abort("Uninitialized attribute %s", "_compiled_classes", LOCATE_compiling___table_computation
, 143);
689 fra
.me
.REG
[0] = ATTR_compiling___table_computation___Program____compiled_classes(fra
.me
.REG
[0]);
690 stack_frame_head
= fra
.me
.prev
;
691 return fra
.me
.REG
[0];
693 void compiling___table_computation___Program___do_table_computation(val_t p0
){
694 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
697 static val_t once_value_1
; /* Once value */
698 static val_t once_value_5
; /* Once value */
699 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
700 fra
.me
.file
= LOCATE_compiling___table_computation
;
702 fra
.me
.meth
= LOCATE_compiling___table_computation___Program___do_table_computation
;
703 fra
.me
.has_broke
= 0;
705 fra
.me
.nitni_local_ref_head
= NULL
;
706 fra
.me
.REG
[0] = NIT_NULL
;
707 fra
.me
.REG
[1] = NIT_NULL
;
708 fra
.me
.REG
[2] = NIT_NULL
;
710 /* compiling/table_computation.nit:148 */
711 fra
.me
.REG
[1] = CALL_program___Program___tc(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
713 fra
.me
.REG
[2] = BOX_NativeString("Building tables");
715 fra
.me
.REG
[2] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[2], REGB0
);
716 once_value_1
= fra
.me
.REG
[2];
717 register_static_object(&once_value_1
);
718 } else fra
.me
.REG
[2] = once_value_1
;
719 fra
.me
.REG
[2] = fra
.me
.REG
[2];
721 CALL_toolcontext___ToolContext___info(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2], REGB0
);
722 /* compiling/table_computation.nit:149 */
723 fra
.me
.REG
[2] = CALL_program___Program___main_module(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
724 fra
.me
.REG
[2] = CALL_metamodel___abstractmetamodel___MMModule___mhe(fra
.me
.REG
[2])(fra
.me
.REG
[2]);
725 REGB0
= TAG_Bool(fra
.me
.REG
[2]==NIT_NULL
);
726 if (UNTAG_Bool(REGB0
)) {
727 nit_abort("Reciever is null", NULL
, LOCATE_compiling___table_computation
, 149);
729 fra
.me
.REG
[2] = CALL_metamodel___partial_order___PartialOrderElement___greaters_and_self(fra
.me
.REG
[2])(fra
.me
.REG
[2]);
730 CALL_standard___collection___abstract_collection___Collection___iterate(fra
.me
.REG
[2])(fra
.me
.REG
[2], (&(fra
.me
)), ((fun_t
)OC_compiling___table_computation___Program___do_table_computation_2
));
731 /* compiling/table_computation.nit:154 */
732 fra
.me
.REG
[2] = CALL_program___Program___tc(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
734 fra
.me
.REG
[1] = BOX_NativeString("Merging all tables");
736 fra
.me
.REG
[1] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[1], REGB0
);
737 once_value_5
= fra
.me
.REG
[1];
738 register_static_object(&once_value_5
);
739 } else fra
.me
.REG
[1] = once_value_5
;
740 fra
.me
.REG
[1] = fra
.me
.REG
[1];
742 CALL_toolcontext___ToolContext___info(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[1], REGB0
);
743 /* compiling/table_computation.nit:155 */
744 CALL_compiling___table_computation___Program___do_global_table_analysis(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
745 stack_frame_head
= fra
.me
.prev
;
748 void OC_compiling___table_computation___Program___do_table_computation_2(struct stack_frame_t
*closctx
, val_t p0
, struct stack_frame_t
*closctx_param
, fun_t clos_fun0
){
749 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
753 static val_t once_value_3
; /* Once value */
754 static val_t once_value_4
; /* Once value */
755 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
756 fra
.me
.file
= LOCATE_compiling___table_computation
;
758 fra
.me
.meth
= LOCATE_compiling___table_computation___Program___do_table_computation
;
759 fra
.me
.has_broke
= 0;
761 fra
.me
.nitni_local_ref_head
= NULL
;
762 fra
.me
.REG
[0] = NIT_NULL
;
763 fra
.me
.REG
[1] = NIT_NULL
;
764 fra
.me
.REG
[2] = NIT_NULL
;
765 fra
.me
.REG
[3] = NIT_NULL
;
766 fra
.me
.closure_ctx
= closctx_param
;
767 fra
.me
.closure_funs
= CREG
;
770 /* compiling/table_computation.nit:150 */
771 fra
.me
.REG
[1] = CALL_program___Program___tc(closctx
->REG
[0])(closctx
->REG
[0]);
773 fra
.me
.REG
[2] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0
);
775 fra
.me
.REG
[3] = BOX_NativeString("Building tables for module: ");
777 fra
.me
.REG
[3] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[3], REGB0
);
778 once_value_3
= fra
.me
.REG
[3];
779 register_static_object(&once_value_3
);
780 } else fra
.me
.REG
[3] = once_value_3
;
781 fra
.me
.REG
[3] = fra
.me
.REG
[3];
782 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
783 fra
.me
.REG
[3] = CALL_metamodel___abstractmetamodel___MMModule___name(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
784 fra
.me
.REG
[3] = CALL_standard___string___Object___to_s(fra
.me
.REG
[3])(fra
.me
.REG
[3]);
785 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
787 fra
.me
.REG
[3] = BOX_NativeString("");
789 fra
.me
.REG
[3] = NEW_String_standard___string___String___with_native(fra
.me
.REG
[3], REGB0
);
790 once_value_4
= fra
.me
.REG
[3];
791 register_static_object(&once_value_4
);
792 } else fra
.me
.REG
[3] = once_value_4
;
793 fra
.me
.REG
[3] = fra
.me
.REG
[3];
794 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[3]);
795 fra
.me
.REG
[2] = CALL_standard___string___Object___to_s(fra
.me
.REG
[2])(fra
.me
.REG
[2]);
797 CALL_toolcontext___ToolContext___info(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[2], REGB0
);
798 /* compiling/table_computation.nit:151 */
799 CALL_compiling___table_computation___MMModule___local_analysis(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
800 stack_frame_head
= fra
.me
.prev
;
803 void compiling___table_computation___Program___do_global_table_analysis(val_t p0
){
804 struct {struct stack_frame_t me
; val_t MORE_REG
[11];} fra
;
811 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
812 fra
.me
.file
= LOCATE_compiling___table_computation
;
814 fra
.me
.meth
= LOCATE_compiling___table_computation___Program___do_global_table_analysis
;
815 fra
.me
.has_broke
= 0;
816 fra
.me
.REG_size
= 12;
817 fra
.me
.nitni_local_ref_head
= NULL
;
818 fra
.me
.REG
[0] = NIT_NULL
;
819 fra
.me
.REG
[1] = NIT_NULL
;
820 fra
.me
.REG
[2] = NIT_NULL
;
821 fra
.me
.REG
[3] = NIT_NULL
;
822 fra
.me
.REG
[4] = NIT_NULL
;
823 fra
.me
.REG
[5] = NIT_NULL
;
824 fra
.me
.REG
[6] = NIT_NULL
;
825 fra
.me
.REG
[7] = NIT_NULL
;
826 fra
.me
.REG
[8] = NIT_NULL
;
827 fra
.me
.REG
[9] = NIT_NULL
;
828 fra
.me
.REG
[10] = NIT_NULL
;
829 fra
.me
.REG
[11] = NIT_NULL
;
831 /* compiling/table_computation.nit:161 */
832 fra
.me
.REG
[1] = NEW_Array_standard___collection___array___Array___init();
833 /* compiling/table_computation.nit:162 */
834 fra
.me
.REG
[2] = NEW_HashSet_standard___collection___hash_collection___HashSet___init();
835 /* compiling/table_computation.nit:163 */
836 fra
.me
.REG
[2] = NEW_Array_standard___collection___array___Array___init();
837 /* compiling/table_computation.nit:164 */
838 fra
.me
.REG
[3] = NEW_Array_standard___collection___array___Array___init();
839 /* compiling/table_computation.nit:166 */
840 fra
.me
.REG
[4] = NEW_TableEltClassSelfId_compiling___table_computation___TableEltClassSelfId___init();
841 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[4]);
842 /* compiling/table_computation.nit:167 */
843 fra
.me
.REG
[4] = NEW_TableEltClassObjectSize_compiling___table_computation___TableEltClassObjectSize___init();
844 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[4]);
845 /* compiling/table_computation.nit:168 */
846 fra
.me
.REG
[4] = NEW_TableEltClassSelfName_compiling___table_computation___TableEltClassSelfName___init();
847 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[4]);
848 /* compiling/table_computation.nit:169 */
849 fra
.me
.REG
[4] = NEW_TableEltVftPointer_compiling___table_computation___TableEltVftPointer___init();
850 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[3])(fra
.me
.REG
[3], fra
.me
.REG
[4]);
851 /* compiling/table_computation.nit:170 */
852 fra
.me
.REG
[4] = NEW_TableEltObjectId_compiling___table_computation___TableEltObjectId___init();
853 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[3])(fra
.me
.REG
[3], fra
.me
.REG
[4]);
854 /* compiling/table_computation.nit:172 */
856 /* ../lib/standard/kernel.nit:236 */
857 REGB0
= TAG_Int(-UNTAG_Int(REGB0
));
858 /* compiling/table_computation.nit:173 */
860 /* compiling/table_computation.nit:176 */
861 fra
.me
.REG
[4] = NEW_Array_standard___collection___array___Array___init();
862 /* compiling/table_computation.nit:177 */
863 fra
.me
.REG
[5] = CALL_program___Program___main_module(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
864 fra
.me
.REG
[5] = CALL_metamodel___abstractmetamodel___MMModule___local_classes(fra
.me
.REG
[5])(fra
.me
.REG
[5]);
865 CALL_standard___collection___abstract_collection___Collection___iterate(fra
.me
.REG
[5])(fra
.me
.REG
[5], (&(fra
.me
)), ((fun_t
)OC_compiling___table_computation___Program___do_global_table_analysis_1
));
866 CALL_standard___collection___array___Array___sort(fra
.me
.REG
[4])(fra
.me
.REG
[4], (&(fra
.me
)), ((fun_t
)OC_compiling___table_computation___Program___do_global_table_analysis_2
));
867 /* ../lib/standard/collection/array.nit:266 */
868 fra
.me
.REG
[5] = fra
.me
.REG
[4];
869 /* ../lib/standard/collection/array.nit:269 */
871 /* ../lib/standard/collection/array.nit:270 */
872 REGB3
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[5])!=NIT_NULL
);
873 if (UNTAG_Bool(REGB3
)) {
875 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 270);
877 REGB3
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[5]);
878 /* ../lib/standard/collection/array.nit:271 */
879 fra
.me
.REG
[6] = ATTR_standard___collection___array___Array____items(fra
.me
.REG
[5]);
880 /* ../lib/standard/collection/array.nit:272 */
882 /* ../lib/standard/collection/array.nit:24 */
883 REGB3
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[5])!=NIT_NULL
);
884 if (UNTAG_Bool(REGB3
)) {
886 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
888 REGB3
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[5]);
889 REGB4
= TAG_Bool(VAL_ISA(REGB3
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB2
), VTID_standard___kernel___Comparable___OTHER(REGB2
))) /*cast OTHER*/;
890 if (UNTAG_Bool(REGB4
)) {
892 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
894 /* ../lib/standard/kernel.nit:232 */
895 REGB3
= TAG_Bool(UNTAG_Int(REGB2
)<UNTAG_Int(REGB3
));
896 /* ../lib/standard/collection/array.nit:272 */
897 if (UNTAG_Bool(REGB3
)) {
898 /* ../lib/standard/collection/array.nit:273 */
899 REGB3
= TAG_Bool(fra
.me
.REG
[6]==NIT_NULL
);
900 if (UNTAG_Bool(REGB3
)) {
901 nit_abort("Reciever is null", NULL
, LOCATE_standard___collection___array
, 273);
903 /* ../lib/standard/collection/array.nit:718 */
904 fra
.me
.REG
[7] = ((Nit_NativeArray
)fra
.me
.REG
[6])->val
[UNTAG_Int(REGB2
)];
905 /* compiling/table_computation.nit:182 */
906 fra
.me
.REG
[8] = NEW_CompiledClass_compiling___table_computation___CompiledClass___init(fra
.me
.REG
[7]);
907 /* compiling/table_computation.nit:183 */
908 fra
.me
.REG
[9] = CALL_compiling___table_computation___Program___compiled_classes(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
909 fra
.me
.REG
[10] = CALL_metamodel___abstractmetamodel___MMLocalClass___global(fra
.me
.REG
[7])(fra
.me
.REG
[7]);
910 CALL_standard___collection___abstract_collection___Map_____braeq(fra
.me
.REG
[9])(fra
.me
.REG
[9], fra
.me
.REG
[10], fra
.me
.REG
[8]);
911 /* compiling/table_computation.nit:187 */
912 fra
.me
.REG
[10] = CALL_metamodel___abstractmetamodel___MMLocalClass___global(fra
.me
.REG
[7])(fra
.me
.REG
[7]);
913 /* compiling/table_computation.nit:188 */
914 fra
.me
.REG
[10] = CALL_metamodel___abstractmetamodel___MMGlobalClass___mmmodule(fra
.me
.REG
[10])(fra
.me
.REG
[10]);
915 /* compiling/table_computation.nit:189 */
916 fra
.me
.REG
[10] = CALL_primitive_info___MMLocalClass___primitive_info(fra
.me
.REG
[7])(fra
.me
.REG
[7]);
917 REGB3
= TAG_Bool(fra
.me
.REG
[10]==NIT_NULL
);
918 if (UNTAG_Bool(REGB3
)) {
920 REGB4
= TAG_Bool(fra
.me
.REG
[10]==NIT_NULL
);
921 if (UNTAG_Bool(REGB4
)) {
922 REGB4
= TAG_Bool(false);
925 REGB4
= CALL_standard___kernel___Object_____eqeq(fra
.me
.REG
[10])(fra
.me
.REG
[10], NIT_NULL
);
929 REGB3
= TAG_Bool(!UNTAG_Bool(REGB3
));
930 if (UNTAG_Bool(REGB3
)) {
931 /* compiling/table_computation.nit:190 */
932 CALL_compiling___table_computation___CompiledClass___id__eq(fra
.me
.REG
[8])(fra
.me
.REG
[8], REGB0
);
933 /* compiling/table_computation.nit:191 */
935 /* ../lib/standard/kernel.nit:237 */
936 REGB3
= TAG_Int(UNTAG_Int(REGB0
)-UNTAG_Int(REGB3
));
937 /* compiling/table_computation.nit:191 */
940 /* compiling/table_computation.nit:193 */
941 CALL_compiling___table_computation___CompiledClass___id__eq(fra
.me
.REG
[8])(fra
.me
.REG
[8], REGB1
);
942 /* compiling/table_computation.nit:194 */
944 /* ../lib/standard/kernel.nit:235 */
945 REGB3
= TAG_Int(UNTAG_Int(REGB1
)+UNTAG_Int(REGB3
));
946 /* compiling/table_computation.nit:194 */
949 /* compiling/table_computation.nit:198 */
950 fra
.me
.REG
[8] = CALL_metamodel___abstractmetamodel___MMLocalClass___cshe(fra
.me
.REG
[7])(fra
.me
.REG
[7]);
951 fra
.me
.REG
[8] = CALL_metamodel___partial_order___PartialOrderElement___direct_smallers(fra
.me
.REG
[8])(fra
.me
.REG
[8]);
952 REGB3
= CALL_standard___collection___abstract_collection___Collection___is_empty(fra
.me
.REG
[8])(fra
.me
.REG
[8]);
953 if (UNTAG_Bool(REGB3
)) {
954 /* compiling/table_computation.nit:199 */
955 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[7]);
957 /* compiling/table_computation.nit:203 */
958 fra
.me
.REG
[7] = CALL_metamodel___abstractmetamodel___MMLocalClass___global(fra
.me
.REG
[7])(fra
.me
.REG
[7]);
959 fra
.me
.REG
[7] = CALL_metamodel___abstractmetamodel___MMGlobalClass___intro(fra
.me
.REG
[7])(fra
.me
.REG
[7]);
960 /* compiling/table_computation.nit:204 */
961 REGB3
= TAG_Bool(VAL_ISA(fra
.me
.REG
[7], COLOR_metamodel___abstractmetamodel___MMConcreteClass
, ID_metamodel___abstractmetamodel___MMConcreteClass
)) /*cast MMConcreteClass*/;
962 if (UNTAG_Bool(REGB3
)) {
964 nit_abort("Assert failed", NULL
, LOCATE_compiling___table_computation
, 204);
966 /* compiling/table_computation.nit:205 */
967 fra
.me
.REG
[7] = CALL_compiling___table_computation___MMConcreteClass___class_color_pos(fra
.me
.REG
[7])(fra
.me
.REG
[7]);
968 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[7]);
969 /* ../lib/standard/collection/array.nit:274 */
971 /* ../lib/standard/kernel.nit:235 */
972 REGB3
= TAG_Int(UNTAG_Int(REGB2
)+UNTAG_Int(REGB3
));
973 /* ../lib/standard/collection/array.nit:274 */
976 /* ../lib/standard/collection/array.nit:272 */
981 /* compiling/table_computation.nit:209 */
982 fra
.me
.REG
[6] = NEW_HashSet_standard___collection___hash_collection___HashSet___init();
983 /* compiling/table_computation.nit:210 */
984 fra
.me
.REG
[5] = NEW_HashSet_standard___collection___hash_collection___HashSet___init();
985 /* ../lib/standard/collection/array.nit:269 */
987 /* ../lib/standard/collection/array.nit:270 */
988 REGB1
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
989 if (UNTAG_Bool(REGB1
)) {
991 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 270);
993 REGB1
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1]);
994 /* ../lib/standard/collection/array.nit:271 */
995 fra
.me
.REG
[7] = ATTR_standard___collection___array___Array____items(fra
.me
.REG
[1]);
996 /* ../lib/standard/collection/array.nit:272 */
998 /* ../lib/standard/collection/array.nit:24 */
999 REGB1
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
1000 if (UNTAG_Bool(REGB1
)) {
1002 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
1004 REGB1
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1]);
1005 REGB0
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB2
), VTID_standard___kernel___Comparable___OTHER(REGB2
))) /*cast OTHER*/;
1006 if (UNTAG_Bool(REGB0
)) {
1008 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1010 /* ../lib/standard/kernel.nit:232 */
1011 REGB1
= TAG_Bool(UNTAG_Int(REGB2
)<UNTAG_Int(REGB1
));
1012 /* ../lib/standard/collection/array.nit:272 */
1013 if (UNTAG_Bool(REGB1
)) {
1014 /* ../lib/standard/collection/array.nit:273 */
1015 REGB1
= TAG_Bool(fra
.me
.REG
[7]==NIT_NULL
);
1016 if (UNTAG_Bool(REGB1
)) {
1017 nit_abort("Reciever is null", NULL
, LOCATE_standard___collection___array
, 273);
1019 /* ../lib/standard/collection/array.nit:718 */
1020 fra
.me
.REG
[8] = ((Nit_NativeArray
)fra
.me
.REG
[7])->val
[UNTAG_Int(REGB2
)];
1021 /* compiling/table_computation.nit:212 */
1023 fra
.me
.REG
[10] = CALL_metamodel___abstractmetamodel___MMLocalClass___cshe(fra
.me
.REG
[8])(fra
.me
.REG
[8]);
1024 fra
.me
.REG
[10] = CALL_metamodel___partial_order___PartialOrderElement___direct_greaters(fra
.me
.REG
[10])(fra
.me
.REG
[10]);
1025 /* ../lib/standard/collection/array.nit:24 */
1026 REGB1
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[10])!=NIT_NULL
);
1027 if (UNTAG_Bool(REGB1
)) {
1029 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
1031 REGB1
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[10]);
1032 /* compiling/table_computation.nit:212 */
1034 REGB3
= TAG_Bool(IS_EQUAL_OO(REGB1
,REGB0
));
1035 if (UNTAG_Bool(REGB3
)) {
1037 /* ../lib/standard/kernel.nit:227 */
1038 REGB0
= TAG_Bool((REGB1
)==(REGB0
));
1039 /* compiling/table_computation.nit:212 */
1042 if (UNTAG_Bool(REGB3
)) {
1043 /* compiling/table_computation.nit:213 */
1044 fra
.me
.REG
[10] = CALL_metamodel___abstractmetamodel___MMLocalClass___cshe(fra
.me
.REG
[8])(fra
.me
.REG
[8]);
1045 fra
.me
.REG
[10] = CALL_metamodel___partial_order___PartialOrderElement___direct_greaters(fra
.me
.REG
[10])(fra
.me
.REG
[10]);
1046 fra
.me
.REG
[10] = CALL_standard___collection___abstract_collection___Collection___first(fra
.me
.REG
[10])(fra
.me
.REG
[10]);
1047 fra
.me
.REG
[8] = fra
.me
.REG
[10];
1049 /* compiling/table_computation.nit:212 */
1054 /* compiling/table_computation.nit:215 */
1055 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[6])(fra
.me
.REG
[6], fra
.me
.REG
[8]);
1056 /* compiling/table_computation.nit:216 */
1057 fra
.me
.REG
[8] = CALL_metamodel___abstractmetamodel___MMLocalClass___cshe(fra
.me
.REG
[8])(fra
.me
.REG
[8]);
1058 fra
.me
.REG
[8] = CALL_metamodel___partial_order___PartialOrderElement___greaters_and_self(fra
.me
.REG
[8])(fra
.me
.REG
[8]);
1059 CALL_standard___collection___abstract_collection___SimpleCollection___add_all(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[8]);
1060 /* ../lib/standard/collection/array.nit:274 */
1062 /* ../lib/standard/kernel.nit:235 */
1063 REGB3
= TAG_Int(UNTAG_Int(REGB2
)+UNTAG_Int(REGB3
));
1064 /* ../lib/standard/collection/array.nit:274 */
1067 /* ../lib/standard/collection/array.nit:272 */
1072 /* compiling/table_computation.nit:221 */
1074 CALL_compiling___table_computation___Program___colorize(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2], fra
.me
.REG
[6], REGB2
);
1075 /* compiling/table_computation.nit:224 */
1077 /* ../lib/standard/collection/array.nit:266 */
1078 fra
.me
.REG
[7] = fra
.me
.REG
[4];
1079 /* ../lib/standard/collection/array.nit:269 */
1081 /* ../lib/standard/collection/array.nit:270 */
1082 REGB0
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[7])!=NIT_NULL
);
1083 if (UNTAG_Bool(REGB0
)) {
1085 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 270);
1087 REGB0
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[7]);
1088 /* ../lib/standard/collection/array.nit:271 */
1089 fra
.me
.REG
[1] = ATTR_standard___collection___array___Array____items(fra
.me
.REG
[7]);
1090 /* ../lib/standard/collection/array.nit:272 */
1092 /* ../lib/standard/collection/array.nit:24 */
1093 REGB0
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[7])!=NIT_NULL
);
1094 if (UNTAG_Bool(REGB0
)) {
1096 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
1098 REGB0
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[7]);
1099 REGB1
= TAG_Bool(VAL_ISA(REGB0
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB3
), VTID_standard___kernel___Comparable___OTHER(REGB3
))) /*cast OTHER*/;
1100 if (UNTAG_Bool(REGB1
)) {
1102 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1104 /* ../lib/standard/kernel.nit:232 */
1105 REGB0
= TAG_Bool(UNTAG_Int(REGB3
)<UNTAG_Int(REGB0
));
1106 /* ../lib/standard/collection/array.nit:272 */
1107 if (UNTAG_Bool(REGB0
)) {
1108 /* ../lib/standard/collection/array.nit:273 */
1109 REGB0
= TAG_Bool(fra
.me
.REG
[1]==NIT_NULL
);
1110 if (UNTAG_Bool(REGB0
)) {
1111 nit_abort("Reciever is null", NULL
, LOCATE_standard___collection___array
, 273);
1113 /* ../lib/standard/collection/array.nit:718 */
1114 fra
.me
.REG
[8] = ((Nit_NativeArray
)fra
.me
.REG
[1])->val
[UNTAG_Int(REGB3
)];
1115 /* compiling/table_computation.nit:226 */
1116 fra
.me
.REG
[10] = CALL_compiling___table_computation___Program___compiled_classes(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1117 fra
.me
.REG
[9] = CALL_metamodel___abstractmetamodel___MMLocalClass___global(fra
.me
.REG
[8])(fra
.me
.REG
[8]);
1118 fra
.me
.REG
[9] = CALL_standard___collection___abstract_collection___MapRead_____bra(fra
.me
.REG
[10])(fra
.me
.REG
[10], fra
.me
.REG
[9]);
1119 /* compiling/table_computation.nit:227 */
1120 REGB0
= CALL_standard___collection___abstract_collection___Collection___has(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[8]);
1121 if (UNTAG_Bool(REGB0
)) {
1122 /* compiling/table_computation.nit:229 */
1123 fra
.me
.REG
[10] = CALL_compiling___table_computation___CompiledClass___class_table(fra
.me
.REG
[9])(fra
.me
.REG
[9]);
1124 CALL_compiling___table_computation___Program___build_tables_in(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[10], fra
.me
.REG
[8], fra
.me
.REG
[2]);
1125 /* compiling/table_computation.nit:230 */
1126 fra
.me
.REG
[10] = CALL_compiling___table_computation___CompiledClass___class_table(fra
.me
.REG
[9])(fra
.me
.REG
[9]);
1127 /* ../lib/standard/collection/array.nit:24 */
1128 REGB0
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[10])!=NIT_NULL
);
1129 if (UNTAG_Bool(REGB0
)) {
1131 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
1133 REGB0
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[10]);
1134 REGB1
= TAG_Bool(VAL_ISA(REGB0
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB2
), VTID_standard___kernel___Comparable___OTHER(REGB2
))) /*cast OTHER*/;
1135 if (UNTAG_Bool(REGB1
)) {
1137 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1139 /* ../lib/standard/kernel.nit:232 */
1140 REGB0
= TAG_Bool(UNTAG_Int(REGB2
)<UNTAG_Int(REGB0
));
1141 /* compiling/table_computation.nit:230 */
1142 if (UNTAG_Bool(REGB0
)) {
1143 fra
.me
.REG
[10] = CALL_compiling___table_computation___CompiledClass___class_table(fra
.me
.REG
[9])(fra
.me
.REG
[9]);
1144 /* ../lib/standard/collection/array.nit:24 */
1145 REGB0
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[10])!=NIT_NULL
);
1146 if (UNTAG_Bool(REGB0
)) {
1148 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
1150 REGB0
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[10]);
1151 /* compiling/table_computation.nit:230 */
1155 /* compiling/table_computation.nit:233 */
1156 fra
.me
.REG
[10] = CALL_metamodel___abstractmetamodel___MMLocalClass___cshe(fra
.me
.REG
[8])(fra
.me
.REG
[8]);
1157 fra
.me
.REG
[10] = CALL_metamodel___partial_order___PartialOrderElement___direct_greaters(fra
.me
.REG
[10])(fra
.me
.REG
[10]);
1158 fra
.me
.REG
[10] = CALL_standard___collection___abstract_collection___Collection___first(fra
.me
.REG
[10])(fra
.me
.REG
[10]);
1159 /* compiling/table_computation.nit:234 */
1160 fra
.me
.REG
[11] = CALL_compiling___table_computation___Program___compiled_classes(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1161 fra
.me
.REG
[10] = CALL_metamodel___abstractmetamodel___MMLocalClass___global(fra
.me
.REG
[10])(fra
.me
.REG
[10]);
1162 fra
.me
.REG
[10] = CALL_standard___collection___abstract_collection___MapRead_____bra(fra
.me
.REG
[11])(fra
.me
.REG
[11], fra
.me
.REG
[10]);
1163 /* compiling/table_computation.nit:235 */
1164 fra
.me
.REG
[11] = CALL_compiling___table_computation___CompiledClass___class_table(fra
.me
.REG
[9])(fra
.me
.REG
[9]);
1165 REGB0
= CALL_standard___collection___abstract_collection___Collection___is_empty(fra
.me
.REG
[11])(fra
.me
.REG
[11]);
1166 if (UNTAG_Bool(REGB0
)) {
1168 nit_abort("Assert failed", NULL
, LOCATE_compiling___table_computation
, 235);
1170 /* compiling/table_computation.nit:236 */
1171 fra
.me
.REG
[11] = CALL_compiling___table_computation___CompiledClass___class_table(fra
.me
.REG
[9])(fra
.me
.REG
[9]);
1172 fra
.me
.REG
[10] = CALL_compiling___table_computation___CompiledClass___class_table(fra
.me
.REG
[10])(fra
.me
.REG
[10]);
1173 CALL_standard___collection___abstract_collection___SimpleCollection___add_all(fra
.me
.REG
[11])(fra
.me
.REG
[11], fra
.me
.REG
[10]);
1174 /* compiling/table_computation.nit:237 */
1175 fra
.me
.REG
[8] = CALL_metamodel___abstractmetamodel___MMLocalClass___global(fra
.me
.REG
[8])(fra
.me
.REG
[8]);
1176 fra
.me
.REG
[8] = CALL_metamodel___abstractmetamodel___MMGlobalClass___intro(fra
.me
.REG
[8])(fra
.me
.REG
[8]);
1177 /* compiling/table_computation.nit:238 */
1178 REGB0
= TAG_Bool(VAL_ISA(fra
.me
.REG
[8], COLOR_metamodel___abstractmetamodel___MMConcreteClass
, ID_metamodel___abstractmetamodel___MMConcreteClass
)) /*cast MMConcreteClass*/;
1179 if (UNTAG_Bool(REGB0
)) {
1181 nit_abort("Assert failed", NULL
, LOCATE_compiling___table_computation
, 238);
1183 /* compiling/table_computation.nit:239 */
1184 fra
.me
.REG
[8] = CALL_compiling___table_computation___MMConcreteClass___class_color_pos(fra
.me
.REG
[8])(fra
.me
.REG
[8]);
1185 /* compiling/table_computation.nit:240 */
1186 fra
.me
.REG
[10] = CALL_compiling___table_computation___CompiledClass___class_table(fra
.me
.REG
[9])(fra
.me
.REG
[9]);
1187 /* ../lib/standard/collection/array.nit:24 */
1188 REGB0
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[10])!=NIT_NULL
);
1189 if (UNTAG_Bool(REGB0
)) {
1191 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
1193 REGB0
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[10]);
1194 /* compiling/table_computation.nit:241 */
1195 fra
.me
.REG
[10] = CALL_compiling___table_computation___Program___table_information(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1196 CALL_compiling___table_computation___ColorContext___color__eq(fra
.me
.REG
[10])(fra
.me
.REG
[10], fra
.me
.REG
[8], REGB0
);
1197 /* compiling/table_computation.nit:242 */
1198 fra
.me
.REG
[9] = CALL_compiling___table_computation___CompiledClass___class_table(fra
.me
.REG
[9])(fra
.me
.REG
[9]);
1199 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[9])(fra
.me
.REG
[9], fra
.me
.REG
[8]);
1200 REGB1
= TAG_Bool(VAL_ISA(REGB0
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB2
), VTID_standard___kernel___Comparable___OTHER(REGB2
))) /*cast OTHER*/;
1201 if (UNTAG_Bool(REGB1
)) {
1203 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1205 /* ../lib/standard/kernel.nit:232 */
1206 REGB1
= TAG_Bool(UNTAG_Int(REGB2
)<UNTAG_Int(REGB0
));
1207 /* compiling/table_computation.nit:243 */
1208 if (UNTAG_Bool(REGB1
)) {
1212 /* ../lib/standard/collection/array.nit:274 */
1214 /* ../lib/standard/kernel.nit:235 */
1215 REGB0
= TAG_Int(UNTAG_Int(REGB3
)+UNTAG_Int(REGB0
));
1216 /* ../lib/standard/collection/array.nit:274 */
1219 /* ../lib/standard/collection/array.nit:272 */
1224 /* compiling/table_computation.nit:246 */
1225 fra
.me
.REG
[1] = CALL_compiling___table_computation___Program___table_information(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1227 /* ../lib/standard/kernel.nit:235 */
1228 REGB3
= TAG_Int(UNTAG_Int(REGB2
)+UNTAG_Int(REGB3
));
1229 /* compiling/table_computation.nit:246 */
1230 CALL_compiling___table_computation___TableInformation___max_class_table_length__eq(fra
.me
.REG
[1])(fra
.me
.REG
[1], REGB3
);
1231 /* ../lib/standard/collection/array.nit:266 */
1232 fra
.me
.REG
[1] = fra
.me
.REG
[4];
1233 /* ../lib/standard/collection/array.nit:269 */
1235 /* ../lib/standard/collection/array.nit:270 */
1236 REGB0
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
1237 if (UNTAG_Bool(REGB0
)) {
1239 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 270);
1241 REGB0
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1]);
1242 /* ../lib/standard/collection/array.nit:271 */
1243 fra
.me
.REG
[7] = ATTR_standard___collection___array___Array____items(fra
.me
.REG
[1]);
1244 /* ../lib/standard/collection/array.nit:272 */
1246 /* ../lib/standard/collection/array.nit:24 */
1247 REGB0
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
1248 if (UNTAG_Bool(REGB0
)) {
1250 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
1252 REGB0
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1]);
1253 REGB1
= TAG_Bool(VAL_ISA(REGB0
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB3
), VTID_standard___kernel___Comparable___OTHER(REGB3
))) /*cast OTHER*/;
1254 if (UNTAG_Bool(REGB1
)) {
1256 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1258 /* ../lib/standard/kernel.nit:232 */
1259 REGB0
= TAG_Bool(UNTAG_Int(REGB3
)<UNTAG_Int(REGB0
));
1260 /* ../lib/standard/collection/array.nit:272 */
1261 if (UNTAG_Bool(REGB0
)) {
1262 /* ../lib/standard/collection/array.nit:273 */
1263 REGB0
= TAG_Bool(fra
.me
.REG
[7]==NIT_NULL
);
1264 if (UNTAG_Bool(REGB0
)) {
1265 nit_abort("Reciever is null", NULL
, LOCATE_standard___collection___array
, 273);
1267 /* ../lib/standard/collection/array.nit:718 */
1268 fra
.me
.REG
[8] = ((Nit_NativeArray
)fra
.me
.REG
[7])->val
[UNTAG_Int(REGB3
)];
1269 /* compiling/table_computation.nit:250 */
1270 fra
.me
.REG
[9] = CALL_compiling___table_computation___Program___compiled_classes(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1271 fra
.me
.REG
[10] = CALL_metamodel___abstractmetamodel___MMLocalClass___global(fra
.me
.REG
[8])(fra
.me
.REG
[8]);
1272 fra
.me
.REG
[10] = CALL_standard___collection___abstract_collection___MapRead_____bra(fra
.me
.REG
[9])(fra
.me
.REG
[9], fra
.me
.REG
[10]);
1273 /* compiling/table_computation.nit:251 */
1274 fra
.me
.REG
[9] = CALL_compiling___table_computation___CompiledClass___class_layout(fra
.me
.REG
[10])(fra
.me
.REG
[10]);
1275 /* compiling/table_computation.nit:252 */
1276 fra
.me
.REG
[10] = CALL_compiling___table_computation___CompiledClass___instance_layout(fra
.me
.REG
[10])(fra
.me
.REG
[10]);
1277 /* compiling/table_computation.nit:253 */
1278 fra
.me
.REG
[11] = CALL_metamodel___abstractmetamodel___MMLocalClass___crhe(fra
.me
.REG
[8])(fra
.me
.REG
[8]);
1279 fra
.me
.REG
[11] = CALL_metamodel___partial_order___PartialOrderElement___greaters_and_self(fra
.me
.REG
[11])(fra
.me
.REG
[11]);
1280 CALL_standard___collection___abstract_collection___Collection___iterate(fra
.me
.REG
[11])(fra
.me
.REG
[11], (&(fra
.me
)), ((fun_t
)OC_compiling___table_computation___Program___do_global_table_analysis_8
));
1281 /* compiling/table_computation.nit:260 */
1282 REGB0
= CALL_standard___collection___abstract_collection___Collection___has(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[8]);
1283 if (UNTAG_Bool(REGB0
)) {
1284 /* compiling/table_computation.nit:261 */
1285 REGB0
= CALL_compiling___table_computation___TableElt___length(fra
.me
.REG
[9])(fra
.me
.REG
[9]);
1287 REGB4
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1288 if (UNTAG_Bool(REGB4
)) {
1290 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1292 /* ../lib/standard/kernel.nit:234 */
1293 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)>UNTAG_Int(REGB1
));
1294 /* compiling/table_computation.nit:261 */
1295 if (UNTAG_Bool(REGB1
)) {
1296 /* compiling/table_computation.nit:262 */
1297 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[9]);
1299 /* compiling/table_computation.nit:264 */
1300 REGB1
= CALL_compiling___table_computation___TableElt___length(fra
.me
.REG
[10])(fra
.me
.REG
[10]);
1302 REGB4
= TAG_Bool(VAL_ISA(REGB0
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1
), VTID_standard___kernel___Comparable___OTHER(REGB1
))) /*cast OTHER*/;
1303 if (UNTAG_Bool(REGB4
)) {
1305 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1307 /* ../lib/standard/kernel.nit:234 */
1308 REGB0
= TAG_Bool(UNTAG_Int(REGB1
)>UNTAG_Int(REGB0
));
1309 /* compiling/table_computation.nit:264 */
1310 if (UNTAG_Bool(REGB0
)) {
1311 /* compiling/table_computation.nit:265 */
1312 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[3])(fra
.me
.REG
[3], fra
.me
.REG
[10]);
1315 /* ../lib/standard/collection/array.nit:274 */
1317 /* ../lib/standard/kernel.nit:235 */
1318 REGB0
= TAG_Int(UNTAG_Int(REGB3
)+UNTAG_Int(REGB0
));
1319 /* ../lib/standard/collection/array.nit:274 */
1322 /* ../lib/standard/collection/array.nit:272 */
1327 /* compiling/table_computation.nit:271 */
1329 /* ../lib/standard/kernel.nit:235 */
1330 REGB3
= TAG_Int(UNTAG_Int(REGB2
)+UNTAG_Int(REGB3
));
1331 /* compiling/table_computation.nit:271 */
1332 CALL_compiling___table_computation___Program___colorize(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2], fra
.me
.REG
[6], REGB3
);
1333 /* compiling/table_computation.nit:272 */
1335 CALL_compiling___table_computation___Program___colorize(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[3], fra
.me
.REG
[6], REGB3
);
1336 /* compiling/table_computation.nit:275 */
1337 fra
.me
.REG
[6] = CALL_compiling___table_computation___Program___table_information(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1339 CALL_compiling___table_computation___TableInformation___max_class_table_length__eq(fra
.me
.REG
[6])(fra
.me
.REG
[6], REGB3
);
1340 /* ../lib/standard/collection/array.nit:269 */
1342 /* ../lib/standard/collection/array.nit:270 */
1343 REGB0
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[4])!=NIT_NULL
);
1344 if (UNTAG_Bool(REGB0
)) {
1346 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 270);
1348 REGB0
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[4]);
1349 /* ../lib/standard/collection/array.nit:271 */
1350 fra
.me
.REG
[6] = ATTR_standard___collection___array___Array____items(fra
.me
.REG
[4]);
1351 /* ../lib/standard/collection/array.nit:272 */
1353 /* ../lib/standard/collection/array.nit:24 */
1354 REGB0
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[4])!=NIT_NULL
);
1355 if (UNTAG_Bool(REGB0
)) {
1357 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
1359 REGB0
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[4]);
1360 REGB1
= TAG_Bool(VAL_ISA(REGB0
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB3
), VTID_standard___kernel___Comparable___OTHER(REGB3
))) /*cast OTHER*/;
1361 if (UNTAG_Bool(REGB1
)) {
1363 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1365 /* ../lib/standard/kernel.nit:232 */
1366 REGB0
= TAG_Bool(UNTAG_Int(REGB3
)<UNTAG_Int(REGB0
));
1367 /* ../lib/standard/collection/array.nit:272 */
1368 if (UNTAG_Bool(REGB0
)) {
1369 /* ../lib/standard/collection/array.nit:273 */
1370 REGB0
= TAG_Bool(fra
.me
.REG
[6]==NIT_NULL
);
1371 if (UNTAG_Bool(REGB0
)) {
1372 nit_abort("Reciever is null", NULL
, LOCATE_standard___collection___array
, 273);
1374 /* ../lib/standard/collection/array.nit:718 */
1375 fra
.me
.REG
[7] = ((Nit_NativeArray
)fra
.me
.REG
[6])->val
[UNTAG_Int(REGB3
)];
1376 /* compiling/table_computation.nit:277 */
1377 fra
.me
.REG
[1] = CALL_compiling___table_computation___Program___compiled_classes(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1378 fra
.me
.REG
[10] = CALL_metamodel___abstractmetamodel___MMLocalClass___global(fra
.me
.REG
[7])(fra
.me
.REG
[7]);
1379 fra
.me
.REG
[10] = CALL_standard___collection___abstract_collection___MapRead_____bra(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[10]);
1380 /* compiling/table_computation.nit:278 */
1381 REGB0
= CALL_standard___collection___abstract_collection___Collection___has(fra
.me
.REG
[5])(fra
.me
.REG
[5], fra
.me
.REG
[7]);
1382 if (UNTAG_Bool(REGB0
)) {
1383 /* compiling/table_computation.nit:280 */
1384 fra
.me
.REG
[1] = CALL_compiling___table_computation___CompiledClass___class_table(fra
.me
.REG
[10])(fra
.me
.REG
[10]);
1385 CALL_compiling___table_computation___Program___build_tables_in(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1], fra
.me
.REG
[7], fra
.me
.REG
[2]);
1386 /* compiling/table_computation.nit:281 */
1387 fra
.me
.REG
[1] = CALL_compiling___table_computation___CompiledClass___instance_table(fra
.me
.REG
[10])(fra
.me
.REG
[10]);
1388 CALL_compiling___table_computation___Program___build_tables_in(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1], fra
.me
.REG
[7], fra
.me
.REG
[3]);
1390 /* compiling/table_computation.nit:284 */
1391 fra
.me
.REG
[1] = CALL_metamodel___abstractmetamodel___MMLocalClass___cshe(fra
.me
.REG
[7])(fra
.me
.REG
[7]);
1392 fra
.me
.REG
[1] = CALL_metamodel___partial_order___PartialOrderElement___direct_greaters(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1393 fra
.me
.REG
[1] = CALL_standard___collection___abstract_collection___Collection___first(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1394 /* compiling/table_computation.nit:285 */
1395 fra
.me
.REG
[9] = CALL_compiling___table_computation___Program___compiled_classes(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1396 fra
.me
.REG
[1] = CALL_metamodel___abstractmetamodel___MMLocalClass___global(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1397 fra
.me
.REG
[1] = CALL_standard___collection___abstract_collection___MapRead_____bra(fra
.me
.REG
[9])(fra
.me
.REG
[9], fra
.me
.REG
[1]);
1398 /* compiling/table_computation.nit:286 */
1399 fra
.me
.REG
[9] = CALL_compiling___table_computation___CompiledClass___class_table(fra
.me
.REG
[10])(fra
.me
.REG
[10]);
1400 CALL_standard___collection___abstract_collection___RemovableCollection___clear(fra
.me
.REG
[9])(fra
.me
.REG
[9]);
1401 /* compiling/table_computation.nit:287 */
1402 fra
.me
.REG
[9] = CALL_compiling___table_computation___CompiledClass___class_table(fra
.me
.REG
[10])(fra
.me
.REG
[10]);
1403 fra
.me
.REG
[8] = CALL_compiling___table_computation___CompiledClass___class_table(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1404 CALL_standard___collection___abstract_collection___SimpleCollection___add_all(fra
.me
.REG
[9])(fra
.me
.REG
[9], fra
.me
.REG
[8]);
1405 /* compiling/table_computation.nit:288 */
1406 fra
.me
.REG
[7] = CALL_metamodel___abstractmetamodel___MMLocalClass___global(fra
.me
.REG
[7])(fra
.me
.REG
[7]);
1407 fra
.me
.REG
[7] = CALL_metamodel___abstractmetamodel___MMGlobalClass___intro(fra
.me
.REG
[7])(fra
.me
.REG
[7]);
1408 /* compiling/table_computation.nit:289 */
1409 REGB0
= TAG_Bool(VAL_ISA(fra
.me
.REG
[7], COLOR_metamodel___abstractmetamodel___MMConcreteClass
, ID_metamodel___abstractmetamodel___MMConcreteClass
)) /*cast MMConcreteClass*/;
1410 if (UNTAG_Bool(REGB0
)) {
1412 nit_abort("Assert failed", NULL
, LOCATE_compiling___table_computation
, 289);
1414 /* compiling/table_computation.nit:290 */
1415 fra
.me
.REG
[7] = CALL_compiling___table_computation___MMConcreteClass___class_color_pos(fra
.me
.REG
[7])(fra
.me
.REG
[7]);
1416 /* compiling/table_computation.nit:291 */
1417 fra
.me
.REG
[8] = CALL_compiling___table_computation___CompiledClass___class_table(fra
.me
.REG
[10])(fra
.me
.REG
[10]);
1418 fra
.me
.REG
[9] = CALL_compiling___table_computation___Program___table_information(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1419 REGB0
= CALL_compiling___table_computation___ColorContext___color(fra
.me
.REG
[9])(fra
.me
.REG
[9], fra
.me
.REG
[7]);
1420 CALL_standard___collection___abstract_collection___Sequence_____braeq(fra
.me
.REG
[8])(fra
.me
.REG
[8], REGB0
, fra
.me
.REG
[7]);
1421 /* compiling/table_computation.nit:292 */
1423 fra
.me
.REG
[7] = CALL_compiling___table_computation___CompiledClass___class_table(fra
.me
.REG
[10])(fra
.me
.REG
[10]);
1424 /* ../lib/standard/collection/array.nit:24 */
1425 REGB0
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[7])!=NIT_NULL
);
1426 if (UNTAG_Bool(REGB0
)) {
1428 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
1430 REGB0
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[7]);
1431 REGB1
= TAG_Bool(VAL_ISA(REGB2
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1432 if (UNTAG_Bool(REGB1
)) {
1434 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1436 /* ../lib/standard/kernel.nit:231 */
1437 REGB0
= TAG_Bool(UNTAG_Int(REGB0
)<=UNTAG_Int(REGB2
));
1438 /* compiling/table_computation.nit:292 */
1439 if (UNTAG_Bool(REGB0
)) {
1440 /* compiling/table_computation.nit:293 */
1441 fra
.me
.REG
[7] = CALL_compiling___table_computation___CompiledClass___class_table(fra
.me
.REG
[10])(fra
.me
.REG
[10]);
1442 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[7])(fra
.me
.REG
[7], NIT_NULL
);
1444 /* compiling/table_computation.nit:292 */
1449 /* compiling/table_computation.nit:295 */
1450 fra
.me
.REG
[7] = CALL_compiling___table_computation___CompiledClass___class_table(fra
.me
.REG
[10])(fra
.me
.REG
[10]);
1451 fra
.me
.REG
[8] = CALL_compiling___table_computation___CompiledClass___class_layout(fra
.me
.REG
[10])(fra
.me
.REG
[10]);
1452 CALL_compiling___table_computation___Program___append_to_table(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[7], fra
.me
.REG
[8]);
1453 /* compiling/table_computation.nit:296 */
1454 fra
.me
.REG
[8] = CALL_compiling___table_computation___CompiledClass___instance_table(fra
.me
.REG
[10])(fra
.me
.REG
[10]);
1455 REGB0
= CALL_standard___collection___abstract_collection___Collection___is_empty(fra
.me
.REG
[8])(fra
.me
.REG
[8]);
1456 if (UNTAG_Bool(REGB0
)) {
1458 nit_abort("Assert failed", NULL
, LOCATE_compiling___table_computation
, 296);
1460 /* compiling/table_computation.nit:297 */
1461 fra
.me
.REG
[8] = CALL_compiling___table_computation___CompiledClass___instance_table(fra
.me
.REG
[10])(fra
.me
.REG
[10]);
1462 fra
.me
.REG
[1] = CALL_compiling___table_computation___CompiledClass___instance_table(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1463 CALL_standard___collection___abstract_collection___SimpleCollection___add_all(fra
.me
.REG
[8])(fra
.me
.REG
[8], fra
.me
.REG
[1]);
1464 /* compiling/table_computation.nit:298 */
1465 fra
.me
.REG
[1] = CALL_compiling___table_computation___CompiledClass___instance_table(fra
.me
.REG
[10])(fra
.me
.REG
[10]);
1466 fra
.me
.REG
[10] = CALL_compiling___table_computation___CompiledClass___instance_layout(fra
.me
.REG
[10])(fra
.me
.REG
[10]);
1467 CALL_compiling___table_computation___Program___append_to_table(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1], fra
.me
.REG
[10]);
1469 /* ../lib/standard/collection/array.nit:274 */
1471 /* ../lib/standard/kernel.nit:235 */
1472 REGB0
= TAG_Int(UNTAG_Int(REGB3
)+UNTAG_Int(REGB0
));
1473 /* ../lib/standard/collection/array.nit:274 */
1476 /* ../lib/standard/collection/array.nit:272 */
1481 stack_frame_head
= fra
.me
.prev
;
1484 void OC_compiling___table_computation___Program___do_global_table_analysis_1(struct stack_frame_t
*closctx
, val_t p0
, struct stack_frame_t
*closctx_param
, fun_t clos_fun0
){
1485 struct {struct stack_frame_t me
;} fra
;
1488 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1489 fra
.me
.file
= LOCATE_compiling___table_computation
;
1491 fra
.me
.meth
= LOCATE_compiling___table_computation___Program___do_global_table_analysis
;
1492 fra
.me
.has_broke
= 0;
1493 fra
.me
.REG_size
= 1;
1494 fra
.me
.nitni_local_ref_head
= NULL
;
1495 fra
.me
.REG
[0] = NIT_NULL
;
1496 fra
.me
.closure_ctx
= closctx_param
;
1497 fra
.me
.closure_funs
= CREG
;
1499 CREG
[0] = clos_fun0
;
1500 CALL_standard___collection___abstract_collection___SimpleCollection___add(closctx
->REG
[4])(closctx
->REG
[4], fra
.me
.REG
[0]);
1501 stack_frame_head
= fra
.me
.prev
;
1504 val_t
OC_compiling___table_computation___Program___do_global_table_analysis_2(struct stack_frame_t
*closctx
, val_t p0
, val_t p1
){
1505 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
1508 /* compiling/table_computation.nit:178 */
1509 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1510 fra
.me
.file
= LOCATE_compiling___table_computation
;
1512 fra
.me
.meth
= LOCATE_compiling___table_computation___Program___do_global_table_analysis
;
1513 fra
.me
.has_broke
= 0;
1514 fra
.me
.REG_size
= 2;
1515 fra
.me
.nitni_local_ref_head
= NULL
;
1516 fra
.me
.REG
[0] = NIT_NULL
;
1517 fra
.me
.REG
[1] = NIT_NULL
;
1520 REGB0
= CALL_metamodel___abstractmetamodel___MMLocalClass___total_order_compare(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1]);
1523 stack_frame_head
= fra
.me
.prev
;
1526 void OC_compiling___table_computation___Program___do_global_table_analysis_8(struct stack_frame_t
*closctx
, val_t p0
){
1527 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
1530 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1531 fra
.me
.file
= LOCATE_compiling___table_computation
;
1533 fra
.me
.meth
= LOCATE_compiling___table_computation___Program___do_global_table_analysis
;
1534 fra
.me
.has_broke
= 0;
1535 fra
.me
.REG_size
= 2;
1536 fra
.me
.nitni_local_ref_head
= NULL
;
1537 fra
.me
.REG
[0] = NIT_NULL
;
1538 fra
.me
.REG
[1] = NIT_NULL
;
1540 /* compiling/table_computation.nit:254 */
1541 REGB0
= TAG_Bool(VAL_ISA(fra
.me
.REG
[0], COLOR_metamodel___abstractmetamodel___MMConcreteClass
, ID_metamodel___abstractmetamodel___MMConcreteClass
)) /*cast MMConcreteClass*/;
1542 if (UNTAG_Bool(REGB0
)) {
1543 /* compiling/table_computation.nit:255 */
1544 fra
.me
.REG
[1] = CALL_compiling___table_computation___MMConcreteClass___class_layout(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1545 CALL_compiling___table_computation___TableEltComposite___add(closctx
->REG
[9])(closctx
->REG
[9], fra
.me
.REG
[0], fra
.me
.REG
[1]);
1546 /* compiling/table_computation.nit:256 */
1547 fra
.me
.REG
[1] = CALL_compiling___table_computation___MMConcreteClass___instance_layout(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1548 CALL_compiling___table_computation___TableEltComposite___add(closctx
->REG
[10])(closctx
->REG
[10], fra
.me
.REG
[0], fra
.me
.REG
[1]);
1550 stack_frame_head
= fra
.me
.prev
;
1553 void compiling___table_computation___Program___colorize(val_t p0
, val_t p1
, val_t p2
, val_t p3
){
1554 struct {struct stack_frame_t me
; val_t MORE_REG
[10];} fra
;
1565 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1566 fra
.me
.file
= LOCATE_compiling___table_computation
;
1568 fra
.me
.meth
= LOCATE_compiling___table_computation___Program___colorize
;
1569 fra
.me
.has_broke
= 0;
1570 fra
.me
.REG_size
= 11;
1571 fra
.me
.nitni_local_ref_head
= NULL
;
1572 fra
.me
.REG
[0] = NIT_NULL
;
1573 fra
.me
.REG
[1] = NIT_NULL
;
1574 fra
.me
.REG
[2] = NIT_NULL
;
1575 fra
.me
.REG
[3] = NIT_NULL
;
1576 fra
.me
.REG
[4] = NIT_NULL
;
1577 fra
.me
.REG
[5] = NIT_NULL
;
1578 fra
.me
.REG
[6] = NIT_NULL
;
1579 fra
.me
.REG
[7] = NIT_NULL
;
1580 fra
.me
.REG
[8] = NIT_NULL
;
1581 fra
.me
.REG
[9] = NIT_NULL
;
1582 fra
.me
.REG
[10] = NIT_NULL
;
1587 /* compiling/table_computation.nit:306 */
1588 fra
.me
.REG
[3] = NEW_HashMap_standard___collection___hash_collection___HashMap___init();
1589 /* compiling/table_computation.nit:307 */
1590 fra
.me
.REG
[4] = NEW_Array_standard___collection___array___Array___init();
1591 /* ../lib/standard/collection/array.nit:269 */
1593 /* ../lib/standard/collection/array.nit:270 */
1594 REGB2
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
1595 if (UNTAG_Bool(REGB2
)) {
1597 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 270);
1599 REGB2
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1]);
1600 /* ../lib/standard/collection/array.nit:271 */
1601 fra
.me
.REG
[5] = ATTR_standard___collection___array___Array____items(fra
.me
.REG
[1]);
1602 /* ../lib/standard/collection/array.nit:272 */
1604 /* ../lib/standard/collection/array.nit:24 */
1605 REGB2
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
1606 if (UNTAG_Bool(REGB2
)) {
1608 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
1610 REGB2
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1]);
1611 REGB3
= TAG_Bool(VAL_ISA(REGB2
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1
), VTID_standard___kernel___Comparable___OTHER(REGB1
))) /*cast OTHER*/;
1612 if (UNTAG_Bool(REGB3
)) {
1614 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1616 /* ../lib/standard/kernel.nit:232 */
1617 REGB2
= TAG_Bool(UNTAG_Int(REGB1
)<UNTAG_Int(REGB2
));
1618 /* ../lib/standard/collection/array.nit:272 */
1619 if (UNTAG_Bool(REGB2
)) {
1620 /* ../lib/standard/collection/array.nit:273 */
1621 REGB2
= TAG_Bool(fra
.me
.REG
[5]==NIT_NULL
);
1622 if (UNTAG_Bool(REGB2
)) {
1623 nit_abort("Reciever is null", NULL
, LOCATE_standard___collection___array
, 273);
1625 /* ../lib/standard/collection/array.nit:718 */
1626 fra
.me
.REG
[6] = ((Nit_NativeArray
)fra
.me
.REG
[5])->val
[UNTAG_Int(REGB1
)];
1627 /* compiling/table_computation.nit:309 */
1629 /* ../lib/standard/kernel.nit:236 */
1630 REGB2
= TAG_Int(-UNTAG_Int(REGB2
));
1631 /* compiling/table_computation.nit:310 */
1632 REGB3
= CALL_compiling___table_computation___TableElt___length(fra
.me
.REG
[6])(fra
.me
.REG
[6]);
1633 /* compiling/table_computation.nit:311 */
1634 fra
.me
.REG
[7] = CALL_compiling___table_computation___Program___table_information(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1635 REGB4
= CALL_compiling___table_computation___ColorContext___has_color(fra
.me
.REG
[7])(fra
.me
.REG
[7], fra
.me
.REG
[6]);
1636 if (UNTAG_Bool(REGB4
)) {
1637 /* compiling/table_computation.nit:312 */
1638 fra
.me
.REG
[7] = CALL_compiling___table_computation___Program___table_information(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1639 REGB4
= CALL_compiling___table_computation___ColorContext___color(fra
.me
.REG
[7])(fra
.me
.REG
[7], fra
.me
.REG
[6]);
1642 /* compiling/table_computation.nit:314 */
1643 CALL_standard___collection___abstract_collection___RemovableCollection___clear(fra
.me
.REG
[4])(fra
.me
.REG
[4]);
1644 CALL_standard___collection___abstract_collection___Collection___iterate(fra
.me
.REG
[2])(fra
.me
.REG
[2], (&(fra
.me
)), ((fun_t
)OC_compiling___table_computation___Program___colorize_1
));
1645 /* compiling/table_computation.nit:320 */
1647 /* compiling/table_computation.nit:321 */
1649 REGB5
= TAG_Bool(IS_EQUAL_OO(REGB4
,REGB2
));
1650 if (UNTAG_Bool(REGB5
)) {
1652 /* ../lib/standard/kernel.nit:227 */
1653 REGB6
= TAG_Bool((REGB4
)==(REGB2
));
1654 /* compiling/table_computation.nit:321 */
1657 REGB5
= TAG_Bool(!UNTAG_Bool(REGB5
));
1658 if (UNTAG_Bool(REGB5
)) {
1659 /* compiling/table_computation.nit:322 */
1661 /* ../lib/standard/collection/array.nit:266 */
1662 fra
.me
.REG
[7] = fra
.me
.REG
[4];
1663 /* ../lib/standard/collection/array.nit:269 */
1665 /* ../lib/standard/collection/array.nit:270 */
1666 REGB6
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[7])!=NIT_NULL
);
1667 if (UNTAG_Bool(REGB6
)) {
1669 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 270);
1671 REGB6
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[7]);
1672 /* ../lib/standard/collection/array.nit:271 */
1673 fra
.me
.REG
[8] = ATTR_standard___collection___array___Array____items(fra
.me
.REG
[7]);
1674 /* ../lib/standard/collection/array.nit:272 */
1676 /* ../lib/standard/collection/array.nit:24 */
1677 REGB6
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[7])!=NIT_NULL
);
1678 if (UNTAG_Bool(REGB6
)) {
1680 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
1682 REGB6
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[7]);
1683 REGB7
= TAG_Bool(VAL_ISA(REGB6
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB5
), VTID_standard___kernel___Comparable___OTHER(REGB5
))) /*cast OTHER*/;
1684 if (UNTAG_Bool(REGB7
)) {
1686 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1688 /* ../lib/standard/kernel.nit:232 */
1689 REGB6
= TAG_Bool(UNTAG_Int(REGB5
)<UNTAG_Int(REGB6
));
1690 /* ../lib/standard/collection/array.nit:272 */
1691 if (UNTAG_Bool(REGB6
)) {
1692 /* ../lib/standard/collection/array.nit:273 */
1693 REGB6
= TAG_Bool(fra
.me
.REG
[8]==NIT_NULL
);
1694 if (UNTAG_Bool(REGB6
)) {
1695 nit_abort("Reciever is null", NULL
, LOCATE_standard___collection___array
, 273);
1697 /* ../lib/standard/collection/array.nit:718 */
1698 fra
.me
.REG
[9] = ((Nit_NativeArray
)fra
.me
.REG
[8])->val
[UNTAG_Int(REGB5
)];
1699 /* compiling/table_computation.nit:324 */
1701 /* compiling/table_computation.nit:325 */
1703 REGB7
= TAG_Bool(VAL_ISA(REGB3
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB6
), VTID_standard___kernel___Comparable___OTHER(REGB6
))) /*cast OTHER*/;
1704 if (UNTAG_Bool(REGB7
)) {
1706 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1708 /* ../lib/standard/kernel.nit:232 */
1709 REGB7
= TAG_Bool(UNTAG_Int(REGB6
)<UNTAG_Int(REGB3
));
1710 /* compiling/table_computation.nit:325 */
1711 if (UNTAG_Bool(REGB7
)) {
1712 /* ../lib/standard/kernel.nit:235 */
1713 REGB7
= TAG_Int(UNTAG_Int(REGB4
)+UNTAG_Int(REGB6
));
1714 /* compiling/table_computation.nit:326 */
1715 REGB7
= CALL_standard___collection___abstract_collection___MapRead___has_key(fra
.me
.REG
[3])(fra
.me
.REG
[3], REGB7
);
1716 if (UNTAG_Bool(REGB7
)) {
1717 /* ../lib/standard/kernel.nit:235 */
1718 REGB7
= TAG_Int(UNTAG_Int(REGB4
)+UNTAG_Int(REGB6
));
1719 /* compiling/table_computation.nit:326 */
1720 fra
.me
.REG
[10] = CALL_standard___collection___abstract_collection___MapRead_____bra(fra
.me
.REG
[3])(fra
.me
.REG
[3], REGB7
);
1721 REGB7
= CALL_compiling___table_computation___Program___free_color(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[10], fra
.me
.REG
[9]);
1722 REGB7
= TAG_Bool(!UNTAG_Bool(REGB7
));
1724 REGB8
= TAG_Bool(false);
1727 if (UNTAG_Bool(REGB7
)) {
1728 /* ../lib/standard/kernel.nit:235 */
1729 REGB7
= TAG_Int(UNTAG_Int(REGB4
)+UNTAG_Int(REGB6
));
1730 /* compiling/table_computation.nit:327 */
1732 /* ../lib/standard/kernel.nit:235 */
1733 REGB8
= TAG_Int(UNTAG_Int(REGB7
)+UNTAG_Int(REGB8
));
1734 /* compiling/table_computation.nit:327 */
1736 /* compiling/table_computation.nit:328 */
1740 /* compiling/table_computation.nit:330 */
1742 /* ../lib/standard/kernel.nit:235 */
1743 REGB8
= TAG_Int(UNTAG_Int(REGB6
)+UNTAG_Int(REGB8
));
1744 /* compiling/table_computation.nit:330 */
1748 /* compiling/table_computation.nit:325 */
1753 /* ../lib/standard/collection/array.nit:274 */
1755 /* ../lib/standard/kernel.nit:235 */
1756 REGB6
= TAG_Int(UNTAG_Int(REGB5
)+UNTAG_Int(REGB6
));
1757 /* ../lib/standard/collection/array.nit:274 */
1760 /* ../lib/standard/collection/array.nit:272 */
1766 /* compiling/table_computation.nit:321 */
1771 /* compiling/table_computation.nit:335 */
1772 fra
.me
.REG
[8] = CALL_compiling___table_computation___Program___table_information(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1773 CALL_compiling___table_computation___ColorContext___color__eq(fra
.me
.REG
[8])(fra
.me
.REG
[8], fra
.me
.REG
[6], REGB2
);
1775 /* compiling/table_computation.nit:337 */
1777 /* ../lib/standard/kernel.nit:352 */
1779 REGB5
= TAG_Bool(VAL_ISA(REGB3
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB4
), VTID_standard___kernel___Comparable___OTHER(REGB4
))) /*cast OTHER*/;
1780 if (UNTAG_Bool(REGB5
)) {
1782 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1784 /* ../lib/standard/kernel.nit:232 */
1785 REGB5
= TAG_Bool(UNTAG_Int(REGB4
)<UNTAG_Int(REGB3
));
1786 /* ../lib/standard/kernel.nit:352 */
1787 if (UNTAG_Bool(REGB5
)) {
1788 /* compiling/table_computation.nit:337 */
1790 /* ../lib/standard/kernel.nit:235 */
1791 REGB6
= TAG_Int(UNTAG_Int(REGB2
)+UNTAG_Int(REGB5
));
1792 /* compiling/table_computation.nit:338 */
1793 REGB6
= CALL_standard___collection___abstract_collection___MapRead___has_key(fra
.me
.REG
[3])(fra
.me
.REG
[3], REGB6
);
1794 if (UNTAG_Bool(REGB6
)) {
1795 /* ../lib/standard/kernel.nit:235 */
1796 REGB6
= TAG_Int(UNTAG_Int(REGB2
)+UNTAG_Int(REGB5
));
1797 /* compiling/table_computation.nit:339 */
1798 fra
.me
.REG
[8] = CALL_standard___collection___abstract_collection___MapRead_____bra(fra
.me
.REG
[3])(fra
.me
.REG
[3], REGB6
);
1799 REGB6
= TAG_Bool(fra
.me
.REG
[8]==NIT_NULL
);
1800 if (UNTAG_Bool(REGB6
)) {
1801 nit_abort("Reciever is null", NULL
, LOCATE_compiling___table_computation
, 339);
1803 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[8])(fra
.me
.REG
[8], fra
.me
.REG
[6]);
1805 /* ../lib/standard/kernel.nit:235 */
1806 REGB5
= TAG_Int(UNTAG_Int(REGB2
)+UNTAG_Int(REGB5
));
1807 /* compiling/table_computation.nit:341 */
1809 fra
.me
.REG
[8] = NEW_Array_standard___collection___array___Array___with_capacity(REGB6
);
1810 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[8])(fra
.me
.REG
[8], fra
.me
.REG
[6]);
1811 CALL_standard___collection___abstract_collection___Map_____braeq(fra
.me
.REG
[3])(fra
.me
.REG
[3], REGB5
, fra
.me
.REG
[8]);
1813 /* ../lib/standard/kernel.nit:354 */
1815 /* ../lib/standard/kernel.nit:235 */
1816 REGB5
= TAG_Int(UNTAG_Int(REGB4
)+UNTAG_Int(REGB5
));
1817 /* ../lib/standard/kernel.nit:354 */
1820 /* ../lib/standard/kernel.nit:352 */
1825 /* ../lib/standard/collection/array.nit:274 */
1827 /* ../lib/standard/kernel.nit:235 */
1828 REGB4
= TAG_Int(UNTAG_Int(REGB1
)+UNTAG_Int(REGB4
));
1829 /* ../lib/standard/collection/array.nit:274 */
1832 /* ../lib/standard/collection/array.nit:272 */
1837 stack_frame_head
= fra
.me
.prev
;
1840 void OC_compiling___table_computation___Program___colorize_1(struct stack_frame_t
*closctx
, val_t p0
){
1841 struct {struct stack_frame_t me
;} fra
;
1844 /* compiling/table_computation.nit:315 */
1845 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1846 fra
.me
.file
= LOCATE_compiling___table_computation
;
1848 fra
.me
.meth
= LOCATE_compiling___table_computation___Program___colorize
;
1849 fra
.me
.has_broke
= 0;
1850 fra
.me
.REG_size
= 1;
1851 fra
.me
.nitni_local_ref_head
= NULL
;
1852 fra
.me
.REG
[0] = NIT_NULL
;
1854 /* compiling/table_computation.nit:316 */
1855 REGB0
= CALL_compiling___table_computation___TableElt___is_related_to(closctx
->REG
[6])(closctx
->REG
[6], fra
.me
.REG
[0]);
1856 if (UNTAG_Bool(REGB0
)) {
1857 /* compiling/table_computation.nit:317 */
1858 CALL_standard___collection___abstract_collection___SimpleCollection___add(closctx
->REG
[4])(closctx
->REG
[4], fra
.me
.REG
[0]);
1860 stack_frame_head
= fra
.me
.prev
;
1863 val_t
compiling___table_computation___Program___free_color(val_t p0
, val_t p1
, val_t p2
){
1864 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
1869 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1870 fra
.me
.file
= LOCATE_compiling___table_computation
;
1872 fra
.me
.meth
= LOCATE_compiling___table_computation___Program___free_color
;
1873 fra
.me
.has_broke
= 0;
1874 fra
.me
.REG_size
= 4;
1875 fra
.me
.nitni_local_ref_head
= NULL
;
1876 fra
.me
.REG
[0] = NIT_NULL
;
1877 fra
.me
.REG
[1] = NIT_NULL
;
1878 fra
.me
.REG
[2] = NIT_NULL
;
1879 fra
.me
.REG
[3] = NIT_NULL
;
1883 /* ../lib/standard/collection/array.nit:269 */
1885 /* ../lib/standard/collection/array.nit:270 */
1886 REGB1
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
1887 if (UNTAG_Bool(REGB1
)) {
1889 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 270);
1891 REGB1
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1]);
1892 /* ../lib/standard/collection/array.nit:271 */
1893 fra
.me
.REG
[0] = ATTR_standard___collection___array___Array____items(fra
.me
.REG
[1]);
1894 /* ../lib/standard/collection/array.nit:272 */
1896 /* ../lib/standard/collection/array.nit:24 */
1897 REGB1
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
1898 if (UNTAG_Bool(REGB1
)) {
1900 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
1902 REGB1
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1]);
1903 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1904 if (UNTAG_Bool(REGB2
)) {
1906 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1908 /* ../lib/standard/kernel.nit:232 */
1909 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)<UNTAG_Int(REGB1
));
1910 /* ../lib/standard/collection/array.nit:272 */
1911 if (UNTAG_Bool(REGB1
)) {
1912 /* ../lib/standard/collection/array.nit:273 */
1913 REGB1
= TAG_Bool(fra
.me
.REG
[0]==NIT_NULL
);
1914 if (UNTAG_Bool(REGB1
)) {
1915 nit_abort("Reciever is null", NULL
, LOCATE_standard___collection___array
, 273);
1917 /* ../lib/standard/collection/array.nit:718 */
1918 fra
.me
.REG
[3] = ((Nit_NativeArray
)fra
.me
.REG
[0])->val
[UNTAG_Int(REGB0
)];
1919 /* compiling/table_computation.nit:350 */
1920 REGB1
= CALL_compiling___table_computation___TableElt___is_related_to(fra
.me
.REG
[3])(fra
.me
.REG
[3], fra
.me
.REG
[2]);
1921 if (UNTAG_Bool(REGB1
)) {
1922 /* compiling/table_computation.nit:351 */
1923 REGB1
= TAG_Bool(false);
1926 /* ../lib/standard/collection/array.nit:274 */
1928 /* ../lib/standard/kernel.nit:235 */
1929 REGB2
= TAG_Int(UNTAG_Int(REGB0
)+UNTAG_Int(REGB2
));
1930 /* ../lib/standard/collection/array.nit:274 */
1933 /* ../lib/standard/collection/array.nit:272 */
1938 /* compiling/table_computation.nit:354 */
1939 REGB0
= TAG_Bool(true);
1943 stack_frame_head
= fra
.me
.prev
;
1946 void compiling___table_computation___Program___append_to_table(val_t p0
, val_t p1
, val_t p2
){
1947 struct {struct stack_frame_t me
; val_t MORE_REG
[4];} fra
;
1952 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1953 fra
.me
.file
= LOCATE_compiling___table_computation
;
1955 fra
.me
.meth
= LOCATE_compiling___table_computation___Program___append_to_table
;
1956 fra
.me
.has_broke
= 0;
1957 fra
.me
.REG_size
= 5;
1958 fra
.me
.nitni_local_ref_head
= NULL
;
1959 fra
.me
.REG
[0] = NIT_NULL
;
1960 fra
.me
.REG
[1] = NIT_NULL
;
1961 fra
.me
.REG
[2] = NIT_NULL
;
1962 fra
.me
.REG
[3] = NIT_NULL
;
1963 fra
.me
.REG
[4] = NIT_NULL
;
1967 /* compiling/table_computation.nit:359 */
1969 REGB1
= CALL_compiling___table_computation___TableElt___length(fra
.me
.REG
[2])(fra
.me
.REG
[2]);
1970 /* ../lib/standard/kernel.nit:352 */
1972 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
1973 if (UNTAG_Bool(REGB2
)) {
1975 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
1977 /* ../lib/standard/kernel.nit:232 */
1978 REGB2
= TAG_Bool(UNTAG_Int(REGB0
)<UNTAG_Int(REGB1
));
1979 /* ../lib/standard/kernel.nit:352 */
1980 if (UNTAG_Bool(REGB2
)) {
1981 /* compiling/table_computation.nit:359 */
1983 /* compiling/table_computation.nit:360 */
1984 fra
.me
.REG
[3] = CALL_compiling___table_computation___TableElt___item(fra
.me
.REG
[2])(fra
.me
.REG
[2], REGB2
);
1985 /* compiling/table_computation.nit:361 */
1986 fra
.me
.REG
[4] = CALL_compiling___table_computation___Program___table_information(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
1987 /* ../lib/standard/collection/array.nit:24 */
1988 REGB2
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1])!=NIT_NULL
);
1989 if (UNTAG_Bool(REGB2
)) {
1991 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
1993 REGB2
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[1]);
1994 /* compiling/table_computation.nit:361 */
1995 CALL_compiling___table_computation___ColorContext___color__eq(fra
.me
.REG
[4])(fra
.me
.REG
[4], fra
.me
.REG
[3], REGB2
);
1996 /* compiling/table_computation.nit:362 */
1997 CALL_standard___collection___abstract_collection___SimpleCollection___add(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[3]);
1998 /* ../lib/standard/kernel.nit:354 */
2000 /* ../lib/standard/kernel.nit:235 */
2001 REGB2
= TAG_Int(UNTAG_Int(REGB0
)+UNTAG_Int(REGB2
));
2002 /* ../lib/standard/kernel.nit:354 */
2005 /* ../lib/standard/kernel.nit:352 */
2010 stack_frame_head
= fra
.me
.prev
;
2013 void compiling___table_computation___Program___build_tables_in(val_t p0
, val_t p1
, val_t p2
, val_t p3
){
2014 struct {struct stack_frame_t me
; val_t MORE_REG
[7];} fra
;
2021 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2022 fra
.me
.file
= LOCATE_compiling___table_computation
;
2024 fra
.me
.meth
= LOCATE_compiling___table_computation___Program___build_tables_in
;
2025 fra
.me
.has_broke
= 0;
2026 fra
.me
.REG_size
= 8;
2027 fra
.me
.nitni_local_ref_head
= NULL
;
2028 fra
.me
.REG
[0] = NIT_NULL
;
2029 fra
.me
.REG
[1] = NIT_NULL
;
2030 fra
.me
.REG
[2] = NIT_NULL
;
2031 fra
.me
.REG
[3] = NIT_NULL
;
2032 fra
.me
.REG
[4] = NIT_NULL
;
2033 fra
.me
.REG
[5] = NIT_NULL
;
2034 fra
.me
.REG
[6] = NIT_NULL
;
2035 fra
.me
.REG
[7] = NIT_NULL
;
2040 /* compiling/table_computation.nit:368 */
2041 fra
.me
.REG
[4] = NEW_HashMap_standard___collection___hash_collection___HashMap___init();
2042 /* compiling/table_computation.nit:369 */
2044 /* ../lib/standard/collection/array.nit:269 */
2046 /* ../lib/standard/collection/array.nit:270 */
2047 REGB2
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[3])!=NIT_NULL
);
2048 if (UNTAG_Bool(REGB2
)) {
2050 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 270);
2052 REGB2
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[3]);
2053 /* ../lib/standard/collection/array.nit:271 */
2054 fra
.me
.REG
[5] = ATTR_standard___collection___array___Array____items(fra
.me
.REG
[3]);
2055 /* ../lib/standard/collection/array.nit:272 */
2057 /* ../lib/standard/collection/array.nit:24 */
2058 REGB2
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[3])!=NIT_NULL
);
2059 if (UNTAG_Bool(REGB2
)) {
2061 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
2063 REGB2
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[3]);
2064 REGB3
= TAG_Bool(VAL_ISA(REGB2
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1
), VTID_standard___kernel___Comparable___OTHER(REGB1
))) /*cast OTHER*/;
2065 if (UNTAG_Bool(REGB3
)) {
2067 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
2069 /* ../lib/standard/kernel.nit:232 */
2070 REGB2
= TAG_Bool(UNTAG_Int(REGB1
)<UNTAG_Int(REGB2
));
2071 /* ../lib/standard/collection/array.nit:272 */
2072 if (UNTAG_Bool(REGB2
)) {
2073 /* ../lib/standard/collection/array.nit:273 */
2074 REGB2
= TAG_Bool(fra
.me
.REG
[5]==NIT_NULL
);
2075 if (UNTAG_Bool(REGB2
)) {
2076 nit_abort("Reciever is null", NULL
, LOCATE_standard___collection___array
, 273);
2078 /* ../lib/standard/collection/array.nit:718 */
2079 fra
.me
.REG
[6] = ((Nit_NativeArray
)fra
.me
.REG
[5])->val
[UNTAG_Int(REGB1
)];
2080 /* compiling/table_computation.nit:371 */
2081 REGB2
= CALL_compiling___table_computation___TableElt___is_related_to(fra
.me
.REG
[6])(fra
.me
.REG
[6], fra
.me
.REG
[2]);
2082 if (UNTAG_Bool(REGB2
)) {
2083 /* compiling/table_computation.nit:372 */
2084 fra
.me
.REG
[7] = CALL_compiling___table_computation___Program___table_information(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
2085 REGB2
= CALL_compiling___table_computation___ColorContext___color(fra
.me
.REG
[7])(fra
.me
.REG
[7], fra
.me
.REG
[6]);
2086 /* compiling/table_computation.nit:373 */
2087 REGB3
= CALL_compiling___table_computation___TableElt___length(fra
.me
.REG
[6])(fra
.me
.REG
[6]);
2088 /* ../lib/standard/kernel.nit:235 */
2089 REGB3
= TAG_Int(UNTAG_Int(REGB2
)+UNTAG_Int(REGB3
));
2090 /* compiling/table_computation.nit:374 */
2091 CALL_standard___collection___abstract_collection___Map_____braeq(fra
.me
.REG
[4])(fra
.me
.REG
[4], REGB2
, fra
.me
.REG
[6]);
2092 REGB2
= TAG_Bool(VAL_ISA(REGB3
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
2093 if (UNTAG_Bool(REGB2
)) {
2095 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
2097 /* ../lib/standard/kernel.nit:232 */
2098 REGB2
= TAG_Bool(UNTAG_Int(REGB0
)<UNTAG_Int(REGB3
));
2099 /* compiling/table_computation.nit:375 */
2100 if (UNTAG_Bool(REGB2
)) {
2101 /* compiling/table_computation.nit:376 */
2105 /* ../lib/standard/collection/array.nit:274 */
2107 /* ../lib/standard/kernel.nit:235 */
2108 REGB3
= TAG_Int(UNTAG_Int(REGB1
)+UNTAG_Int(REGB3
));
2109 /* ../lib/standard/collection/array.nit:274 */
2112 /* ../lib/standard/collection/array.nit:272 */
2117 /* compiling/table_computation.nit:380 */
2119 /* compiling/table_computation.nit:381 */
2121 REGB3
= TAG_Bool(VAL_ISA(REGB0
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1
), VTID_standard___kernel___Comparable___OTHER(REGB1
))) /*cast OTHER*/;
2122 if (UNTAG_Bool(REGB3
)) {
2124 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
2126 /* ../lib/standard/kernel.nit:232 */
2127 REGB3
= TAG_Bool(UNTAG_Int(REGB1
)<UNTAG_Int(REGB0
));
2128 /* compiling/table_computation.nit:381 */
2129 if (UNTAG_Bool(REGB3
)) {
2130 /* compiling/table_computation.nit:382 */
2131 REGB3
= CALL_standard___collection___abstract_collection___MapRead___has_key(fra
.me
.REG
[4])(fra
.me
.REG
[4], REGB1
);
2132 if (UNTAG_Bool(REGB3
)) {
2133 /* compiling/table_computation.nit:383 */
2134 fra
.me
.REG
[0] = CALL_standard___collection___abstract_collection___MapRead_____bra(fra
.me
.REG
[4])(fra
.me
.REG
[4], REGB1
);
2135 /* compiling/table_computation.nit:384 */
2137 REGB2
= CALL_compiling___table_computation___TableElt___length(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
2138 /* ../lib/standard/kernel.nit:352 */
2140 REGB4
= TAG_Bool(VAL_ISA(REGB2
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB3
), VTID_standard___kernel___Comparable___OTHER(REGB3
))) /*cast OTHER*/;
2141 if (UNTAG_Bool(REGB4
)) {
2143 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
2145 /* ../lib/standard/kernel.nit:232 */
2146 REGB4
= TAG_Bool(UNTAG_Int(REGB3
)<UNTAG_Int(REGB2
));
2147 /* ../lib/standard/kernel.nit:352 */
2148 if (UNTAG_Bool(REGB4
)) {
2149 /* compiling/table_computation.nit:384 */
2151 /* compiling/table_computation.nit:385 */
2152 fra
.me
.REG
[2] = CALL_compiling___table_computation___TableElt___item(fra
.me
.REG
[0])(fra
.me
.REG
[0], REGB4
);
2153 CALL_standard___collection___abstract_collection___Sequence_____braeq(fra
.me
.REG
[1])(fra
.me
.REG
[1], REGB1
, fra
.me
.REG
[2]);
2154 /* compiling/table_computation.nit:386 */
2156 /* ../lib/standard/kernel.nit:235 */
2157 REGB4
= TAG_Int(UNTAG_Int(REGB1
)+UNTAG_Int(REGB4
));
2158 /* compiling/table_computation.nit:386 */
2160 /* ../lib/standard/kernel.nit:354 */
2162 /* ../lib/standard/kernel.nit:235 */
2163 REGB4
= TAG_Int(UNTAG_Int(REGB3
)+UNTAG_Int(REGB4
));
2164 /* ../lib/standard/kernel.nit:354 */
2167 /* ../lib/standard/kernel.nit:352 */
2173 /* compiling/table_computation.nit:389 */
2174 CALL_standard___collection___abstract_collection___Sequence_____braeq(fra
.me
.REG
[1])(fra
.me
.REG
[1], REGB1
, NIT_NULL
);
2175 /* compiling/table_computation.nit:390 */
2177 /* ../lib/standard/kernel.nit:235 */
2178 REGB3
= TAG_Int(UNTAG_Int(REGB1
)+UNTAG_Int(REGB3
));
2179 /* compiling/table_computation.nit:390 */
2183 /* compiling/table_computation.nit:381 */
2188 stack_frame_head
= fra
.me
.prev
;
2191 val_t
compiling___table_computation___MMModule___local_table(val_t p0
){
2192 struct {struct stack_frame_t me
;} fra
;
2195 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2196 fra
.me
.file
= LOCATE_compiling___table_computation
;
2198 fra
.me
.meth
= LOCATE_compiling___table_computation___MMModule___local_table
;
2199 fra
.me
.has_broke
= 0;
2200 fra
.me
.REG_size
= 1;
2201 fra
.me
.nitni_local_ref_head
= NULL
;
2202 fra
.me
.REG
[0] = NIT_NULL
;
2204 /* compiling/table_computation.nit:397 */
2205 REGB0
= TAG_Bool(ATTR_compiling___table_computation___MMModule____local_table(fra
.me
.REG
[0])!=NIT_NULL
);
2206 if (UNTAG_Bool(REGB0
)) {
2208 nit_abort("Uninitialized attribute %s", "_local_table", LOCATE_compiling___table_computation
, 397);
2210 fra
.me
.REG
[0] = ATTR_compiling___table_computation___MMModule____local_table(fra
.me
.REG
[0]);
2211 stack_frame_head
= fra
.me
.prev
;
2212 return fra
.me
.REG
[0];
2214 void compiling___table_computation___MMModule___local_analysis(val_t p0
){
2215 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
2217 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2218 fra
.me
.file
= LOCATE_compiling___table_computation
;
2220 fra
.me
.meth
= LOCATE_compiling___table_computation___MMModule___local_analysis
;
2221 fra
.me
.has_broke
= 0;
2222 fra
.me
.REG_size
= 2;
2223 fra
.me
.nitni_local_ref_head
= NULL
;
2224 fra
.me
.REG
[0] = NIT_NULL
;
2225 fra
.me
.REG
[1] = NIT_NULL
;
2227 /* compiling/table_computation.nit:403 */
2228 fra
.me
.REG
[1] = CALL_metamodel___abstractmetamodel___MMModule___local_classes(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
2229 CALL_standard___collection___abstract_collection___Collection___iterate(fra
.me
.REG
[1])(fra
.me
.REG
[1], (&(fra
.me
)), ((fun_t
)OC_compiling___table_computation___MMModule___local_analysis_1
));
2230 stack_frame_head
= fra
.me
.prev
;
2233 void OC_compiling___table_computation___MMModule___local_analysis_1(struct stack_frame_t
*closctx
, val_t p0
, struct stack_frame_t
*closctx_param
, fun_t clos_fun0
){
2234 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
2238 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2239 fra
.me
.file
= LOCATE_compiling___table_computation
;
2241 fra
.me
.meth
= LOCATE_compiling___table_computation___MMModule___local_analysis
;
2242 fra
.me
.has_broke
= 0;
2243 fra
.me
.REG_size
= 2;
2244 fra
.me
.nitni_local_ref_head
= NULL
;
2245 fra
.me
.REG
[0] = NIT_NULL
;
2246 fra
.me
.REG
[1] = NIT_NULL
;
2247 fra
.me
.closure_ctx
= closctx_param
;
2248 fra
.me
.closure_funs
= CREG
;
2250 CREG
[0] = clos_fun0
;
2251 /* compiling/table_computation.nit:404 */
2252 REGB0
= TAG_Bool(VAL_ISA(fra
.me
.REG
[0], COLOR_metamodel___abstractmetamodel___MMConcreteClass
, ID_metamodel___abstractmetamodel___MMConcreteClass
)) /*cast MMConcreteClass*/;
2253 if (UNTAG_Bool(REGB0
)) {
2254 /* compiling/table_computation.nit:405 */
2255 REGB0
= TAG_Bool(ATTR_compiling___table_computation___MMModule____local_table(closctx
->REG
[0])!=NIT_NULL
);
2256 if (UNTAG_Bool(REGB0
)) {
2258 nit_abort("Uninitialized attribute %s", "_local_table", LOCATE_compiling___table_computation
, 405);
2260 fra
.me
.REG
[1] = ATTR_compiling___table_computation___MMModule____local_table(closctx
->REG
[0]);
2261 CALL_compiling___table_computation___MMConcreteClass___build_layout_in(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1]);
2263 stack_frame_head
= fra
.me
.prev
;
2266 val_t
compiling___table_computation___TableElt___is_related_to(val_t p0
, val_t p1
){
2267 struct {struct stack_frame_t me
;} fra
;
2269 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2270 fra
.me
.file
= LOCATE_compiling___table_computation
;
2272 fra
.me
.meth
= LOCATE_compiling___table_computation___TableElt___is_related_to
;
2273 fra
.me
.has_broke
= 0;
2274 fra
.me
.REG_size
= 0;
2275 fra
.me
.nitni_local_ref_head
= NULL
;
2276 /* compiling/table_computation.nit:421 */
2277 nit_abort("Deferred method called", NULL
, LOCATE_compiling___table_computation
, 421);
2278 stack_frame_head
= fra
.me
.prev
;
2281 val_t
compiling___table_computation___TableElt___length(val_t p0
){
2282 struct {struct stack_frame_t me
;} fra
;
2285 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2286 fra
.me
.file
= LOCATE_compiling___table_computation
;
2288 fra
.me
.meth
= LOCATE_compiling___table_computation___TableElt___length
;
2289 fra
.me
.has_broke
= 0;
2290 fra
.me
.REG_size
= 1;
2291 fra
.me
.nitni_local_ref_head
= NULL
;
2292 fra
.me
.REG
[0] = NIT_NULL
;
2294 /* compiling/table_computation.nit:425 */
2298 stack_frame_head
= fra
.me
.prev
;
2301 val_t
compiling___table_computation___TableElt___item(val_t p0
, val_t p1
){
2302 struct {struct stack_frame_t me
;} fra
;
2305 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2306 fra
.me
.file
= LOCATE_compiling___table_computation
;
2308 fra
.me
.meth
= LOCATE_compiling___table_computation___TableElt___item
;
2309 fra
.me
.has_broke
= 0;
2310 fra
.me
.REG_size
= 1;
2311 fra
.me
.nitni_local_ref_head
= NULL
;
2312 fra
.me
.REG
[0] = NIT_NULL
;
2315 /* compiling/table_computation.nit:428 */
2318 stack_frame_head
= fra
.me
.prev
;
2319 return fra
.me
.REG
[0];
2321 val_t
compiling___table_computation___ModuleTableEltGroup___elements(val_t p0
){
2322 struct {struct stack_frame_t me
;} fra
;
2325 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2326 fra
.me
.file
= LOCATE_compiling___table_computation
;
2328 fra
.me
.meth
= LOCATE_compiling___table_computation___ModuleTableEltGroup___elements
;
2329 fra
.me
.has_broke
= 0;
2330 fra
.me
.REG_size
= 1;
2331 fra
.me
.nitni_local_ref_head
= NULL
;
2332 fra
.me
.REG
[0] = NIT_NULL
;
2334 /* compiling/table_computation.nit:440 */
2335 REGB0
= TAG_Bool(ATTR_compiling___table_computation___ModuleTableEltGroup____elements(fra
.me
.REG
[0])!=NIT_NULL
);
2336 if (UNTAG_Bool(REGB0
)) {
2338 nit_abort("Uninitialized attribute %s", "_elements", LOCATE_compiling___table_computation
, 440);
2340 fra
.me
.REG
[0] = ATTR_compiling___table_computation___ModuleTableEltGroup____elements(fra
.me
.REG
[0]);
2341 stack_frame_head
= fra
.me
.prev
;
2342 return fra
.me
.REG
[0];
2344 void compiling___table_computation___ModuleTableEltGroup___init(val_t p0
, int* init_table
){
2345 int itpos2
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_compiling___table_computation___ModuleTableEltGroup
].i
;
2346 struct {struct stack_frame_t me
;} fra
;
2348 if (init_table
[itpos2
]) return;
2349 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2350 fra
.me
.file
= LOCATE_compiling___table_computation
;
2352 fra
.me
.meth
= LOCATE_compiling___table_computation___ModuleTableEltGroup___init
;
2353 fra
.me
.has_broke
= 0;
2354 fra
.me
.REG_size
= 0;
2355 fra
.me
.nitni_local_ref_head
= NULL
;
2356 stack_frame_head
= fra
.me
.prev
;
2357 init_table
[itpos2
] = 1;
2360 val_t
compiling___table_computation___TableEltProp___property(val_t p0
){
2361 struct {struct stack_frame_t me
;} fra
;
2364 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2365 fra
.me
.file
= LOCATE_compiling___table_computation
;
2367 fra
.me
.meth
= LOCATE_compiling___table_computation___TableEltProp___property
;
2368 fra
.me
.has_broke
= 0;
2369 fra
.me
.REG_size
= 1;
2370 fra
.me
.nitni_local_ref_head
= NULL
;
2371 fra
.me
.REG
[0] = NIT_NULL
;
2373 /* compiling/table_computation.nit:446 */
2374 REGB0
= TAG_Bool(ATTR_compiling___table_computation___TableEltProp____property(fra
.me
.REG
[0])!=NIT_NULL
);
2375 if (UNTAG_Bool(REGB0
)) {
2377 nit_abort("Uninitialized attribute %s", "_property", LOCATE_compiling___table_computation
, 446);
2379 fra
.me
.REG
[0] = ATTR_compiling___table_computation___TableEltProp____property(fra
.me
.REG
[0]);
2380 stack_frame_head
= fra
.me
.prev
;
2381 return fra
.me
.REG
[0];
2383 void compiling___table_computation___TableEltProp___init(val_t p0
, val_t p1
, int* init_table
){
2384 int itpos3
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_compiling___table_computation___TableEltProp
].i
;
2385 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
2387 if (init_table
[itpos3
]) return;
2388 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2389 fra
.me
.file
= LOCATE_compiling___table_computation
;
2391 fra
.me
.meth
= LOCATE_compiling___table_computation___TableEltProp___init
;
2392 fra
.me
.has_broke
= 0;
2393 fra
.me
.REG_size
= 2;
2394 fra
.me
.nitni_local_ref_head
= NULL
;
2395 fra
.me
.REG
[0] = NIT_NULL
;
2396 fra
.me
.REG
[1] = NIT_NULL
;
2399 /* compiling/table_computation.nit:450 */
2400 ATTR_compiling___table_computation___TableEltProp____property(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
2401 stack_frame_head
= fra
.me
.prev
;
2402 init_table
[itpos3
] = 1;
2405 val_t
compiling___table_computation___AbsTableEltClass___local_class(val_t p0
){
2406 struct {struct stack_frame_t me
;} fra
;
2409 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2410 fra
.me
.file
= LOCATE_compiling___table_computation
;
2412 fra
.me
.meth
= LOCATE_compiling___table_computation___AbsTableEltClass___local_class
;
2413 fra
.me
.has_broke
= 0;
2414 fra
.me
.REG_size
= 1;
2415 fra
.me
.nitni_local_ref_head
= NULL
;
2416 fra
.me
.REG
[0] = NIT_NULL
;
2418 /* compiling/table_computation.nit:482 */
2419 REGB0
= TAG_Bool(ATTR_compiling___table_computation___AbsTableEltClass____local_class(fra
.me
.REG
[0])!=NIT_NULL
);
2420 if (UNTAG_Bool(REGB0
)) {
2422 nit_abort("Uninitialized attribute %s", "_local_class", LOCATE_compiling___table_computation
, 482);
2424 fra
.me
.REG
[0] = ATTR_compiling___table_computation___AbsTableEltClass____local_class(fra
.me
.REG
[0]);
2425 stack_frame_head
= fra
.me
.prev
;
2426 return fra
.me
.REG
[0];
2428 void compiling___table_computation___AbsTableEltClass___init(val_t p0
, val_t p1
, int* init_table
){
2429 int itpos4
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_compiling___table_computation___AbsTableEltClass
].i
;
2430 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
2432 if (init_table
[itpos4
]) return;
2433 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2434 fra
.me
.file
= LOCATE_compiling___table_computation
;
2436 fra
.me
.meth
= LOCATE_compiling___table_computation___AbsTableEltClass___init
;
2437 fra
.me
.has_broke
= 0;
2438 fra
.me
.REG_size
= 2;
2439 fra
.me
.nitni_local_ref_head
= NULL
;
2440 fra
.me
.REG
[0] = NIT_NULL
;
2441 fra
.me
.REG
[1] = NIT_NULL
;
2444 /* compiling/table_computation.nit:487 */
2445 ATTR_compiling___table_computation___AbsTableEltClass____local_class(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
2446 stack_frame_head
= fra
.me
.prev
;
2447 init_table
[itpos4
] = 1;
2450 val_t
compiling___table_computation___TableEltClass___is_related_to(val_t p0
, val_t p1
){
2451 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
2454 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2455 fra
.me
.file
= LOCATE_compiling___table_computation
;
2457 fra
.me
.meth
= LOCATE_compiling___table_computation___TableEltClass___is_related_to
;
2458 fra
.me
.has_broke
= 0;
2459 fra
.me
.REG_size
= 3;
2460 fra
.me
.nitni_local_ref_head
= NULL
;
2461 fra
.me
.REG
[0] = NIT_NULL
;
2462 fra
.me
.REG
[1] = NIT_NULL
;
2463 fra
.me
.REG
[2] = NIT_NULL
;
2466 /* compiling/table_computation.nit:497 */
2467 fra
.me
.REG
[2] = CALL_metamodel___abstractmetamodel___MMLocalClass___mmmodule(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
2468 REGB0
= TAG_Bool(ATTR_compiling___table_computation___AbsTableEltClass____local_class(fra
.me
.REG
[0])!=NIT_NULL
);
2469 if (UNTAG_Bool(REGB0
)) {
2471 nit_abort("Uninitialized attribute %s", "_local_class", LOCATE_compiling___table_computation
, 497);
2473 fra
.me
.REG
[0] = ATTR_compiling___table_computation___AbsTableEltClass____local_class(fra
.me
.REG
[0]);
2474 fra
.me
.REG
[0] = CALL_metamodel___abstractmetamodel___MMLocalClass___global(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
2475 fra
.me
.REG
[0] = CALL_metamodel___abstractmetamodel___MMModule_____bra(fra
.me
.REG
[2])(fra
.me
.REG
[2], fra
.me
.REG
[0]);
2476 /* compiling/table_computation.nit:498 */
2477 fra
.me
.REG
[1] = CALL_metamodel___abstractmetamodel___MMLocalClass___cshe(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
2478 REGB0
= CALL_metamodel___partial_order___PartialOrderElement_____leq(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[0]);
2481 stack_frame_head
= fra
.me
.prev
;
2484 val_t
compiling___table_computation___TableEltComposite___length(val_t p0
){
2485 struct {struct stack_frame_t me
;} fra
;
2488 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2489 fra
.me
.file
= LOCATE_compiling___table_computation
;
2491 fra
.me
.meth
= LOCATE_compiling___table_computation___TableEltComposite___length
;
2492 fra
.me
.has_broke
= 0;
2493 fra
.me
.REG_size
= 1;
2494 fra
.me
.nitni_local_ref_head
= NULL
;
2495 fra
.me
.REG
[0] = NIT_NULL
;
2497 /* compiling/table_computation.nit:528 */
2498 REGB0
= TAG_Bool(ATTR_compiling___table_computation___TableEltComposite____table(fra
.me
.REG
[0])!=NIT_NULL
);
2499 if (UNTAG_Bool(REGB0
)) {
2501 nit_abort("Uninitialized attribute %s", "_table", LOCATE_compiling___table_computation
, 528);
2503 fra
.me
.REG
[0] = ATTR_compiling___table_computation___TableEltComposite____table(fra
.me
.REG
[0]);
2504 /* ../lib/standard/collection/array.nit:24 */
2505 REGB0
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[0])!=NIT_NULL
);
2506 if (UNTAG_Bool(REGB0
)) {
2508 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
2510 REGB0
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[0]);
2511 /* compiling/table_computation.nit:528 */
2514 stack_frame_head
= fra
.me
.prev
;
2517 val_t
compiling___table_computation___TableEltComposite___is_related_to(val_t p0
, val_t p1
){
2518 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
2521 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2522 fra
.me
.file
= LOCATE_compiling___table_computation
;
2524 fra
.me
.meth
= LOCATE_compiling___table_computation___TableEltComposite___is_related_to
;
2525 fra
.me
.has_broke
= 0;
2526 fra
.me
.REG_size
= 2;
2527 fra
.me
.nitni_local_ref_head
= NULL
;
2528 fra
.me
.REG
[0] = NIT_NULL
;
2529 fra
.me
.REG
[1] = NIT_NULL
;
2532 /* compiling/table_computation.nit:529 */
2533 fra
.me
.REG
[1] = CALL_metamodel___abstractmetamodel___MMLocalClass___cshe(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
2534 REGB0
= TAG_Bool(ATTR_compiling___table_computation___TableEltComposite____cc(fra
.me
.REG
[0])!=NIT_NULL
);
2535 if (UNTAG_Bool(REGB0
)) {
2537 nit_abort("Uninitialized attribute %s", "_cc", LOCATE_compiling___table_computation
, 529);
2539 fra
.me
.REG
[0] = ATTR_compiling___table_computation___TableEltComposite____cc(fra
.me
.REG
[0]);
2540 fra
.me
.REG
[0] = CALL_compiling___table_computation___CompiledClass___local_class(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
2541 REGB0
= CALL_metamodel___partial_order___PartialOrderElement_____leq(fra
.me
.REG
[1])(fra
.me
.REG
[1], fra
.me
.REG
[0]);
2544 stack_frame_head
= fra
.me
.prev
;
2547 void compiling___table_computation___TableEltComposite___add(val_t p0
, val_t p1
, val_t p2
){
2548 struct {struct stack_frame_t me
; val_t MORE_REG
[4];} fra
;
2551 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2552 fra
.me
.file
= LOCATE_compiling___table_computation
;
2554 fra
.me
.meth
= LOCATE_compiling___table_computation___TableEltComposite___add
;
2555 fra
.me
.has_broke
= 0;
2556 fra
.me
.REG_size
= 5;
2557 fra
.me
.nitni_local_ref_head
= NULL
;
2558 fra
.me
.REG
[0] = NIT_NULL
;
2559 fra
.me
.REG
[1] = NIT_NULL
;
2560 fra
.me
.REG
[2] = NIT_NULL
;
2561 fra
.me
.REG
[3] = NIT_NULL
;
2562 fra
.me
.REG
[4] = NIT_NULL
;
2566 /* compiling/table_computation.nit:533 */
2567 REGB0
= TAG_Bool(ATTR_compiling___table_computation___TableEltComposite____offsets(fra
.me
.REG
[0])!=NIT_NULL
);
2568 if (UNTAG_Bool(REGB0
)) {
2570 nit_abort("Uninitialized attribute %s", "_offsets", LOCATE_compiling___table_computation
, 533);
2572 fra
.me
.REG
[3] = ATTR_compiling___table_computation___TableEltComposite____offsets(fra
.me
.REG
[0]);
2573 REGB0
= TAG_Bool(ATTR_compiling___table_computation___TableEltComposite____table(fra
.me
.REG
[0])!=NIT_NULL
);
2574 if (UNTAG_Bool(REGB0
)) {
2576 nit_abort("Uninitialized attribute %s", "_table", LOCATE_compiling___table_computation
, 533);
2578 fra
.me
.REG
[4] = ATTR_compiling___table_computation___TableEltComposite____table(fra
.me
.REG
[0]);
2579 /* ../lib/standard/collection/array.nit:24 */
2580 REGB0
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[4])!=NIT_NULL
);
2581 if (UNTAG_Bool(REGB0
)) {
2583 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 24);
2585 REGB0
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[4]);
2586 /* compiling/table_computation.nit:533 */
2587 CALL_standard___collection___abstract_collection___Map_____braeq(fra
.me
.REG
[3])(fra
.me
.REG
[3], fra
.me
.REG
[1], REGB0
);
2588 /* compiling/table_computation.nit:534 */
2589 REGB0
= TAG_Bool(ATTR_compiling___table_computation___TableEltComposite____table(fra
.me
.REG
[0])!=NIT_NULL
);
2590 if (UNTAG_Bool(REGB0
)) {
2592 nit_abort("Uninitialized attribute %s", "_table", LOCATE_compiling___table_computation
, 534);
2594 fra
.me
.REG
[0] = ATTR_compiling___table_computation___TableEltComposite____table(fra
.me
.REG
[0]);
2595 CALL_standard___collection___abstract_collection___Sequence___append(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2]);
2596 stack_frame_head
= fra
.me
.prev
;
2599 val_t
compiling___table_computation___TableEltComposite___item(val_t p0
, val_t p1
){
2600 struct {struct stack_frame_t me
;} fra
;
2605 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2606 fra
.me
.file
= LOCATE_compiling___table_computation
;
2608 fra
.me
.meth
= LOCATE_compiling___table_computation___TableEltComposite___item
;
2609 fra
.me
.has_broke
= 0;
2610 fra
.me
.REG_size
= 1;
2611 fra
.me
.nitni_local_ref_head
= NULL
;
2612 fra
.me
.REG
[0] = NIT_NULL
;
2615 /* compiling/table_computation.nit:537 */
2616 REGB1
= TAG_Bool(ATTR_compiling___table_computation___TableEltComposite____table(fra
.me
.REG
[0])!=NIT_NULL
);
2617 if (UNTAG_Bool(REGB1
)) {
2619 nit_abort("Uninitialized attribute %s", "_table", LOCATE_compiling___table_computation
, 537);
2621 fra
.me
.REG
[0] = ATTR_compiling___table_computation___TableEltComposite____table(fra
.me
.REG
[0]);
2622 /* ../lib/standard/collection/array.nit:280 */
2624 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
2625 if (UNTAG_Bool(REGB2
)) {
2627 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
2629 /* ../lib/standard/kernel.nit:233 */
2630 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)>=UNTAG_Int(REGB1
));
2631 /* ../lib/standard/collection/array.nit:280 */
2632 if (UNTAG_Bool(REGB1
)) {
2633 REGB1
= TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[0])!=NIT_NULL
);
2634 if (UNTAG_Bool(REGB1
)) {
2636 nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array
, 280);
2638 REGB1
= ATTR_standard___collection___array___AbstractArrayRead____length(fra
.me
.REG
[0]);
2639 REGB2
= TAG_Bool(VAL_ISA(REGB1
, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0
), VTID_standard___kernel___Comparable___OTHER(REGB0
))) /*cast OTHER*/;
2640 if (UNTAG_Bool(REGB2
)) {
2642 nit_abort("Cast failed", NULL
, LOCATE_standard___kernel
, 0);
2644 /* ../lib/standard/kernel.nit:232 */
2645 REGB1
= TAG_Bool(UNTAG_Int(REGB0
)<UNTAG_Int(REGB1
));
2647 /* ../lib/standard/collection/array.nit:280 */
2648 REGB2
= TAG_Bool(false);
2651 if (UNTAG_Bool(REGB1
)) {
2653 nit_abort("Assert '%s' failed", "index", LOCATE_standard___collection___array
, 280);
2655 /* ../lib/standard/collection/array.nit:281 */
2656 fra
.me
.REG
[0] = ATTR_standard___collection___array___Array____items(fra
.me
.REG
[0]);
2657 REGB1
= TAG_Bool(fra
.me
.REG
[0]==NIT_NULL
);
2658 if (UNTAG_Bool(REGB1
)) {
2659 nit_abort("Reciever is null", NULL
, LOCATE_standard___collection___array
, 281);
2661 /* ../lib/standard/collection/array.nit:718 */
2662 fra
.me
.REG
[0] = ((Nit_NativeArray
)fra
.me
.REG
[0])->val
[UNTAG_Int(REGB0
)];
2663 /* ../lib/standard/collection/array.nit:281 */
2666 /* compiling/table_computation.nit:537 */
2669 stack_frame_head
= fra
.me
.prev
;
2670 return fra
.me
.REG
[0];
2672 void compiling___table_computation___TableEltComposite___init(val_t p0
, val_t p1
, int* init_table
){
2673 int itpos5
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_compiling___table_computation___TableEltComposite
].i
;
2674 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
2676 if (init_table
[itpos5
]) return;
2677 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2678 fra
.me
.file
= LOCATE_compiling___table_computation
;
2680 fra
.me
.meth
= LOCATE_compiling___table_computation___TableEltComposite___init
;
2681 fra
.me
.has_broke
= 0;
2682 fra
.me
.REG_size
= 2;
2683 fra
.me
.nitni_local_ref_head
= NULL
;
2684 fra
.me
.REG
[0] = NIT_NULL
;
2685 fra
.me
.REG
[1] = NIT_NULL
;
2688 /* compiling/table_computation.nit:541 */
2689 ATTR_compiling___table_computation___TableEltComposite____cc(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
2690 /* compiling/table_computation.nit:542 */
2691 fra
.me
.REG
[1] = NEW_Array_standard___collection___array___Array___init();
2692 ATTR_compiling___table_computation___TableEltComposite____table(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
2693 /* compiling/table_computation.nit:543 */
2694 fra
.me
.REG
[1] = NEW_HashMap_standard___collection___hash_collection___HashMap___init();
2695 ATTR_compiling___table_computation___TableEltComposite____offsets(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
2696 stack_frame_head
= fra
.me
.prev
;
2697 init_table
[itpos5
] = 1;
2700 val_t
compiling___table_computation___TableEltClassSelfId___is_related_to(val_t p0
, val_t p1
){
2701 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
2704 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2705 fra
.me
.file
= LOCATE_compiling___table_computation
;
2707 fra
.me
.meth
= LOCATE_compiling___table_computation___TableEltClassSelfId___is_related_to
;
2708 fra
.me
.has_broke
= 0;
2709 fra
.me
.REG_size
= 2;
2710 fra
.me
.nitni_local_ref_head
= NULL
;
2711 fra
.me
.REG
[0] = NIT_NULL
;
2712 fra
.me
.REG
[1] = NIT_NULL
;
2715 /* compiling/table_computation.nit:550 */
2716 REGB0
= TAG_Bool(true);
2719 stack_frame_head
= fra
.me
.prev
;
2722 void compiling___table_computation___TableEltClassSelfId___init(val_t p0
, int* init_table
){
2723 int itpos6
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_compiling___table_computation___TableEltClassSelfId
].i
;
2724 struct {struct stack_frame_t me
;} fra
;
2726 if (init_table
[itpos6
]) return;
2727 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2728 fra
.me
.file
= LOCATE_compiling___table_computation
;
2730 fra
.me
.meth
= LOCATE_compiling___table_computation___TableEltClassSelfId___init
;
2731 fra
.me
.has_broke
= 0;
2732 fra
.me
.REG_size
= 0;
2733 fra
.me
.nitni_local_ref_head
= NULL
;
2734 stack_frame_head
= fra
.me
.prev
;
2735 init_table
[itpos6
] = 1;
2738 val_t
compiling___table_computation___TableEltClassSelfName___is_related_to(val_t p0
, val_t p1
){
2739 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
2742 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2743 fra
.me
.file
= LOCATE_compiling___table_computation
;
2745 fra
.me
.meth
= LOCATE_compiling___table_computation___TableEltClassSelfName___is_related_to
;
2746 fra
.me
.has_broke
= 0;
2747 fra
.me
.REG_size
= 2;
2748 fra
.me
.nitni_local_ref_head
= NULL
;
2749 fra
.me
.REG
[0] = NIT_NULL
;
2750 fra
.me
.REG
[1] = NIT_NULL
;
2753 /* compiling/table_computation.nit:556 */
2754 REGB0
= TAG_Bool(true);
2757 stack_frame_head
= fra
.me
.prev
;
2760 void compiling___table_computation___TableEltClassSelfName___init(val_t p0
, int* init_table
){
2761 int itpos7
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_compiling___table_computation___TableEltClassSelfName
].i
;
2762 struct {struct stack_frame_t me
;} fra
;
2764 if (init_table
[itpos7
]) return;
2765 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2766 fra
.me
.file
= LOCATE_compiling___table_computation
;
2768 fra
.me
.meth
= LOCATE_compiling___table_computation___TableEltClassSelfName___init
;
2769 fra
.me
.has_broke
= 0;
2770 fra
.me
.REG_size
= 0;
2771 fra
.me
.nitni_local_ref_head
= NULL
;
2772 stack_frame_head
= fra
.me
.prev
;
2773 init_table
[itpos7
] = 1;
2776 val_t
compiling___table_computation___TableEltClassObjectSize___is_related_to(val_t p0
, val_t p1
){
2777 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
2780 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2781 fra
.me
.file
= LOCATE_compiling___table_computation
;
2783 fra
.me
.meth
= LOCATE_compiling___table_computation___TableEltClassObjectSize___is_related_to
;
2784 fra
.me
.has_broke
= 0;
2785 fra
.me
.REG_size
= 2;
2786 fra
.me
.nitni_local_ref_head
= NULL
;
2787 fra
.me
.REG
[0] = NIT_NULL
;
2788 fra
.me
.REG
[1] = NIT_NULL
;
2791 /* compiling/table_computation.nit:562 */
2792 REGB0
= TAG_Bool(true);
2795 stack_frame_head
= fra
.me
.prev
;
2798 void compiling___table_computation___TableEltClassObjectSize___init(val_t p0
, int* init_table
){
2799 int itpos8
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_compiling___table_computation___TableEltClassObjectSize
].i
;
2800 struct {struct stack_frame_t me
;} fra
;
2802 if (init_table
[itpos8
]) return;
2803 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2804 fra
.me
.file
= LOCATE_compiling___table_computation
;
2806 fra
.me
.meth
= LOCATE_compiling___table_computation___TableEltClassObjectSize___init
;
2807 fra
.me
.has_broke
= 0;
2808 fra
.me
.REG_size
= 0;
2809 fra
.me
.nitni_local_ref_head
= NULL
;
2810 stack_frame_head
= fra
.me
.prev
;
2811 init_table
[itpos8
] = 1;
2814 val_t
compiling___table_computation___TableEltObjectId___is_related_to(val_t p0
, val_t p1
){
2815 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
2818 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2819 fra
.me
.file
= LOCATE_compiling___table_computation
;
2821 fra
.me
.meth
= LOCATE_compiling___table_computation___TableEltObjectId___is_related_to
;
2822 fra
.me
.has_broke
= 0;
2823 fra
.me
.REG_size
= 2;
2824 fra
.me
.nitni_local_ref_head
= NULL
;
2825 fra
.me
.REG
[0] = NIT_NULL
;
2826 fra
.me
.REG
[1] = NIT_NULL
;
2829 /* compiling/table_computation.nit:568 */
2830 REGB0
= TAG_Bool(true);
2833 stack_frame_head
= fra
.me
.prev
;
2836 void compiling___table_computation___TableEltObjectId___init(val_t p0
, int* init_table
){
2837 int itpos9
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_compiling___table_computation___TableEltObjectId
].i
;
2838 struct {struct stack_frame_t me
;} fra
;
2840 if (init_table
[itpos9
]) return;
2841 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2842 fra
.me
.file
= LOCATE_compiling___table_computation
;
2844 fra
.me
.meth
= LOCATE_compiling___table_computation___TableEltObjectId___init
;
2845 fra
.me
.has_broke
= 0;
2846 fra
.me
.REG_size
= 0;
2847 fra
.me
.nitni_local_ref_head
= NULL
;
2848 stack_frame_head
= fra
.me
.prev
;
2849 init_table
[itpos9
] = 1;
2852 val_t
compiling___table_computation___TableEltVftPointer___is_related_to(val_t p0
, val_t p1
){
2853 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
2856 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2857 fra
.me
.file
= LOCATE_compiling___table_computation
;
2859 fra
.me
.meth
= LOCATE_compiling___table_computation___TableEltVftPointer___is_related_to
;
2860 fra
.me
.has_broke
= 0;
2861 fra
.me
.REG_size
= 2;
2862 fra
.me
.nitni_local_ref_head
= NULL
;
2863 fra
.me
.REG
[0] = NIT_NULL
;
2864 fra
.me
.REG
[1] = NIT_NULL
;
2867 /* compiling/table_computation.nit:574 */
2868 REGB0
= TAG_Bool(true);
2871 stack_frame_head
= fra
.me
.prev
;
2874 void compiling___table_computation___TableEltVftPointer___init(val_t p0
, int* init_table
){
2875 int itpos10
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_compiling___table_computation___TableEltVftPointer
].i
;
2876 struct {struct stack_frame_t me
;} fra
;
2878 if (init_table
[itpos10
]) return;
2879 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2880 fra
.me
.file
= LOCATE_compiling___table_computation
;
2882 fra
.me
.meth
= LOCATE_compiling___table_computation___TableEltVftPointer___init
;
2883 fra
.me
.has_broke
= 0;
2884 fra
.me
.REG_size
= 0;
2885 fra
.me
.nitni_local_ref_head
= NULL
;
2886 stack_frame_head
= fra
.me
.prev
;
2887 init_table
[itpos10
] = 1;