1 /* This C file is generated by NIT to compile module icode___icode_base. */
2 #include "icode___icode_base._sep.h"
3 static const char LOCATE_icode___icode_base___IRegister___stype
[] = "icode_base::IRegister::stype";
4 val_t
icode___icode_base___IRegister___stype(val_t p0
){
5 struct {struct stack_frame_t me
;} fra
;
8 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
9 fra
.me
.file
= LOCATE_icode___icode_base
;
11 fra
.me
.meth
= LOCATE_icode___icode_base___IRegister___stype
;
14 fra
.me
.nitni_local_ref_head
= NULL
;
15 fra
.me
.REG
[0] = NIT_NULL
;
17 /* icode/icode_base.nit:26 */
18 REGB0
= TAG_Bool(ATTR_icode___icode_base___IRegister____stype(fra
.me
.REG
[0])!=NIT_NULL
);
19 if (UNTAG_Bool(REGB0
)) {
21 nit_abort("Uninitialized attribute %s", "_stype", LOCATE_icode___icode_base
, 26);
23 fra
.me
.REG
[0] = ATTR_icode___icode_base___IRegister____stype(fra
.me
.REG
[0]);
24 stack_frame_head
= fra
.me
.prev
;
27 static const char LOCATE_icode___icode_base___IRegister___init
[] = "icode_base::IRegister::init";
28 void icode___icode_base___IRegister___init(val_t p0
, val_t p1
, int* init_table
){
29 int itpos0
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___IRegister
].i
;
30 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
32 if (init_table
[itpos0
]) return;
33 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
34 fra
.me
.file
= LOCATE_icode___icode_base
;
36 fra
.me
.meth
= LOCATE_icode___icode_base___IRegister___init
;
39 fra
.me
.nitni_local_ref_head
= NULL
;
40 fra
.me
.REG
[0] = NIT_NULL
;
41 fra
.me
.REG
[1] = NIT_NULL
;
44 /* icode/icode_base.nit:30 */
45 ATTR_icode___icode_base___IRegister____stype(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
46 stack_frame_head
= fra
.me
.prev
;
47 init_table
[itpos0
] = 1;
50 static const char LOCATE_icode___icode_base___IEscapeMark___init
[] = "icode_base::IEscapeMark::init";
51 void icode___icode_base___IEscapeMark___init(val_t p0
, int* init_table
){
52 int itpos1
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___IEscapeMark
].i
;
53 struct {struct stack_frame_t me
;} fra
;
55 if (init_table
[itpos1
]) return;
56 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
57 fra
.me
.file
= LOCATE_icode___icode_base
;
59 fra
.me
.meth
= LOCATE_icode___icode_base___IEscapeMark___init
;
62 fra
.me
.nitni_local_ref_head
= NULL
;
63 stack_frame_head
= fra
.me
.prev
;
64 init_table
[itpos1
] = 1;
67 static const char LOCATE_icode___icode_base___IClosureDecl___closure
[] = "icode_base::IClosureDecl::closure";
68 val_t
icode___icode_base___IClosureDecl___closure(val_t p0
){
69 struct {struct stack_frame_t me
;} fra
;
72 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
73 fra
.me
.file
= LOCATE_icode___icode_base
;
75 fra
.me
.meth
= LOCATE_icode___icode_base___IClosureDecl___closure
;
78 fra
.me
.nitni_local_ref_head
= NULL
;
79 fra
.me
.REG
[0] = NIT_NULL
;
81 /* icode/icode_base.nit:40 */
82 REGB0
= TAG_Bool(ATTR_icode___icode_base___IClosureDecl____closure(fra
.me
.REG
[0])!=NIT_NULL
);
83 if (UNTAG_Bool(REGB0
)) {
85 nit_abort("Uninitialized attribute %s", "_closure", LOCATE_icode___icode_base
, 40);
87 fra
.me
.REG
[0] = ATTR_icode___icode_base___IClosureDecl____closure(fra
.me
.REG
[0]);
88 stack_frame_head
= fra
.me
.prev
;
91 static const char LOCATE_icode___icode_base___IClosureDecl___default
[] = "icode_base::IClosureDecl::default";
92 val_t
icode___icode_base___IClosureDecl___default(val_t p0
){
93 struct {struct stack_frame_t me
;} fra
;
95 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
96 fra
.me
.file
= LOCATE_icode___icode_base
;
98 fra
.me
.meth
= LOCATE_icode___icode_base___IClosureDecl___default
;
101 fra
.me
.nitni_local_ref_head
= NULL
;
102 fra
.me
.REG
[0] = NIT_NULL
;
104 /* icode/icode_base.nit:43 */
105 fra
.me
.REG
[0] = ATTR_icode___icode_base___IClosureDecl____default(fra
.me
.REG
[0]);
106 stack_frame_head
= fra
.me
.prev
;
107 return fra
.me
.REG
[0];
109 static const char LOCATE_icode___icode_base___IClosureDecl___default__eq
[] = "icode_base::IClosureDecl::default=";
110 void icode___icode_base___IClosureDecl___default__eq(val_t p0
, val_t p1
){
111 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
113 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
114 fra
.me
.file
= LOCATE_icode___icode_base
;
116 fra
.me
.meth
= LOCATE_icode___icode_base___IClosureDecl___default__eq
;
117 fra
.me
.has_broke
= 0;
119 fra
.me
.nitni_local_ref_head
= NULL
;
120 fra
.me
.REG
[0] = NIT_NULL
;
121 fra
.me
.REG
[1] = NIT_NULL
;
124 /* icode/icode_base.nit:43 */
125 ATTR_icode___icode_base___IClosureDecl____default(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
126 stack_frame_head
= fra
.me
.prev
;
129 static const char LOCATE_icode___icode_base___IClosureDecl___init
[] = "icode_base::IClosureDecl::init";
130 void icode___icode_base___IClosureDecl___init(val_t p0
, val_t p1
, int* init_table
){
131 int itpos2
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___IClosureDecl
].i
;
132 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
134 if (init_table
[itpos2
]) return;
135 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
136 fra
.me
.file
= LOCATE_icode___icode_base
;
138 fra
.me
.meth
= LOCATE_icode___icode_base___IClosureDecl___init
;
139 fra
.me
.has_broke
= 0;
141 fra
.me
.nitni_local_ref_head
= NULL
;
142 fra
.me
.REG
[0] = NIT_NULL
;
143 fra
.me
.REG
[1] = NIT_NULL
;
146 /* icode/icode_base.nit:46 */
147 ATTR_icode___icode_base___IClosureDecl____closure(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
148 stack_frame_head
= fra
.me
.prev
;
149 init_table
[itpos2
] = 1;
152 static const char LOCATE_icode___icode_base___IRoutine___params
[] = "icode_base::IRoutine::params";
153 val_t
icode___icode_base___IRoutine___params(val_t p0
){
154 struct {struct stack_frame_t me
;} fra
;
157 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
158 fra
.me
.file
= LOCATE_icode___icode_base
;
160 fra
.me
.meth
= LOCATE_icode___icode_base___IRoutine___params
;
161 fra
.me
.has_broke
= 0;
163 fra
.me
.nitni_local_ref_head
= NULL
;
164 fra
.me
.REG
[0] = NIT_NULL
;
166 /* icode/icode_base.nit:51 */
167 REGB0
= TAG_Bool(ATTR_icode___icode_base___IRoutine____params(fra
.me
.REG
[0])!=NIT_NULL
);
168 if (UNTAG_Bool(REGB0
)) {
170 nit_abort("Uninitialized attribute %s", "_params", LOCATE_icode___icode_base
, 51);
172 fra
.me
.REG
[0] = ATTR_icode___icode_base___IRoutine____params(fra
.me
.REG
[0]);
173 stack_frame_head
= fra
.me
.prev
;
174 return fra
.me
.REG
[0];
176 static const char LOCATE_icode___icode_base___IRoutine___closure_decls
[] = "icode_base::IRoutine::closure_decls";
177 val_t
icode___icode_base___IRoutine___closure_decls(val_t p0
){
178 struct {struct stack_frame_t me
;} fra
;
180 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
181 fra
.me
.file
= LOCATE_icode___icode_base
;
183 fra
.me
.meth
= LOCATE_icode___icode_base___IRoutine___closure_decls
;
184 fra
.me
.has_broke
= 0;
186 fra
.me
.nitni_local_ref_head
= NULL
;
187 fra
.me
.REG
[0] = NIT_NULL
;
189 /* icode/icode_base.nit:54 */
190 fra
.me
.REG
[0] = ATTR_icode___icode_base___IRoutine____closure_decls(fra
.me
.REG
[0]);
191 stack_frame_head
= fra
.me
.prev
;
192 return fra
.me
.REG
[0];
194 static const char LOCATE_icode___icode_base___IRoutine___closure_decls__eq
[] = "icode_base::IRoutine::closure_decls=";
195 void icode___icode_base___IRoutine___closure_decls__eq(val_t p0
, val_t p1
){
196 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
198 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
199 fra
.me
.file
= LOCATE_icode___icode_base
;
201 fra
.me
.meth
= LOCATE_icode___icode_base___IRoutine___closure_decls__eq
;
202 fra
.me
.has_broke
= 0;
204 fra
.me
.nitni_local_ref_head
= NULL
;
205 fra
.me
.REG
[0] = NIT_NULL
;
206 fra
.me
.REG
[1] = NIT_NULL
;
209 /* icode/icode_base.nit:54 */
210 ATTR_icode___icode_base___IRoutine____closure_decls(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
211 stack_frame_head
= fra
.me
.prev
;
214 static const char LOCATE_icode___icode_base___IRoutine___registers
[] = "icode_base::IRoutine::registers";
215 val_t
icode___icode_base___IRoutine___registers(val_t p0
){
216 struct {struct stack_frame_t me
;} fra
;
219 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
220 fra
.me
.file
= LOCATE_icode___icode_base
;
222 fra
.me
.meth
= LOCATE_icode___icode_base___IRoutine___registers
;
223 fra
.me
.has_broke
= 0;
225 fra
.me
.nitni_local_ref_head
= NULL
;
226 fra
.me
.REG
[0] = NIT_NULL
;
228 /* icode/icode_base.nit:57 */
229 REGB0
= TAG_Bool(ATTR_icode___icode_base___IRoutine____registers(fra
.me
.REG
[0])!=NIT_NULL
);
230 if (UNTAG_Bool(REGB0
)) {
232 nit_abort("Uninitialized attribute %s", "_registers", LOCATE_icode___icode_base
, 57);
234 fra
.me
.REG
[0] = ATTR_icode___icode_base___IRoutine____registers(fra
.me
.REG
[0]);
235 stack_frame_head
= fra
.me
.prev
;
236 return fra
.me
.REG
[0];
238 static const char LOCATE_icode___icode_base___IRoutine___result
[] = "icode_base::IRoutine::result";
239 val_t
icode___icode_base___IRoutine___result(val_t p0
){
240 struct {struct stack_frame_t me
;} fra
;
242 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
243 fra
.me
.file
= LOCATE_icode___icode_base
;
245 fra
.me
.meth
= LOCATE_icode___icode_base___IRoutine___result
;
246 fra
.me
.has_broke
= 0;
248 fra
.me
.nitni_local_ref_head
= NULL
;
249 fra
.me
.REG
[0] = NIT_NULL
;
251 /* icode/icode_base.nit:60 */
252 fra
.me
.REG
[0] = ATTR_icode___icode_base___IRoutine____result(fra
.me
.REG
[0]);
253 stack_frame_head
= fra
.me
.prev
;
254 return fra
.me
.REG
[0];
256 static const char LOCATE_icode___icode_base___IRoutine___escape_marks
[] = "icode_base::IRoutine::escape_marks";
257 val_t
icode___icode_base___IRoutine___escape_marks(val_t p0
){
258 struct {struct stack_frame_t me
;} fra
;
261 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
262 fra
.me
.file
= LOCATE_icode___icode_base
;
264 fra
.me
.meth
= LOCATE_icode___icode_base___IRoutine___escape_marks
;
265 fra
.me
.has_broke
= 0;
267 fra
.me
.nitni_local_ref_head
= NULL
;
268 fra
.me
.REG
[0] = NIT_NULL
;
270 /* icode/icode_base.nit:63 */
271 REGB0
= TAG_Bool(ATTR_icode___icode_base___IRoutine____escape_marks(fra
.me
.REG
[0])!=NIT_NULL
);
272 if (UNTAG_Bool(REGB0
)) {
274 nit_abort("Uninitialized attribute %s", "_escape_marks", LOCATE_icode___icode_base
, 63);
276 fra
.me
.REG
[0] = ATTR_icode___icode_base___IRoutine____escape_marks(fra
.me
.REG
[0]);
277 stack_frame_head
= fra
.me
.prev
;
278 return fra
.me
.REG
[0];
280 static const char LOCATE_icode___icode_base___IRoutine___body
[] = "icode_base::IRoutine::body";
281 val_t
icode___icode_base___IRoutine___body(val_t p0
){
282 struct {struct stack_frame_t me
;} fra
;
285 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
286 fra
.me
.file
= LOCATE_icode___icode_base
;
288 fra
.me
.meth
= LOCATE_icode___icode_base___IRoutine___body
;
289 fra
.me
.has_broke
= 0;
291 fra
.me
.nitni_local_ref_head
= NULL
;
292 fra
.me
.REG
[0] = NIT_NULL
;
294 /* icode/icode_base.nit:66 */
295 REGB0
= TAG_Bool(ATTR_icode___icode_base___IRoutine____body(fra
.me
.REG
[0])!=NIT_NULL
);
296 if (UNTAG_Bool(REGB0
)) {
298 nit_abort("Uninitialized attribute %s", "_body", LOCATE_icode___icode_base
, 66);
300 fra
.me
.REG
[0] = ATTR_icode___icode_base___IRoutine____body(fra
.me
.REG
[0]);
301 stack_frame_head
= fra
.me
.prev
;
302 return fra
.me
.REG
[0];
304 static const char LOCATE_icode___icode_base___IRoutine___location
[] = "icode_base::IRoutine::location";
305 val_t
icode___icode_base___IRoutine___location(val_t p0
){
306 struct {struct stack_frame_t me
;} fra
;
308 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
309 fra
.me
.file
= LOCATE_icode___icode_base
;
311 fra
.me
.meth
= LOCATE_icode___icode_base___IRoutine___location
;
312 fra
.me
.has_broke
= 0;
314 fra
.me
.nitni_local_ref_head
= NULL
;
315 fra
.me
.REG
[0] = NIT_NULL
;
317 /* icode/icode_base.nit:69 */
318 fra
.me
.REG
[0] = ATTR_icode___icode_base___IRoutine____location(fra
.me
.REG
[0]);
319 stack_frame_head
= fra
.me
.prev
;
320 return fra
.me
.REG
[0];
322 static const char LOCATE_icode___icode_base___IRoutine___location__eq
[] = "icode_base::IRoutine::location=";
323 void icode___icode_base___IRoutine___location__eq(val_t p0
, val_t p1
){
324 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
326 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
327 fra
.me
.file
= LOCATE_icode___icode_base
;
329 fra
.me
.meth
= LOCATE_icode___icode_base___IRoutine___location__eq
;
330 fra
.me
.has_broke
= 0;
332 fra
.me
.nitni_local_ref_head
= NULL
;
333 fra
.me
.REG
[0] = NIT_NULL
;
334 fra
.me
.REG
[1] = NIT_NULL
;
337 /* icode/icode_base.nit:69 */
338 ATTR_icode___icode_base___IRoutine____location(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
339 stack_frame_head
= fra
.me
.prev
;
342 static const char LOCATE_icode___icode_base___IRoutine___init
[] = "icode_base::IRoutine::init";
343 void icode___icode_base___IRoutine___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
344 int itpos3
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___IRoutine
].i
;
345 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
347 if (init_table
[itpos3
]) return;
348 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
349 fra
.me
.file
= LOCATE_icode___icode_base
;
351 fra
.me
.meth
= LOCATE_icode___icode_base___IRoutine___init
;
352 fra
.me
.has_broke
= 0;
354 fra
.me
.nitni_local_ref_head
= NULL
;
355 fra
.me
.REG
[0] = NIT_NULL
;
356 fra
.me
.REG
[1] = NIT_NULL
;
357 fra
.me
.REG
[2] = NIT_NULL
;
361 /* icode/icode_base.nit:74 */
362 fra
.me
.REG
[1] = CALL_standard___collection___array___Collection___to_a(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
363 ATTR_icode___icode_base___IRoutine____params(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
364 /* icode/icode_base.nit:75 */
365 ATTR_icode___icode_base___IRoutine____result(fra
.me
.REG
[0]) = fra
.me
.REG
[2];
366 stack_frame_head
= fra
.me
.prev
;
367 init_table
[itpos3
] = 1;
370 static const char LOCATE_icode___icode_base___IClosureDef___init
[] = "icode_base::IClosureDef::init";
371 void icode___icode_base___IClosureDef___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
372 int itpos4
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___IClosureDef
].i
;
373 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
375 if (init_table
[itpos4
]) return;
376 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
377 fra
.me
.file
= LOCATE_icode___icode_base
;
379 fra
.me
.meth
= LOCATE_icode___icode_base___IClosureDef___init
;
380 fra
.me
.has_broke
= 0;
382 fra
.me
.nitni_local_ref_head
= NULL
;
383 fra
.me
.REG
[0] = NIT_NULL
;
384 fra
.me
.REG
[1] = NIT_NULL
;
385 fra
.me
.REG
[2] = NIT_NULL
;
389 /* icode/icode_base.nit:84 */
390 CALL_icode___icode_base___IRoutine___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1], fra
.me
.REG
[2], init_table
);
391 stack_frame_head
= fra
.me
.prev
;
392 init_table
[itpos4
] = 1;
395 static const char LOCATE_icode___icode_base___ICode___arity
[] = "icode_base::ICode::arity";
396 val_t
icode___icode_base___ICode___arity(val_t p0
){
397 struct {struct stack_frame_t me
;} fra
;
399 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
400 fra
.me
.file
= LOCATE_icode___icode_base
;
402 fra
.me
.meth
= LOCATE_icode___icode_base___ICode___arity
;
403 fra
.me
.has_broke
= 0;
405 fra
.me
.nitni_local_ref_head
= NULL
;
406 /* icode/icode_base.nit:92 */
407 nit_abort("Deferred method called", NULL
, LOCATE_icode___icode_base
, 92);
408 stack_frame_head
= fra
.me
.prev
;
411 static const char LOCATE_icode___icode_base___ICode___result
[] = "icode_base::ICode::result";
412 val_t
icode___icode_base___ICode___result(val_t p0
){
413 struct {struct stack_frame_t me
;} fra
;
415 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
416 fra
.me
.file
= LOCATE_icode___icode_base
;
418 fra
.me
.meth
= LOCATE_icode___icode_base___ICode___result
;
419 fra
.me
.has_broke
= 0;
421 fra
.me
.nitni_local_ref_head
= NULL
;
422 fra
.me
.REG
[0] = NIT_NULL
;
424 /* icode/icode_base.nit:95 */
425 fra
.me
.REG
[0] = ATTR_icode___icode_base___ICode____result(fra
.me
.REG
[0]);
426 stack_frame_head
= fra
.me
.prev
;
427 return fra
.me
.REG
[0];
429 static const char LOCATE_icode___icode_base___ICode___result__eq
[] = "icode_base::ICode::result=";
430 void icode___icode_base___ICode___result__eq(val_t p0
, val_t p1
){
431 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
433 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
434 fra
.me
.file
= LOCATE_icode___icode_base
;
436 fra
.me
.meth
= LOCATE_icode___icode_base___ICode___result__eq
;
437 fra
.me
.has_broke
= 0;
439 fra
.me
.nitni_local_ref_head
= NULL
;
440 fra
.me
.REG
[0] = NIT_NULL
;
441 fra
.me
.REG
[1] = NIT_NULL
;
444 /* icode/icode_base.nit:95 */
445 ATTR_icode___icode_base___ICode____result(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
446 stack_frame_head
= fra
.me
.prev
;
449 static const char LOCATE_icode___icode_base___ICode___location
[] = "icode_base::ICode::location";
450 val_t
icode___icode_base___ICode___location(val_t p0
){
451 struct {struct stack_frame_t me
;} fra
;
453 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
454 fra
.me
.file
= LOCATE_icode___icode_base
;
456 fra
.me
.meth
= LOCATE_icode___icode_base___ICode___location
;
457 fra
.me
.has_broke
= 0;
459 fra
.me
.nitni_local_ref_head
= NULL
;
460 fra
.me
.REG
[0] = NIT_NULL
;
462 /* icode/icode_base.nit:98 */
463 fra
.me
.REG
[0] = ATTR_icode___icode_base___ICode____location(fra
.me
.REG
[0]);
464 stack_frame_head
= fra
.me
.prev
;
465 return fra
.me
.REG
[0];
467 static const char LOCATE_icode___icode_base___ICode___location__eq
[] = "icode_base::ICode::location=";
468 void icode___icode_base___ICode___location__eq(val_t p0
, val_t p1
){
469 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
471 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
472 fra
.me
.file
= LOCATE_icode___icode_base
;
474 fra
.me
.meth
= LOCATE_icode___icode_base___ICode___location__eq
;
475 fra
.me
.has_broke
= 0;
477 fra
.me
.nitni_local_ref_head
= NULL
;
478 fra
.me
.REG
[0] = NIT_NULL
;
479 fra
.me
.REG
[1] = NIT_NULL
;
482 /* icode/icode_base.nit:98 */
483 ATTR_icode___icode_base___ICode____location(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
484 stack_frame_head
= fra
.me
.prev
;
487 static const char LOCATE_icode___icode_base___ICode___is_pure
[] = "icode_base::ICode::is_pure";
488 val_t
icode___icode_base___ICode___is_pure(val_t p0
){
489 struct {struct stack_frame_t me
;} fra
;
492 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
493 fra
.me
.file
= LOCATE_icode___icode_base
;
495 fra
.me
.meth
= LOCATE_icode___icode_base___ICode___is_pure
;
496 fra
.me
.has_broke
= 0;
498 fra
.me
.nitni_local_ref_head
= NULL
;
499 fra
.me
.REG
[0] = NIT_NULL
;
501 /* icode/icode_base.nit:102 */
505 stack_frame_head
= fra
.me
.prev
;
508 static const char LOCATE_icode___icode_base___ICode___init
[] = "icode_base::ICode::init";
509 void icode___icode_base___ICode___init(val_t p0
, int* init_table
){
510 int itpos5
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___ICode
].i
;
511 struct {struct stack_frame_t me
;} fra
;
513 if (init_table
[itpos5
]) return;
514 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
515 fra
.me
.file
= LOCATE_icode___icode_base
;
517 fra
.me
.meth
= LOCATE_icode___icode_base___ICode___init
;
518 fra
.me
.has_broke
= 0;
520 fra
.me
.nitni_local_ref_head
= NULL
;
521 stack_frame_head
= fra
.me
.prev
;
522 init_table
[itpos5
] = 1;
525 static const char LOCATE_icode___icode_base___ICode0___arity
[] = "icode_base::ICode0::(icode_base::ICode::arity)";
526 val_t
icode___icode_base___ICode0___arity(val_t p0
){
527 struct {struct stack_frame_t me
;} fra
;
530 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
531 fra
.me
.file
= LOCATE_icode___icode_base
;
533 fra
.me
.meth
= LOCATE_icode___icode_base___ICode0___arity
;
534 fra
.me
.has_broke
= 0;
536 fra
.me
.nitni_local_ref_head
= NULL
;
537 fra
.me
.REG
[0] = NIT_NULL
;
539 /* icode/icode_base.nit:108 */
543 stack_frame_head
= fra
.me
.prev
;
546 static const char LOCATE_icode___icode_base___ICode1___arity
[] = "icode_base::ICode1::(icode_base::ICode::arity)";
547 val_t
icode___icode_base___ICode1___arity(val_t p0
){
548 struct {struct stack_frame_t me
;} fra
;
551 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
552 fra
.me
.file
= LOCATE_icode___icode_base
;
554 fra
.me
.meth
= LOCATE_icode___icode_base___ICode1___arity
;
555 fra
.me
.has_broke
= 0;
557 fra
.me
.nitni_local_ref_head
= NULL
;
558 fra
.me
.REG
[0] = NIT_NULL
;
560 /* icode/icode_base.nit:114 */
564 stack_frame_head
= fra
.me
.prev
;
567 static const char LOCATE_icode___icode_base___ICode1___expr
[] = "icode_base::ICode1::expr";
568 val_t
icode___icode_base___ICode1___expr(val_t p0
){
569 struct {struct stack_frame_t me
;} fra
;
572 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
573 fra
.me
.file
= LOCATE_icode___icode_base
;
575 fra
.me
.meth
= LOCATE_icode___icode_base___ICode1___expr
;
576 fra
.me
.has_broke
= 0;
578 fra
.me
.nitni_local_ref_head
= NULL
;
579 fra
.me
.REG
[0] = NIT_NULL
;
581 /* icode/icode_base.nit:116 */
582 REGB0
= TAG_Bool(ATTR_icode___icode_base___ICode1____expr(fra
.me
.REG
[0])!=NIT_NULL
);
583 if (UNTAG_Bool(REGB0
)) {
585 nit_abort("Uninitialized attribute %s", "_expr", LOCATE_icode___icode_base
, 116);
587 fra
.me
.REG
[0] = ATTR_icode___icode_base___ICode1____expr(fra
.me
.REG
[0]);
588 stack_frame_head
= fra
.me
.prev
;
589 return fra
.me
.REG
[0];
591 static const char LOCATE_icode___icode_base___ICode1___init
[] = "icode_base::ICode1::init";
592 void icode___icode_base___ICode1___init(val_t p0
, val_t p1
, int* init_table
){
593 int itpos6
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___ICode1
].i
;
594 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
596 if (init_table
[itpos6
]) return;
597 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
598 fra
.me
.file
= LOCATE_icode___icode_base
;
600 fra
.me
.meth
= LOCATE_icode___icode_base___ICode1___init
;
601 fra
.me
.has_broke
= 0;
603 fra
.me
.nitni_local_ref_head
= NULL
;
604 fra
.me
.REG
[0] = NIT_NULL
;
605 fra
.me
.REG
[1] = NIT_NULL
;
606 fra
.me
.REG
[2] = NIT_NULL
;
609 /* icode/icode_base.nit:119 */
610 fra
.me
.REG
[2] = fra
.me
.REG
[0];
611 CALL_icode___icode_base___ICode___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], init_table
);
612 ATTR_icode___icode_base___ICode1____expr(fra
.me
.REG
[2]) = fra
.me
.REG
[1];
613 stack_frame_head
= fra
.me
.prev
;
614 init_table
[itpos6
] = 1;
617 static const char LOCATE_icode___icode_base___ICode2___arity
[] = "icode_base::ICode2::(icode_base::ICode::arity)";
618 val_t
icode___icode_base___ICode2___arity(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___icode_base
;
625 fra
.me
.meth
= LOCATE_icode___icode_base___ICode2___arity
;
626 fra
.me
.has_broke
= 0;
628 fra
.me
.nitni_local_ref_head
= NULL
;
629 fra
.me
.REG
[0] = NIT_NULL
;
631 /* icode/icode_base.nit:125 */
635 stack_frame_head
= fra
.me
.prev
;
638 static const char LOCATE_icode___icode_base___ICode2___expr1
[] = "icode_base::ICode2::expr1";
639 val_t
icode___icode_base___ICode2___expr1(val_t p0
){
640 struct {struct stack_frame_t me
;} fra
;
643 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
644 fra
.me
.file
= LOCATE_icode___icode_base
;
646 fra
.me
.meth
= LOCATE_icode___icode_base___ICode2___expr1
;
647 fra
.me
.has_broke
= 0;
649 fra
.me
.nitni_local_ref_head
= NULL
;
650 fra
.me
.REG
[0] = NIT_NULL
;
652 /* icode/icode_base.nit:127 */
653 REGB0
= TAG_Bool(ATTR_icode___icode_base___ICode2____expr1(fra
.me
.REG
[0])!=NIT_NULL
);
654 if (UNTAG_Bool(REGB0
)) {
656 nit_abort("Uninitialized attribute %s", "_expr1", LOCATE_icode___icode_base
, 127);
658 fra
.me
.REG
[0] = ATTR_icode___icode_base___ICode2____expr1(fra
.me
.REG
[0]);
659 stack_frame_head
= fra
.me
.prev
;
660 return fra
.me
.REG
[0];
662 static const char LOCATE_icode___icode_base___ICode2___expr2
[] = "icode_base::ICode2::expr2";
663 val_t
icode___icode_base___ICode2___expr2(val_t p0
){
664 struct {struct stack_frame_t me
;} fra
;
667 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
668 fra
.me
.file
= LOCATE_icode___icode_base
;
670 fra
.me
.meth
= LOCATE_icode___icode_base___ICode2___expr2
;
671 fra
.me
.has_broke
= 0;
673 fra
.me
.nitni_local_ref_head
= NULL
;
674 fra
.me
.REG
[0] = NIT_NULL
;
676 /* icode/icode_base.nit:130 */
677 REGB0
= TAG_Bool(ATTR_icode___icode_base___ICode2____expr2(fra
.me
.REG
[0])!=NIT_NULL
);
678 if (UNTAG_Bool(REGB0
)) {
680 nit_abort("Uninitialized attribute %s", "_expr2", LOCATE_icode___icode_base
, 130);
682 fra
.me
.REG
[0] = ATTR_icode___icode_base___ICode2____expr2(fra
.me
.REG
[0]);
683 stack_frame_head
= fra
.me
.prev
;
684 return fra
.me
.REG
[0];
686 static const char LOCATE_icode___icode_base___ICode2___init
[] = "icode_base::ICode2::init";
687 void icode___icode_base___ICode2___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
688 int itpos7
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___ICode2
].i
;
689 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
691 if (init_table
[itpos7
]) return;
692 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
693 fra
.me
.file
= LOCATE_icode___icode_base
;
695 fra
.me
.meth
= LOCATE_icode___icode_base___ICode2___init
;
696 fra
.me
.has_broke
= 0;
698 fra
.me
.nitni_local_ref_head
= NULL
;
699 fra
.me
.REG
[0] = NIT_NULL
;
700 fra
.me
.REG
[1] = NIT_NULL
;
701 fra
.me
.REG
[2] = NIT_NULL
;
702 fra
.me
.REG
[3] = NIT_NULL
;
706 /* icode/icode_base.nit:133 */
707 fra
.me
.REG
[3] = fra
.me
.REG
[0];
708 CALL_icode___icode_base___ICode___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], init_table
);
709 /* icode/icode_base.nit:135 */
710 ATTR_icode___icode_base___ICode2____expr1(fra
.me
.REG
[3]) = fra
.me
.REG
[1];
711 /* icode/icode_base.nit:136 */
712 ATTR_icode___icode_base___ICode2____expr2(fra
.me
.REG
[3]) = fra
.me
.REG
[2];
713 stack_frame_head
= fra
.me
.prev
;
714 init_table
[itpos7
] = 1;
717 static const char LOCATE_icode___icode_base___ICodeN___arity
[] = "icode_base::ICodeN::(icode_base::ICode::arity)";
718 val_t
icode___icode_base___ICodeN___arity(val_t p0
){
719 struct {struct stack_frame_t me
;} fra
;
722 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
723 fra
.me
.file
= LOCATE_icode___icode_base
;
725 fra
.me
.meth
= LOCATE_icode___icode_base___ICodeN___arity
;
726 fra
.me
.has_broke
= 0;
728 fra
.me
.nitni_local_ref_head
= NULL
;
729 fra
.me
.REG
[0] = NIT_NULL
;
731 /* icode/icode_base.nit:143 */
732 REGB0
= TAG_Bool(ATTR_icode___icode_base___ICodeN____exprs(fra
.me
.REG
[0])!=NIT_NULL
);
733 if (UNTAG_Bool(REGB0
)) {
735 nit_abort("Uninitialized attribute %s", "_exprs", LOCATE_icode___icode_base
, 143);
737 fra
.me
.REG
[0] = ATTR_icode___icode_base___ICodeN____exprs(fra
.me
.REG
[0]);
738 REGB0
= CALL_standard___collection___abstract_collection___Collection___length(fra
.me
.REG
[0])(fra
.me
.REG
[0]);
741 stack_frame_head
= fra
.me
.prev
;
744 static const char LOCATE_icode___icode_base___ICodeN___exprs
[] = "icode_base::ICodeN::exprs";
745 val_t
icode___icode_base___ICodeN___exprs(val_t p0
){
746 struct {struct stack_frame_t me
;} fra
;
749 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
750 fra
.me
.file
= LOCATE_icode___icode_base
;
752 fra
.me
.meth
= LOCATE_icode___icode_base___ICodeN___exprs
;
753 fra
.me
.has_broke
= 0;
755 fra
.me
.nitni_local_ref_head
= NULL
;
756 fra
.me
.REG
[0] = NIT_NULL
;
758 /* icode/icode_base.nit:145 */
759 REGB0
= TAG_Bool(ATTR_icode___icode_base___ICodeN____exprs(fra
.me
.REG
[0])!=NIT_NULL
);
760 if (UNTAG_Bool(REGB0
)) {
762 nit_abort("Uninitialized attribute %s", "_exprs", LOCATE_icode___icode_base
, 145);
764 fra
.me
.REG
[0] = ATTR_icode___icode_base___ICodeN____exprs(fra
.me
.REG
[0]);
765 stack_frame_head
= fra
.me
.prev
;
766 return fra
.me
.REG
[0];
768 static const char LOCATE_icode___icode_base___ICodeN___closure_defs
[] = "icode_base::ICodeN::closure_defs";
769 val_t
icode___icode_base___ICodeN___closure_defs(val_t p0
){
770 struct {struct stack_frame_t me
;} fra
;
772 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
773 fra
.me
.file
= LOCATE_icode___icode_base
;
775 fra
.me
.meth
= LOCATE_icode___icode_base___ICodeN___closure_defs
;
776 fra
.me
.has_broke
= 0;
778 fra
.me
.nitni_local_ref_head
= NULL
;
779 fra
.me
.REG
[0] = NIT_NULL
;
781 /* icode/icode_base.nit:148 */
782 fra
.me
.REG
[0] = ATTR_icode___icode_base___ICodeN____closure_defs(fra
.me
.REG
[0]);
783 stack_frame_head
= fra
.me
.prev
;
784 return fra
.me
.REG
[0];
786 static const char LOCATE_icode___icode_base___ICodeN___closure_defs__eq
[] = "icode_base::ICodeN::closure_defs=";
787 void icode___icode_base___ICodeN___closure_defs__eq(val_t p0
, val_t p1
){
788 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
790 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
791 fra
.me
.file
= LOCATE_icode___icode_base
;
793 fra
.me
.meth
= LOCATE_icode___icode_base___ICodeN___closure_defs__eq
;
794 fra
.me
.has_broke
= 0;
796 fra
.me
.nitni_local_ref_head
= NULL
;
797 fra
.me
.REG
[0] = NIT_NULL
;
798 fra
.me
.REG
[1] = NIT_NULL
;
801 /* icode/icode_base.nit:148 */
802 ATTR_icode___icode_base___ICodeN____closure_defs(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
803 stack_frame_head
= fra
.me
.prev
;
806 static const char LOCATE_icode___icode_base___ICodeN___init
[] = "icode_base::ICodeN::init";
807 void icode___icode_base___ICodeN___init(val_t p0
, val_t p1
, int* init_table
){
808 int itpos8
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___ICodeN
].i
;
809 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
813 if (init_table
[itpos8
]) return;
814 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
815 fra
.me
.file
= LOCATE_icode___icode_base
;
817 fra
.me
.meth
= LOCATE_icode___icode_base___ICodeN___init
;
818 fra
.me
.has_broke
= 0;
820 fra
.me
.nitni_local_ref_head
= NULL
;
821 fra
.me
.REG
[0] = NIT_NULL
;
822 fra
.me
.REG
[1] = NIT_NULL
;
823 fra
.me
.REG
[2] = NIT_NULL
;
826 /* icode/icode_base.nit:151 */
827 fra
.me
.REG
[2] = fra
.me
.REG
[0];
828 CALL_icode___icode_base___ICode___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], init_table
);
829 /* icode/icode_base.nit:153 */
830 REGB0
= TAG_Bool(fra
.me
.REG
[1]==NIT_NULL
);
831 if (UNTAG_Bool(REGB0
)) {
833 REGB1
= TAG_Bool(fra
.me
.REG
[1]==NIT_NULL
);
834 if (UNTAG_Bool(REGB1
)) {
838 REGB1
= CALL_standard___kernel___Object_____eqeq(fra
.me
.REG
[1])(fra
.me
.REG
[1], NIT_NULL
);
842 if (UNTAG_Bool(REGB0
)) {
843 /* icode/icode_base.nit:154 */
844 fra
.me
.REG
[0] = NEW_Array_standard___collection___array___Array___init();
845 ATTR_icode___icode_base___ICodeN____exprs(fra
.me
.REG
[2]) = fra
.me
.REG
[0];
847 /* icode/icode_base.nit:156 */
848 ATTR_icode___icode_base___ICodeN____exprs(fra
.me
.REG
[2]) = fra
.me
.REG
[1];
850 stack_frame_head
= fra
.me
.prev
;
851 init_table
[itpos8
] = 1;
854 static const char LOCATE_icode___icode_base___ISeq___icodes
[] = "icode_base::ISeq::icodes";
855 val_t
icode___icode_base___ISeq___icodes(val_t p0
){
856 struct {struct stack_frame_t me
;} fra
;
859 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
860 fra
.me
.file
= LOCATE_icode___icode_base
;
862 fra
.me
.meth
= LOCATE_icode___icode_base___ISeq___icodes
;
863 fra
.me
.has_broke
= 0;
865 fra
.me
.nitni_local_ref_head
= NULL
;
866 fra
.me
.REG
[0] = NIT_NULL
;
868 /* icode/icode_base.nit:166 */
869 REGB0
= TAG_Bool(ATTR_icode___icode_base___ISeq____icodes(fra
.me
.REG
[0])!=NIT_NULL
);
870 if (UNTAG_Bool(REGB0
)) {
872 nit_abort("Uninitialized attribute %s", "_icodes", LOCATE_icode___icode_base
, 166);
874 fra
.me
.REG
[0] = ATTR_icode___icode_base___ISeq____icodes(fra
.me
.REG
[0]);
875 stack_frame_head
= fra
.me
.prev
;
876 return fra
.me
.REG
[0];
878 static const char LOCATE_icode___icode_base___ISeq___iescape_mark
[] = "icode_base::ISeq::iescape_mark";
879 val_t
icode___icode_base___ISeq___iescape_mark(val_t p0
){
880 struct {struct stack_frame_t me
;} fra
;
882 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
883 fra
.me
.file
= LOCATE_icode___icode_base
;
885 fra
.me
.meth
= LOCATE_icode___icode_base___ISeq___iescape_mark
;
886 fra
.me
.has_broke
= 0;
888 fra
.me
.nitni_local_ref_head
= NULL
;
889 fra
.me
.REG
[0] = NIT_NULL
;
891 /* icode/icode_base.nit:169 */
892 fra
.me
.REG
[0] = ATTR_icode___icode_base___ISeq____iescape_mark(fra
.me
.REG
[0]);
893 stack_frame_head
= fra
.me
.prev
;
894 return fra
.me
.REG
[0];
896 static const char LOCATE_icode___icode_base___ISeq___iescape_mark__eq
[] = "icode_base::ISeq::iescape_mark=";
897 void icode___icode_base___ISeq___iescape_mark__eq(val_t p0
, val_t p1
){
898 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
900 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
901 fra
.me
.file
= LOCATE_icode___icode_base
;
903 fra
.me
.meth
= LOCATE_icode___icode_base___ISeq___iescape_mark__eq
;
904 fra
.me
.has_broke
= 0;
906 fra
.me
.nitni_local_ref_head
= NULL
;
907 fra
.me
.REG
[0] = NIT_NULL
;
908 fra
.me
.REG
[1] = NIT_NULL
;
911 /* icode/icode_base.nit:169 */
912 ATTR_icode___icode_base___ISeq____iescape_mark(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
913 stack_frame_head
= fra
.me
.prev
;
916 static const char LOCATE_icode___icode_base___ISeq___init
[] = "icode_base::ISeq::init";
917 void icode___icode_base___ISeq___init(val_t p0
, int* init_table
){
918 int itpos9
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___ISeq
].i
;
919 struct {struct stack_frame_t me
;} fra
;
921 if (init_table
[itpos9
]) return;
922 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
923 fra
.me
.file
= LOCATE_icode___icode_base
;
925 fra
.me
.meth
= LOCATE_icode___icode_base___ISeq___init
;
926 fra
.me
.has_broke
= 0;
928 fra
.me
.nitni_local_ref_head
= NULL
;
929 fra
.me
.REG
[0] = NIT_NULL
;
931 stack_frame_head
= fra
.me
.prev
;
932 init_table
[itpos9
] = 1;
935 static const char LOCATE_icode___icode_base___ILoop___init
[] = "icode_base::ILoop::init";
936 void icode___icode_base___ILoop___init(val_t p0
, int* init_table
){
937 int itpos10
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___ILoop
].i
;
938 struct {struct stack_frame_t me
;} fra
;
940 if (init_table
[itpos10
]) return;
941 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
942 fra
.me
.file
= LOCATE_icode___icode_base
;
944 fra
.me
.meth
= LOCATE_icode___icode_base___ILoop___init
;
945 fra
.me
.has_broke
= 0;
947 fra
.me
.nitni_local_ref_head
= NULL
;
948 fra
.me
.REG
[0] = NIT_NULL
;
950 /* icode/icode_base.nit:179 */
951 CALL_icode___icode_base___ISeq___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], init_table
);
952 stack_frame_head
= fra
.me
.prev
;
953 init_table
[itpos10
] = 1;
956 static const char LOCATE_icode___icode_base___IIf___then_seq
[] = "icode_base::IIf::then_seq";
957 val_t
icode___icode_base___IIf___then_seq(val_t p0
){
958 struct {struct stack_frame_t me
;} fra
;
961 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
962 fra
.me
.file
= LOCATE_icode___icode_base
;
964 fra
.me
.meth
= LOCATE_icode___icode_base___IIf___then_seq
;
965 fra
.me
.has_broke
= 0;
967 fra
.me
.nitni_local_ref_head
= NULL
;
968 fra
.me
.REG
[0] = NIT_NULL
;
970 /* icode/icode_base.nit:186 */
971 REGB0
= TAG_Bool(ATTR_icode___icode_base___IIf____then_seq(fra
.me
.REG
[0])!=NIT_NULL
);
972 if (UNTAG_Bool(REGB0
)) {
974 nit_abort("Uninitialized attribute %s", "_then_seq", LOCATE_icode___icode_base
, 186);
976 fra
.me
.REG
[0] = ATTR_icode___icode_base___IIf____then_seq(fra
.me
.REG
[0]);
977 stack_frame_head
= fra
.me
.prev
;
978 return fra
.me
.REG
[0];
980 static const char LOCATE_icode___icode_base___IIf___else_seq
[] = "icode_base::IIf::else_seq";
981 val_t
icode___icode_base___IIf___else_seq(val_t p0
){
982 struct {struct stack_frame_t me
;} fra
;
985 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
986 fra
.me
.file
= LOCATE_icode___icode_base
;
988 fra
.me
.meth
= LOCATE_icode___icode_base___IIf___else_seq
;
989 fra
.me
.has_broke
= 0;
991 fra
.me
.nitni_local_ref_head
= NULL
;
992 fra
.me
.REG
[0] = NIT_NULL
;
994 /* icode/icode_base.nit:188 */
995 REGB0
= TAG_Bool(ATTR_icode___icode_base___IIf____else_seq(fra
.me
.REG
[0])!=NIT_NULL
);
996 if (UNTAG_Bool(REGB0
)) {
998 nit_abort("Uninitialized attribute %s", "_else_seq", LOCATE_icode___icode_base
, 188);
1000 fra
.me
.REG
[0] = ATTR_icode___icode_base___IIf____else_seq(fra
.me
.REG
[0]);
1001 stack_frame_head
= fra
.me
.prev
;
1002 return fra
.me
.REG
[0];
1004 static const char LOCATE_icode___icode_base___IIf___init
[] = "icode_base::IIf::init";
1005 void icode___icode_base___IIf___init(val_t p0
, val_t p1
, int* init_table
){
1006 int itpos11
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___IIf
].i
;
1007 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
1009 if (init_table
[itpos11
]) return;
1010 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1011 fra
.me
.file
= LOCATE_icode___icode_base
;
1013 fra
.me
.meth
= LOCATE_icode___icode_base___IIf___init
;
1014 fra
.me
.has_broke
= 0;
1015 fra
.me
.REG_size
= 2;
1016 fra
.me
.nitni_local_ref_head
= NULL
;
1017 fra
.me
.REG
[0] = NIT_NULL
;
1018 fra
.me
.REG
[1] = NIT_NULL
;
1021 /* icode/icode_base.nit:190 */
1022 CALL_icode___icode_base___ICode1___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1], init_table
);
1023 stack_frame_head
= fra
.me
.prev
;
1024 init_table
[itpos11
] = 1;
1027 static const char LOCATE_icode___icode_base___IEscape___iescape_mark
[] = "icode_base::IEscape::iescape_mark";
1028 val_t
icode___icode_base___IEscape___iescape_mark(val_t p0
){
1029 struct {struct stack_frame_t me
;} fra
;
1032 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1033 fra
.me
.file
= LOCATE_icode___icode_base
;
1035 fra
.me
.meth
= LOCATE_icode___icode_base___IEscape___iescape_mark
;
1036 fra
.me
.has_broke
= 0;
1037 fra
.me
.REG_size
= 1;
1038 fra
.me
.nitni_local_ref_head
= NULL
;
1039 fra
.me
.REG
[0] = NIT_NULL
;
1041 /* icode/icode_base.nit:196 */
1042 REGB0
= TAG_Bool(ATTR_icode___icode_base___IEscape____iescape_mark(fra
.me
.REG
[0])!=NIT_NULL
);
1043 if (UNTAG_Bool(REGB0
)) {
1045 nit_abort("Uninitialized attribute %s", "_iescape_mark", LOCATE_icode___icode_base
, 196);
1047 fra
.me
.REG
[0] = ATTR_icode___icode_base___IEscape____iescape_mark(fra
.me
.REG
[0]);
1048 stack_frame_head
= fra
.me
.prev
;
1049 return fra
.me
.REG
[0];
1051 static const char LOCATE_icode___icode_base___IEscape___init
[] = "icode_base::IEscape::init";
1052 void icode___icode_base___IEscape___init(val_t p0
, val_t p1
, int* init_table
){
1053 int itpos12
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___IEscape
].i
;
1054 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
1056 if (init_table
[itpos12
]) return;
1057 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1058 fra
.me
.file
= LOCATE_icode___icode_base
;
1060 fra
.me
.meth
= LOCATE_icode___icode_base___IEscape___init
;
1061 fra
.me
.has_broke
= 0;
1062 fra
.me
.REG_size
= 2;
1063 fra
.me
.nitni_local_ref_head
= NULL
;
1064 fra
.me
.REG
[0] = NIT_NULL
;
1065 fra
.me
.REG
[1] = NIT_NULL
;
1068 /* icode/icode_base.nit:199 */
1069 ATTR_icode___icode_base___IEscape____iescape_mark(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
1070 stack_frame_head
= fra
.me
.prev
;
1071 init_table
[itpos12
] = 1;
1074 static const char LOCATE_icode___icode_base___IAbort___texts
[] = "icode_base::IAbort::texts";
1075 val_t
icode___icode_base___IAbort___texts(val_t p0
){
1076 struct {struct stack_frame_t me
;} fra
;
1079 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1080 fra
.me
.file
= LOCATE_icode___icode_base
;
1082 fra
.me
.meth
= LOCATE_icode___icode_base___IAbort___texts
;
1083 fra
.me
.has_broke
= 0;
1084 fra
.me
.REG_size
= 1;
1085 fra
.me
.nitni_local_ref_head
= NULL
;
1086 fra
.me
.REG
[0] = NIT_NULL
;
1088 /* icode/icode_base.nit:205 */
1089 REGB0
= TAG_Bool(ATTR_icode___icode_base___IAbort____texts(fra
.me
.REG
[0])!=NIT_NULL
);
1090 if (UNTAG_Bool(REGB0
)) {
1092 nit_abort("Uninitialized attribute %s", "_texts", LOCATE_icode___icode_base
, 205);
1094 fra
.me
.REG
[0] = ATTR_icode___icode_base___IAbort____texts(fra
.me
.REG
[0]);
1095 stack_frame_head
= fra
.me
.prev
;
1096 return fra
.me
.REG
[0];
1098 static const char LOCATE_icode___icode_base___IAbort___module_location
[] = "icode_base::IAbort::module_location";
1099 val_t
icode___icode_base___IAbort___module_location(val_t p0
){
1100 struct {struct stack_frame_t me
;} fra
;
1103 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1104 fra
.me
.file
= LOCATE_icode___icode_base
;
1106 fra
.me
.meth
= LOCATE_icode___icode_base___IAbort___module_location
;
1107 fra
.me
.has_broke
= 0;
1108 fra
.me
.REG_size
= 1;
1109 fra
.me
.nitni_local_ref_head
= NULL
;
1110 fra
.me
.REG
[0] = NIT_NULL
;
1112 /* icode/icode_base.nit:208 */
1113 REGB0
= TAG_Bool(ATTR_icode___icode_base___IAbort____module_location(fra
.me
.REG
[0])!=NIT_NULL
);
1114 if (UNTAG_Bool(REGB0
)) {
1116 nit_abort("Uninitialized attribute %s", "_module_location", LOCATE_icode___icode_base
, 208);
1118 fra
.me
.REG
[0] = ATTR_icode___icode_base___IAbort____module_location(fra
.me
.REG
[0]);
1119 stack_frame_head
= fra
.me
.prev
;
1120 return fra
.me
.REG
[0];
1122 static const char LOCATE_icode___icode_base___IAbort___init
[] = "icode_base::IAbort::init";
1123 void icode___icode_base___IAbort___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
1124 int itpos13
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___IAbort
].i
;
1125 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
1127 if (init_table
[itpos13
]) return;
1128 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1129 fra
.me
.file
= LOCATE_icode___icode_base
;
1131 fra
.me
.meth
= LOCATE_icode___icode_base___IAbort___init
;
1132 fra
.me
.has_broke
= 0;
1133 fra
.me
.REG_size
= 3;
1134 fra
.me
.nitni_local_ref_head
= NULL
;
1135 fra
.me
.REG
[0] = NIT_NULL
;
1136 fra
.me
.REG
[1] = NIT_NULL
;
1137 fra
.me
.REG
[2] = NIT_NULL
;
1141 /* icode/icode_base.nit:212 */
1142 ATTR_icode___icode_base___IAbort____texts(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
1143 /* icode/icode_base.nit:213 */
1144 ATTR_icode___icode_base___IAbort____module_location(fra
.me
.REG
[0]) = fra
.me
.REG
[2];
1145 stack_frame_head
= fra
.me
.prev
;
1146 init_table
[itpos13
] = 1;
1149 static const char LOCATE_icode___icode_base___IAbsCall___property
[] = "icode_base::IAbsCall::property";
1150 val_t
icode___icode_base___IAbsCall___property(val_t p0
){
1151 struct {struct stack_frame_t me
;} fra
;
1154 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1155 fra
.me
.file
= LOCATE_icode___icode_base
;
1157 fra
.me
.meth
= LOCATE_icode___icode_base___IAbsCall___property
;
1158 fra
.me
.has_broke
= 0;
1159 fra
.me
.REG_size
= 1;
1160 fra
.me
.nitni_local_ref_head
= NULL
;
1161 fra
.me
.REG
[0] = NIT_NULL
;
1163 /* icode/icode_base.nit:222 */
1164 REGB0
= TAG_Bool(ATTR_icode___icode_base___IAbsCall____property(fra
.me
.REG
[0])!=NIT_NULL
);
1165 if (UNTAG_Bool(REGB0
)) {
1167 nit_abort("Uninitialized attribute %s", "_property", LOCATE_icode___icode_base
, 222);
1169 fra
.me
.REG
[0] = ATTR_icode___icode_base___IAbsCall____property(fra
.me
.REG
[0]);
1170 stack_frame_head
= fra
.me
.prev
;
1171 return fra
.me
.REG
[0];
1173 static const char LOCATE_icode___icode_base___IAbsCall___is_explicit_from_extern
[] = "icode_base::IAbsCall::is_explicit_from_extern";
1174 val_t
icode___icode_base___IAbsCall___is_explicit_from_extern(val_t p0
){
1175 struct {struct stack_frame_t me
;} fra
;
1178 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1179 fra
.me
.file
= LOCATE_icode___icode_base
;
1181 fra
.me
.meth
= LOCATE_icode___icode_base___IAbsCall___is_explicit_from_extern
;
1182 fra
.me
.has_broke
= 0;
1183 fra
.me
.REG_size
= 1;
1184 fra
.me
.nitni_local_ref_head
= NULL
;
1185 fra
.me
.REG
[0] = NIT_NULL
;
1187 /* icode/icode_base.nit:225 */
1188 REGB0
= TAG_Bool(ATTR_icode___icode_base___IAbsCall_____atis_explicit_from_extern(fra
.me
.REG
[0])!=NIT_NULL
);
1189 if (UNTAG_Bool(REGB0
)) {
1191 nit_abort("Uninitialized attribute %s", "@is_explicit_from_extern", LOCATE_icode___icode_base
, 225);
1193 REGB0
= ATTR_icode___icode_base___IAbsCall_____atis_explicit_from_extern(fra
.me
.REG
[0]);
1194 stack_frame_head
= fra
.me
.prev
;
1197 static const char LOCATE_icode___icode_base___IAbsCall___is_explicit_from_extern__eq
[] = "icode_base::IAbsCall::is_explicit_from_extern=";
1198 void icode___icode_base___IAbsCall___is_explicit_from_extern__eq(val_t p0
, val_t p1
){
1199 struct {struct stack_frame_t me
;} fra
;
1202 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1203 fra
.me
.file
= LOCATE_icode___icode_base
;
1205 fra
.me
.meth
= LOCATE_icode___icode_base___IAbsCall___is_explicit_from_extern__eq
;
1206 fra
.me
.has_broke
= 0;
1207 fra
.me
.REG_size
= 1;
1208 fra
.me
.nitni_local_ref_head
= NULL
;
1209 fra
.me
.REG
[0] = NIT_NULL
;
1212 /* icode/icode_base.nit:225 */
1213 ATTR_icode___icode_base___IAbsCall_____atis_explicit_from_extern(fra
.me
.REG
[0]) = REGB0
;
1214 stack_frame_head
= fra
.me
.prev
;
1217 static const char LOCATE_icode___icode_base___IAbsCall___init
[] = "icode_base::IAbsCall::init";
1218 void icode___icode_base___IAbsCall___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
1219 int itpos14
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___IAbsCall
].i
;
1220 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
1222 if (init_table
[itpos14
]) return;
1223 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1224 fra
.me
.file
= LOCATE_icode___icode_base
;
1226 fra
.me
.meth
= LOCATE_icode___icode_base___IAbsCall___init
;
1227 fra
.me
.has_broke
= 0;
1228 fra
.me
.REG_size
= 4;
1229 fra
.me
.nitni_local_ref_head
= NULL
;
1230 fra
.me
.REG
[0] = NIT_NULL
;
1231 fra
.me
.REG
[1] = NIT_NULL
;
1232 fra
.me
.REG
[2] = NIT_NULL
;
1233 fra
.me
.REG
[3] = NIT_NULL
;
1237 /* icode/icode_base.nit:228 */
1238 fra
.me
.REG
[3] = fra
.me
.REG
[0];
1239 /* icode/icode_base.nit:230 */
1240 CALL_icode___icode_base___ICodeN___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2], init_table
);
1241 /* icode/icode_base.nit:231 */
1242 ATTR_icode___icode_base___IAbsCall____property(fra
.me
.REG
[3]) = fra
.me
.REG
[1];
1243 stack_frame_head
= fra
.me
.prev
;
1244 init_table
[itpos14
] = 1;
1247 static const char LOCATE_icode___icode_base___ICall___init
[] = "icode_base::ICall::init";
1248 void icode___icode_base___ICall___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
1249 int itpos15
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___ICall
].i
;
1250 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
1252 if (init_table
[itpos15
]) return;
1253 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1254 fra
.me
.file
= LOCATE_icode___icode_base
;
1256 fra
.me
.meth
= LOCATE_icode___icode_base___ICall___init
;
1257 fra
.me
.has_broke
= 0;
1258 fra
.me
.REG_size
= 3;
1259 fra
.me
.nitni_local_ref_head
= NULL
;
1260 fra
.me
.REG
[0] = NIT_NULL
;
1261 fra
.me
.REG
[1] = NIT_NULL
;
1262 fra
.me
.REG
[2] = NIT_NULL
;
1266 /* icode/icode_base.nit:239 */
1267 CALL_icode___icode_base___IAbsCall___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1], fra
.me
.REG
[2], init_table
);
1268 stack_frame_head
= fra
.me
.prev
;
1269 init_table
[itpos15
] = 1;
1272 static const char LOCATE_icode___icode_base___ISuper___init
[] = "icode_base::ISuper::init";
1273 void icode___icode_base___ISuper___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
1274 int itpos16
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___ISuper
].i
;
1275 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
1277 if (init_table
[itpos16
]) return;
1278 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1279 fra
.me
.file
= LOCATE_icode___icode_base
;
1281 fra
.me
.meth
= LOCATE_icode___icode_base___ISuper___init
;
1282 fra
.me
.has_broke
= 0;
1283 fra
.me
.REG_size
= 3;
1284 fra
.me
.nitni_local_ref_head
= NULL
;
1285 fra
.me
.REG
[0] = NIT_NULL
;
1286 fra
.me
.REG
[1] = NIT_NULL
;
1287 fra
.me
.REG
[2] = NIT_NULL
;
1291 /* icode/icode_base.nit:246 */
1292 CALL_icode___icode_base___IAbsCall___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1], fra
.me
.REG
[2], init_table
);
1293 stack_frame_head
= fra
.me
.prev
;
1294 init_table
[itpos16
] = 1;
1297 static const char LOCATE_icode___icode_base___INew___stype
[] = "icode_base::INew::stype";
1298 val_t
icode___icode_base___INew___stype(val_t p0
){
1299 struct {struct stack_frame_t me
;} fra
;
1302 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1303 fra
.me
.file
= LOCATE_icode___icode_base
;
1305 fra
.me
.meth
= LOCATE_icode___icode_base___INew___stype
;
1306 fra
.me
.has_broke
= 0;
1307 fra
.me
.REG_size
= 1;
1308 fra
.me
.nitni_local_ref_head
= NULL
;
1309 fra
.me
.REG
[0] = NIT_NULL
;
1311 /* icode/icode_base.nit:258 */
1312 REGB0
= TAG_Bool(ATTR_icode___icode_base___INew____stype(fra
.me
.REG
[0])!=NIT_NULL
);
1313 if (UNTAG_Bool(REGB0
)) {
1315 nit_abort("Uninitialized attribute %s", "_stype", LOCATE_icode___icode_base
, 258);
1317 fra
.me
.REG
[0] = ATTR_icode___icode_base___INew____stype(fra
.me
.REG
[0]);
1318 stack_frame_head
= fra
.me
.prev
;
1319 return fra
.me
.REG
[0];
1321 static const char LOCATE_icode___icode_base___INew___init
[] = "icode_base::INew::init";
1322 void icode___icode_base___INew___init(val_t p0
, val_t p1
, val_t p2
, val_t p3
, int* init_table
){
1323 int itpos17
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___INew
].i
;
1324 struct {struct stack_frame_t me
; val_t MORE_REG
[4];} fra
;
1326 if (init_table
[itpos17
]) return;
1327 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1328 fra
.me
.file
= LOCATE_icode___icode_base
;
1330 fra
.me
.meth
= LOCATE_icode___icode_base___INew___init
;
1331 fra
.me
.has_broke
= 0;
1332 fra
.me
.REG_size
= 5;
1333 fra
.me
.nitni_local_ref_head
= NULL
;
1334 fra
.me
.REG
[0] = NIT_NULL
;
1335 fra
.me
.REG
[1] = NIT_NULL
;
1336 fra
.me
.REG
[2] = NIT_NULL
;
1337 fra
.me
.REG
[3] = NIT_NULL
;
1338 fra
.me
.REG
[4] = NIT_NULL
;
1343 /* icode/icode_base.nit:260 */
1344 fra
.me
.REG
[4] = fra
.me
.REG
[0];
1345 /* icode/icode_base.nit:262 */
1346 CALL_icode___icode_base___IAbsCall___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2], fra
.me
.REG
[3], init_table
);
1347 /* icode/icode_base.nit:263 */
1348 ATTR_icode___icode_base___INew____stype(fra
.me
.REG
[4]) = fra
.me
.REG
[1];
1349 stack_frame_head
= fra
.me
.prev
;
1350 init_table
[itpos17
] = 1;
1353 static const char LOCATE_icode___icode_base___IAllocateInstance___stype
[] = "icode_base::IAllocateInstance::stype";
1354 val_t
icode___icode_base___IAllocateInstance___stype(val_t p0
){
1355 struct {struct stack_frame_t me
;} fra
;
1358 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1359 fra
.me
.file
= LOCATE_icode___icode_base
;
1361 fra
.me
.meth
= LOCATE_icode___icode_base___IAllocateInstance___stype
;
1362 fra
.me
.has_broke
= 0;
1363 fra
.me
.REG_size
= 1;
1364 fra
.me
.nitni_local_ref_head
= NULL
;
1365 fra
.me
.REG
[0] = NIT_NULL
;
1367 /* icode/icode_base.nit:272 */
1368 REGB0
= TAG_Bool(ATTR_icode___icode_base___IAllocateInstance____stype(fra
.me
.REG
[0])!=NIT_NULL
);
1369 if (UNTAG_Bool(REGB0
)) {
1371 nit_abort("Uninitialized attribute %s", "_stype", LOCATE_icode___icode_base
, 272);
1373 fra
.me
.REG
[0] = ATTR_icode___icode_base___IAllocateInstance____stype(fra
.me
.REG
[0]);
1374 stack_frame_head
= fra
.me
.prev
;
1375 return fra
.me
.REG
[0];
1377 static const char LOCATE_icode___icode_base___IAllocateInstance___init
[] = "icode_base::IAllocateInstance::init";
1378 void icode___icode_base___IAllocateInstance___init(val_t p0
, val_t p1
, int* init_table
){
1379 int itpos18
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___IAllocateInstance
].i
;
1380 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
1382 if (init_table
[itpos18
]) return;
1383 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1384 fra
.me
.file
= LOCATE_icode___icode_base
;
1386 fra
.me
.meth
= LOCATE_icode___icode_base___IAllocateInstance___init
;
1387 fra
.me
.has_broke
= 0;
1388 fra
.me
.REG_size
= 2;
1389 fra
.me
.nitni_local_ref_head
= NULL
;
1390 fra
.me
.REG
[0] = NIT_NULL
;
1391 fra
.me
.REG
[1] = NIT_NULL
;
1394 /* icode/icode_base.nit:276 */
1395 ATTR_icode___icode_base___IAllocateInstance____stype(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
1396 stack_frame_head
= fra
.me
.prev
;
1397 init_table
[itpos18
] = 1;
1400 static const char LOCATE_icode___icode_base___IStaticCall___init
[] = "icode_base::IStaticCall::init";
1401 void icode___icode_base___IStaticCall___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
1402 int itpos19
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___IStaticCall
].i
;
1403 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
1405 if (init_table
[itpos19
]) return;
1406 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1407 fra
.me
.file
= LOCATE_icode___icode_base
;
1409 fra
.me
.meth
= LOCATE_icode___icode_base___IStaticCall___init
;
1410 fra
.me
.has_broke
= 0;
1411 fra
.me
.REG_size
= 3;
1412 fra
.me
.nitni_local_ref_head
= NULL
;
1413 fra
.me
.REG
[0] = NIT_NULL
;
1414 fra
.me
.REG
[1] = NIT_NULL
;
1415 fra
.me
.REG
[2] = NIT_NULL
;
1419 /* icode/icode_base.nit:283 */
1420 CALL_icode___icode_base___IAbsCall___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1], fra
.me
.REG
[2], init_table
);
1421 stack_frame_head
= fra
.me
.prev
;
1422 init_table
[itpos19
] = 1;
1425 static const char LOCATE_icode___icode_base___ICheckInstance___stype
[] = "icode_base::ICheckInstance::stype";
1426 val_t
icode___icode_base___ICheckInstance___stype(val_t p0
){
1427 struct {struct stack_frame_t me
;} fra
;
1430 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1431 fra
.me
.file
= LOCATE_icode___icode_base
;
1433 fra
.me
.meth
= LOCATE_icode___icode_base___ICheckInstance___stype
;
1434 fra
.me
.has_broke
= 0;
1435 fra
.me
.REG_size
= 1;
1436 fra
.me
.nitni_local_ref_head
= NULL
;
1437 fra
.me
.REG
[0] = NIT_NULL
;
1439 /* icode/icode_base.nit:289 */
1440 REGB0
= TAG_Bool(ATTR_icode___icode_base___ICheckInstance____stype(fra
.me
.REG
[0])!=NIT_NULL
);
1441 if (UNTAG_Bool(REGB0
)) {
1443 nit_abort("Uninitialized attribute %s", "_stype", LOCATE_icode___icode_base
, 289);
1445 fra
.me
.REG
[0] = ATTR_icode___icode_base___ICheckInstance____stype(fra
.me
.REG
[0]);
1446 stack_frame_head
= fra
.me
.prev
;
1447 return fra
.me
.REG
[0];
1449 static const char LOCATE_icode___icode_base___ICheckInstance___init
[] = "icode_base::ICheckInstance::init";
1450 void icode___icode_base___ICheckInstance___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
1451 int itpos20
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___ICheckInstance
].i
;
1452 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
1454 if (init_table
[itpos20
]) return;
1455 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1456 fra
.me
.file
= LOCATE_icode___icode_base
;
1458 fra
.me
.meth
= LOCATE_icode___icode_base___ICheckInstance___init
;
1459 fra
.me
.has_broke
= 0;
1460 fra
.me
.REG_size
= 4;
1461 fra
.me
.nitni_local_ref_head
= NULL
;
1462 fra
.me
.REG
[0] = NIT_NULL
;
1463 fra
.me
.REG
[1] = NIT_NULL
;
1464 fra
.me
.REG
[2] = NIT_NULL
;
1465 fra
.me
.REG
[3] = NIT_NULL
;
1469 /* icode/icode_base.nit:291 */
1470 fra
.me
.REG
[3] = fra
.me
.REG
[0];
1471 /* icode/icode_base.nit:293 */
1472 CALL_icode___icode_base___ICode1___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2], init_table
);
1473 /* icode/icode_base.nit:294 */
1474 ATTR_icode___icode_base___ICheckInstance____stype(fra
.me
.REG
[3]) = fra
.me
.REG
[1];
1475 stack_frame_head
= fra
.me
.prev
;
1476 init_table
[itpos20
] = 1;
1479 static const char LOCATE_icode___icode_base___IInitAttributes___stype
[] = "icode_base::IInitAttributes::stype";
1480 val_t
icode___icode_base___IInitAttributes___stype(val_t p0
){
1481 struct {struct stack_frame_t me
;} fra
;
1484 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1485 fra
.me
.file
= LOCATE_icode___icode_base
;
1487 fra
.me
.meth
= LOCATE_icode___icode_base___IInitAttributes___stype
;
1488 fra
.me
.has_broke
= 0;
1489 fra
.me
.REG_size
= 1;
1490 fra
.me
.nitni_local_ref_head
= NULL
;
1491 fra
.me
.REG
[0] = NIT_NULL
;
1493 /* icode/icode_base.nit:301 */
1494 REGB0
= TAG_Bool(ATTR_icode___icode_base___IInitAttributes____stype(fra
.me
.REG
[0])!=NIT_NULL
);
1495 if (UNTAG_Bool(REGB0
)) {
1497 nit_abort("Uninitialized attribute %s", "_stype", LOCATE_icode___icode_base
, 301);
1499 fra
.me
.REG
[0] = ATTR_icode___icode_base___IInitAttributes____stype(fra
.me
.REG
[0]);
1500 stack_frame_head
= fra
.me
.prev
;
1501 return fra
.me
.REG
[0];
1503 static const char LOCATE_icode___icode_base___IInitAttributes___init
[] = "icode_base::IInitAttributes::init";
1504 void icode___icode_base___IInitAttributes___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
1505 int itpos21
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___IInitAttributes
].i
;
1506 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
1508 if (init_table
[itpos21
]) return;
1509 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1510 fra
.me
.file
= LOCATE_icode___icode_base
;
1512 fra
.me
.meth
= LOCATE_icode___icode_base___IInitAttributes___init
;
1513 fra
.me
.has_broke
= 0;
1514 fra
.me
.REG_size
= 4;
1515 fra
.me
.nitni_local_ref_head
= NULL
;
1516 fra
.me
.REG
[0] = NIT_NULL
;
1517 fra
.me
.REG
[1] = NIT_NULL
;
1518 fra
.me
.REG
[2] = NIT_NULL
;
1519 fra
.me
.REG
[3] = NIT_NULL
;
1523 /* icode/icode_base.nit:303 */
1524 fra
.me
.REG
[3] = fra
.me
.REG
[0];
1525 /* icode/icode_base.nit:305 */
1526 CALL_icode___icode_base___ICode1___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2], init_table
);
1527 /* icode/icode_base.nit:306 */
1528 ATTR_icode___icode_base___IInitAttributes____stype(fra
.me
.REG
[3]) = fra
.me
.REG
[1];
1529 stack_frame_head
= fra
.me
.prev
;
1530 init_table
[itpos21
] = 1;
1533 static const char LOCATE_icode___icode_base___IClosCall___closure_decl
[] = "icode_base::IClosCall::closure_decl";
1534 val_t
icode___icode_base___IClosCall___closure_decl(val_t p0
){
1535 struct {struct stack_frame_t me
;} fra
;
1538 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1539 fra
.me
.file
= LOCATE_icode___icode_base
;
1541 fra
.me
.meth
= LOCATE_icode___icode_base___IClosCall___closure_decl
;
1542 fra
.me
.has_broke
= 0;
1543 fra
.me
.REG_size
= 1;
1544 fra
.me
.nitni_local_ref_head
= NULL
;
1545 fra
.me
.REG
[0] = NIT_NULL
;
1547 /* icode/icode_base.nit:314 */
1548 REGB0
= TAG_Bool(ATTR_icode___icode_base___IClosCall____closure_decl(fra
.me
.REG
[0])!=NIT_NULL
);
1549 if (UNTAG_Bool(REGB0
)) {
1551 nit_abort("Uninitialized attribute %s", "_closure_decl", LOCATE_icode___icode_base
, 314);
1553 fra
.me
.REG
[0] = ATTR_icode___icode_base___IClosCall____closure_decl(fra
.me
.REG
[0]);
1554 stack_frame_head
= fra
.me
.prev
;
1555 return fra
.me
.REG
[0];
1557 static const char LOCATE_icode___icode_base___IClosCall___break_seq
[] = "icode_base::IClosCall::break_seq";
1558 val_t
icode___icode_base___IClosCall___break_seq(val_t p0
){
1559 struct {struct stack_frame_t me
;} fra
;
1561 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1562 fra
.me
.file
= LOCATE_icode___icode_base
;
1564 fra
.me
.meth
= LOCATE_icode___icode_base___IClosCall___break_seq
;
1565 fra
.me
.has_broke
= 0;
1566 fra
.me
.REG_size
= 1;
1567 fra
.me
.nitni_local_ref_head
= NULL
;
1568 fra
.me
.REG
[0] = NIT_NULL
;
1570 /* icode/icode_base.nit:317 */
1571 fra
.me
.REG
[0] = ATTR_icode___icode_base___IClosCall____break_seq(fra
.me
.REG
[0]);
1572 stack_frame_head
= fra
.me
.prev
;
1573 return fra
.me
.REG
[0];
1575 static const char LOCATE_icode___icode_base___IClosCall___break_seq__eq
[] = "icode_base::IClosCall::break_seq=";
1576 void icode___icode_base___IClosCall___break_seq__eq(val_t p0
, val_t p1
){
1577 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
1579 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1580 fra
.me
.file
= LOCATE_icode___icode_base
;
1582 fra
.me
.meth
= LOCATE_icode___icode_base___IClosCall___break_seq__eq
;
1583 fra
.me
.has_broke
= 0;
1584 fra
.me
.REG_size
= 2;
1585 fra
.me
.nitni_local_ref_head
= NULL
;
1586 fra
.me
.REG
[0] = NIT_NULL
;
1587 fra
.me
.REG
[1] = NIT_NULL
;
1590 /* icode/icode_base.nit:317 */
1591 ATTR_icode___icode_base___IClosCall____break_seq(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
1592 stack_frame_head
= fra
.me
.prev
;
1595 static const char LOCATE_icode___icode_base___IClosCall___init
[] = "icode_base::IClosCall::init";
1596 void icode___icode_base___IClosCall___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
1597 int itpos22
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___IClosCall
].i
;
1598 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
1600 if (init_table
[itpos22
]) return;
1601 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1602 fra
.me
.file
= LOCATE_icode___icode_base
;
1604 fra
.me
.meth
= LOCATE_icode___icode_base___IClosCall___init
;
1605 fra
.me
.has_broke
= 0;
1606 fra
.me
.REG_size
= 4;
1607 fra
.me
.nitni_local_ref_head
= NULL
;
1608 fra
.me
.REG
[0] = NIT_NULL
;
1609 fra
.me
.REG
[1] = NIT_NULL
;
1610 fra
.me
.REG
[2] = NIT_NULL
;
1611 fra
.me
.REG
[3] = NIT_NULL
;
1615 /* icode/icode_base.nit:320 */
1616 fra
.me
.REG
[3] = fra
.me
.REG
[0];
1617 /* icode/icode_base.nit:322 */
1618 CALL_icode___icode_base___ICodeN___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2], init_table
);
1619 /* icode/icode_base.nit:323 */
1620 ATTR_icode___icode_base___IClosCall____closure_decl(fra
.me
.REG
[3]) = fra
.me
.REG
[1];
1621 stack_frame_head
= fra
.me
.prev
;
1622 init_table
[itpos22
] = 1;
1625 static const char LOCATE_icode___icode_base___INative___method
[] = "icode_base::INative::method";
1626 val_t
icode___icode_base___INative___method(val_t p0
){
1627 struct {struct stack_frame_t me
;} fra
;
1630 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1631 fra
.me
.file
= LOCATE_icode___icode_base
;
1633 fra
.me
.meth
= LOCATE_icode___icode_base___INative___method
;
1634 fra
.me
.has_broke
= 0;
1635 fra
.me
.REG_size
= 1;
1636 fra
.me
.nitni_local_ref_head
= NULL
;
1637 fra
.me
.REG
[0] = NIT_NULL
;
1639 /* icode/icode_base.nit:332 */
1640 REGB0
= TAG_Bool(ATTR_icode___icode_base___INative____method(fra
.me
.REG
[0])!=NIT_NULL
);
1641 if (UNTAG_Bool(REGB0
)) {
1643 nit_abort("Uninitialized attribute %s", "_method", LOCATE_icode___icode_base
, 332);
1645 fra
.me
.REG
[0] = ATTR_icode___icode_base___INative____method(fra
.me
.REG
[0]);
1646 stack_frame_head
= fra
.me
.prev
;
1647 return fra
.me
.REG
[0];
1649 static const char LOCATE_icode___icode_base___INative___init
[] = "icode_base::INative::init";
1650 void icode___icode_base___INative___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
1651 int itpos23
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___INative
].i
;
1652 struct {struct stack_frame_t me
; val_t MORE_REG
[4];} fra
;
1657 if (init_table
[itpos23
]) return;
1658 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1659 fra
.me
.file
= LOCATE_icode___icode_base
;
1661 fra
.me
.meth
= LOCATE_icode___icode_base___INative___init
;
1662 fra
.me
.has_broke
= 0;
1663 fra
.me
.REG_size
= 5;
1664 fra
.me
.nitni_local_ref_head
= NULL
;
1665 fra
.me
.REG
[0] = NIT_NULL
;
1666 fra
.me
.REG
[1] = NIT_NULL
;
1667 fra
.me
.REG
[2] = NIT_NULL
;
1668 fra
.me
.REG
[3] = NIT_NULL
;
1669 fra
.me
.REG
[4] = NIT_NULL
;
1673 /* icode/icode_base.nit:335 */
1674 fra
.me
.REG
[3] = fra
.me
.REG
[0];
1675 /* icode/icode_base.nit:338 */
1676 REGB0
= TAG_Bool(fra
.me
.REG
[2]==NIT_NULL
);
1677 if (UNTAG_Bool(REGB0
)) {
1678 nit_abort("Reciever is null", NULL
, LOCATE_icode___icode_base
, 338);
1680 REGB0
= CALL_standard___collection___abstract_collection___Collection___length(fra
.me
.REG
[2])(fra
.me
.REG
[2]);
1681 fra
.me
.REG
[4] = CALL_metamodel___static_type___MMLocalProperty___signature(fra
.me
.REG
[1])(fra
.me
.REG
[1]);
1682 REGB1
= TAG_Bool(fra
.me
.REG
[4]==NIT_NULL
);
1683 if (UNTAG_Bool(REGB1
)) {
1684 nit_abort("Reciever is null", NULL
, LOCATE_icode___icode_base
, 338);
1686 REGB1
= CALL_metamodel___static_type___MMSignature___arity(fra
.me
.REG
[4])(fra
.me
.REG
[4]);
1688 /* ../lib/standard/kernel.nit:245 */
1689 REGB2
= TAG_Int(UNTAG_Int(REGB1
)+UNTAG_Int(REGB2
));
1690 /* icode/icode_base.nit:338 */
1691 REGB1
= TAG_Bool(IS_EQUAL_OO(REGB0
,REGB2
));
1692 if (UNTAG_Bool(REGB1
)) {
1694 /* ../lib/standard/kernel.nit:237 */
1695 REGB2
= TAG_Bool((REGB0
)==(REGB2
));
1696 /* icode/icode_base.nit:338 */
1699 if (UNTAG_Bool(REGB1
)) {
1701 nit_abort("Assert failed", NULL
, LOCATE_icode___icode_base
, 338);
1703 /* icode/icode_base.nit:340 */
1704 CALL_icode___icode_base___ICodeN___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2], init_table
);
1705 /* icode/icode_base.nit:341 */
1706 ATTR_icode___icode_base___INative____method(fra
.me
.REG
[3]) = fra
.me
.REG
[1];
1707 stack_frame_head
= fra
.me
.prev
;
1708 init_table
[itpos23
] = 1;
1711 static const char LOCATE_icode___icode_base___INative___is_pure
[] = "icode_base::INative::(icode_base::ICode::is_pure)";
1712 val_t
icode___icode_base___INative___is_pure(val_t p0
){
1713 struct {struct stack_frame_t me
;} fra
;
1716 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1717 fra
.me
.file
= LOCATE_icode___icode_base
;
1719 fra
.me
.meth
= LOCATE_icode___icode_base___INative___is_pure
;
1720 fra
.me
.has_broke
= 0;
1721 fra
.me
.REG_size
= 1;
1722 fra
.me
.nitni_local_ref_head
= NULL
;
1723 fra
.me
.REG
[0] = NIT_NULL
;
1725 /* icode/icode_base.nit:344 */
1726 REGB0
= TAG_Bool(ATTR_icode___icode_base___INative____is_pure(fra
.me
.REG
[0])!=NIT_NULL
);
1727 if (UNTAG_Bool(REGB0
)) {
1729 nit_abort("Uninitialized attribute %s", "_is_pure", LOCATE_icode___icode_base
, 344);
1731 REGB0
= ATTR_icode___icode_base___INative____is_pure(fra
.me
.REG
[0]);
1732 stack_frame_head
= fra
.me
.prev
;
1735 static const char LOCATE_icode___icode_base___INative___is_pure__eq
[] = "icode_base::INative::is_pure=";
1736 void icode___icode_base___INative___is_pure__eq(val_t p0
, val_t p1
){
1737 struct {struct stack_frame_t me
;} fra
;
1740 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1741 fra
.me
.file
= LOCATE_icode___icode_base
;
1743 fra
.me
.meth
= LOCATE_icode___icode_base___INative___is_pure__eq
;
1744 fra
.me
.has_broke
= 0;
1745 fra
.me
.REG_size
= 1;
1746 fra
.me
.nitni_local_ref_head
= NULL
;
1747 fra
.me
.REG
[0] = NIT_NULL
;
1750 /* icode/icode_base.nit:344 */
1751 ATTR_icode___icode_base___INative____is_pure(fra
.me
.REG
[0]) = REGB0
;
1752 stack_frame_head
= fra
.me
.prev
;
1755 static const char LOCATE_icode___icode_base___IIntValue___value
[] = "icode_base::IIntValue::value";
1756 val_t
icode___icode_base___IIntValue___value(val_t p0
){
1757 struct {struct stack_frame_t me
;} fra
;
1760 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1761 fra
.me
.file
= LOCATE_icode___icode_base
;
1763 fra
.me
.meth
= LOCATE_icode___icode_base___IIntValue___value
;
1764 fra
.me
.has_broke
= 0;
1765 fra
.me
.REG_size
= 1;
1766 fra
.me
.nitni_local_ref_head
= NULL
;
1767 fra
.me
.REG
[0] = NIT_NULL
;
1769 /* icode/icode_base.nit:350 */
1770 REGB0
= TAG_Bool(ATTR_icode___icode_base___IIntValue____value(fra
.me
.REG
[0])!=NIT_NULL
);
1771 if (UNTAG_Bool(REGB0
)) {
1773 nit_abort("Uninitialized attribute %s", "_value", LOCATE_icode___icode_base
, 350);
1775 fra
.me
.REG
[0] = ATTR_icode___icode_base___IIntValue____value(fra
.me
.REG
[0]);
1776 stack_frame_head
= fra
.me
.prev
;
1777 return fra
.me
.REG
[0];
1779 static const char LOCATE_icode___icode_base___IIntValue___init
[] = "icode_base::IIntValue::init";
1780 void icode___icode_base___IIntValue___init(val_t p0
, val_t p1
, int* init_table
){
1781 int itpos24
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___IIntValue
].i
;
1782 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
1784 if (init_table
[itpos24
]) return;
1785 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1786 fra
.me
.file
= LOCATE_icode___icode_base
;
1788 fra
.me
.meth
= LOCATE_icode___icode_base___IIntValue___init
;
1789 fra
.me
.has_broke
= 0;
1790 fra
.me
.REG_size
= 2;
1791 fra
.me
.nitni_local_ref_head
= NULL
;
1792 fra
.me
.REG
[0] = NIT_NULL
;
1793 fra
.me
.REG
[1] = NIT_NULL
;
1796 /* icode/icode_base.nit:353 */
1797 ATTR_icode___icode_base___IIntValue____value(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
1798 stack_frame_head
= fra
.me
.prev
;
1799 init_table
[itpos24
] = 1;
1802 static const char LOCATE_icode___icode_base___IIntValue___is_pure
[] = "icode_base::IIntValue::(icode_base::ICode::is_pure)";
1803 val_t
icode___icode_base___IIntValue___is_pure(val_t p0
){
1804 struct {struct stack_frame_t me
;} fra
;
1807 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1808 fra
.me
.file
= LOCATE_icode___icode_base
;
1810 fra
.me
.meth
= LOCATE_icode___icode_base___IIntValue___is_pure
;
1811 fra
.me
.has_broke
= 0;
1812 fra
.me
.REG_size
= 1;
1813 fra
.me
.nitni_local_ref_head
= NULL
;
1814 fra
.me
.REG
[0] = NIT_NULL
;
1816 /* icode/icode_base.nit:355 */
1817 REGB0
= TAG_Bool(1);
1820 stack_frame_head
= fra
.me
.prev
;
1823 static const char LOCATE_icode___icode_base___IBoolValue___value
[] = "icode_base::IBoolValue::value";
1824 val_t
icode___icode_base___IBoolValue___value(val_t p0
){
1825 struct {struct stack_frame_t me
;} fra
;
1828 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1829 fra
.me
.file
= LOCATE_icode___icode_base
;
1831 fra
.me
.meth
= LOCATE_icode___icode_base___IBoolValue___value
;
1832 fra
.me
.has_broke
= 0;
1833 fra
.me
.REG_size
= 1;
1834 fra
.me
.nitni_local_ref_head
= NULL
;
1835 fra
.me
.REG
[0] = NIT_NULL
;
1837 /* icode/icode_base.nit:361 */
1838 REGB0
= TAG_Bool(ATTR_icode___icode_base___IBoolValue____value(fra
.me
.REG
[0])!=NIT_NULL
);
1839 if (UNTAG_Bool(REGB0
)) {
1841 nit_abort("Uninitialized attribute %s", "_value", LOCATE_icode___icode_base
, 361);
1843 REGB0
= ATTR_icode___icode_base___IBoolValue____value(fra
.me
.REG
[0]);
1844 stack_frame_head
= fra
.me
.prev
;
1847 static const char LOCATE_icode___icode_base___IBoolValue___init
[] = "icode_base::IBoolValue::init";
1848 void icode___icode_base___IBoolValue___init(val_t p0
, val_t p1
, int* init_table
){
1849 int itpos25
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___IBoolValue
].i
;
1850 struct {struct stack_frame_t me
;} fra
;
1853 if (init_table
[itpos25
]) return;
1854 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1855 fra
.me
.file
= LOCATE_icode___icode_base
;
1857 fra
.me
.meth
= LOCATE_icode___icode_base___IBoolValue___init
;
1858 fra
.me
.has_broke
= 0;
1859 fra
.me
.REG_size
= 1;
1860 fra
.me
.nitni_local_ref_head
= NULL
;
1861 fra
.me
.REG
[0] = NIT_NULL
;
1864 /* icode/icode_base.nit:364 */
1865 ATTR_icode___icode_base___IBoolValue____value(fra
.me
.REG
[0]) = REGB0
;
1866 stack_frame_head
= fra
.me
.prev
;
1867 init_table
[itpos25
] = 1;
1870 static const char LOCATE_icode___icode_base___IBoolValue___is_pure
[] = "icode_base::IBoolValue::(icode_base::ICode::is_pure)";
1871 val_t
icode___icode_base___IBoolValue___is_pure(val_t p0
){
1872 struct {struct stack_frame_t me
;} fra
;
1875 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1876 fra
.me
.file
= LOCATE_icode___icode_base
;
1878 fra
.me
.meth
= LOCATE_icode___icode_base___IBoolValue___is_pure
;
1879 fra
.me
.has_broke
= 0;
1880 fra
.me
.REG_size
= 1;
1881 fra
.me
.nitni_local_ref_head
= NULL
;
1882 fra
.me
.REG
[0] = NIT_NULL
;
1884 /* icode/icode_base.nit:366 */
1885 REGB0
= TAG_Bool(1);
1888 stack_frame_head
= fra
.me
.prev
;
1891 static const char LOCATE_icode___icode_base___IStringValue___value
[] = "icode_base::IStringValue::value";
1892 val_t
icode___icode_base___IStringValue___value(val_t p0
){
1893 struct {struct stack_frame_t me
;} fra
;
1896 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1897 fra
.me
.file
= LOCATE_icode___icode_base
;
1899 fra
.me
.meth
= LOCATE_icode___icode_base___IStringValue___value
;
1900 fra
.me
.has_broke
= 0;
1901 fra
.me
.REG_size
= 1;
1902 fra
.me
.nitni_local_ref_head
= NULL
;
1903 fra
.me
.REG
[0] = NIT_NULL
;
1905 /* icode/icode_base.nit:372 */
1906 REGB0
= TAG_Bool(ATTR_icode___icode_base___IStringValue____value(fra
.me
.REG
[0])!=NIT_NULL
);
1907 if (UNTAG_Bool(REGB0
)) {
1909 nit_abort("Uninitialized attribute %s", "_value", LOCATE_icode___icode_base
, 372);
1911 fra
.me
.REG
[0] = ATTR_icode___icode_base___IStringValue____value(fra
.me
.REG
[0]);
1912 stack_frame_head
= fra
.me
.prev
;
1913 return fra
.me
.REG
[0];
1915 static const char LOCATE_icode___icode_base___IStringValue___init
[] = "icode_base::IStringValue::init";
1916 void icode___icode_base___IStringValue___init(val_t p0
, val_t p1
, int* init_table
){
1917 int itpos26
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___IStringValue
].i
;
1918 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
1920 if (init_table
[itpos26
]) return;
1921 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1922 fra
.me
.file
= LOCATE_icode___icode_base
;
1924 fra
.me
.meth
= LOCATE_icode___icode_base___IStringValue___init
;
1925 fra
.me
.has_broke
= 0;
1926 fra
.me
.REG_size
= 2;
1927 fra
.me
.nitni_local_ref_head
= NULL
;
1928 fra
.me
.REG
[0] = NIT_NULL
;
1929 fra
.me
.REG
[1] = NIT_NULL
;
1932 /* icode/icode_base.nit:375 */
1933 ATTR_icode___icode_base___IStringValue____value(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
1934 stack_frame_head
= fra
.me
.prev
;
1935 init_table
[itpos26
] = 1;
1938 static const char LOCATE_icode___icode_base___IStringValue___is_pure
[] = "icode_base::IStringValue::(icode_base::ICode::is_pure)";
1939 val_t
icode___icode_base___IStringValue___is_pure(val_t p0
){
1940 struct {struct stack_frame_t me
;} fra
;
1943 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1944 fra
.me
.file
= LOCATE_icode___icode_base
;
1946 fra
.me
.meth
= LOCATE_icode___icode_base___IStringValue___is_pure
;
1947 fra
.me
.has_broke
= 0;
1948 fra
.me
.REG_size
= 1;
1949 fra
.me
.nitni_local_ref_head
= NULL
;
1950 fra
.me
.REG
[0] = NIT_NULL
;
1952 /* icode/icode_base.nit:377 */
1953 REGB0
= TAG_Bool(1);
1956 stack_frame_head
= fra
.me
.prev
;
1959 static const char LOCATE_icode___icode_base___IFloatValue___value
[] = "icode_base::IFloatValue::value";
1960 val_t
icode___icode_base___IFloatValue___value(val_t p0
){
1961 struct {struct stack_frame_t me
;} fra
;
1964 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1965 fra
.me
.file
= LOCATE_icode___icode_base
;
1967 fra
.me
.meth
= LOCATE_icode___icode_base___IFloatValue___value
;
1968 fra
.me
.has_broke
= 0;
1969 fra
.me
.REG_size
= 1;
1970 fra
.me
.nitni_local_ref_head
= NULL
;
1971 fra
.me
.REG
[0] = NIT_NULL
;
1973 /* icode/icode_base.nit:383 */
1974 REGB0
= TAG_Bool(ATTR_icode___icode_base___IFloatValue____value(fra
.me
.REG
[0])!=NIT_NULL
);
1975 if (UNTAG_Bool(REGB0
)) {
1977 nit_abort("Uninitialized attribute %s", "_value", LOCATE_icode___icode_base
, 383);
1979 fra
.me
.REG
[0] = ATTR_icode___icode_base___IFloatValue____value(fra
.me
.REG
[0]);
1980 stack_frame_head
= fra
.me
.prev
;
1981 return fra
.me
.REG
[0];
1983 static const char LOCATE_icode___icode_base___IFloatValue___init
[] = "icode_base::IFloatValue::init";
1984 void icode___icode_base___IFloatValue___init(val_t p0
, val_t p1
, int* init_table
){
1985 int itpos27
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___IFloatValue
].i
;
1986 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
1988 if (init_table
[itpos27
]) return;
1989 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
1990 fra
.me
.file
= LOCATE_icode___icode_base
;
1992 fra
.me
.meth
= LOCATE_icode___icode_base___IFloatValue___init
;
1993 fra
.me
.has_broke
= 0;
1994 fra
.me
.REG_size
= 2;
1995 fra
.me
.nitni_local_ref_head
= NULL
;
1996 fra
.me
.REG
[0] = NIT_NULL
;
1997 fra
.me
.REG
[1] = NIT_NULL
;
2000 /* icode/icode_base.nit:386 */
2001 ATTR_icode___icode_base___IFloatValue____value(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
2002 stack_frame_head
= fra
.me
.prev
;
2003 init_table
[itpos27
] = 1;
2006 static const char LOCATE_icode___icode_base___IFloatValue___is_pure
[] = "icode_base::IFloatValue::(icode_base::ICode::is_pure)";
2007 val_t
icode___icode_base___IFloatValue___is_pure(val_t p0
){
2008 struct {struct stack_frame_t me
;} fra
;
2011 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2012 fra
.me
.file
= LOCATE_icode___icode_base
;
2014 fra
.me
.meth
= LOCATE_icode___icode_base___IFloatValue___is_pure
;
2015 fra
.me
.has_broke
= 0;
2016 fra
.me
.REG_size
= 1;
2017 fra
.me
.nitni_local_ref_head
= NULL
;
2018 fra
.me
.REG
[0] = NIT_NULL
;
2020 /* icode/icode_base.nit:388 */
2021 REGB0
= TAG_Bool(1);
2024 stack_frame_head
= fra
.me
.prev
;
2027 static const char LOCATE_icode___icode_base___ICharValue___value
[] = "icode_base::ICharValue::value";
2028 val_t
icode___icode_base___ICharValue___value(val_t p0
){
2029 struct {struct stack_frame_t me
;} fra
;
2032 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2033 fra
.me
.file
= LOCATE_icode___icode_base
;
2035 fra
.me
.meth
= LOCATE_icode___icode_base___ICharValue___value
;
2036 fra
.me
.has_broke
= 0;
2037 fra
.me
.REG_size
= 1;
2038 fra
.me
.nitni_local_ref_head
= NULL
;
2039 fra
.me
.REG
[0] = NIT_NULL
;
2041 /* icode/icode_base.nit:394 */
2042 REGB0
= TAG_Bool(ATTR_icode___icode_base___ICharValue____value(fra
.me
.REG
[0])!=NIT_NULL
);
2043 if (UNTAG_Bool(REGB0
)) {
2045 nit_abort("Uninitialized attribute %s", "_value", LOCATE_icode___icode_base
, 394);
2047 fra
.me
.REG
[0] = ATTR_icode___icode_base___ICharValue____value(fra
.me
.REG
[0]);
2048 stack_frame_head
= fra
.me
.prev
;
2049 return fra
.me
.REG
[0];
2051 static const char LOCATE_icode___icode_base___ICharValue___init
[] = "icode_base::ICharValue::init";
2052 void icode___icode_base___ICharValue___init(val_t p0
, val_t p1
, int* init_table
){
2053 int itpos28
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___ICharValue
].i
;
2054 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
2056 if (init_table
[itpos28
]) return;
2057 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2058 fra
.me
.file
= LOCATE_icode___icode_base
;
2060 fra
.me
.meth
= LOCATE_icode___icode_base___ICharValue___init
;
2061 fra
.me
.has_broke
= 0;
2062 fra
.me
.REG_size
= 2;
2063 fra
.me
.nitni_local_ref_head
= NULL
;
2064 fra
.me
.REG
[0] = NIT_NULL
;
2065 fra
.me
.REG
[1] = NIT_NULL
;
2068 /* icode/icode_base.nit:397 */
2069 ATTR_icode___icode_base___ICharValue____value(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
2070 stack_frame_head
= fra
.me
.prev
;
2071 init_table
[itpos28
] = 1;
2074 static const char LOCATE_icode___icode_base___ICharValue___is_pure
[] = "icode_base::ICharValue::(icode_base::ICode::is_pure)";
2075 val_t
icode___icode_base___ICharValue___is_pure(val_t p0
){
2076 struct {struct stack_frame_t me
;} fra
;
2079 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2080 fra
.me
.file
= LOCATE_icode___icode_base
;
2082 fra
.me
.meth
= LOCATE_icode___icode_base___ICharValue___is_pure
;
2083 fra
.me
.has_broke
= 0;
2084 fra
.me
.REG_size
= 1;
2085 fra
.me
.nitni_local_ref_head
= NULL
;
2086 fra
.me
.REG
[0] = NIT_NULL
;
2088 /* icode/icode_base.nit:399 */
2089 REGB0
= TAG_Bool(1);
2092 stack_frame_head
= fra
.me
.prev
;
2095 static const char LOCATE_icode___icode_base___IMove___init
[] = "icode_base::IMove::init";
2096 void icode___icode_base___IMove___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
2097 int itpos29
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___IMove
].i
;
2098 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
2100 if (init_table
[itpos29
]) return;
2101 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2102 fra
.me
.file
= LOCATE_icode___icode_base
;
2104 fra
.me
.meth
= LOCATE_icode___icode_base___IMove___init
;
2105 fra
.me
.has_broke
= 0;
2106 fra
.me
.REG_size
= 4;
2107 fra
.me
.nitni_local_ref_head
= NULL
;
2108 fra
.me
.REG
[0] = NIT_NULL
;
2109 fra
.me
.REG
[1] = NIT_NULL
;
2110 fra
.me
.REG
[2] = NIT_NULL
;
2111 fra
.me
.REG
[3] = NIT_NULL
;
2115 /* icode/icode_base.nit:407 */
2116 fra
.me
.REG
[3] = fra
.me
.REG
[0];
2117 /* icode/icode_base.nit:409 */
2118 CALL_icode___icode_base___ICode1___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2], init_table
);
2119 /* icode/icode_base.nit:410 */
2120 ATTR_icode___icode_base___ICode____result(fra
.me
.REG
[3]) = fra
.me
.REG
[1];
2121 stack_frame_head
= fra
.me
.prev
;
2122 init_table
[itpos29
] = 1;
2125 static const char LOCATE_icode___icode_base___IMove___is_pure
[] = "icode_base::IMove::(icode_base::ICode::is_pure)";
2126 val_t
icode___icode_base___IMove___is_pure(val_t p0
){
2127 struct {struct stack_frame_t me
;} fra
;
2130 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2131 fra
.me
.file
= LOCATE_icode___icode_base
;
2133 fra
.me
.meth
= LOCATE_icode___icode_base___IMove___is_pure
;
2134 fra
.me
.has_broke
= 0;
2135 fra
.me
.REG_size
= 1;
2136 fra
.me
.nitni_local_ref_head
= NULL
;
2137 fra
.me
.REG
[0] = NIT_NULL
;
2139 /* icode/icode_base.nit:413 */
2140 REGB0
= TAG_Bool(1);
2143 stack_frame_head
= fra
.me
.prev
;
2146 static const char LOCATE_icode___icode_base___IAttrRead___property
[] = "icode_base::IAttrRead::property";
2147 val_t
icode___icode_base___IAttrRead___property(val_t p0
){
2148 struct {struct stack_frame_t me
;} fra
;
2151 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2152 fra
.me
.file
= LOCATE_icode___icode_base
;
2154 fra
.me
.meth
= LOCATE_icode___icode_base___IAttrRead___property
;
2155 fra
.me
.has_broke
= 0;
2156 fra
.me
.REG_size
= 1;
2157 fra
.me
.nitni_local_ref_head
= NULL
;
2158 fra
.me
.REG
[0] = NIT_NULL
;
2160 /* icode/icode_base.nit:420 */
2161 REGB0
= TAG_Bool(ATTR_icode___icode_base___IAttrRead____property(fra
.me
.REG
[0])!=NIT_NULL
);
2162 if (UNTAG_Bool(REGB0
)) {
2164 nit_abort("Uninitialized attribute %s", "_property", LOCATE_icode___icode_base
, 420);
2166 fra
.me
.REG
[0] = ATTR_icode___icode_base___IAttrRead____property(fra
.me
.REG
[0]);
2167 stack_frame_head
= fra
.me
.prev
;
2168 return fra
.me
.REG
[0];
2170 static const char LOCATE_icode___icode_base___IAttrRead___init
[] = "icode_base::IAttrRead::init";
2171 void icode___icode_base___IAttrRead___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
2172 int itpos30
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___IAttrRead
].i
;
2173 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
2175 if (init_table
[itpos30
]) return;
2176 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2177 fra
.me
.file
= LOCATE_icode___icode_base
;
2179 fra
.me
.meth
= LOCATE_icode___icode_base___IAttrRead___init
;
2180 fra
.me
.has_broke
= 0;
2181 fra
.me
.REG_size
= 4;
2182 fra
.me
.nitni_local_ref_head
= NULL
;
2183 fra
.me
.REG
[0] = NIT_NULL
;
2184 fra
.me
.REG
[1] = NIT_NULL
;
2185 fra
.me
.REG
[2] = NIT_NULL
;
2186 fra
.me
.REG
[3] = NIT_NULL
;
2190 /* icode/icode_base.nit:423 */
2191 fra
.me
.REG
[3] = fra
.me
.REG
[0];
2192 /* icode/icode_base.nit:425 */
2193 CALL_icode___icode_base___ICode1___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2], init_table
);
2194 /* icode/icode_base.nit:426 */
2195 ATTR_icode___icode_base___IAttrRead____property(fra
.me
.REG
[3]) = fra
.me
.REG
[1];
2196 stack_frame_head
= fra
.me
.prev
;
2197 init_table
[itpos30
] = 1;
2200 static const char LOCATE_icode___icode_base___IAttrRead___is_pure
[] = "icode_base::IAttrRead::(icode_base::ICode::is_pure)";
2201 val_t
icode___icode_base___IAttrRead___is_pure(val_t p0
){
2202 struct {struct stack_frame_t me
;} fra
;
2205 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2206 fra
.me
.file
= LOCATE_icode___icode_base
;
2208 fra
.me
.meth
= LOCATE_icode___icode_base___IAttrRead___is_pure
;
2209 fra
.me
.has_broke
= 0;
2210 fra
.me
.REG_size
= 1;
2211 fra
.me
.nitni_local_ref_head
= NULL
;
2212 fra
.me
.REG
[0] = NIT_NULL
;
2214 /* icode/icode_base.nit:429 */
2215 REGB0
= TAG_Bool(1);
2218 stack_frame_head
= fra
.me
.prev
;
2221 static const char LOCATE_icode___icode_base___IAttrWrite___property
[] = "icode_base::IAttrWrite::property";
2222 val_t
icode___icode_base___IAttrWrite___property(val_t p0
){
2223 struct {struct stack_frame_t me
;} fra
;
2226 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2227 fra
.me
.file
= LOCATE_icode___icode_base
;
2229 fra
.me
.meth
= LOCATE_icode___icode_base___IAttrWrite___property
;
2230 fra
.me
.has_broke
= 0;
2231 fra
.me
.REG_size
= 1;
2232 fra
.me
.nitni_local_ref_head
= NULL
;
2233 fra
.me
.REG
[0] = NIT_NULL
;
2235 /* icode/icode_base.nit:436 */
2236 REGB0
= TAG_Bool(ATTR_icode___icode_base___IAttrWrite____property(fra
.me
.REG
[0])!=NIT_NULL
);
2237 if (UNTAG_Bool(REGB0
)) {
2239 nit_abort("Uninitialized attribute %s", "_property", LOCATE_icode___icode_base
, 436);
2241 fra
.me
.REG
[0] = ATTR_icode___icode_base___IAttrWrite____property(fra
.me
.REG
[0]);
2242 stack_frame_head
= fra
.me
.prev
;
2243 return fra
.me
.REG
[0];
2245 static const char LOCATE_icode___icode_base___IAttrWrite___init
[] = "icode_base::IAttrWrite::init";
2246 void icode___icode_base___IAttrWrite___init(val_t p0
, val_t p1
, val_t p2
, val_t p3
, int* init_table
){
2247 int itpos31
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___IAttrWrite
].i
;
2248 struct {struct stack_frame_t me
; val_t MORE_REG
[4];} fra
;
2250 if (init_table
[itpos31
]) return;
2251 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2252 fra
.me
.file
= LOCATE_icode___icode_base
;
2254 fra
.me
.meth
= LOCATE_icode___icode_base___IAttrWrite___init
;
2255 fra
.me
.has_broke
= 0;
2256 fra
.me
.REG_size
= 5;
2257 fra
.me
.nitni_local_ref_head
= NULL
;
2258 fra
.me
.REG
[0] = NIT_NULL
;
2259 fra
.me
.REG
[1] = NIT_NULL
;
2260 fra
.me
.REG
[2] = NIT_NULL
;
2261 fra
.me
.REG
[3] = NIT_NULL
;
2262 fra
.me
.REG
[4] = NIT_NULL
;
2267 /* icode/icode_base.nit:439 */
2268 fra
.me
.REG
[4] = fra
.me
.REG
[0];
2269 /* icode/icode_base.nit:441 */
2270 CALL_icode___icode_base___ICode2___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2], fra
.me
.REG
[3], init_table
);
2271 /* icode/icode_base.nit:442 */
2272 ATTR_icode___icode_base___IAttrWrite____property(fra
.me
.REG
[4]) = fra
.me
.REG
[1];
2273 stack_frame_head
= fra
.me
.prev
;
2274 init_table
[itpos31
] = 1;
2277 static const char LOCATE_icode___icode_base___IAttrIsset___property
[] = "icode_base::IAttrIsset::property";
2278 val_t
icode___icode_base___IAttrIsset___property(val_t p0
){
2279 struct {struct stack_frame_t me
;} fra
;
2282 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2283 fra
.me
.file
= LOCATE_icode___icode_base
;
2285 fra
.me
.meth
= LOCATE_icode___icode_base___IAttrIsset___property
;
2286 fra
.me
.has_broke
= 0;
2287 fra
.me
.REG_size
= 1;
2288 fra
.me
.nitni_local_ref_head
= NULL
;
2289 fra
.me
.REG
[0] = NIT_NULL
;
2291 /* icode/icode_base.nit:451 */
2292 REGB0
= TAG_Bool(ATTR_icode___icode_base___IAttrIsset____property(fra
.me
.REG
[0])!=NIT_NULL
);
2293 if (UNTAG_Bool(REGB0
)) {
2295 nit_abort("Uninitialized attribute %s", "_property", LOCATE_icode___icode_base
, 451);
2297 fra
.me
.REG
[0] = ATTR_icode___icode_base___IAttrIsset____property(fra
.me
.REG
[0]);
2298 stack_frame_head
= fra
.me
.prev
;
2299 return fra
.me
.REG
[0];
2301 static const char LOCATE_icode___icode_base___IAttrIsset___init
[] = "icode_base::IAttrIsset::init";
2302 void icode___icode_base___IAttrIsset___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
2303 int itpos32
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___IAttrIsset
].i
;
2304 struct {struct stack_frame_t me
; val_t MORE_REG
[3];} fra
;
2306 if (init_table
[itpos32
]) return;
2307 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2308 fra
.me
.file
= LOCATE_icode___icode_base
;
2310 fra
.me
.meth
= LOCATE_icode___icode_base___IAttrIsset___init
;
2311 fra
.me
.has_broke
= 0;
2312 fra
.me
.REG_size
= 4;
2313 fra
.me
.nitni_local_ref_head
= NULL
;
2314 fra
.me
.REG
[0] = NIT_NULL
;
2315 fra
.me
.REG
[1] = NIT_NULL
;
2316 fra
.me
.REG
[2] = NIT_NULL
;
2317 fra
.me
.REG
[3] = NIT_NULL
;
2321 /* icode/icode_base.nit:454 */
2322 fra
.me
.REG
[3] = fra
.me
.REG
[0];
2323 /* icode/icode_base.nit:456 */
2324 CALL_icode___icode_base___ICode1___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[2], init_table
);
2325 /* icode/icode_base.nit:457 */
2326 ATTR_icode___icode_base___IAttrIsset____property(fra
.me
.REG
[3]) = fra
.me
.REG
[1];
2327 stack_frame_head
= fra
.me
.prev
;
2328 init_table
[itpos32
] = 1;
2331 static const char LOCATE_icode___icode_base___IAttrIsset___is_pure
[] = "icode_base::IAttrIsset::(icode_base::ICode::is_pure)";
2332 val_t
icode___icode_base___IAttrIsset___is_pure(val_t p0
){
2333 struct {struct stack_frame_t me
;} fra
;
2336 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2337 fra
.me
.file
= LOCATE_icode___icode_base
;
2339 fra
.me
.meth
= LOCATE_icode___icode_base___IAttrIsset___is_pure
;
2340 fra
.me
.has_broke
= 0;
2341 fra
.me
.REG_size
= 1;
2342 fra
.me
.nitni_local_ref_head
= NULL
;
2343 fra
.me
.REG
[0] = NIT_NULL
;
2345 /* icode/icode_base.nit:460 */
2346 REGB0
= TAG_Bool(1);
2349 stack_frame_head
= fra
.me
.prev
;
2352 static const char LOCATE_icode___icode_base___ITypeCheck___stype
[] = "icode_base::ITypeCheck::stype";
2353 val_t
icode___icode_base___ITypeCheck___stype(val_t p0
){
2354 struct {struct stack_frame_t me
;} fra
;
2357 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2358 fra
.me
.file
= LOCATE_icode___icode_base
;
2360 fra
.me
.meth
= LOCATE_icode___icode_base___ITypeCheck___stype
;
2361 fra
.me
.has_broke
= 0;
2362 fra
.me
.REG_size
= 1;
2363 fra
.me
.nitni_local_ref_head
= NULL
;
2364 fra
.me
.REG
[0] = NIT_NULL
;
2366 /* icode/icode_base.nit:468 */
2367 REGB0
= TAG_Bool(ATTR_icode___icode_base___ITypeCheck____stype(fra
.me
.REG
[0])!=NIT_NULL
);
2368 if (UNTAG_Bool(REGB0
)) {
2370 nit_abort("Uninitialized attribute %s", "_stype", LOCATE_icode___icode_base
, 468);
2372 fra
.me
.REG
[0] = ATTR_icode___icode_base___ITypeCheck____stype(fra
.me
.REG
[0]);
2373 stack_frame_head
= fra
.me
.prev
;
2374 return fra
.me
.REG
[0];
2376 static const char LOCATE_icode___icode_base___ITypeCheck___init
[] = "icode_base::ITypeCheck::init";
2377 void icode___icode_base___ITypeCheck___init(val_t p0
, val_t p1
, val_t p2
, val_t p3
, int* init_table
){
2378 int itpos33
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___ITypeCheck
].i
;
2379 struct {struct stack_frame_t me
; val_t MORE_REG
[4];} fra
;
2381 if (init_table
[itpos33
]) return;
2382 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2383 fra
.me
.file
= LOCATE_icode___icode_base
;
2385 fra
.me
.meth
= LOCATE_icode___icode_base___ITypeCheck___init
;
2386 fra
.me
.has_broke
= 0;
2387 fra
.me
.REG_size
= 5;
2388 fra
.me
.nitni_local_ref_head
= NULL
;
2389 fra
.me
.REG
[0] = NIT_NULL
;
2390 fra
.me
.REG
[1] = NIT_NULL
;
2391 fra
.me
.REG
[2] = NIT_NULL
;
2392 fra
.me
.REG
[3] = NIT_NULL
;
2393 fra
.me
.REG
[4] = NIT_NULL
;
2398 /* icode/icode_base.nit:471 */
2399 fra
.me
.REG
[4] = fra
.me
.REG
[0];
2400 /* icode/icode_base.nit:473 */
2401 CALL_icode___icode_base___ICode2___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1], fra
.me
.REG
[2], init_table
);
2402 /* icode/icode_base.nit:474 */
2403 ATTR_icode___icode_base___ITypeCheck____stype(fra
.me
.REG
[4]) = fra
.me
.REG
[3];
2404 stack_frame_head
= fra
.me
.prev
;
2405 init_table
[itpos33
] = 1;
2408 static const char LOCATE_icode___icode_base___ITypeCheck___is_pure
[] = "icode_base::ITypeCheck::(icode_base::ICode::is_pure)";
2409 val_t
icode___icode_base___ITypeCheck___is_pure(val_t p0
){
2410 struct {struct stack_frame_t me
;} fra
;
2413 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2414 fra
.me
.file
= LOCATE_icode___icode_base
;
2416 fra
.me
.meth
= LOCATE_icode___icode_base___ITypeCheck___is_pure
;
2417 fra
.me
.has_broke
= 0;
2418 fra
.me
.REG_size
= 1;
2419 fra
.me
.nitni_local_ref_head
= NULL
;
2420 fra
.me
.REG
[0] = NIT_NULL
;
2422 /* icode/icode_base.nit:477 */
2423 REGB0
= TAG_Bool(1);
2426 stack_frame_head
= fra
.me
.prev
;
2429 static const char LOCATE_icode___icode_base___IIs___init
[] = "icode_base::IIs::init";
2430 void icode___icode_base___IIs___init(val_t p0
, val_t p1
, val_t p2
, int* init_table
){
2431 int itpos34
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___IIs
].i
;
2432 struct {struct stack_frame_t me
; val_t MORE_REG
[2];} fra
;
2434 if (init_table
[itpos34
]) return;
2435 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2436 fra
.me
.file
= LOCATE_icode___icode_base
;
2438 fra
.me
.meth
= LOCATE_icode___icode_base___IIs___init
;
2439 fra
.me
.has_broke
= 0;
2440 fra
.me
.REG_size
= 3;
2441 fra
.me
.nitni_local_ref_head
= NULL
;
2442 fra
.me
.REG
[0] = NIT_NULL
;
2443 fra
.me
.REG
[1] = NIT_NULL
;
2444 fra
.me
.REG
[2] = NIT_NULL
;
2448 /* icode/icode_base.nit:486 */
2449 CALL_icode___icode_base___ICode2___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1], fra
.me
.REG
[2], init_table
);
2450 stack_frame_head
= fra
.me
.prev
;
2451 init_table
[itpos34
] = 1;
2454 static const char LOCATE_icode___icode_base___IIs___is_pure
[] = "icode_base::IIs::(icode_base::ICode::is_pure)";
2455 val_t
icode___icode_base___IIs___is_pure(val_t p0
){
2456 struct {struct stack_frame_t me
;} fra
;
2459 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2460 fra
.me
.file
= LOCATE_icode___icode_base
;
2462 fra
.me
.meth
= LOCATE_icode___icode_base___IIs___is_pure
;
2463 fra
.me
.has_broke
= 0;
2464 fra
.me
.REG_size
= 1;
2465 fra
.me
.nitni_local_ref_head
= NULL
;
2466 fra
.me
.REG
[0] = NIT_NULL
;
2468 /* icode/icode_base.nit:489 */
2469 REGB0
= TAG_Bool(1);
2472 stack_frame_head
= fra
.me
.prev
;
2475 static const char LOCATE_icode___icode_base___INot___init
[] = "icode_base::INot::init";
2476 void icode___icode_base___INot___init(val_t p0
, val_t p1
, int* init_table
){
2477 int itpos35
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___INot
].i
;
2478 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
2480 if (init_table
[itpos35
]) return;
2481 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2482 fra
.me
.file
= LOCATE_icode___icode_base
;
2484 fra
.me
.meth
= LOCATE_icode___icode_base___INot___init
;
2485 fra
.me
.has_broke
= 0;
2486 fra
.me
.REG_size
= 2;
2487 fra
.me
.nitni_local_ref_head
= NULL
;
2488 fra
.me
.REG
[0] = NIT_NULL
;
2489 fra
.me
.REG
[1] = NIT_NULL
;
2492 /* icode/icode_base.nit:498 */
2493 CALL_icode___icode_base___ICode1___init(fra
.me
.REG
[0])(fra
.me
.REG
[0], fra
.me
.REG
[1], init_table
);
2494 stack_frame_head
= fra
.me
.prev
;
2495 init_table
[itpos35
] = 1;
2498 static const char LOCATE_icode___icode_base___INot___is_pure
[] = "icode_base::INot::(icode_base::ICode::is_pure)";
2499 val_t
icode___icode_base___INot___is_pure(val_t p0
){
2500 struct {struct stack_frame_t me
;} fra
;
2503 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2504 fra
.me
.file
= LOCATE_icode___icode_base
;
2506 fra
.me
.meth
= LOCATE_icode___icode_base___INot___is_pure
;
2507 fra
.me
.has_broke
= 0;
2508 fra
.me
.REG_size
= 1;
2509 fra
.me
.nitni_local_ref_head
= NULL
;
2510 fra
.me
.REG
[0] = NIT_NULL
;
2512 /* icode/icode_base.nit:501 */
2513 REGB0
= TAG_Bool(1);
2516 stack_frame_head
= fra
.me
.prev
;
2519 static const char LOCATE_icode___icode_base___IOnce___body
[] = "icode_base::IOnce::body";
2520 val_t
icode___icode_base___IOnce___body(val_t p0
){
2521 struct {struct stack_frame_t me
;} fra
;
2524 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2525 fra
.me
.file
= LOCATE_icode___icode_base
;
2527 fra
.me
.meth
= LOCATE_icode___icode_base___IOnce___body
;
2528 fra
.me
.has_broke
= 0;
2529 fra
.me
.REG_size
= 1;
2530 fra
.me
.nitni_local_ref_head
= NULL
;
2531 fra
.me
.REG
[0] = NIT_NULL
;
2533 /* icode/icode_base.nit:508 */
2534 REGB0
= TAG_Bool(ATTR_icode___icode_base___IOnce____body(fra
.me
.REG
[0])!=NIT_NULL
);
2535 if (UNTAG_Bool(REGB0
)) {
2537 nit_abort("Uninitialized attribute %s", "_body", LOCATE_icode___icode_base
, 508);
2539 fra
.me
.REG
[0] = ATTR_icode___icode_base___IOnce____body(fra
.me
.REG
[0]);
2540 stack_frame_head
= fra
.me
.prev
;
2541 return fra
.me
.REG
[0];
2543 static const char LOCATE_icode___icode_base___IOnce___init
[] = "icode_base::IOnce::init";
2544 void icode___icode_base___IOnce___init(val_t p0
, int* init_table
){
2545 int itpos36
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___IOnce
].i
;
2546 struct {struct stack_frame_t me
;} fra
;
2548 if (init_table
[itpos36
]) return;
2549 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2550 fra
.me
.file
= LOCATE_icode___icode_base
;
2552 fra
.me
.meth
= LOCATE_icode___icode_base___IOnce___init
;
2553 fra
.me
.has_broke
= 0;
2554 fra
.me
.REG_size
= 1;
2555 fra
.me
.nitni_local_ref_head
= NULL
;
2556 fra
.me
.REG
[0] = NIT_NULL
;
2558 stack_frame_head
= fra
.me
.prev
;
2559 init_table
[itpos36
] = 1;
2562 static const char LOCATE_icode___icode_base___IHasClos___closure_decl
[] = "icode_base::IHasClos::closure_decl";
2563 val_t
icode___icode_base___IHasClos___closure_decl(val_t p0
){
2564 struct {struct stack_frame_t me
;} fra
;
2567 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2568 fra
.me
.file
= LOCATE_icode___icode_base
;
2570 fra
.me
.meth
= LOCATE_icode___icode_base___IHasClos___closure_decl
;
2571 fra
.me
.has_broke
= 0;
2572 fra
.me
.REG_size
= 1;
2573 fra
.me
.nitni_local_ref_head
= NULL
;
2574 fra
.me
.REG
[0] = NIT_NULL
;
2576 /* icode/icode_base.nit:515 */
2577 REGB0
= TAG_Bool(ATTR_icode___icode_base___IHasClos____closure_decl(fra
.me
.REG
[0])!=NIT_NULL
);
2578 if (UNTAG_Bool(REGB0
)) {
2580 nit_abort("Uninitialized attribute %s", "_closure_decl", LOCATE_icode___icode_base
, 515);
2582 fra
.me
.REG
[0] = ATTR_icode___icode_base___IHasClos____closure_decl(fra
.me
.REG
[0]);
2583 stack_frame_head
= fra
.me
.prev
;
2584 return fra
.me
.REG
[0];
2586 static const char LOCATE_icode___icode_base___IHasClos___init
[] = "icode_base::IHasClos::init";
2587 void icode___icode_base___IHasClos___init(val_t p0
, val_t p1
, int* init_table
){
2588 int itpos37
= VAL2OBJ(p0
)->vft
[INIT_TABLE_POS_icode___icode_base___IHasClos
].i
;
2589 struct {struct stack_frame_t me
; val_t MORE_REG
[1];} fra
;
2591 if (init_table
[itpos37
]) return;
2592 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2593 fra
.me
.file
= LOCATE_icode___icode_base
;
2595 fra
.me
.meth
= LOCATE_icode___icode_base___IHasClos___init
;
2596 fra
.me
.has_broke
= 0;
2597 fra
.me
.REG_size
= 2;
2598 fra
.me
.nitni_local_ref_head
= NULL
;
2599 fra
.me
.REG
[0] = NIT_NULL
;
2600 fra
.me
.REG
[1] = NIT_NULL
;
2603 /* icode/icode_base.nit:520 */
2604 ATTR_icode___icode_base___IHasClos____closure_decl(fra
.me
.REG
[0]) = fra
.me
.REG
[1];
2605 stack_frame_head
= fra
.me
.prev
;
2606 init_table
[itpos37
] = 1;
2609 static const char LOCATE_icode___icode_base___IHasClos___is_pure
[] = "icode_base::IHasClos::(icode_base::ICode::is_pure)";
2610 val_t
icode___icode_base___IHasClos___is_pure(val_t p0
){
2611 struct {struct stack_frame_t me
;} fra
;
2614 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2615 fra
.me
.file
= LOCATE_icode___icode_base
;
2617 fra
.me
.meth
= LOCATE_icode___icode_base___IHasClos___is_pure
;
2618 fra
.me
.has_broke
= 0;
2619 fra
.me
.REG_size
= 1;
2620 fra
.me
.nitni_local_ref_head
= NULL
;
2621 fra
.me
.REG
[0] = NIT_NULL
;
2623 /* icode/icode_base.nit:523 */
2624 REGB0
= TAG_Bool(1);
2627 stack_frame_head
= fra
.me
.prev
;
2630 static const char LOCATE_icode___icode_base___MMAttribute___iroutine
[] = "icode_base::MMAttribute::iroutine";
2631 val_t
icode___icode_base___MMAttribute___iroutine(val_t p0
){
2632 struct {struct stack_frame_t me
;} fra
;
2634 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2635 fra
.me
.file
= LOCATE_icode___icode_base
;
2637 fra
.me
.meth
= LOCATE_icode___icode_base___MMAttribute___iroutine
;
2638 fra
.me
.has_broke
= 0;
2639 fra
.me
.REG_size
= 0;
2640 fra
.me
.nitni_local_ref_head
= NULL
;
2641 /* icode/icode_base.nit:529 */
2642 nit_abort("Deferred method called", NULL
, LOCATE_icode___icode_base
, 529);
2643 stack_frame_head
= fra
.me
.prev
;
2646 static const char LOCATE_icode___icode_base___MMMethod___iroutine
[] = "icode_base::MMMethod::iroutine";
2647 val_t
icode___icode_base___MMMethod___iroutine(val_t p0
){
2648 struct {struct stack_frame_t me
;} fra
;
2650 fra
.me
.prev
= stack_frame_head
; stack_frame_head
= &fra
.me
;
2651 fra
.me
.file
= LOCATE_icode___icode_base
;
2653 fra
.me
.meth
= LOCATE_icode___icode_base___MMMethod___iroutine
;
2654 fra
.me
.has_broke
= 0;
2655 fra
.me
.REG_size
= 0;
2656 fra
.me
.nitni_local_ref_head
= NULL
;
2657 /* icode/icode_base.nit:535 */
2658 nit_abort("Deferred method called", NULL
, LOCATE_icode___icode_base
, 535);
2659 stack_frame_head
= fra
.me
.prev
;