1 /* This C file is generated by NIT to compile module icode_base. */
2 #include "icode_base._sep.h"
3 val_t
icode_base___IRegister___stype(val_t p0
){
4 struct {struct stack_frame_t me
;} fra
;
7 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
8 fra
.me
.file
= LOCATE_icode_base
;
10 fra
.me
.meth
= LOCATE_icode_base___IRegister___stype
;
13 fra
.me
.REG
[0] = NIT_NULL
;
15 REGB0
= TAG_Bool(ATTR_icode_base___IRegister____stype(fra
.me
.REG
[0])!=NIT_NULL
);
16 /* ./icode//icode_base.nit:27 */
17 if (UNTAG_Bool(REGB0
)) {
19 fprintf(stderr
, "Uninitialized attribute %s", "_stype");
20 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 27);
23 fra
.me
.REG
[0] = ATTR_icode_base___IRegister____stype(fra
.me
.REG
[0]);
24 stack_frame_head
= fra
.me
.prev
;
27 void icode_base___IRegister___init(val_t p0
, val_t p1
, int* init_table
){
28 int itpos0
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_IRegister
].i
;
29 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
31 if (init_table
[itpos0
]) return;
32 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
33 fra
.me
.file
= LOCATE_icode_base
;
35 fra
.me
.meth
= LOCATE_icode_base___IRegister___init
;
38 fra
.me
.REG
[0] = NIT_NULL
;
39 fra
.me
.REG
[1] = NIT_NULL
;
42 /* ./icode//icode_base.nit:31 */
43 ATTR_icode_base___IRegister____stype(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
44 stack_frame_head
= fra
.me
.prev
;
45 init_table
[itpos0
] = 1;
48 void icode_base___IEscapeMark___init(val_t p0
, int* init_table
){
49 int itpos1
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_IEscapeMark
].i
;
50 struct {struct stack_frame_t me
;} fra
;
52 if (init_table
[itpos1
]) return;
53 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
54 fra
.me
.file
= LOCATE_icode_base
;
56 fra
.me
.meth
= LOCATE_icode_base___IEscapeMark___init
;
59 stack_frame_head
= fra
.me
.prev
;
60 init_table
[itpos1
] = 1;
63 val_t
icode_base___IClosureDecl___closure(val_t p0
){
64 struct {struct stack_frame_t me
;} fra
;
67 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
68 fra
.me
.file
= LOCATE_icode_base
;
70 fra
.me
.meth
= LOCATE_icode_base___IClosureDecl___closure
;
73 fra
.me
.REG
[0] = NIT_NULL
;
75 REGB0
= TAG_Bool(ATTR_icode_base___IClosureDecl____closure(fra
.me
.REG
[0])!=NIT_NULL
);
76 /* ./icode//icode_base.nit:41 */
77 if (UNTAG_Bool(REGB0
)) {
79 fprintf(stderr
, "Uninitialized attribute %s", "_closure");
80 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 41);
83 fra
.me
.REG
[0] = ATTR_icode_base___IClosureDecl____closure(fra
.me
.REG
[0]);
84 stack_frame_head
= fra
.me
.prev
;
87 val_t
icode_base___IClosureDecl___default(val_t p0
){
88 struct {struct stack_frame_t me
;} fra
;
90 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
91 fra
.me
.file
= LOCATE_icode_base
;
93 fra
.me
.meth
= LOCATE_icode_base___IClosureDecl___default
;
96 fra
.me
.REG
[0] = NIT_NULL
;
98 fra
.me
.REG
[0] = ATTR_icode_base___IClosureDecl____default(fra
.me
.REG
[0]);
99 /* ./icode//icode_base.nit:44 */
100 stack_frame_head
= fra
.me
.prev
;
101 return fra
.me
.REG
[0];
103 void icode_base___IClosureDecl___default__eq(val_t p0
, val_t p1
){
104 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
106 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
107 fra
.me
.file
= LOCATE_icode_base
;
109 fra
.me
.meth
= LOCATE_icode_base___IClosureDecl___default__eq
;
110 fra
.me
.has_broke
= 0;
112 fra
.me
.REG
[0] = NIT_NULL
;
113 fra
.me
.REG
[1] = NIT_NULL
;
116 /* ./icode//icode_base.nit:44 */
117 ATTR_icode_base___IClosureDecl____default(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
118 stack_frame_head
= fra
.me
.prev
;
121 void icode_base___IClosureDecl___init(val_t p0
, val_t p1
, int* init_table
){
122 int itpos2
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_IClosureDecl
].i
;
123 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
125 if (init_table
[itpos2
]) return;
126 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
127 fra
.me
.file
= LOCATE_icode_base
;
129 fra
.me
.meth
= LOCATE_icode_base___IClosureDecl___init
;
130 fra
.me
.has_broke
= 0;
132 fra
.me
.REG
[0] = NIT_NULL
;
133 fra
.me
.REG
[1] = NIT_NULL
;
136 /* ./icode//icode_base.nit:47 */
137 ATTR_icode_base___IClosureDecl____closure(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
138 stack_frame_head
= fra
.me
.prev
;
139 init_table
[itpos2
] = 1;
142 val_t
icode_base___IRoutine___params(val_t p0
){
143 struct {struct stack_frame_t me
;} fra
;
146 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
147 fra
.me
.file
= LOCATE_icode_base
;
149 fra
.me
.meth
= LOCATE_icode_base___IRoutine___params
;
150 fra
.me
.has_broke
= 0;
152 fra
.me
.REG
[0] = NIT_NULL
;
154 REGB0
= TAG_Bool(ATTR_icode_base___IRoutine____params(fra
.me
.REG
[0])!=NIT_NULL
);
155 /* ./icode//icode_base.nit:52 */
156 if (UNTAG_Bool(REGB0
)) {
158 fprintf(stderr
, "Uninitialized attribute %s", "_params");
159 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 52);
162 fra
.me
.REG
[0] = ATTR_icode_base___IRoutine____params(fra
.me
.REG
[0]);
163 stack_frame_head
= fra
.me
.prev
;
164 return fra
.me
.REG
[0];
166 val_t
icode_base___IRoutine___closure_decls(val_t p0
){
167 struct {struct stack_frame_t me
;} fra
;
169 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
170 fra
.me
.file
= LOCATE_icode_base
;
172 fra
.me
.meth
= LOCATE_icode_base___IRoutine___closure_decls
;
173 fra
.me
.has_broke
= 0;
175 fra
.me
.REG
[0] = NIT_NULL
;
177 fra
.me
.REG
[0] = ATTR_icode_base___IRoutine____closure_decls(fra
.me
.REG
[0]);
178 /* ./icode//icode_base.nit:55 */
179 stack_frame_head
= fra
.me
.prev
;
180 return fra
.me
.REG
[0];
182 void icode_base___IRoutine___closure_decls__eq(val_t p0
, val_t p1
){
183 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
185 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
186 fra
.me
.file
= LOCATE_icode_base
;
188 fra
.me
.meth
= LOCATE_icode_base___IRoutine___closure_decls__eq
;
189 fra
.me
.has_broke
= 0;
191 fra
.me
.REG
[0] = NIT_NULL
;
192 fra
.me
.REG
[1] = NIT_NULL
;
195 /* ./icode//icode_base.nit:55 */
196 ATTR_icode_base___IRoutine____closure_decls(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
197 stack_frame_head
= fra
.me
.prev
;
200 val_t
icode_base___IRoutine___registers(val_t p0
){
201 struct {struct stack_frame_t me
;} fra
;
204 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
205 fra
.me
.file
= LOCATE_icode_base
;
207 fra
.me
.meth
= LOCATE_icode_base___IRoutine___registers
;
208 fra
.me
.has_broke
= 0;
210 fra
.me
.REG
[0] = NIT_NULL
;
212 REGB0
= TAG_Bool(ATTR_icode_base___IRoutine____registers(fra
.me
.REG
[0])!=NIT_NULL
);
213 /* ./icode//icode_base.nit:58 */
214 if (UNTAG_Bool(REGB0
)) {
216 fprintf(stderr
, "Uninitialized attribute %s", "_registers");
217 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 58);
220 fra
.me
.REG
[0] = ATTR_icode_base___IRoutine____registers(fra
.me
.REG
[0]);
221 stack_frame_head
= fra
.me
.prev
;
222 return fra
.me
.REG
[0];
224 val_t
icode_base___IRoutine___result(val_t p0
){
225 struct {struct stack_frame_t me
;} fra
;
227 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
228 fra
.me
.file
= LOCATE_icode_base
;
230 fra
.me
.meth
= LOCATE_icode_base___IRoutine___result
;
231 fra
.me
.has_broke
= 0;
233 fra
.me
.REG
[0] = NIT_NULL
;
235 fra
.me
.REG
[0] = ATTR_icode_base___IRoutine____result(fra
.me
.REG
[0]);
236 /* ./icode//icode_base.nit:61 */
237 stack_frame_head
= fra
.me
.prev
;
238 return fra
.me
.REG
[0];
240 val_t
icode_base___IRoutine___escape_marks(val_t p0
){
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_icode_base
;
247 fra
.me
.meth
= LOCATE_icode_base___IRoutine___escape_marks
;
248 fra
.me
.has_broke
= 0;
250 fra
.me
.REG
[0] = NIT_NULL
;
252 REGB0
= TAG_Bool(ATTR_icode_base___IRoutine____escape_marks(fra
.me
.REG
[0])!=NIT_NULL
);
253 /* ./icode//icode_base.nit:64 */
254 if (UNTAG_Bool(REGB0
)) {
256 fprintf(stderr
, "Uninitialized attribute %s", "_escape_marks");
257 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 64);
260 fra
.me
.REG
[0] = ATTR_icode_base___IRoutine____escape_marks(fra
.me
.REG
[0]);
261 stack_frame_head
= fra
.me
.prev
;
262 return fra
.me
.REG
[0];
264 val_t
icode_base___IRoutine___body(val_t p0
){
265 struct {struct stack_frame_t me
;} fra
;
268 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
269 fra
.me
.file
= LOCATE_icode_base
;
271 fra
.me
.meth
= LOCATE_icode_base___IRoutine___body
;
272 fra
.me
.has_broke
= 0;
274 fra
.me
.REG
[0] = NIT_NULL
;
276 REGB0
= TAG_Bool(ATTR_icode_base___IRoutine____body(fra
.me
.REG
[0])!=NIT_NULL
);
277 /* ./icode//icode_base.nit:67 */
278 if (UNTAG_Bool(REGB0
)) {
280 fprintf(stderr
, "Uninitialized attribute %s", "_body");
281 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 67);
284 fra
.me
.REG
[0] = ATTR_icode_base___IRoutine____body(fra
.me
.REG
[0]);
285 stack_frame_head
= fra
.me
.prev
;
286 return fra
.me
.REG
[0];
288 val_t
icode_base___IRoutine___location(val_t p0
){
289 struct {struct stack_frame_t me
;} fra
;
291 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
292 fra
.me
.file
= LOCATE_icode_base
;
294 fra
.me
.meth
= LOCATE_icode_base___IRoutine___location
;
295 fra
.me
.has_broke
= 0;
297 fra
.me
.REG
[0] = NIT_NULL
;
299 fra
.me
.REG
[0] = ATTR_icode_base___IRoutine____location(fra
.me
.REG
[0]);
300 /* ./icode//icode_base.nit:70 */
301 stack_frame_head
= fra
.me
.prev
;
302 return fra
.me
.REG
[0];
304 void icode_base___IRoutine___location__eq(val_t p0
, val_t p1
){
305 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
307 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
308 fra
.me
.file
= LOCATE_icode_base
;
310 fra
.me
.meth
= LOCATE_icode_base___IRoutine___location__eq
;
311 fra
.me
.has_broke
= 0;
313 fra
.me
.REG
[0] = NIT_NULL
;
314 fra
.me
.REG
[1] = NIT_NULL
;
317 /* ./icode//icode_base.nit:70 */
318 ATTR_icode_base___IRoutine____location(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
319 stack_frame_head
= fra
.me
.prev
;
322 void icode_base___IRoutine___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
323 int itpos3
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_IRoutine
].i
;
324 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
326 if (init_table
[itpos3
]) return;
327 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
328 fra
.me
.file
= LOCATE_icode_base
;
330 fra
.me
.meth
= LOCATE_icode_base___IRoutine___init
;
331 fra
.me
.has_broke
= 0;
333 fra
.me
.REG
[0] = NIT_NULL
;
334 fra
.me
.REG
[1] = NIT_NULL
;
335 fra
.me
.REG
[2] = NIT_NULL
;
339 fra
.me
.REG
[1] = CALL_array___Collection___to_a(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
340 /* ./icode//icode_base.nit:75 */
341 ATTR_icode_base___IRoutine____params(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
342 /* ./icode//icode_base.nit:76 */
343 ATTR_icode_base___IRoutine____result(fra
.me
.REG
[0]) = fra
.me
.REG
[2];
344 stack_frame_head
= fra
.me
.prev
;
345 init_table
[itpos3
] = 1;
348 void icode_base___IClosureDef___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
349 int itpos4
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_IClosureDef
].i
;
350 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
352 if (init_table
[itpos4
]) return;
353 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
354 fra
.me
.file
= LOCATE_icode_base
;
356 fra
.me
.meth
= LOCATE_icode_base___IClosureDef___init
;
357 fra
.me
.has_broke
= 0;
359 fra
.me
.REG
[0] = NIT_NULL
;
360 fra
.me
.REG
[1] = NIT_NULL
;
361 fra
.me
.REG
[2] = NIT_NULL
;
365 /* ./icode//icode_base.nit:85 */
366 CALL_icode_base___IRoutine___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1], fra
.me
.REG
[2], init_table
);
367 stack_frame_head
= fra
.me
.prev
;
368 init_table
[itpos4
] = 1;
371 val_t
icode_base___ICode___arity(val_t p0
){
372 struct {struct stack_frame_t me
;} fra
;
374 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
375 fra
.me
.file
= LOCATE_icode_base
;
377 fra
.me
.meth
= LOCATE_icode_base___ICode___arity
;
378 fra
.me
.has_broke
= 0;
380 /* ./icode//icode_base.nit:93 */
381 fprintf(stderr
, "Deferred method called");
382 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 93);
384 stack_frame_head
= fra
.me
.prev
;
387 val_t
icode_base___ICode___result(val_t p0
){
388 struct {struct stack_frame_t me
;} fra
;
390 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
391 fra
.me
.file
= LOCATE_icode_base
;
393 fra
.me
.meth
= LOCATE_icode_base___ICode___result
;
394 fra
.me
.has_broke
= 0;
396 fra
.me
.REG
[0] = NIT_NULL
;
398 fra
.me
.REG
[0] = ATTR_icode_base___ICode____result(fra
.me
.REG
[0]);
399 /* ./icode//icode_base.nit:96 */
400 stack_frame_head
= fra
.me
.prev
;
401 return fra
.me
.REG
[0];
403 void icode_base___ICode___result__eq(val_t p0
, val_t p1
){
404 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
406 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
407 fra
.me
.file
= LOCATE_icode_base
;
409 fra
.me
.meth
= LOCATE_icode_base___ICode___result__eq
;
410 fra
.me
.has_broke
= 0;
412 fra
.me
.REG
[0] = NIT_NULL
;
413 fra
.me
.REG
[1] = NIT_NULL
;
416 /* ./icode//icode_base.nit:96 */
417 ATTR_icode_base___ICode____result(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
418 stack_frame_head
= fra
.me
.prev
;
421 val_t
icode_base___ICode___location(val_t p0
){
422 struct {struct stack_frame_t me
;} fra
;
424 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
425 fra
.me
.file
= LOCATE_icode_base
;
427 fra
.me
.meth
= LOCATE_icode_base___ICode___location
;
428 fra
.me
.has_broke
= 0;
430 fra
.me
.REG
[0] = NIT_NULL
;
432 fra
.me
.REG
[0] = ATTR_icode_base___ICode____location(fra
.me
.REG
[0]);
433 /* ./icode//icode_base.nit:99 */
434 stack_frame_head
= fra
.me
.prev
;
435 return fra
.me
.REG
[0];
437 void icode_base___ICode___location__eq(val_t p0
, val_t p1
){
438 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
440 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
441 fra
.me
.file
= LOCATE_icode_base
;
443 fra
.me
.meth
= LOCATE_icode_base___ICode___location__eq
;
444 fra
.me
.has_broke
= 0;
446 fra
.me
.REG
[0] = NIT_NULL
;
447 fra
.me
.REG
[1] = NIT_NULL
;
450 /* ./icode//icode_base.nit:99 */
451 ATTR_icode_base___ICode____location(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
452 stack_frame_head
= fra
.me
.prev
;
455 val_t
icode_base___ICode___is_pure(val_t p0
){
456 struct {struct stack_frame_t me
;} fra
;
459 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
460 fra
.me
.file
= LOCATE_icode_base
;
462 fra
.me
.meth
= LOCATE_icode_base___ICode___is_pure
;
463 fra
.me
.has_broke
= 0;
465 fra
.me
.REG
[0] = NIT_NULL
;
467 REGB0
= TAG_Bool(false);
468 /* ./icode//icode_base.nit:103 */
471 stack_frame_head
= fra
.me
.prev
;
474 void icode_base___ICode___init(val_t p0
, int* init_table
){
475 int itpos5
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_ICode
].i
;
476 struct {struct stack_frame_t me
;} fra
;
478 if (init_table
[itpos5
]) return;
479 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
480 fra
.me
.file
= LOCATE_icode_base
;
482 fra
.me
.meth
= LOCATE_icode_base___ICode___init
;
483 fra
.me
.has_broke
= 0;
485 stack_frame_head
= fra
.me
.prev
;
486 init_table
[itpos5
] = 1;
489 val_t
icode_base___ICode0___arity(val_t p0
){
490 struct {struct stack_frame_t me
;} fra
;
493 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
494 fra
.me
.file
= LOCATE_icode_base
;
496 fra
.me
.meth
= LOCATE_icode_base___ICode0___arity
;
497 fra
.me
.has_broke
= 0;
499 fra
.me
.REG
[0] = NIT_NULL
;
502 /* ./icode//icode_base.nit:109 */
505 stack_frame_head
= fra
.me
.prev
;
508 val_t
icode_base___ICode1___arity(val_t p0
){
509 struct {struct stack_frame_t me
;} fra
;
512 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
513 fra
.me
.file
= LOCATE_icode_base
;
515 fra
.me
.meth
= LOCATE_icode_base___ICode1___arity
;
516 fra
.me
.has_broke
= 0;
518 fra
.me
.REG
[0] = NIT_NULL
;
521 /* ./icode//icode_base.nit:115 */
524 stack_frame_head
= fra
.me
.prev
;
527 val_t
icode_base___ICode1___expr(val_t p0
){
528 struct {struct stack_frame_t me
;} fra
;
531 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
532 fra
.me
.file
= LOCATE_icode_base
;
534 fra
.me
.meth
= LOCATE_icode_base___ICode1___expr
;
535 fra
.me
.has_broke
= 0;
537 fra
.me
.REG
[0] = NIT_NULL
;
539 REGB0
= TAG_Bool(ATTR_icode_base___ICode1____expr(fra
.me
.REG
[0])!=NIT_NULL
);
540 /* ./icode//icode_base.nit:117 */
541 if (UNTAG_Bool(REGB0
)) {
543 fprintf(stderr
, "Uninitialized attribute %s", "_expr");
544 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 117);
547 fra
.me
.REG
[0] = ATTR_icode_base___ICode1____expr(fra
.me
.REG
[0]);
548 stack_frame_head
= fra
.me
.prev
;
549 return fra
.me
.REG
[0];
551 void icode_base___ICode1___init(val_t p0
, val_t p1
, int* init_table
){
552 int itpos6
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_ICode1
].i
;
553 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
555 if (init_table
[itpos6
]) return;
556 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
557 fra
.me
.file
= LOCATE_icode_base
;
559 fra
.me
.meth
= LOCATE_icode_base___ICode1___init
;
560 fra
.me
.has_broke
= 0;
562 fra
.me
.REG
[0] = NIT_NULL
;
563 fra
.me
.REG
[1] = NIT_NULL
;
564 fra
.me
.REG
[2] = NIT_NULL
;
567 fra
.me
.REG
[2] = fra
.me
.REG
[0];
568 /* ./icode//icode_base.nit:120 */
569 CALL_icode_base___ICode___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], init_table
);
570 ATTR_icode_base___ICode1____expr(fra
.me
.REG
[2]) = fra
.me
.REG
[1];
571 stack_frame_head
= fra
.me
.prev
;
572 init_table
[itpos6
] = 1;
575 val_t
icode_base___ICode2___arity(val_t p0
){
576 struct {struct stack_frame_t me
;} fra
;
579 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
580 fra
.me
.file
= LOCATE_icode_base
;
582 fra
.me
.meth
= LOCATE_icode_base___ICode2___arity
;
583 fra
.me
.has_broke
= 0;
585 fra
.me
.REG
[0] = NIT_NULL
;
588 /* ./icode//icode_base.nit:126 */
591 stack_frame_head
= fra
.me
.prev
;
594 val_t
icode_base___ICode2___expr1(val_t p0
){
595 struct {struct stack_frame_t me
;} fra
;
598 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
599 fra
.me
.file
= LOCATE_icode_base
;
601 fra
.me
.meth
= LOCATE_icode_base___ICode2___expr1
;
602 fra
.me
.has_broke
= 0;
604 fra
.me
.REG
[0] = NIT_NULL
;
606 REGB0
= TAG_Bool(ATTR_icode_base___ICode2____expr1(fra
.me
.REG
[0])!=NIT_NULL
);
607 /* ./icode//icode_base.nit:128 */
608 if (UNTAG_Bool(REGB0
)) {
610 fprintf(stderr
, "Uninitialized attribute %s", "_expr1");
611 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 128);
614 fra
.me
.REG
[0] = ATTR_icode_base___ICode2____expr1(fra
.me
.REG
[0]);
615 stack_frame_head
= fra
.me
.prev
;
616 return fra
.me
.REG
[0];
618 val_t
icode_base___ICode2___expr2(val_t p0
){
619 struct {struct stack_frame_t me
;} fra
;
622 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
623 fra
.me
.file
= LOCATE_icode_base
;
625 fra
.me
.meth
= LOCATE_icode_base___ICode2___expr2
;
626 fra
.me
.has_broke
= 0;
628 fra
.me
.REG
[0] = NIT_NULL
;
630 REGB0
= TAG_Bool(ATTR_icode_base___ICode2____expr2(fra
.me
.REG
[0])!=NIT_NULL
);
631 /* ./icode//icode_base.nit:131 */
632 if (UNTAG_Bool(REGB0
)) {
634 fprintf(stderr
, "Uninitialized attribute %s", "_expr2");
635 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 131);
638 fra
.me
.REG
[0] = ATTR_icode_base___ICode2____expr2(fra
.me
.REG
[0]);
639 stack_frame_head
= fra
.me
.prev
;
640 return fra
.me
.REG
[0];
642 void icode_base___ICode2___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
643 int itpos7
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_ICode2
].i
;
644 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
646 if (init_table
[itpos7
]) return;
647 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
648 fra
.me
.file
= LOCATE_icode_base
;
650 fra
.me
.meth
= LOCATE_icode_base___ICode2___init
;
651 fra
.me
.has_broke
= 0;
653 fra
.me
.REG
[0] = NIT_NULL
;
654 fra
.me
.REG
[1] = NIT_NULL
;
655 fra
.me
.REG
[2] = NIT_NULL
;
656 fra
.me
.REG
[3] = NIT_NULL
;
660 fra
.me
.REG
[3] = fra
.me
.REG
[0];
661 /* ./icode//icode_base.nit:134 */
662 CALL_icode_base___ICode___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], init_table
);
663 /* ./icode//icode_base.nit:136 */
664 ATTR_icode_base___ICode2____expr1(fra
.me
.REG
[3]) = fra
.me
.REG
[1];
665 /* ./icode//icode_base.nit:137 */
666 ATTR_icode_base___ICode2____expr2(fra
.me
.REG
[3]) = fra
.me
.REG
[2];
667 stack_frame_head
= fra
.me
.prev
;
668 init_table
[itpos7
] = 1;
671 val_t
icode_base___ICodeN___arity(val_t p0
){
672 struct {struct stack_frame_t me
;} fra
;
675 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
676 fra
.me
.file
= LOCATE_icode_base
;
678 fra
.me
.meth
= LOCATE_icode_base___ICodeN___arity
;
679 fra
.me
.has_broke
= 0;
681 fra
.me
.REG
[0] = NIT_NULL
;
683 REGB0
= TAG_Bool(ATTR_icode_base___ICodeN____exprs(fra
.me
.REG
[0])!=NIT_NULL
);
684 /* ./icode//icode_base.nit:144 */
685 if (UNTAG_Bool(REGB0
)) {
687 fprintf(stderr
, "Uninitialized attribute %s", "_exprs");
688 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 144);
691 fra
.me
.REG
[0] = ATTR_icode_base___ICodeN____exprs(fra
.me
.REG
[0]);
692 REGB0
= CALL_abstract_collection___Collection___length(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
695 stack_frame_head
= fra
.me
.prev
;
698 val_t
icode_base___ICodeN___exprs(val_t p0
){
699 struct {struct stack_frame_t me
;} fra
;
702 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
703 fra
.me
.file
= LOCATE_icode_base
;
705 fra
.me
.meth
= LOCATE_icode_base___ICodeN___exprs
;
706 fra
.me
.has_broke
= 0;
708 fra
.me
.REG
[0] = NIT_NULL
;
710 REGB0
= TAG_Bool(ATTR_icode_base___ICodeN____exprs(fra
.me
.REG
[0])!=NIT_NULL
);
711 /* ./icode//icode_base.nit:146 */
712 if (UNTAG_Bool(REGB0
)) {
714 fprintf(stderr
, "Uninitialized attribute %s", "_exprs");
715 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 146);
718 fra
.me
.REG
[0] = ATTR_icode_base___ICodeN____exprs(fra
.me
.REG
[0]);
719 stack_frame_head
= fra
.me
.prev
;
720 return fra
.me
.REG
[0];
722 val_t
icode_base___ICodeN___closure_defs(val_t p0
){
723 struct {struct stack_frame_t me
;} fra
;
725 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
726 fra
.me
.file
= LOCATE_icode_base
;
728 fra
.me
.meth
= LOCATE_icode_base___ICodeN___closure_defs
;
729 fra
.me
.has_broke
= 0;
731 fra
.me
.REG
[0] = NIT_NULL
;
733 fra
.me
.REG
[0] = ATTR_icode_base___ICodeN____closure_defs(fra
.me
.REG
[0]);
734 /* ./icode//icode_base.nit:149 */
735 stack_frame_head
= fra
.me
.prev
;
736 return fra
.me
.REG
[0];
738 void icode_base___ICodeN___closure_defs__eq(val_t p0
, val_t p1
){
739 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
741 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
742 fra
.me
.file
= LOCATE_icode_base
;
744 fra
.me
.meth
= LOCATE_icode_base___ICodeN___closure_defs__eq
;
745 fra
.me
.has_broke
= 0;
747 fra
.me
.REG
[0] = NIT_NULL
;
748 fra
.me
.REG
[1] = NIT_NULL
;
751 /* ./icode//icode_base.nit:149 */
752 ATTR_icode_base___ICodeN____closure_defs(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
753 stack_frame_head
= fra
.me
.prev
;
756 void icode_base___ICodeN___init(val_t p0
, val_t p1
, int* init_table
){
757 int itpos8
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_ICodeN
].i
;
758 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
762 if (init_table
[itpos8
]) return;
763 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
764 fra
.me
.file
= LOCATE_icode_base
;
766 fra
.me
.meth
= LOCATE_icode_base___ICodeN___init
;
767 fra
.me
.has_broke
= 0;
769 fra
.me
.REG
[0] = NIT_NULL
;
770 fra
.me
.REG
[1] = NIT_NULL
;
771 fra
.me
.REG
[2] = NIT_NULL
;
774 fra
.me
.REG
[2] = fra
.me
.REG
[0];
775 /* ./icode//icode_base.nit:152 */
776 CALL_icode_base___ICode___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], init_table
);
777 REGB0
= TAG_Bool(fra
.me
.REG
[1]==NIT_NULL
);
778 /* ./icode//icode_base.nit:154 */
779 if (UNTAG_Bool(REGB0
)) {
781 REGB1
= TAG_Bool(fra
.me
.REG
[1]==NIT_NULL
);
782 if (UNTAG_Bool(REGB1
)) {
783 REGB1
= TAG_Bool(false);
786 REGB1
= CALL_kernel___Object_____eqeq(fra
.me
.REG
[1])(fra
.me
.REG
[1], NIT_NULL
);
790 if (UNTAG_Bool(REGB0
)) {
791 fra
.me
.REG
[0] = NEW_Array_array___Array___init();
792 /* ./icode//icode_base.nit:155 */
793 ATTR_icode_base___ICodeN____exprs(fra
.me
.REG
[2]) = fra
.me
.REG
[0];
795 /* ./icode//icode_base.nit:157 */
796 ATTR_icode_base___ICodeN____exprs(fra
.me
.REG
[2]) = fra
.me
.REG
[1];
798 stack_frame_head
= fra
.me
.prev
;
799 init_table
[itpos8
] = 1;
802 val_t
icode_base___ISeq___icodes(val_t p0
){
803 struct {struct stack_frame_t me
;} fra
;
806 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
807 fra
.me
.file
= LOCATE_icode_base
;
809 fra
.me
.meth
= LOCATE_icode_base___ISeq___icodes
;
810 fra
.me
.has_broke
= 0;
812 fra
.me
.REG
[0] = NIT_NULL
;
814 REGB0
= TAG_Bool(ATTR_icode_base___ISeq____icodes(fra
.me
.REG
[0])!=NIT_NULL
);
815 /* ./icode//icode_base.nit:167 */
816 if (UNTAG_Bool(REGB0
)) {
818 fprintf(stderr
, "Uninitialized attribute %s", "_icodes");
819 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 167);
822 fra
.me
.REG
[0] = ATTR_icode_base___ISeq____icodes(fra
.me
.REG
[0]);
823 stack_frame_head
= fra
.me
.prev
;
824 return fra
.me
.REG
[0];
826 val_t
icode_base___ISeq___iescape_mark(val_t p0
){
827 struct {struct stack_frame_t me
;} fra
;
829 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
830 fra
.me
.file
= LOCATE_icode_base
;
832 fra
.me
.meth
= LOCATE_icode_base___ISeq___iescape_mark
;
833 fra
.me
.has_broke
= 0;
835 fra
.me
.REG
[0] = NIT_NULL
;
837 fra
.me
.REG
[0] = ATTR_icode_base___ISeq____iescape_mark(fra
.me
.REG
[0]);
838 /* ./icode//icode_base.nit:170 */
839 stack_frame_head
= fra
.me
.prev
;
840 return fra
.me
.REG
[0];
842 void icode_base___ISeq___iescape_mark__eq(val_t p0
, val_t p1
){
843 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
845 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
846 fra
.me
.file
= LOCATE_icode_base
;
848 fra
.me
.meth
= LOCATE_icode_base___ISeq___iescape_mark__eq
;
849 fra
.me
.has_broke
= 0;
851 fra
.me
.REG
[0] = NIT_NULL
;
852 fra
.me
.REG
[1] = NIT_NULL
;
855 /* ./icode//icode_base.nit:170 */
856 ATTR_icode_base___ISeq____iescape_mark(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
857 stack_frame_head
= fra
.me
.prev
;
860 void icode_base___ISeq___init(val_t p0
, int* init_table
){
861 int itpos9
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_ISeq
].i
;
862 struct {struct stack_frame_t me
;} fra
;
864 if (init_table
[itpos9
]) return;
865 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
866 fra
.me
.file
= LOCATE_icode_base
;
868 fra
.me
.meth
= LOCATE_icode_base___ISeq___init
;
869 fra
.me
.has_broke
= 0;
871 fra
.me
.REG
[0] = NIT_NULL
;
873 /* ./icode//icode_base.nit:173 */
874 stack_frame_head
= fra
.me
.prev
;
875 init_table
[itpos9
] = 1;
878 void icode_base___ILoop___init(val_t p0
, int* init_table
){
879 int itpos10
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_ILoop
].i
;
880 struct {struct stack_frame_t me
;} fra
;
882 if (init_table
[itpos10
]) return;
883 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
884 fra
.me
.file
= LOCATE_icode_base
;
886 fra
.me
.meth
= LOCATE_icode_base___ILoop___init
;
887 fra
.me
.has_broke
= 0;
889 fra
.me
.REG
[0] = NIT_NULL
;
891 /* ./icode//icode_base.nit:180 */
892 CALL_icode_base___ISeq___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], init_table
);
893 stack_frame_head
= fra
.me
.prev
;
894 init_table
[itpos10
] = 1;
897 val_t
icode_base___IIf___then_seq(val_t p0
){
898 struct {struct stack_frame_t me
;} fra
;
901 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
902 fra
.me
.file
= LOCATE_icode_base
;
904 fra
.me
.meth
= LOCATE_icode_base___IIf___then_seq
;
905 fra
.me
.has_broke
= 0;
907 fra
.me
.REG
[0] = NIT_NULL
;
909 REGB0
= TAG_Bool(ATTR_icode_base___IIf____then_seq(fra
.me
.REG
[0])!=NIT_NULL
);
910 /* ./icode//icode_base.nit:187 */
911 if (UNTAG_Bool(REGB0
)) {
913 fprintf(stderr
, "Uninitialized attribute %s", "_then_seq");
914 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 187);
917 fra
.me
.REG
[0] = ATTR_icode_base___IIf____then_seq(fra
.me
.REG
[0]);
918 stack_frame_head
= fra
.me
.prev
;
919 return fra
.me
.REG
[0];
921 val_t
icode_base___IIf___else_seq(val_t p0
){
922 struct {struct stack_frame_t me
;} fra
;
925 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
926 fra
.me
.file
= LOCATE_icode_base
;
928 fra
.me
.meth
= LOCATE_icode_base___IIf___else_seq
;
929 fra
.me
.has_broke
= 0;
931 fra
.me
.REG
[0] = NIT_NULL
;
933 REGB0
= TAG_Bool(ATTR_icode_base___IIf____else_seq(fra
.me
.REG
[0])!=NIT_NULL
);
934 /* ./icode//icode_base.nit:189 */
935 if (UNTAG_Bool(REGB0
)) {
937 fprintf(stderr
, "Uninitialized attribute %s", "_else_seq");
938 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 189);
941 fra
.me
.REG
[0] = ATTR_icode_base___IIf____else_seq(fra
.me
.REG
[0]);
942 stack_frame_head
= fra
.me
.prev
;
943 return fra
.me
.REG
[0];
945 void icode_base___IIf___init(val_t p0
, val_t p1
, int* init_table
){
946 int itpos11
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_IIf
].i
;
947 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
949 if (init_table
[itpos11
]) return;
950 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
951 fra
.me
.file
= LOCATE_icode_base
;
953 fra
.me
.meth
= LOCATE_icode_base___IIf___init
;
954 fra
.me
.has_broke
= 0;
956 fra
.me
.REG
[0] = NIT_NULL
;
957 fra
.me
.REG
[1] = NIT_NULL
;
960 /* ./icode//icode_base.nit:191 */
961 CALL_icode_base___ICode1___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1], init_table
);
962 stack_frame_head
= fra
.me
.prev
;
963 init_table
[itpos11
] = 1;
966 val_t
icode_base___IEscape___iescape_mark(val_t p0
){
967 struct {struct stack_frame_t me
;} fra
;
970 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
971 fra
.me
.file
= LOCATE_icode_base
;
973 fra
.me
.meth
= LOCATE_icode_base___IEscape___iescape_mark
;
974 fra
.me
.has_broke
= 0;
976 fra
.me
.REG
[0] = NIT_NULL
;
978 REGB0
= TAG_Bool(ATTR_icode_base___IEscape____iescape_mark(fra
.me
.REG
[0])!=NIT_NULL
);
979 /* ./icode//icode_base.nit:197 */
980 if (UNTAG_Bool(REGB0
)) {
982 fprintf(stderr
, "Uninitialized attribute %s", "_iescape_mark");
983 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 197);
986 fra
.me
.REG
[0] = ATTR_icode_base___IEscape____iescape_mark(fra
.me
.REG
[0]);
987 stack_frame_head
= fra
.me
.prev
;
988 return fra
.me
.REG
[0];
990 void icode_base___IEscape___init(val_t p0
, val_t p1
, int* init_table
){
991 int itpos12
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_IEscape
].i
;
992 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
994 if (init_table
[itpos12
]) return;
995 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
996 fra
.me
.file
= LOCATE_icode_base
;
998 fra
.me
.meth
= LOCATE_icode_base___IEscape___init
;
999 fra
.me
.has_broke
= 0;
1000 fra
.me
.REG_size
= 2;
1001 fra
.me
.REG
[0] = NIT_NULL
;
1002 fra
.me
.REG
[1] = NIT_NULL
;
1005 /* ./icode//icode_base.nit:200 */
1006 ATTR_icode_base___IEscape____iescape_mark(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
1007 stack_frame_head
= fra
.me
.prev
;
1008 init_table
[itpos12
] = 1;
1011 val_t
icode_base___IAbort___texts(val_t p0
){
1012 struct {struct stack_frame_t me
;} fra
;
1015 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1016 fra
.me
.file
= LOCATE_icode_base
;
1018 fra
.me
.meth
= LOCATE_icode_base___IAbort___texts
;
1019 fra
.me
.has_broke
= 0;
1020 fra
.me
.REG_size
= 1;
1021 fra
.me
.REG
[0] = NIT_NULL
;
1023 REGB0
= TAG_Bool(ATTR_icode_base___IAbort____texts(fra
.me
.REG
[0])!=NIT_NULL
);
1024 /* ./icode//icode_base.nit:206 */
1025 if (UNTAG_Bool(REGB0
)) {
1027 fprintf(stderr
, "Uninitialized attribute %s", "_texts");
1028 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 206);
1031 fra
.me
.REG
[0] = ATTR_icode_base___IAbort____texts(fra
.me
.REG
[0]);
1032 stack_frame_head
= fra
.me
.prev
;
1033 return fra
.me
.REG
[0];
1035 val_t
icode_base___IAbort___module_location(val_t p0
){
1036 struct {struct stack_frame_t me
;} fra
;
1039 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1040 fra
.me
.file
= LOCATE_icode_base
;
1042 fra
.me
.meth
= LOCATE_icode_base___IAbort___module_location
;
1043 fra
.me
.has_broke
= 0;
1044 fra
.me
.REG_size
= 1;
1045 fra
.me
.REG
[0] = NIT_NULL
;
1047 REGB0
= TAG_Bool(ATTR_icode_base___IAbort____module_location(fra
.me
.REG
[0])!=NIT_NULL
);
1048 /* ./icode//icode_base.nit:209 */
1049 if (UNTAG_Bool(REGB0
)) {
1051 fprintf(stderr
, "Uninitialized attribute %s", "_module_location");
1052 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 209);
1055 fra
.me
.REG
[0] = ATTR_icode_base___IAbort____module_location(fra
.me
.REG
[0]);
1056 stack_frame_head
= fra
.me
.prev
;
1057 return fra
.me
.REG
[0];
1059 void icode_base___IAbort___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
1060 int itpos13
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_IAbort
].i
;
1061 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
1063 if (init_table
[itpos13
]) return;
1064 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1065 fra
.me
.file
= LOCATE_icode_base
;
1067 fra
.me
.meth
= LOCATE_icode_base___IAbort___init
;
1068 fra
.me
.has_broke
= 0;
1069 fra
.me
.REG_size
= 3;
1070 fra
.me
.REG
[0] = NIT_NULL
;
1071 fra
.me
.REG
[1] = NIT_NULL
;
1072 fra
.me
.REG
[2] = NIT_NULL
;
1076 /* ./icode//icode_base.nit:213 */
1077 ATTR_icode_base___IAbort____texts(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
1078 /* ./icode//icode_base.nit:214 */
1079 ATTR_icode_base___IAbort____module_location(fra
.me
.REG
[0]) = fra
.me
.REG
[2];
1080 stack_frame_head
= fra
.me
.prev
;
1081 init_table
[itpos13
] = 1;
1084 val_t
icode_base___IAbsCall___property(val_t p0
){
1085 struct {struct stack_frame_t me
;} fra
;
1088 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1089 fra
.me
.file
= LOCATE_icode_base
;
1091 fra
.me
.meth
= LOCATE_icode_base___IAbsCall___property
;
1092 fra
.me
.has_broke
= 0;
1093 fra
.me
.REG_size
= 1;
1094 fra
.me
.REG
[0] = NIT_NULL
;
1096 REGB0
= TAG_Bool(ATTR_icode_base___IAbsCall____property(fra
.me
.REG
[0])!=NIT_NULL
);
1097 /* ./icode//icode_base.nit:223 */
1098 if (UNTAG_Bool(REGB0
)) {
1100 fprintf(stderr
, "Uninitialized attribute %s", "_property");
1101 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 223);
1104 fra
.me
.REG
[0] = ATTR_icode_base___IAbsCall____property(fra
.me
.REG
[0]);
1105 stack_frame_head
= fra
.me
.prev
;
1106 return fra
.me
.REG
[0];
1108 void icode_base___IAbsCall___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
1109 int itpos14
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_IAbsCall
].i
;
1110 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
1112 if (init_table
[itpos14
]) return;
1113 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1114 fra
.me
.file
= LOCATE_icode_base
;
1116 fra
.me
.meth
= LOCATE_icode_base___IAbsCall___init
;
1117 fra
.me
.has_broke
= 0;
1118 fra
.me
.REG_size
= 4;
1119 fra
.me
.REG
[0] = NIT_NULL
;
1120 fra
.me
.REG
[1] = NIT_NULL
;
1121 fra
.me
.REG
[2] = NIT_NULL
;
1122 fra
.me
.REG
[3] = NIT_NULL
;
1126 fra
.me
.REG
[3] = fra
.me
.REG
[0];
1127 /* ./icode//icode_base.nit:228 */
1128 CALL_icode_base___ICodeN___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2], init_table
);
1129 /* ./icode//icode_base.nit:229 */
1130 ATTR_icode_base___IAbsCall____property(fra
.me
.REG
[3]) = fra
.me
.REG
[1];
1131 stack_frame_head
= fra
.me
.prev
;
1132 init_table
[itpos14
] = 1;
1135 void icode_base___ICall___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
1136 int itpos15
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_ICall
].i
;
1137 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
1139 if (init_table
[itpos15
]) return;
1140 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1141 fra
.me
.file
= LOCATE_icode_base
;
1143 fra
.me
.meth
= LOCATE_icode_base___ICall___init
;
1144 fra
.me
.has_broke
= 0;
1145 fra
.me
.REG_size
= 3;
1146 fra
.me
.REG
[0] = NIT_NULL
;
1147 fra
.me
.REG
[1] = NIT_NULL
;
1148 fra
.me
.REG
[2] = NIT_NULL
;
1152 /* ./icode//icode_base.nit:237 */
1153 CALL_icode_base___IAbsCall___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1], fra
.me
.REG
[2], init_table
);
1154 stack_frame_head
= fra
.me
.prev
;
1155 init_table
[itpos15
] = 1;
1158 void icode_base___ISuper___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
1159 int itpos16
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_ISuper
].i
;
1160 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
1162 if (init_table
[itpos16
]) return;
1163 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1164 fra
.me
.file
= LOCATE_icode_base
;
1166 fra
.me
.meth
= LOCATE_icode_base___ISuper___init
;
1167 fra
.me
.has_broke
= 0;
1168 fra
.me
.REG_size
= 3;
1169 fra
.me
.REG
[0] = NIT_NULL
;
1170 fra
.me
.REG
[1] = NIT_NULL
;
1171 fra
.me
.REG
[2] = NIT_NULL
;
1175 /* ./icode//icode_base.nit:244 */
1176 CALL_icode_base___IAbsCall___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1], fra
.me
.REG
[2], init_table
);
1177 stack_frame_head
= fra
.me
.prev
;
1178 init_table
[itpos16
] = 1;
1181 val_t
icode_base___INew___stype(val_t p0
){
1182 struct {struct stack_frame_t me
;} fra
;
1185 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1186 fra
.me
.file
= LOCATE_icode_base
;
1188 fra
.me
.meth
= LOCATE_icode_base___INew___stype
;
1189 fra
.me
.has_broke
= 0;
1190 fra
.me
.REG_size
= 1;
1191 fra
.me
.REG
[0] = NIT_NULL
;
1193 REGB0
= TAG_Bool(ATTR_icode_base___INew____stype(fra
.me
.REG
[0])!=NIT_NULL
);
1194 /* ./icode//icode_base.nit:256 */
1195 if (UNTAG_Bool(REGB0
)) {
1197 fprintf(stderr
, "Uninitialized attribute %s", "_stype");
1198 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 256);
1201 fra
.me
.REG
[0] = ATTR_icode_base___INew____stype(fra
.me
.REG
[0]);
1202 stack_frame_head
= fra
.me
.prev
;
1203 return fra
.me
.REG
[0];
1205 void icode_base___INew___init(val_t p0
, val_t p1
, val_t p2
, val_t p3
, int* init_table
){
1206 int itpos17
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_INew
].i
;
1207 struct {struct stack_frame_t me
; val_t MORE_REG
[4];} fra
;
1209 if (init_table
[itpos17
]) return;
1210 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1211 fra
.me
.file
= LOCATE_icode_base
;
1213 fra
.me
.meth
= LOCATE_icode_base___INew___init
;
1214 fra
.me
.has_broke
= 0;
1215 fra
.me
.REG_size
= 5;
1216 fra
.me
.REG
[0] = NIT_NULL
;
1217 fra
.me
.REG
[1] = NIT_NULL
;
1218 fra
.me
.REG
[2] = NIT_NULL
;
1219 fra
.me
.REG
[3] = NIT_NULL
;
1220 fra
.me
.REG
[4] = NIT_NULL
;
1225 fra
.me
.REG
[4] = fra
.me
.REG
[0];
1226 /* ./icode//icode_base.nit:260 */
1227 CALL_icode_base___IAbsCall___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2], fra
.me
.REG
[3], init_table
);
1228 /* ./icode//icode_base.nit:261 */
1229 ATTR_icode_base___INew____stype(fra
.me
.REG
[4]) = fra
.me
.REG
[1];
1230 stack_frame_head
= fra
.me
.prev
;
1231 init_table
[itpos17
] = 1;
1234 val_t
icode_base___IAllocateInstance___stype(val_t p0
){
1235 struct {struct stack_frame_t me
;} fra
;
1238 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1239 fra
.me
.file
= LOCATE_icode_base
;
1241 fra
.me
.meth
= LOCATE_icode_base___IAllocateInstance___stype
;
1242 fra
.me
.has_broke
= 0;
1243 fra
.me
.REG_size
= 1;
1244 fra
.me
.REG
[0] = NIT_NULL
;
1246 REGB0
= TAG_Bool(ATTR_icode_base___IAllocateInstance____stype(fra
.me
.REG
[0])!=NIT_NULL
);
1247 /* ./icode//icode_base.nit:270 */
1248 if (UNTAG_Bool(REGB0
)) {
1250 fprintf(stderr
, "Uninitialized attribute %s", "_stype");
1251 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 270);
1254 fra
.me
.REG
[0] = ATTR_icode_base___IAllocateInstance____stype(fra
.me
.REG
[0]);
1255 stack_frame_head
= fra
.me
.prev
;
1256 return fra
.me
.REG
[0];
1258 void icode_base___IAllocateInstance___init(val_t p0
, val_t p1
, int* init_table
){
1259 int itpos18
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_IAllocateInstance
].i
;
1260 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
1262 if (init_table
[itpos18
]) return;
1263 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1264 fra
.me
.file
= LOCATE_icode_base
;
1266 fra
.me
.meth
= LOCATE_icode_base___IAllocateInstance___init
;
1267 fra
.me
.has_broke
= 0;
1268 fra
.me
.REG_size
= 2;
1269 fra
.me
.REG
[0] = NIT_NULL
;
1270 fra
.me
.REG
[1] = NIT_NULL
;
1273 /* ./icode//icode_base.nit:274 */
1274 ATTR_icode_base___IAllocateInstance____stype(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
1275 stack_frame_head
= fra
.me
.prev
;
1276 init_table
[itpos18
] = 1;
1279 void icode_base___IStaticCall___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
1280 int itpos19
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_IStaticCall
].i
;
1281 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
1283 if (init_table
[itpos19
]) return;
1284 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1285 fra
.me
.file
= LOCATE_icode_base
;
1287 fra
.me
.meth
= LOCATE_icode_base___IStaticCall___init
;
1288 fra
.me
.has_broke
= 0;
1289 fra
.me
.REG_size
= 3;
1290 fra
.me
.REG
[0] = NIT_NULL
;
1291 fra
.me
.REG
[1] = NIT_NULL
;
1292 fra
.me
.REG
[2] = NIT_NULL
;
1296 /* ./icode//icode_base.nit:281 */
1297 CALL_icode_base___IAbsCall___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1], fra
.me
.REG
[2], init_table
);
1298 stack_frame_head
= fra
.me
.prev
;
1299 init_table
[itpos19
] = 1;
1302 val_t
icode_base___ICheckInstance___stype(val_t p0
){
1303 struct {struct stack_frame_t me
;} fra
;
1306 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1307 fra
.me
.file
= LOCATE_icode_base
;
1309 fra
.me
.meth
= LOCATE_icode_base___ICheckInstance___stype
;
1310 fra
.me
.has_broke
= 0;
1311 fra
.me
.REG_size
= 1;
1312 fra
.me
.REG
[0] = NIT_NULL
;
1314 REGB0
= TAG_Bool(ATTR_icode_base___ICheckInstance____stype(fra
.me
.REG
[0])!=NIT_NULL
);
1315 /* ./icode//icode_base.nit:287 */
1316 if (UNTAG_Bool(REGB0
)) {
1318 fprintf(stderr
, "Uninitialized attribute %s", "_stype");
1319 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 287);
1322 fra
.me
.REG
[0] = ATTR_icode_base___ICheckInstance____stype(fra
.me
.REG
[0]);
1323 stack_frame_head
= fra
.me
.prev
;
1324 return fra
.me
.REG
[0];
1326 void icode_base___ICheckInstance___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
1327 int itpos20
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_ICheckInstance
].i
;
1328 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
1330 if (init_table
[itpos20
]) return;
1331 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1332 fra
.me
.file
= LOCATE_icode_base
;
1334 fra
.me
.meth
= LOCATE_icode_base___ICheckInstance___init
;
1335 fra
.me
.has_broke
= 0;
1336 fra
.me
.REG_size
= 4;
1337 fra
.me
.REG
[0] = NIT_NULL
;
1338 fra
.me
.REG
[1] = NIT_NULL
;
1339 fra
.me
.REG
[2] = NIT_NULL
;
1340 fra
.me
.REG
[3] = NIT_NULL
;
1344 fra
.me
.REG
[3] = fra
.me
.REG
[0];
1345 /* ./icode//icode_base.nit:291 */
1346 CALL_icode_base___ICode1___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2], init_table
);
1347 /* ./icode//icode_base.nit:292 */
1348 ATTR_icode_base___ICheckInstance____stype(fra
.me
.REG
[3]) = fra
.me
.REG
[1];
1349 stack_frame_head
= fra
.me
.prev
;
1350 init_table
[itpos20
] = 1;
1353 val_t
icode_base___IInitAttributes___stype(val_t p0
){
1354 struct {struct stack_frame_t me
;} fra
;
1357 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1358 fra
.me
.file
= LOCATE_icode_base
;
1360 fra
.me
.meth
= LOCATE_icode_base___IInitAttributes___stype
;
1361 fra
.me
.has_broke
= 0;
1362 fra
.me
.REG_size
= 1;
1363 fra
.me
.REG
[0] = NIT_NULL
;
1365 REGB0
= TAG_Bool(ATTR_icode_base___IInitAttributes____stype(fra
.me
.REG
[0])!=NIT_NULL
);
1366 /* ./icode//icode_base.nit:299 */
1367 if (UNTAG_Bool(REGB0
)) {
1369 fprintf(stderr
, "Uninitialized attribute %s", "_stype");
1370 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 299);
1373 fra
.me
.REG
[0] = ATTR_icode_base___IInitAttributes____stype(fra
.me
.REG
[0]);
1374 stack_frame_head
= fra
.me
.prev
;
1375 return fra
.me
.REG
[0];
1377 void icode_base___IInitAttributes___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
1378 int itpos21
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_IInitAttributes
].i
;
1379 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
1381 if (init_table
[itpos21
]) return;
1382 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1383 fra
.me
.file
= LOCATE_icode_base
;
1385 fra
.me
.meth
= LOCATE_icode_base___IInitAttributes___init
;
1386 fra
.me
.has_broke
= 0;
1387 fra
.me
.REG_size
= 4;
1388 fra
.me
.REG
[0] = NIT_NULL
;
1389 fra
.me
.REG
[1] = NIT_NULL
;
1390 fra
.me
.REG
[2] = NIT_NULL
;
1391 fra
.me
.REG
[3] = NIT_NULL
;
1395 fra
.me
.REG
[3] = fra
.me
.REG
[0];
1396 /* ./icode//icode_base.nit:303 */
1397 CALL_icode_base___ICode1___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2], init_table
);
1398 /* ./icode//icode_base.nit:304 */
1399 ATTR_icode_base___IInitAttributes____stype(fra
.me
.REG
[3]) = fra
.me
.REG
[1];
1400 stack_frame_head
= fra
.me
.prev
;
1401 init_table
[itpos21
] = 1;
1404 val_t
icode_base___IClosCall___closure_decl(val_t p0
){
1405 struct {struct stack_frame_t me
;} fra
;
1408 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1409 fra
.me
.file
= LOCATE_icode_base
;
1411 fra
.me
.meth
= LOCATE_icode_base___IClosCall___closure_decl
;
1412 fra
.me
.has_broke
= 0;
1413 fra
.me
.REG_size
= 1;
1414 fra
.me
.REG
[0] = NIT_NULL
;
1416 REGB0
= TAG_Bool(ATTR_icode_base___IClosCall____closure_decl(fra
.me
.REG
[0])!=NIT_NULL
);
1417 /* ./icode//icode_base.nit:312 */
1418 if (UNTAG_Bool(REGB0
)) {
1420 fprintf(stderr
, "Uninitialized attribute %s", "_closure_decl");
1421 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 312);
1424 fra
.me
.REG
[0] = ATTR_icode_base___IClosCall____closure_decl(fra
.me
.REG
[0]);
1425 stack_frame_head
= fra
.me
.prev
;
1426 return fra
.me
.REG
[0];
1428 val_t
icode_base___IClosCall___break_seq(val_t p0
){
1429 struct {struct stack_frame_t me
;} fra
;
1431 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1432 fra
.me
.file
= LOCATE_icode_base
;
1434 fra
.me
.meth
= LOCATE_icode_base___IClosCall___break_seq
;
1435 fra
.me
.has_broke
= 0;
1436 fra
.me
.REG_size
= 1;
1437 fra
.me
.REG
[0] = NIT_NULL
;
1439 fra
.me
.REG
[0] = ATTR_icode_base___IClosCall____break_seq(fra
.me
.REG
[0]);
1440 /* ./icode//icode_base.nit:315 */
1441 stack_frame_head
= fra
.me
.prev
;
1442 return fra
.me
.REG
[0];
1444 void icode_base___IClosCall___break_seq__eq(val_t p0
, val_t p1
){
1445 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
1447 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1448 fra
.me
.file
= LOCATE_icode_base
;
1450 fra
.me
.meth
= LOCATE_icode_base___IClosCall___break_seq__eq
;
1451 fra
.me
.has_broke
= 0;
1452 fra
.me
.REG_size
= 2;
1453 fra
.me
.REG
[0] = NIT_NULL
;
1454 fra
.me
.REG
[1] = NIT_NULL
;
1457 /* ./icode//icode_base.nit:315 */
1458 ATTR_icode_base___IClosCall____break_seq(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
1459 stack_frame_head
= fra
.me
.prev
;
1462 void icode_base___IClosCall___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
1463 int itpos22
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_IClosCall
].i
;
1464 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
1466 if (init_table
[itpos22
]) return;
1467 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1468 fra
.me
.file
= LOCATE_icode_base
;
1470 fra
.me
.meth
= LOCATE_icode_base___IClosCall___init
;
1471 fra
.me
.has_broke
= 0;
1472 fra
.me
.REG_size
= 4;
1473 fra
.me
.REG
[0] = NIT_NULL
;
1474 fra
.me
.REG
[1] = NIT_NULL
;
1475 fra
.me
.REG
[2] = NIT_NULL
;
1476 fra
.me
.REG
[3] = NIT_NULL
;
1480 fra
.me
.REG
[3] = fra
.me
.REG
[0];
1481 /* ./icode//icode_base.nit:320 */
1482 CALL_icode_base___ICodeN___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2], init_table
);
1483 /* ./icode//icode_base.nit:321 */
1484 ATTR_icode_base___IClosCall____closure_decl(fra
.me
.REG
[3]) = fra
.me
.REG
[1];
1485 stack_frame_head
= fra
.me
.prev
;
1486 init_table
[itpos22
] = 1;
1489 val_t
icode_base___INative___is_pure(val_t p0
){
1490 struct {struct stack_frame_t me
;} fra
;
1493 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1494 fra
.me
.file
= LOCATE_icode_base
;
1496 fra
.me
.meth
= LOCATE_icode_base___INative___is_pure
;
1497 fra
.me
.has_broke
= 0;
1498 fra
.me
.REG_size
= 1;
1499 fra
.me
.REG
[0] = NIT_NULL
;
1501 REGB0
= TAG_Bool(ATTR_icode_base___INative____is_pure(fra
.me
.REG
[0])!=NIT_NULL
);
1502 /* ./icode//icode_base.nit:340 */
1503 if (UNTAG_Bool(REGB0
)) {
1505 fprintf(stderr
, "Uninitialized attribute %s", "_is_pure");
1506 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 340);
1509 REGB0
= ATTR_icode_base___INative____is_pure(fra
.me
.REG
[0]);
1510 stack_frame_head
= fra
.me
.prev
;
1513 val_t
icode_base___INative___code(val_t p0
){
1514 struct {struct stack_frame_t me
;} fra
;
1517 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1518 fra
.me
.file
= LOCATE_icode_base
;
1520 fra
.me
.meth
= LOCATE_icode_base___INative___code
;
1521 fra
.me
.has_broke
= 0;
1522 fra
.me
.REG_size
= 1;
1523 fra
.me
.REG
[0] = NIT_NULL
;
1525 REGB0
= TAG_Bool(ATTR_icode_base___INative____code(fra
.me
.REG
[0])!=NIT_NULL
);
1526 /* ./icode//icode_base.nit:330 */
1527 if (UNTAG_Bool(REGB0
)) {
1529 fprintf(stderr
, "Uninitialized attribute %s", "_code");
1530 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 330);
1533 fra
.me
.REG
[0] = ATTR_icode_base___INative____code(fra
.me
.REG
[0]);
1534 stack_frame_head
= fra
.me
.prev
;
1535 return fra
.me
.REG
[0];
1537 void icode_base___INative___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
1538 int itpos23
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_INative
].i
;
1539 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
1541 if (init_table
[itpos23
]) return;
1542 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1543 fra
.me
.file
= LOCATE_icode_base
;
1545 fra
.me
.meth
= LOCATE_icode_base___INative___init
;
1546 fra
.me
.has_broke
= 0;
1547 fra
.me
.REG_size
= 4;
1548 fra
.me
.REG
[0] = NIT_NULL
;
1549 fra
.me
.REG
[1] = NIT_NULL
;
1550 fra
.me
.REG
[2] = NIT_NULL
;
1551 fra
.me
.REG
[3] = NIT_NULL
;
1555 fra
.me
.REG
[3] = fra
.me
.REG
[0];
1556 /* ./icode//icode_base.nit:336 */
1557 CALL_icode_base___ICodeN___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2], init_table
);
1558 /* ./icode//icode_base.nit:337 */
1559 ATTR_icode_base___INative____code(fra
.me
.REG
[3]) = fra
.me
.REG
[1];
1560 stack_frame_head
= fra
.me
.prev
;
1561 init_table
[itpos23
] = 1;
1564 void icode_base___INative___is_pure__eq(val_t p0
, val_t p1
){
1565 struct {struct stack_frame_t me
;} fra
;
1568 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1569 fra
.me
.file
= LOCATE_icode_base
;
1571 fra
.me
.meth
= LOCATE_icode_base___INative___is_pure__eq
;
1572 fra
.me
.has_broke
= 0;
1573 fra
.me
.REG_size
= 1;
1574 fra
.me
.REG
[0] = NIT_NULL
;
1577 /* ./icode//icode_base.nit:340 */
1578 ATTR_icode_base___INative____is_pure(fra
.me
.REG
[0]) = REGB0
;
1579 stack_frame_head
= fra
.me
.prev
;
1582 val_t
icode_base___IMove___is_pure(val_t p0
){
1583 struct {struct stack_frame_t me
;} fra
;
1586 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1587 fra
.me
.file
= LOCATE_icode_base
;
1589 fra
.me
.meth
= LOCATE_icode_base___IMove___is_pure
;
1590 fra
.me
.has_broke
= 0;
1591 fra
.me
.REG_size
= 1;
1592 fra
.me
.REG
[0] = NIT_NULL
;
1594 REGB0
= TAG_Bool(true);
1595 /* ./icode//icode_base.nit:354 */
1598 stack_frame_head
= fra
.me
.prev
;
1601 void icode_base___IMove___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
1602 int itpos24
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_IMove
].i
;
1603 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
1605 if (init_table
[itpos24
]) return;
1606 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1607 fra
.me
.file
= LOCATE_icode_base
;
1609 fra
.me
.meth
= LOCATE_icode_base___IMove___init
;
1610 fra
.me
.has_broke
= 0;
1611 fra
.me
.REG_size
= 4;
1612 fra
.me
.REG
[0] = NIT_NULL
;
1613 fra
.me
.REG
[1] = NIT_NULL
;
1614 fra
.me
.REG
[2] = NIT_NULL
;
1615 fra
.me
.REG
[3] = NIT_NULL
;
1619 fra
.me
.REG
[3] = fra
.me
.REG
[0];
1620 /* ./icode//icode_base.nit:350 */
1621 CALL_icode_base___ICode1___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2], init_table
);
1622 /* ./icode//icode_base.nit:351 */
1623 ATTR_icode_base___ICode____result(fra
.me
.REG
[3]) = fra
.me
.REG
[1];
1624 stack_frame_head
= fra
.me
.prev
;
1625 init_table
[itpos24
] = 1;
1628 val_t
icode_base___IAttrRead___is_pure(val_t p0
){
1629 struct {struct stack_frame_t me
;} fra
;
1632 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1633 fra
.me
.file
= LOCATE_icode_base
;
1635 fra
.me
.meth
= LOCATE_icode_base___IAttrRead___is_pure
;
1636 fra
.me
.has_broke
= 0;
1637 fra
.me
.REG_size
= 1;
1638 fra
.me
.REG
[0] = NIT_NULL
;
1640 REGB0
= TAG_Bool(true);
1641 /* ./icode//icode_base.nit:370 */
1644 stack_frame_head
= fra
.me
.prev
;
1647 val_t
icode_base___IAttrRead___property(val_t p0
){
1648 struct {struct stack_frame_t me
;} fra
;
1651 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1652 fra
.me
.file
= LOCATE_icode_base
;
1654 fra
.me
.meth
= LOCATE_icode_base___IAttrRead___property
;
1655 fra
.me
.has_broke
= 0;
1656 fra
.me
.REG_size
= 1;
1657 fra
.me
.REG
[0] = NIT_NULL
;
1659 REGB0
= TAG_Bool(ATTR_icode_base___IAttrRead____property(fra
.me
.REG
[0])!=NIT_NULL
);
1660 /* ./icode//icode_base.nit:361 */
1661 if (UNTAG_Bool(REGB0
)) {
1663 fprintf(stderr
, "Uninitialized attribute %s", "_property");
1664 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 361);
1667 fra
.me
.REG
[0] = ATTR_icode_base___IAttrRead____property(fra
.me
.REG
[0]);
1668 stack_frame_head
= fra
.me
.prev
;
1669 return fra
.me
.REG
[0];
1671 void icode_base___IAttrRead___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
1672 int itpos25
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_IAttrRead
].i
;
1673 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
1675 if (init_table
[itpos25
]) return;
1676 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1677 fra
.me
.file
= LOCATE_icode_base
;
1679 fra
.me
.meth
= LOCATE_icode_base___IAttrRead___init
;
1680 fra
.me
.has_broke
= 0;
1681 fra
.me
.REG_size
= 4;
1682 fra
.me
.REG
[0] = NIT_NULL
;
1683 fra
.me
.REG
[1] = NIT_NULL
;
1684 fra
.me
.REG
[2] = NIT_NULL
;
1685 fra
.me
.REG
[3] = NIT_NULL
;
1689 fra
.me
.REG
[3] = fra
.me
.REG
[0];
1690 /* ./icode//icode_base.nit:366 */
1691 CALL_icode_base___ICode1___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2], init_table
);
1692 /* ./icode//icode_base.nit:367 */
1693 ATTR_icode_base___IAttrRead____property(fra
.me
.REG
[3]) = fra
.me
.REG
[1];
1694 stack_frame_head
= fra
.me
.prev
;
1695 init_table
[itpos25
] = 1;
1698 val_t
icode_base___IAttrWrite___property(val_t p0
){
1699 struct {struct stack_frame_t me
;} fra
;
1702 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1703 fra
.me
.file
= LOCATE_icode_base
;
1705 fra
.me
.meth
= LOCATE_icode_base___IAttrWrite___property
;
1706 fra
.me
.has_broke
= 0;
1707 fra
.me
.REG_size
= 1;
1708 fra
.me
.REG
[0] = NIT_NULL
;
1710 REGB0
= TAG_Bool(ATTR_icode_base___IAttrWrite____property(fra
.me
.REG
[0])!=NIT_NULL
);
1711 /* ./icode//icode_base.nit:377 */
1712 if (UNTAG_Bool(REGB0
)) {
1714 fprintf(stderr
, "Uninitialized attribute %s", "_property");
1715 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 377);
1718 fra
.me
.REG
[0] = ATTR_icode_base___IAttrWrite____property(fra
.me
.REG
[0]);
1719 stack_frame_head
= fra
.me
.prev
;
1720 return fra
.me
.REG
[0];
1722 void icode_base___IAttrWrite___init(val_t p0
, val_t p1
, val_t p2
, val_t p3
, int* init_table
){
1723 int itpos26
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_IAttrWrite
].i
;
1724 struct {struct stack_frame_t me
; val_t MORE_REG
[4];} fra
;
1726 if (init_table
[itpos26
]) return;
1727 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1728 fra
.me
.file
= LOCATE_icode_base
;
1730 fra
.me
.meth
= LOCATE_icode_base___IAttrWrite___init
;
1731 fra
.me
.has_broke
= 0;
1732 fra
.me
.REG_size
= 5;
1733 fra
.me
.REG
[0] = NIT_NULL
;
1734 fra
.me
.REG
[1] = NIT_NULL
;
1735 fra
.me
.REG
[2] = NIT_NULL
;
1736 fra
.me
.REG
[3] = NIT_NULL
;
1737 fra
.me
.REG
[4] = NIT_NULL
;
1742 fra
.me
.REG
[4] = fra
.me
.REG
[0];
1743 /* ./icode//icode_base.nit:382 */
1744 CALL_icode_base___ICode2___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2], fra
.me
.REG
[3], init_table
);
1745 /* ./icode//icode_base.nit:383 */
1746 ATTR_icode_base___IAttrWrite____property(fra
.me
.REG
[4]) = fra
.me
.REG
[1];
1747 stack_frame_head
= fra
.me
.prev
;
1748 init_table
[itpos26
] = 1;
1751 val_t
icode_base___IAttrIsset___is_pure(val_t p0
){
1752 struct {struct stack_frame_t me
;} fra
;
1755 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1756 fra
.me
.file
= LOCATE_icode_base
;
1758 fra
.me
.meth
= LOCATE_icode_base___IAttrIsset___is_pure
;
1759 fra
.me
.has_broke
= 0;
1760 fra
.me
.REG_size
= 1;
1761 fra
.me
.REG
[0] = NIT_NULL
;
1763 REGB0
= TAG_Bool(true);
1764 /* ./icode//icode_base.nit:401 */
1767 stack_frame_head
= fra
.me
.prev
;
1770 val_t
icode_base___IAttrIsset___property(val_t p0
){
1771 struct {struct stack_frame_t me
;} fra
;
1774 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1775 fra
.me
.file
= LOCATE_icode_base
;
1777 fra
.me
.meth
= LOCATE_icode_base___IAttrIsset___property
;
1778 fra
.me
.has_broke
= 0;
1779 fra
.me
.REG_size
= 1;
1780 fra
.me
.REG
[0] = NIT_NULL
;
1782 REGB0
= TAG_Bool(ATTR_icode_base___IAttrIsset____property(fra
.me
.REG
[0])!=NIT_NULL
);
1783 /* ./icode//icode_base.nit:392 */
1784 if (UNTAG_Bool(REGB0
)) {
1786 fprintf(stderr
, "Uninitialized attribute %s", "_property");
1787 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 392);
1790 fra
.me
.REG
[0] = ATTR_icode_base___IAttrIsset____property(fra
.me
.REG
[0]);
1791 stack_frame_head
= fra
.me
.prev
;
1792 return fra
.me
.REG
[0];
1794 void icode_base___IAttrIsset___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
1795 int itpos27
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_IAttrIsset
].i
;
1796 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
1798 if (init_table
[itpos27
]) return;
1799 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1800 fra
.me
.file
= LOCATE_icode_base
;
1802 fra
.me
.meth
= LOCATE_icode_base___IAttrIsset___init
;
1803 fra
.me
.has_broke
= 0;
1804 fra
.me
.REG_size
= 4;
1805 fra
.me
.REG
[0] = NIT_NULL
;
1806 fra
.me
.REG
[1] = NIT_NULL
;
1807 fra
.me
.REG
[2] = NIT_NULL
;
1808 fra
.me
.REG
[3] = NIT_NULL
;
1812 fra
.me
.REG
[3] = fra
.me
.REG
[0];
1813 /* ./icode//icode_base.nit:397 */
1814 CALL_icode_base___ICode1___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2], init_table
);
1815 /* ./icode//icode_base.nit:398 */
1816 ATTR_icode_base___IAttrIsset____property(fra
.me
.REG
[3]) = fra
.me
.REG
[1];
1817 stack_frame_head
= fra
.me
.prev
;
1818 init_table
[itpos27
] = 1;
1821 val_t
icode_base___ITypeCheck___is_pure(val_t p0
){
1822 struct {struct stack_frame_t me
;} fra
;
1825 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1826 fra
.me
.file
= LOCATE_icode_base
;
1828 fra
.me
.meth
= LOCATE_icode_base___ITypeCheck___is_pure
;
1829 fra
.me
.has_broke
= 0;
1830 fra
.me
.REG_size
= 1;
1831 fra
.me
.REG
[0] = NIT_NULL
;
1833 REGB0
= TAG_Bool(true);
1834 /* ./icode//icode_base.nit:417 */
1837 stack_frame_head
= fra
.me
.prev
;
1840 val_t
icode_base___ITypeCheck___stype(val_t p0
){
1841 struct {struct stack_frame_t me
;} fra
;
1844 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1845 fra
.me
.file
= LOCATE_icode_base
;
1847 fra
.me
.meth
= LOCATE_icode_base___ITypeCheck___stype
;
1848 fra
.me
.has_broke
= 0;
1849 fra
.me
.REG_size
= 1;
1850 fra
.me
.REG
[0] = NIT_NULL
;
1852 REGB0
= TAG_Bool(ATTR_icode_base___ITypeCheck____stype(fra
.me
.REG
[0])!=NIT_NULL
);
1853 /* ./icode//icode_base.nit:408 */
1854 if (UNTAG_Bool(REGB0
)) {
1856 fprintf(stderr
, "Uninitialized attribute %s", "_stype");
1857 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 408);
1860 fra
.me
.REG
[0] = ATTR_icode_base___ITypeCheck____stype(fra
.me
.REG
[0]);
1861 stack_frame_head
= fra
.me
.prev
;
1862 return fra
.me
.REG
[0];
1864 void icode_base___ITypeCheck___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
1865 int itpos28
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_ITypeCheck
].i
;
1866 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
1868 if (init_table
[itpos28
]) return;
1869 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1870 fra
.me
.file
= LOCATE_icode_base
;
1872 fra
.me
.meth
= LOCATE_icode_base___ITypeCheck___init
;
1873 fra
.me
.has_broke
= 0;
1874 fra
.me
.REG_size
= 4;
1875 fra
.me
.REG
[0] = NIT_NULL
;
1876 fra
.me
.REG
[1] = NIT_NULL
;
1877 fra
.me
.REG
[2] = NIT_NULL
;
1878 fra
.me
.REG
[3] = NIT_NULL
;
1882 fra
.me
.REG
[3] = fra
.me
.REG
[0];
1883 /* ./icode//icode_base.nit:413 */
1884 CALL_icode_base___ICode1___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1], init_table
);
1885 /* ./icode//icode_base.nit:414 */
1886 ATTR_icode_base___ITypeCheck____stype(fra
.me
.REG
[3]) = fra
.me
.REG
[2];
1887 stack_frame_head
= fra
.me
.prev
;
1888 init_table
[itpos28
] = 1;
1891 val_t
icode_base___IIs___is_pure(val_t p0
){
1892 struct {struct stack_frame_t me
;} fra
;
1895 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1896 fra
.me
.file
= LOCATE_icode_base
;
1898 fra
.me
.meth
= LOCATE_icode_base___IIs___is_pure
;
1899 fra
.me
.has_broke
= 0;
1900 fra
.me
.REG_size
= 1;
1901 fra
.me
.REG
[0] = NIT_NULL
;
1903 REGB0
= TAG_Bool(true);
1904 /* ./icode//icode_base.nit:429 */
1907 stack_frame_head
= fra
.me
.prev
;
1910 void icode_base___IIs___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
1911 int itpos29
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_IIs
].i
;
1912 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
1914 if (init_table
[itpos29
]) return;
1915 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1916 fra
.me
.file
= LOCATE_icode_base
;
1918 fra
.me
.meth
= LOCATE_icode_base___IIs___init
;
1919 fra
.me
.has_broke
= 0;
1920 fra
.me
.REG_size
= 3;
1921 fra
.me
.REG
[0] = NIT_NULL
;
1922 fra
.me
.REG
[1] = NIT_NULL
;
1923 fra
.me
.REG
[2] = NIT_NULL
;
1927 /* ./icode//icode_base.nit:426 */
1928 CALL_icode_base___ICode2___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1], fra
.me
.REG
[2], init_table
);
1929 stack_frame_head
= fra
.me
.prev
;
1930 init_table
[itpos29
] = 1;
1933 val_t
icode_base___INot___is_pure(val_t p0
){
1934 struct {struct stack_frame_t me
;} fra
;
1937 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1938 fra
.me
.file
= LOCATE_icode_base
;
1940 fra
.me
.meth
= LOCATE_icode_base___INot___is_pure
;
1941 fra
.me
.has_broke
= 0;
1942 fra
.me
.REG_size
= 1;
1943 fra
.me
.REG
[0] = NIT_NULL
;
1945 REGB0
= TAG_Bool(true);
1946 /* ./icode//icode_base.nit:441 */
1949 stack_frame_head
= fra
.me
.prev
;
1952 void icode_base___INot___init(val_t p0
, val_t p1
, int* init_table
){
1953 int itpos30
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_INot
].i
;
1954 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
1956 if (init_table
[itpos30
]) return;
1957 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1958 fra
.me
.file
= LOCATE_icode_base
;
1960 fra
.me
.meth
= LOCATE_icode_base___INot___init
;
1961 fra
.me
.has_broke
= 0;
1962 fra
.me
.REG_size
= 2;
1963 fra
.me
.REG
[0] = NIT_NULL
;
1964 fra
.me
.REG
[1] = NIT_NULL
;
1967 /* ./icode//icode_base.nit:438 */
1968 CALL_icode_base___ICode1___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1], init_table
);
1969 stack_frame_head
= fra
.me
.prev
;
1970 init_table
[itpos30
] = 1;
1973 val_t
icode_base___IOnce___body(val_t p0
){
1974 struct {struct stack_frame_t me
;} fra
;
1977 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1978 fra
.me
.file
= LOCATE_icode_base
;
1980 fra
.me
.meth
= LOCATE_icode_base___IOnce___body
;
1981 fra
.me
.has_broke
= 0;
1982 fra
.me
.REG_size
= 1;
1983 fra
.me
.REG
[0] = NIT_NULL
;
1985 REGB0
= TAG_Bool(ATTR_icode_base___IOnce____body(fra
.me
.REG
[0])!=NIT_NULL
);
1986 /* ./icode//icode_base.nit:448 */
1987 if (UNTAG_Bool(REGB0
)) {
1989 fprintf(stderr
, "Uninitialized attribute %s", "_body");
1990 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 448);
1993 fra
.me
.REG
[0] = ATTR_icode_base___IOnce____body(fra
.me
.REG
[0]);
1994 stack_frame_head
= fra
.me
.prev
;
1995 return fra
.me
.REG
[0];
1997 void icode_base___IOnce___init(val_t p0
, int* init_table
){
1998 int itpos31
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_IOnce
].i
;
1999 struct {struct stack_frame_t me
;} fra
;
2001 if (init_table
[itpos31
]) return;
2002 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2003 fra
.me
.file
= LOCATE_icode_base
;
2005 fra
.me
.meth
= LOCATE_icode_base___IOnce___init
;
2006 fra
.me
.has_broke
= 0;
2007 fra
.me
.REG_size
= 1;
2008 fra
.me
.REG
[0] = NIT_NULL
;
2010 /* ./icode//icode_base.nit:449 */
2011 stack_frame_head
= fra
.me
.prev
;
2012 init_table
[itpos31
] = 1;
2015 val_t
icode_base___IHasClos___is_pure(val_t p0
){
2016 struct {struct stack_frame_t me
;} fra
;
2019 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2020 fra
.me
.file
= LOCATE_icode_base
;
2022 fra
.me
.meth
= LOCATE_icode_base___IHasClos___is_pure
;
2023 fra
.me
.has_broke
= 0;
2024 fra
.me
.REG_size
= 1;
2025 fra
.me
.REG
[0] = NIT_NULL
;
2027 REGB0
= TAG_Bool(true);
2028 /* ./icode//icode_base.nit:463 */
2031 stack_frame_head
= fra
.me
.prev
;
2034 val_t
icode_base___IHasClos___closure_decl(val_t p0
){
2035 struct {struct stack_frame_t me
;} fra
;
2038 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2039 fra
.me
.file
= LOCATE_icode_base
;
2041 fra
.me
.meth
= LOCATE_icode_base___IHasClos___closure_decl
;
2042 fra
.me
.has_broke
= 0;
2043 fra
.me
.REG_size
= 1;
2044 fra
.me
.REG
[0] = NIT_NULL
;
2046 REGB0
= TAG_Bool(ATTR_icode_base___IHasClos____closure_decl(fra
.me
.REG
[0])!=NIT_NULL
);
2047 /* ./icode//icode_base.nit:455 */
2048 if (UNTAG_Bool(REGB0
)) {
2050 fprintf(stderr
, "Uninitialized attribute %s", "_closure_decl");
2051 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 455);
2054 fra
.me
.REG
[0] = ATTR_icode_base___IHasClos____closure_decl(fra
.me
.REG
[0]);
2055 stack_frame_head
= fra
.me
.prev
;
2056 return fra
.me
.REG
[0];
2058 void icode_base___IHasClos___init(val_t p0
, val_t p1
, int* init_table
){
2059 int itpos32
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_IHasClos
].i
;
2060 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
2062 if (init_table
[itpos32
]) return;
2063 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2064 fra
.me
.file
= LOCATE_icode_base
;
2066 fra
.me
.meth
= LOCATE_icode_base___IHasClos___init
;
2067 fra
.me
.has_broke
= 0;
2068 fra
.me
.REG_size
= 2;
2069 fra
.me
.REG
[0] = NIT_NULL
;
2070 fra
.me
.REG
[1] = NIT_NULL
;
2073 /* ./icode//icode_base.nit:460 */
2074 ATTR_icode_base___IHasClos____closure_decl(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
2075 stack_frame_head
= fra
.me
.prev
;
2076 init_table
[itpos32
] = 1;
2079 val_t
icode_base___MMAttribute___iroutine(val_t p0
){
2080 struct {struct stack_frame_t me
;} fra
;
2082 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2083 fra
.me
.file
= LOCATE_icode_base
;
2085 fra
.me
.meth
= LOCATE_icode_base___MMAttribute___iroutine
;
2086 fra
.me
.has_broke
= 0;
2087 fra
.me
.REG_size
= 0;
2088 /* ./icode//icode_base.nit:469 */
2089 fprintf(stderr
, "Deferred method called");
2090 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 469);
2092 stack_frame_head
= fra
.me
.prev
;
2095 val_t
icode_base___MMMethod___iroutine(val_t p0
){
2096 struct {struct stack_frame_t me
;} fra
;
2098 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2099 fra
.me
.file
= LOCATE_icode_base
;
2101 fra
.me
.meth
= LOCATE_icode_base___MMMethod___iroutine
;
2102 fra
.me
.has_broke
= 0;
2103 fra
.me
.REG_size
= 0;
2104 /* ./icode//icode_base.nit:475 */
2105 fprintf(stderr
, "Deferred method called");
2106 fprintf(stderr
, " (%s:%d)\n", LOCATE_icode_base
, 475);
2108 stack_frame_head
= fra
.me
.prev
;