1 /* This C file is generated by NIT to compile module compiling_methods. */
2 #include "compiling_methods._sep.h"
3 void compiling_methods___CompilerVisitor___compile_stmt(val_t self
, val_t param0
) {
4 struct trace_t trace
= {NULL
, NULL
, 24, LOCATE_compiling_methods___CompilerVisitor___compile_stmt
};
8 trace
.prev
= tracehead
; tracehead
= &trace
;
9 trace
.file
= LOCATE_compiling_methods
;
11 ((compiling_methods___PExpr___prepare_compile_stmt_t
)CALL( variable0
/*n*/,COLOR_compiling_methods___PExpr___prepare_compile_stmt
))( variable0
/*n*/, self
) /*PExpr::prepare_compile_stmt*/;
12 variable2
= ATTR_compiling_methods___CompilerVisitor____variable_index( self
) /*CompilerVisitor::_variable_index*/;
13 variable1
= variable2
;
14 ((compiling_methods___PExpr___compile_stmt_t
)CALL( variable0
/*n*/,COLOR_compiling_methods___PExpr___compile_stmt
))( variable0
/*n*/, self
) /*PExpr::compile_stmt*/;
15 ATTR_compiling_methods___CompilerVisitor____variable_index( self
) /*CompilerVisitor::_variable_index*/ = variable1
/*i*/;
16 tracehead
= trace
.prev
;
19 val_t
compiling_methods___CompilerVisitor___compile_expr(val_t self
, val_t param0
) {
20 struct trace_t trace
= {NULL
, NULL
, 33, LOCATE_compiling_methods___CompilerVisitor___compile_expr
};
26 trace
.prev
= tracehead
; tracehead
= &trace
;
27 trace
.file
= LOCATE_compiling_methods
;
29 variable2
= ATTR_compiling_methods___CompilerVisitor____variable_index( self
) /*CompilerVisitor::_variable_index*/;
30 variable1
= variable2
;
31 variable3
= ((compiling_methods___PExpr___compile_expr_t
)CALL( variable0
/*n*/,COLOR_compiling_methods___PExpr___compile_expr
))( variable0
/*n*/, self
) /*PExpr::compile_expr*/;
32 variable2
= variable3
;
33 ATTR_compiling_methods___CompilerVisitor____variable_index( self
) /*CompilerVisitor::_variable_index*/ = variable1
/*i*/;
34 variable3
= ((string___String_____bra_t
)CALL( variable2
/*s*/,COLOR_abstract_collection___Map_____bra
))( variable2
/*s*/, TAG_Int(0)) /*String::[]*/;
35 variable3
= TAG_Bool((variable3
)==( TAG_Char(' ')));
36 if (UNTAG_Bool(variable3
)) { /*if*/
37 variable1
= variable2
/*s*/;
40 variable3
= ATTR_compiling_methods___CompilerVisitor____variable_index( self
) /*CompilerVisitor::_variable_index*/;
41 variable3
= TAG_Int(UNTAG_Int(variable3
)-UNTAG_Int( TAG_Int(1)));
42 variable3
= ((compiling_methods___CompilerVisitor___variable_t
)CALL( self
,COLOR_compiling_methods___CompilerVisitor___variable
))( self
, variable3
) /*CompilerVisitor::variable*/;
43 variable3
= TAG_Bool(( variable2
/*s*/ == variable3
) || (( variable2
/*s*/ != NIT_NULL
) && UNTAG_Bool(((string___String_____eqeq_t
)CALL( variable2
/*s*/,COLOR_kernel___Object_____eqeq
))( variable2
/*s*/, variable3
) /*String::==*/)));
44 if (UNTAG_Bool(variable3
)) { /*if*/
45 variable1
= variable2
/*s*/;
48 variable4
= ((compiling_methods___CompilerVisitor___get_var_t
)CALL( self
,COLOR_compiling_methods___CompilerVisitor___get_var
))( self
) /*CompilerVisitor::get_var*/;
49 variable3
= variable4
;
50 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( self
,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( self
, variable3
/*v*/, variable2
/*s*/) /*CompilerVisitor::add_assignment*/;
51 variable1
= variable3
/*v*/;
53 return_label1
: while(false);
54 tracehead
= trace
.prev
;
57 val_t
compiling_methods___CompilerVisitor___ensure_var(val_t self
, val_t param0
) {
58 struct trace_t trace
= {NULL
, NULL
, 50, LOCATE_compiling_methods___CompilerVisitor___ensure_var
};
62 trace
.prev
= tracehead
; tracehead
= &trace
;
63 trace
.file
= LOCATE_compiling_methods
;
65 variable1
= ((string___String___substring_t
)CALL( variable0
/*s*/,COLOR_string___String___substring
))( variable0
/*s*/, TAG_Int(0), TAG_Int(3)) /*String::substring*/;
66 variable2
= NEW_string___String___with_native(BOX_NativeString("variable"), TAG_Int(8)); /*new String*/
67 variable1
= TAG_Bool((variable1
== variable2
) || ((variable1
!= NIT_NULL
) && UNTAG_Bool(((string___String_____eqeq_t
)CALL(variable1
,COLOR_kernel___Object_____eqeq
))(variable1
, variable2
) /*String::==*/)));
68 if (UNTAG_Bool(variable1
)) { /*if*/
69 variable1
= variable0
/*s*/;
72 variable2
= ((compiling_methods___CompilerVisitor___get_var_t
)CALL( self
,COLOR_compiling_methods___CompilerVisitor___get_var
))( self
) /*CompilerVisitor::get_var*/;
73 variable1
= variable2
;
74 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( self
,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( self
, variable1
/*v*/, variable0
/*s*/) /*CompilerVisitor::add_assignment*/;
75 variable1
= variable1
/*v*/;
77 return_label2
: while(false);
78 tracehead
= trace
.prev
;
81 void compiling_methods___CompilerVisitor___add_assignment(val_t self
, val_t param0
, val_t param1
) {
82 struct trace_t trace
= {NULL
, NULL
, 61, LOCATE_compiling_methods___CompilerVisitor___add_assignment
};
94 trace
.prev
= tracehead
; tracehead
= &trace
;
95 trace
.file
= LOCATE_compiling_methods
;
98 variable2
= TAG_Bool(!UNTAG_Bool(TAG_Bool(( variable0
/*v*/ == variable1
/*s*/) || (( variable0
/*v*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable0
/*v*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable0
/*v*/, variable1
/*s*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable0
/*v*/,COLOR_kernel___Object_____eqeq
))( variable0
/*v*/, variable1
/*s*/) /*Object::==*/)))))));
99 if (UNTAG_Bool(variable2
)) { /*if*/
100 variable2
= NEW_string___String___init(); /*new String*/
101 variable3
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
102 variable4
= variable3
;
103 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable4
) /*String::append*/;
104 variable5
= variable0
/*v*/;
105 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable5
) /*String::append*/;
106 variable6
= NEW_string___String___with_native(BOX_NativeString(" = "), TAG_Int(3)); /*new String*/
107 variable7
= variable6
;
108 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable7
) /*String::append*/;
109 variable8
= variable1
/*s*/;
110 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable8
) /*String::append*/;
111 variable9
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
112 variable10
= variable9
;
113 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable10
) /*String::append*/;
114 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( self
,COLOR_compiling_base___CompilerVisitor___add_instr
))( self
, variable2
) /*CompilerVisitor::add_instr*/;
116 tracehead
= trace
.prev
;
119 val_t
compiling_methods___CompilerVisitor___variable(val_t self
, val_t param0
) {
120 struct trace_t trace
= {NULL
, NULL
, 69, LOCATE_compiling_methods___CompilerVisitor___variable
};
128 trace
.prev
= tracehead
; tracehead
= &trace
;
129 trace
.file
= LOCATE_compiling_methods
;
131 variable1
= NEW_string___String___init(); /*new String*/
132 variable2
= NEW_string___String___with_native(BOX_NativeString("variable"), TAG_Int(8)); /*new String*/
133 variable3
= variable2
;
134 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable3
) /*String::append*/;
135 variable4
= variable0
/*i*/;
136 variable4
= ((string___String___to_s_t
)CALL(variable4
,COLOR_string___Object___to_s
))(variable4
) /*String::to_s*/;
137 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable4
) /*String::append*/;
138 variable5
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
139 variable6
= variable5
;
140 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable6
) /*String::append*/;
142 return_label4
: while(false);
143 tracehead
= trace
.prev
;
146 val_t
compiling_methods___CompilerVisitor___get_var(val_t self
) {
147 struct trace_t trace
= {NULL
, NULL
, 81, LOCATE_compiling_methods___CompilerVisitor___get_var
};
155 trace
.prev
= tracehead
; tracehead
= &trace
;
156 trace
.file
= LOCATE_compiling_methods
;
157 variable1
= ATTR_compiling_methods___CompilerVisitor____variable_index( self
) /*CompilerVisitor::_variable_index*/;
158 variable1
= ((compiling_methods___CompilerVisitor___variable_t
)CALL( self
,COLOR_compiling_methods___CompilerVisitor___variable
))( self
, variable1
) /*CompilerVisitor::variable*/;
159 variable0
= variable1
;
160 variable1
= ATTR_compiling_methods___CompilerVisitor____variable_index( self
) /*CompilerVisitor::_variable_index*/;
161 variable1
= TAG_Int(UNTAG_Int(variable1
)+UNTAG_Int( TAG_Int(1)));
162 ATTR_compiling_methods___CompilerVisitor____variable_index( self
) /*CompilerVisitor::_variable_index*/ = variable1
;
163 variable1
= ATTR_compiling_methods___CompilerVisitor____variable_index( self
) /*CompilerVisitor::_variable_index*/;
164 variable2
= ATTR_compiling_methods___CompilerVisitor____variable_index_max( self
) /*CompilerVisitor::_variable_index_max*/;
165 variable1
= TAG_Bool(UNTAG_Int(variable1
)>UNTAG_Int(variable2
));
166 if (UNTAG_Bool(variable1
)) { /*if*/
167 variable1
= NEW_string___String___init(); /*new String*/
168 variable2
= NEW_string___String___with_native(BOX_NativeString("val_t "), TAG_Int(6)); /*new String*/
169 variable3
= variable2
;
170 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable3
) /*String::append*/;
171 variable4
= variable0
/*v*/;
172 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable4
) /*String::append*/;
173 variable5
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
174 variable6
= variable5
;
175 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable6
) /*String::append*/;
176 ((compiling_base___CompilerVisitor___add_decl_t
)CALL( self
,COLOR_compiling_base___CompilerVisitor___add_decl
))( self
, variable1
) /*CompilerVisitor::add_decl*/;
177 variable1
= ATTR_compiling_methods___CompilerVisitor____variable_index( self
) /*CompilerVisitor::_variable_index*/;
178 ATTR_compiling_methods___CompilerVisitor____variable_index_max( self
) /*CompilerVisitor::_variable_index_max*/ = variable1
;
180 variable0
= variable0
/*v*/;
182 return_label5
: while(false);
183 tracehead
= trace
.prev
;
186 void compiling_methods___CompilerVisitor___free_var(val_t self
, val_t param0
) {
187 struct trace_t trace
= {NULL
, NULL
, 93, LOCATE_compiling_methods___CompilerVisitor___free_var
};
190 trace
.prev
= tracehead
; tracehead
= &trace
;
191 trace
.file
= LOCATE_compiling_methods
;
193 variable1
= ATTR_compiling_methods___CompilerVisitor____variable_index( self
) /*CompilerVisitor::_variable_index*/;
194 variable1
= TAG_Int(UNTAG_Int(variable1
)-UNTAG_Int( TAG_Int(1)));
195 variable1
= ((compiling_methods___CompilerVisitor___variable_t
)CALL( self
,COLOR_compiling_methods___CompilerVisitor___variable
))( self
, variable1
) /*CompilerVisitor::variable*/;
196 variable1
= TAG_Bool(( variable0
/*v*/ == variable1
) || (( variable0
/*v*/ != NIT_NULL
) && UNTAG_Bool(((string___String_____eqeq_t
)CALL( variable0
/*v*/,COLOR_kernel___Object_____eqeq
))( variable0
/*v*/, variable1
) /*String::==*/)));
197 if (UNTAG_Bool(variable1
)) { /*if*/
198 variable1
= ATTR_compiling_methods___CompilerVisitor____variable_index( self
) /*CompilerVisitor::_variable_index*/;
199 variable1
= TAG_Int(UNTAG_Int(variable1
)-UNTAG_Int( TAG_Int(1)));
200 ATTR_compiling_methods___CompilerVisitor____variable_index( self
) /*CompilerVisitor::_variable_index*/ = variable1
;
202 tracehead
= trace
.prev
;
205 void compiling_methods___CompilerVisitor___clear(val_t self
) {
206 struct trace_t trace
= {NULL
, NULL
, 102, LOCATE_compiling_methods___CompilerVisitor___clear
};
207 trace
.prev
= tracehead
; tracehead
= &trace
;
208 trace
.file
= LOCATE_compiling_methods
;
209 ATTR_compiling_methods___CompilerVisitor____has_return( self
) /*CompilerVisitor::_has_return*/ = TAG_Bool(false);
210 ((compiling_base___CompilerVisitor___indent_level__eq_t
)CALL( self
,COLOR_compiling_base___CompilerVisitor___indent_level__eq
))( self
, TAG_Int(0)) /*CompilerVisitor::indent_level=*/;
211 ATTR_compiling_methods___CompilerVisitor____variable_index( self
) /*CompilerVisitor::_variable_index*/ = TAG_Int(0);
212 ATTR_compiling_methods___CompilerVisitor____variable_index_max( self
) /*CompilerVisitor::_variable_index_max*/ = TAG_Int(0);
213 tracehead
= trace
.prev
;
216 val_t
compiling_methods___CompilerVisitor___varnames(val_t self
) {
217 struct trace_t trace
= {NULL
, NULL
, 111, LOCATE_compiling_methods___CompilerVisitor___varnames
};
218 trace
.prev
= tracehead
; tracehead
= &trace
;
219 trace
.file
= LOCATE_compiling_methods
;
220 tracehead
= trace
.prev
;
221 return ATTR_compiling_methods___CompilerVisitor____varnames( self
) /*CompilerVisitor::_varnames*/;
223 val_t
compiling_methods___CompilerVisitor___has_return(val_t self
) {
224 struct trace_t trace
= {NULL
, NULL
, 114, LOCATE_compiling_methods___CompilerVisitor___has_return
};
225 trace
.prev
= tracehead
; tracehead
= &trace
;
226 trace
.file
= LOCATE_compiling_methods
;
227 tracehead
= trace
.prev
;
228 return ATTR_compiling_methods___CompilerVisitor____has_return( self
) /*CompilerVisitor::_has_return*/;
230 void compiling_methods___CompilerVisitor___has_return__eq(val_t self
, val_t param0
) {
231 struct trace_t trace
= {NULL
, NULL
, 114, LOCATE_compiling_methods___CompilerVisitor___has_return__eq
};
232 trace
.prev
= tracehead
; tracehead
= &trace
;
233 trace
.file
= LOCATE_compiling_methods
;
234 ATTR_compiling_methods___CompilerVisitor____has_return( self
) /*CompilerVisitor::_has_return*/ = param0
;
235 tracehead
= trace
.prev
;
238 val_t
compiling_methods___CompilerVisitor___method_params(val_t self
) {
239 struct trace_t trace
= {NULL
, NULL
, 117, LOCATE_compiling_methods___CompilerVisitor___method_params
};
240 trace
.prev
= tracehead
; tracehead
= &trace
;
241 trace
.file
= LOCATE_compiling_methods
;
242 tracehead
= trace
.prev
;
243 return ATTR_compiling_methods___CompilerVisitor____method_params( self
) /*CompilerVisitor::_method_params*/;
245 void compiling_methods___CompilerVisitor___method_params__eq(val_t self
, val_t param0
) {
246 struct trace_t trace
= {NULL
, NULL
, 117, LOCATE_compiling_methods___CompilerVisitor___method_params__eq
};
247 trace
.prev
= tracehead
; tracehead
= &trace
;
248 trace
.file
= LOCATE_compiling_methods
;
249 ATTR_compiling_methods___CompilerVisitor____method_params( self
) /*CompilerVisitor::_method_params*/ = param0
;
250 tracehead
= trace
.prev
;
253 val_t
compiling_methods___CompilerVisitor___method(val_t self
) {
254 struct trace_t trace
= {NULL
, NULL
, 120, LOCATE_compiling_methods___CompilerVisitor___method
};
255 trace
.prev
= tracehead
; tracehead
= &trace
;
256 trace
.file
= LOCATE_compiling_methods
;
257 tracehead
= trace
.prev
;
258 return ATTR_compiling_methods___CompilerVisitor____method( self
) /*CompilerVisitor::_method*/;
260 void compiling_methods___CompilerVisitor___method__eq(val_t self
, val_t param0
) {
261 struct trace_t trace
= {NULL
, NULL
, 120, LOCATE_compiling_methods___CompilerVisitor___method__eq
};
262 trace
.prev
= tracehead
; tracehead
= &trace
;
263 trace
.file
= LOCATE_compiling_methods
;
264 ATTR_compiling_methods___CompilerVisitor____method( self
) /*CompilerVisitor::_method*/ = param0
;
265 tracehead
= trace
.prev
;
268 val_t
compiling_methods___CompilerVisitor___return_label(val_t self
) {
269 struct trace_t trace
= {NULL
, NULL
, 123, LOCATE_compiling_methods___CompilerVisitor___return_label
};
270 trace
.prev
= tracehead
; tracehead
= &trace
;
271 trace
.file
= LOCATE_compiling_methods
;
272 tracehead
= trace
.prev
;
273 return ATTR_compiling_methods___CompilerVisitor____return_label( self
) /*CompilerVisitor::_return_label*/;
275 void compiling_methods___CompilerVisitor___return_label__eq(val_t self
, val_t param0
) {
276 struct trace_t trace
= {NULL
, NULL
, 123, LOCATE_compiling_methods___CompilerVisitor___return_label__eq
};
277 trace
.prev
= tracehead
; tracehead
= &trace
;
278 trace
.file
= LOCATE_compiling_methods
;
279 ATTR_compiling_methods___CompilerVisitor____return_label( self
) /*CompilerVisitor::_return_label*/ = param0
;
280 tracehead
= trace
.prev
;
283 val_t
compiling_methods___CompilerVisitor___break_label(val_t self
) {
284 struct trace_t trace
= {NULL
, NULL
, 126, LOCATE_compiling_methods___CompilerVisitor___break_label
};
285 trace
.prev
= tracehead
; tracehead
= &trace
;
286 trace
.file
= LOCATE_compiling_methods
;
287 tracehead
= trace
.prev
;
288 return ATTR_compiling_methods___CompilerVisitor____break_label( self
) /*CompilerVisitor::_break_label*/;
290 void compiling_methods___CompilerVisitor___break_label__eq(val_t self
, val_t param0
) {
291 struct trace_t trace
= {NULL
, NULL
, 126, LOCATE_compiling_methods___CompilerVisitor___break_label__eq
};
292 trace
.prev
= tracehead
; tracehead
= &trace
;
293 trace
.file
= LOCATE_compiling_methods
;
294 ATTR_compiling_methods___CompilerVisitor____break_label( self
) /*CompilerVisitor::_break_label*/ = param0
;
295 tracehead
= trace
.prev
;
298 val_t
compiling_methods___CompilerVisitor___continue_label(val_t self
) {
299 struct trace_t trace
= {NULL
, NULL
, 129, LOCATE_compiling_methods___CompilerVisitor___continue_label
};
300 trace
.prev
= tracehead
; tracehead
= &trace
;
301 trace
.file
= LOCATE_compiling_methods
;
302 tracehead
= trace
.prev
;
303 return ATTR_compiling_methods___CompilerVisitor____continue_label( self
) /*CompilerVisitor::_continue_label*/;
305 void compiling_methods___CompilerVisitor___continue_label__eq(val_t self
, val_t param0
) {
306 struct trace_t trace
= {NULL
, NULL
, 129, LOCATE_compiling_methods___CompilerVisitor___continue_label__eq
};
307 trace
.prev
= tracehead
; tracehead
= &trace
;
308 trace
.file
= LOCATE_compiling_methods
;
309 ATTR_compiling_methods___CompilerVisitor____continue_label( self
) /*CompilerVisitor::_continue_label*/ = param0
;
310 tracehead
= trace
.prev
;
313 val_t
compiling_methods___CompilerVisitor___return_value(val_t self
) {
314 struct trace_t trace
= {NULL
, NULL
, 132, LOCATE_compiling_methods___CompilerVisitor___return_value
};
315 trace
.prev
= tracehead
; tracehead
= &trace
;
316 trace
.file
= LOCATE_compiling_methods
;
317 tracehead
= trace
.prev
;
318 return ATTR_compiling_methods___CompilerVisitor____return_value( self
) /*CompilerVisitor::_return_value*/;
320 void compiling_methods___CompilerVisitor___return_value__eq(val_t self
, val_t param0
) {
321 struct trace_t trace
= {NULL
, NULL
, 132, LOCATE_compiling_methods___CompilerVisitor___return_value__eq
};
322 trace
.prev
= tracehead
; tracehead
= &trace
;
323 trace
.file
= LOCATE_compiling_methods
;
324 ATTR_compiling_methods___CompilerVisitor____return_value( self
) /*CompilerVisitor::_return_value*/ = param0
;
325 tracehead
= trace
.prev
;
328 val_t
compiling_methods___CompilerVisitor___printf_locate_error(val_t self
, val_t param0
) {
329 struct trace_t trace
= {NULL
, NULL
, 135, LOCATE_compiling_methods___CompilerVisitor___printf_locate_error
};
343 trace
.prev
= tracehead
; tracehead
= &trace
;
344 trace
.file
= LOCATE_compiling_methods
;
346 variable2
= NEW_string___String___with_native(BOX_NativeString("fprintf(stderr, \""), TAG_Int(17)); /*new String*/
347 variable1
= variable2
;
348 variable2
= ((compiling_methods___CompilerVisitor___method_t
)CALL( self
,COLOR_compiling_methods___CompilerVisitor___method
))( self
) /*CompilerVisitor::method*/;
349 variable2
= TAG_Bool(!UNTAG_Bool(TAG_Bool((variable2
== NIT_NULL
/*null*/) || ((variable2
!= NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL(variable2
,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN(variable2
, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL(variable2
,COLOR_kernel___Object_____eqeq
))(variable2
, NIT_NULL
/*null*/) /*Object::==*/)))))));
350 if (UNTAG_Bool(variable2
)) { /*if*/
351 variable2
= NEW_string___String___with_native(BOX_NativeString(" in %s"), TAG_Int(6)); /*new String*/
352 ((string___String___append_t
)CALL( variable1
/*s*/,COLOR_abstract_collection___IndexedCollection___append
))( variable1
/*s*/, variable2
) /*String::append*/;
354 variable2
= NEW_string___String___with_native(BOX_NativeString(" (%s:%d)\\n\", "), TAG_Int(13)); /*new String*/
355 ((string___String___append_t
)CALL( variable1
/*s*/,COLOR_abstract_collection___IndexedCollection___append
))( variable1
/*s*/, variable2
) /*String::append*/;
356 variable2
= ((compiling_methods___CompilerVisitor___method_t
)CALL( self
,COLOR_compiling_methods___CompilerVisitor___method
))( self
) /*CompilerVisitor::method*/;
357 variable2
= TAG_Bool(!UNTAG_Bool(TAG_Bool((variable2
== NIT_NULL
/*null*/) || ((variable2
!= NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL(variable2
,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN(variable2
, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL(variable2
,COLOR_kernel___Object_____eqeq
))(variable2
, NIT_NULL
/*null*/) /*Object::==*/)))))));
358 if (UNTAG_Bool(variable2
)) { /*if*/
359 variable2
= NEW_string___String___init(); /*new String*/
360 variable3
= NEW_string___String___with_native(BOX_NativeString("LOCATE_"), TAG_Int(7)); /*new String*/
361 variable4
= variable3
;
362 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable4
) /*String::append*/;
363 variable5
= ((compiling_methods___CompilerVisitor___method_t
)CALL( self
,COLOR_compiling_methods___CompilerVisitor___method
))( self
) /*CompilerVisitor::method*/;
364 variable5
= ((compiling_base___MMLocalProperty___cname_t
)CALL(variable5
,COLOR_compiling_base___MMLocalProperty___cname
))(variable5
) /*MMLocalProperty::cname*/;
365 variable6
= variable5
;
366 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable6
) /*String::append*/;
367 variable7
= NEW_string___String___with_native(BOX_NativeString(", "), TAG_Int(2)); /*new String*/
368 variable8
= variable7
;
369 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable8
) /*String::append*/;
370 ((string___String___append_t
)CALL( variable1
/*s*/,COLOR_abstract_collection___IndexedCollection___append
))( variable1
/*s*/, variable2
) /*String::append*/;
372 variable2
= NEW_string___String___init(); /*new String*/
373 variable3
= NEW_string___String___with_native(BOX_NativeString("LOCATE_"), TAG_Int(7)); /*new String*/
374 variable4
= variable3
;
375 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable4
) /*String::append*/;
376 variable5
= ((compiling_base___CompilerVisitor___module_t
)CALL( self
,COLOR_compiling_base___CompilerVisitor___module
))( self
) /*CompilerVisitor::module*/;
377 variable5
= ((abstractmetamodel___MMModule___name_t
)CALL(variable5
,COLOR_abstractmetamodel___MMModule___name
))(variable5
) /*MMModule::name*/;
378 variable6
= variable5
;
379 variable6
= ((string___String___to_s_t
)CALL(variable6
,COLOR_string___Object___to_s
))(variable6
) /*String::to_s*/;
380 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable6
) /*String::append*/;
381 variable7
= NEW_string___String___with_native(BOX_NativeString(", "), TAG_Int(2)); /*new String*/
382 variable8
= variable7
;
383 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable8
) /*String::append*/;
384 variable9
= ((parser_prod___PNode___line_number_t
)CALL( variable0
/*node*/,COLOR_parser_prod___PNode___line_number
))( variable0
/*node*/) /*PNode::line_number*/;
385 variable10
= variable9
;
386 variable10
= ((string___String___to_s_t
)CALL(variable10
,COLOR_string___Object___to_s
))(variable10
) /*String::to_s*/;
387 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable10
) /*String::append*/;
388 variable11
= NEW_string___String___with_native(BOX_NativeString(");"), TAG_Int(2)); /*new String*/
389 variable12
= variable11
;
390 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable12
) /*String::append*/;
391 ((string___String___append_t
)CALL( variable1
/*s*/,COLOR_abstract_collection___IndexedCollection___append
))( variable1
/*s*/, variable2
) /*String::append*/;
392 variable1
= variable1
/*s*/;
394 return_label8
: while(false);
395 tracehead
= trace
.prev
;
398 void compiling_methods___CompilerVisitor___init(val_t self
, val_t param0
, int* init_table
) {
399 struct trace_t trace
= {NULL
, NULL
, 146, LOCATE_compiling_methods___CompilerVisitor___init
};
401 trace
.prev
= tracehead
; tracehead
= &trace
;
402 trace
.file
= LOCATE_compiling_methods
;
404 if (init_table
[VAL2OBJ( self
)->vft
[INIT_TABLE_POS_CompilerVisitor
].i
]) return;
405 ((compiling_methods___CompilerVisitor___init_t
)CALL( self
,COLOR_SUPER_compiling_methods___CompilerVisitor___init
))( self
, param0
, init_table
) /*super CompilerVisitor::init*/;
406 ((compiling_methods___CompilerVisitor___clear_t
)CALL( self
,COLOR_compiling_methods___CompilerVisitor___clear
))( self
) /*CompilerVisitor::clear*/;
407 init_table
[VAL2OBJ( self
)->vft
[INIT_TABLE_POS_CompilerVisitor
].i
] = 1;
408 tracehead
= trace
.prev
;
411 void compiling_methods___CompilerVisitor___invoke_super_init_calls_after(val_t self
, val_t param0
) {
412 struct trace_t trace
= {NULL
, NULL
, 152, LOCATE_compiling_methods___CompilerVisitor___invoke_super_init_calls_after
};
426 trace
.prev
= tracehead
; tracehead
= &trace
;
427 trace
.file
= LOCATE_compiling_methods
;
429 variable2
= ((compiling_methods___CompilerVisitor___method_t
)CALL( self
,COLOR_compiling_methods___CompilerVisitor___method
))( self
) /*CompilerVisitor::method*/;
430 variable2
= ((syntax_base___MMLocalProperty___node_t
)CALL(variable2
,COLOR_syntax_base___MMLocalProperty___node
))(variable2
) /*MMLocalProperty::node*/;
431 variable1
= variable2
;
432 variable2
= TAG_Bool(( variable1
/*n*/==NIT_NULL
) || VAL_ISA( variable1
/*n*/, COLOR_AConcreteInitPropdef
, ID_AConcreteInitPropdef
)) /*cast AConcreteInitPropdef*/;
433 if (!UNTAG_Bool(variable2
)) { fprintf(stderr
, "Assert%s failed", ""); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_compiling_methods___CompilerVisitor___invoke_super_init_calls_after
, LOCATE_compiling_methods
, 155); nit_exit(1);}
434 variable2
= ((typing___AConcreteInitPropdef___super_init_calls_t
)CALL( variable1
/*n*/,COLOR_typing___AConcreteInitPropdef___super_init_calls
))( variable1
/*n*/) /*AConcreteInitPropdef::super_init_calls*/;
435 variable2
= ((array___AbstractArray___is_empty_t
)CALL(variable2
,COLOR_abstract_collection___Collection___is_empty
))(variable2
) /*AbstractArray::is_empty*/;
436 if (UNTAG_Bool(variable2
)) { /*if*/
439 variable2
= TAG_Int(0);
440 variable3
= TAG_Int(0);
441 variable4
= TAG_Bool(!UNTAG_Bool(TAG_Bool(( variable0
/*start_prop*/ == NIT_NULL
/*null*/) || (( variable0
/*start_prop*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable0
/*start_prop*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable0
/*start_prop*/, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable0
/*start_prop*/,COLOR_kernel___Object_____eqeq
))( variable0
/*start_prop*/, NIT_NULL
/*null*/) /*Object::==*/)))))));
442 if (UNTAG_Bool(variable4
)) { /*if*/
443 while (true) { /*while*/
444 variable4
= ((typing___AConcreteInitPropdef___super_init_calls_t
)CALL( variable1
/*n*/,COLOR_typing___AConcreteInitPropdef___super_init_calls
))( variable1
/*n*/) /*AConcreteInitPropdef::super_init_calls*/;
445 variable5
= variable2
/*i*/;
446 variable6
= TAG_Bool(UNTAG_Int( variable5
/*index*/)>=UNTAG_Int( TAG_Int(0)));
447 variable7
= variable6
;
448 if (UNTAG_Bool(variable7
)) { /* and */
449 variable7
= variable4
;
450 variable7
= ATTR_array___AbstractArray____length(variable7
) /*AbstractArray::_length*/;
451 variable7
= TAG_Bool(UNTAG_Int( variable5
/*index*/)<UNTAG_Int(variable7
));
453 variable6
= variable7
;
454 if (!UNTAG_Bool(variable6
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
455 variable6
= variable4
;
456 variable6
= ATTR_array___Array____items(variable6
) /*Array::_items*/;
457 variable6
= UNBOX_NativeArray(variable6
)[UNTAG_Int( variable5
/*index*/)];
459 return_label12
: while(false);
460 variable4
= variable6
;
461 variable4
= TAG_Bool(!UNTAG_Bool(TAG_Bool((variable4
== variable0
/*start_prop*/) || ((variable4
!= NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL(variable4
,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN(variable4
, variable0
/*start_prop*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL(variable4
,COLOR_kernel___Object_____eqeq
))(variable4
, variable0
/*start_prop*/) /*Object::==*/)))))));
462 if (!UNTAG_Bool(variable4
)) break; /* while*/
463 variable2
= TAG_Int(UNTAG_Int(variable2
)+UNTAG_Int( TAG_Int(1))) /*i*/;
464 continue_11
: while(0);
467 variable2
= TAG_Int(UNTAG_Int(variable2
)+UNTAG_Int( TAG_Int(1))) /*i*/;
468 while (true) { /*while*/
469 variable4
= ((typing___AConcreteInitPropdef___explicit_super_init_calls_t
)CALL( variable1
/*n*/,COLOR_typing___AConcreteInitPropdef___explicit_super_init_calls
))( variable1
/*n*/) /*AConcreteInitPropdef::explicit_super_init_calls*/;
470 variable5
= variable3
/*j*/;
471 variable6
= TAG_Bool(UNTAG_Int( variable5
/*index*/)>=UNTAG_Int( TAG_Int(0)));
472 variable7
= variable6
;
473 if (UNTAG_Bool(variable7
)) { /* and */
474 variable7
= variable4
;
475 variable7
= ATTR_array___AbstractArray____length(variable7
) /*AbstractArray::_length*/;
476 variable7
= TAG_Bool(UNTAG_Int( variable5
/*index*/)<UNTAG_Int(variable7
));
478 variable6
= variable7
;
479 if (!UNTAG_Bool(variable6
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
480 variable6
= variable4
;
481 variable6
= ATTR_array___Array____items(variable6
) /*Array::_items*/;
482 variable6
= UNBOX_NativeArray(variable6
)[UNTAG_Int( variable5
/*index*/)];
484 return_label14
: while(false);
485 variable4
= variable6
;
486 variable4
= TAG_Bool(!UNTAG_Bool(TAG_Bool((variable4
== variable0
/*start_prop*/) || ((variable4
!= NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL(variable4
,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN(variable4
, variable0
/*start_prop*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL(variable4
,COLOR_kernel___Object_____eqeq
))(variable4
, variable0
/*start_prop*/) /*Object::==*/)))))));
487 if (!UNTAG_Bool(variable4
)) break; /* while*/
488 variable3
= TAG_Int(UNTAG_Int(variable3
)+UNTAG_Int( TAG_Int(1))) /*j*/;
489 continue_13
: while(0);
492 variable3
= TAG_Int(UNTAG_Int(variable3
)+UNTAG_Int( TAG_Int(1))) /*j*/;
494 variable4
= NIT_NULL
/*null*/;
495 variable5
= ((typing___AConcreteInitPropdef___explicit_super_init_calls_t
)CALL( variable1
/*n*/,COLOR_typing___AConcreteInitPropdef___explicit_super_init_calls
))( variable1
/*n*/) /*AConcreteInitPropdef::explicit_super_init_calls*/;
496 variable5
= ((array___AbstractArray___length_t
)CALL(variable5
,COLOR_abstract_collection___Collection___length
))(variable5
) /*AbstractArray::length*/;
497 variable5
= TAG_Bool(UNTAG_Int( variable3
/*j*/)<UNTAG_Int(variable5
));
498 if (UNTAG_Bool(variable5
)) { /*if*/
499 variable5
= ((typing___AConcreteInitPropdef___explicit_super_init_calls_t
)CALL( variable1
/*n*/,COLOR_typing___AConcreteInitPropdef___explicit_super_init_calls
))( variable1
/*n*/) /*AConcreteInitPropdef::explicit_super_init_calls*/;
500 variable6
= variable3
/*j*/;
501 variable7
= TAG_Bool(UNTAG_Int( variable6
/*index*/)>=UNTAG_Int( TAG_Int(0)));
502 variable8
= variable7
;
503 if (UNTAG_Bool(variable8
)) { /* and */
504 variable8
= variable5
;
505 variable8
= ATTR_array___AbstractArray____length(variable8
) /*AbstractArray::_length*/;
506 variable8
= TAG_Bool(UNTAG_Int( variable6
/*index*/)<UNTAG_Int(variable8
));
508 variable7
= variable8
;
509 if (!UNTAG_Bool(variable7
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
510 variable7
= variable5
;
511 variable7
= ATTR_array___Array____items(variable7
) /*Array::_items*/;
512 variable7
= UNBOX_NativeArray(variable7
)[UNTAG_Int( variable6
/*index*/)];
514 return_label15
: while(false);
515 variable5
= variable7
;
516 variable4
= variable5
/*stop_prop=*/;
518 variable6
= ((typing___AConcreteInitPropdef___super_init_calls_t
)CALL( variable1
/*n*/,COLOR_typing___AConcreteInitPropdef___super_init_calls
))( variable1
/*n*/) /*AConcreteInitPropdef::super_init_calls*/;
519 variable6
= ((array___AbstractArray___length_t
)CALL(variable6
,COLOR_abstract_collection___Collection___length
))(variable6
) /*AbstractArray::length*/;
520 variable5
= variable6
;
521 while (true) { /*while*/
522 variable6
= TAG_Bool(UNTAG_Int( variable2
/*i*/)<UNTAG_Int( variable5
/*l*/));
523 if (!UNTAG_Bool(variable6
)) break; /* while*/
524 variable7
= ((typing___AConcreteInitPropdef___super_init_calls_t
)CALL( variable1
/*n*/,COLOR_typing___AConcreteInitPropdef___super_init_calls
))( variable1
/*n*/) /*AConcreteInitPropdef::super_init_calls*/;
525 variable8
= variable2
/*i*/;
526 variable9
= TAG_Bool(UNTAG_Int( variable8
/*index*/)>=UNTAG_Int( TAG_Int(0)));
527 variable10
= variable9
;
528 if (UNTAG_Bool(variable10
)) { /* and */
529 variable10
= variable7
;
530 variable10
= ATTR_array___AbstractArray____length(variable10
) /*AbstractArray::_length*/;
531 variable10
= TAG_Bool(UNTAG_Int( variable8
/*index*/)<UNTAG_Int(variable10
));
533 variable9
= variable10
;
534 if (!UNTAG_Bool(variable9
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
535 variable9
= variable7
;
536 variable9
= ATTR_array___Array____items(variable9
) /*Array::_items*/;
537 variable9
= UNBOX_NativeArray(variable9
)[UNTAG_Int( variable8
/*index*/)];
539 return_label17
: while(false);
540 variable7
= variable9
;
541 variable6
= variable7
;
542 variable7
= TAG_Bool(( variable6
/*p*/ == variable4
/*stop_prop*/) || (( variable6
/*p*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable6
/*p*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable6
/*p*/, variable4
/*stop_prop*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable6
/*p*/,COLOR_kernel___Object_____eqeq
))( variable6
/*p*/, variable4
/*stop_prop*/) /*Object::==*/)))));
543 if (UNTAG_Bool(variable7
)) { /*if*/
546 variable8
= ((compiling_methods___CompilerVisitor___method_params_t
)CALL( self
,COLOR_compiling_methods___CompilerVisitor___method_params
))( self
) /*CompilerVisitor::method_params*/;
547 variable7
= variable8
;
548 variable8
= ((static_type___MMLocalProperty___signature_t
)CALL( variable6
/*p*/,COLOR_static_type___MMLocalProperty___signature
))( variable6
/*p*/) /*MMLocalProperty::signature*/;
549 variable8
= ((static_type___MMSignature___arity_t
)CALL(variable8
,COLOR_static_type___MMSignature___arity
))(variable8
) /*MMSignature::arity*/;
550 variable8
= TAG_Bool((variable8
)==( TAG_Int(0)));
551 if (UNTAG_Bool(variable8
)) { /*if*/
552 variable8
= NEW_array___Array___with_capacity(TAG_Int(1)); /*new Array[E]*/
553 variable9
= ((compiling_methods___CompilerVisitor___method_params_t
)CALL( self
,COLOR_compiling_methods___CompilerVisitor___method_params
))( self
) /*CompilerVisitor::method_params*/;
554 variable10
= TAG_Int(0);
555 variable11
= TAG_Bool(UNTAG_Int( variable10
/*index*/)>=UNTAG_Int( TAG_Int(0)));
556 variable12
= variable11
;
557 if (UNTAG_Bool(variable12
)) { /* and */
558 variable12
= variable9
;
559 variable12
= ATTR_array___AbstractArray____length(variable12
) /*AbstractArray::_length*/;
560 variable12
= TAG_Bool(UNTAG_Int( variable10
/*index*/)<UNTAG_Int(variable12
));
562 variable11
= variable12
;
563 if (!UNTAG_Bool(variable11
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
564 variable11
= variable9
;
565 variable11
= ATTR_array___Array____items(variable11
) /*Array::_items*/;
566 variable11
= UNBOX_NativeArray(variable11
)[UNTAG_Int( variable10
/*index*/)];
568 return_label18
: while(false);
569 variable9
= variable11
;
570 ((array___AbstractArray___add_t
)CALL(variable8
,COLOR_abstract_collection___SimpleCollection___add
))(variable8
, variable9
) /*AbstractArray::add*/;
571 variable7
= variable8
/*cargs=*/;
573 ((compiling_methods___MMMethod___compile_call_t
)CALL( variable6
/*p*/,COLOR_compiling_methods___MMMethod___compile_call
))( variable6
/*p*/, self
, variable7
/*cargs*/) /*MMMethod::compile_call*/;
574 variable2
= TAG_Int(UNTAG_Int(variable2
)+UNTAG_Int( TAG_Int(1))) /*i*/;
575 continue_16
: while(0);
578 return_label10
: while(false);
579 tracehead
= trace
.prev
;
582 val_t
compiling_methods___MMMethod___compile_call(val_t self
, val_t param0
, val_t param1
) {
583 struct trace_t trace
= {NULL
, NULL
, 204, LOCATE_compiling_methods___MMMethod___compile_call
};
590 static val_t once_value_variable5_20
; static int once_bool_variable5_20
;
592 static val_t once_value_variable6_21
; static int once_bool_variable6_21
;
593 static val_t once_value_variable4_22
; static int once_bool_variable4_22
;
594 static val_t once_value_variable5_23
; static int once_bool_variable5_23
;
613 static val_t once_value_variable8_25
; static int once_bool_variable8_25
;
618 trace
.prev
= tracehead
; tracehead
= &trace
;
619 trace
.file
= LOCATE_compiling_methods
;
623 variable3
= TAG_Bool(( variable2
/*i*/==NIT_NULL
) || VAL_ISA( variable2
/*i*/, COLOR_MMSrcMethod
, ID_MMSrcMethod
)) /*cast MMSrcMethod*/;
624 if (!UNTAG_Bool(variable3
)) { fprintf(stderr
, "Assert%s failed", ""); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_compiling_methods___MMMethod___compile_call
, LOCATE_compiling_methods
, 211); nit_exit(1);}
625 variable3
= ((syntax_base___MMLocalProperty___node_t
)CALL( variable2
/*i*/,COLOR_syntax_base___MMLocalProperty___node
))( variable2
/*i*/) /*MMLocalProperty::node*/;
626 variable3
= TAG_Bool((variable3
==NIT_NULL
) || VAL_ISA(variable3
, COLOR_AInternMethPropdef
, ID_AInternMethPropdef
)) /*cast AInternMethPropdef*/;
627 variable4
= variable3
;
628 if (!UNTAG_Bool(variable4
)) { /* or */
629 variable4
= ((abstractmetamodel___MMLocalProperty___local_class_t
)CALL( variable2
/*i*/,COLOR_abstractmetamodel___MMLocalProperty___local_class
))( variable2
/*i*/) /*MMLocalProperty::local_class*/;
630 variable4
= ((abstractmetamodel___MMLocalClass___name_t
)CALL(variable4
,COLOR_abstractmetamodel___MMLocalClass___name
))(variable4
) /*MMLocalClass::name*/;
631 if (once_bool_variable5_20
) variable5
= once_value_variable5_20
;
633 variable5
= NEW_string___String___with_native(BOX_NativeString("Array"), TAG_Int(5)); /*new String*/
634 variable5
= ((symbol___String___to_symbol_t
)CALL(variable5
,COLOR_symbol___String___to_symbol
))(variable5
) /*String::to_symbol*/;
635 once_value_variable5_20
= variable5
;
636 once_bool_variable5_20
= true;
638 variable4
= TAG_Bool((variable4
== variable5
) || ((variable4
!= NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL(variable4
,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN(variable4
,variable5
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL(variable4
,COLOR_kernel___Object_____eqeq
))(variable4
, variable5
) /*Object::==*/)))));
639 variable5
= variable4
;
640 if (UNTAG_Bool(variable5
)) { /* and */
641 variable5
= ((abstractmetamodel___MMLocalProperty___name_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___name
))( self
) /*MMLocalProperty::name*/;
642 if (once_bool_variable6_21
) variable6
= once_value_variable6_21
;
644 variable6
= NEW_string___String___with_native(BOX_NativeString("[]"), TAG_Int(2)); /*new String*/
645 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
646 once_value_variable6_21
= variable6
;
647 once_bool_variable6_21
= true;
649 variable5
= TAG_Bool((variable5
== variable6
) || ((variable5
!= NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL(variable5
,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN(variable5
,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL(variable5
,COLOR_kernel___Object_____eqeq
))(variable5
, variable6
) /*Object::==*/)))));
651 variable4
= variable5
;
653 variable3
= variable4
;
654 if (UNTAG_Bool(variable3
)) { /*if*/
655 variable4
= ((compiling_methods___MMSrcMethod___do_compile_inside_t
)CALL( variable2
/*i*/,COLOR_compiling_methods___MMSrcMethod___do_compile_inside
))( variable2
/*i*/, variable0
/*v*/, variable1
/*cargs*/) /*MMSrcMethod::do_compile_inside*/;
656 variable3
= variable4
;
657 variable2
= variable3
/*e*/;
660 if (once_bool_variable4_22
) variable4
= once_value_variable4_22
;
662 variable4
= NEW_string___String___with_native(BOX_NativeString("=="), TAG_Int(2)); /*new String*/
663 variable4
= ((symbol___String___to_symbol_t
)CALL(variable4
,COLOR_symbol___String___to_symbol
))(variable4
) /*String::to_symbol*/;
664 once_value_variable4_22
= variable4
;
665 once_bool_variable4_22
= true;
667 variable3
= variable4
;
668 if (once_bool_variable5_23
) variable5
= once_value_variable5_23
;
670 variable5
= NEW_string___String___with_native(BOX_NativeString("!="), TAG_Int(2)); /*new String*/
671 variable5
= ((symbol___String___to_symbol_t
)CALL(variable5
,COLOR_symbol___String___to_symbol
))(variable5
) /*String::to_symbol*/;
672 once_value_variable5_23
= variable5
;
673 once_bool_variable5_23
= true;
675 variable4
= variable5
;
676 variable5
= ((abstractmetamodel___MMLocalProperty___name_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___name
))( self
) /*MMLocalProperty::name*/;
677 variable5
= TAG_Bool((variable5
== variable4
/*ne*/) || ((variable5
!= NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL(variable5
,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN(variable5
, variable4
/*ne*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL(variable5
,COLOR_kernel___Object_____eqeq
))(variable5
, variable4
/*ne*/) /*Object::==*/)))));
678 if (UNTAG_Bool(variable5
)) { /*if*/
679 variable6
= ((static_type___MMLocalProperty___signature_t
)CALL( self
,COLOR_static_type___MMLocalProperty___signature
))( self
) /*MMLocalProperty::signature*/;
680 variable6
= ((static_type___MMSignature___recv_t
)CALL(variable6
,COLOR_static_type___MMSignature___recv
))(variable6
) /*MMSignature::recv*/;
681 variable6
= ((static_type___MMType___local_class_t
)CALL(variable6
,COLOR_static_type___MMType___local_class
))(variable6
) /*MMType::local_class*/;
682 variable6
= ((abstractmetamodel___MMLocalClass___select_method_t
)CALL(variable6
,COLOR_abstractmetamodel___MMLocalClass___select_method
))(variable6
, variable3
/*ee*/) /*MMLocalClass::select_method*/;
683 variable5
= variable6
;
684 variable7
= ((compiling_methods___MMMethod___compile_call_t
)CALL( variable5
/*eqp*/,COLOR_compiling_methods___MMMethod___compile_call
))( variable5
/*eqp*/, variable0
/*v*/, variable1
/*cargs*/) /*MMMethod::compile_call*/;
685 variable6
= variable7
;
686 variable7
= NEW_string___String___init(); /*new String*/
687 variable8
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(!UNTAG_Bool("), TAG_Int(21)); /*new String*/
688 variable9
= variable8
;
689 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable9
) /*String::append*/;
690 variable10
= variable6
/*eqcall*/;
691 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable10
) /*String::append*/;
692 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
693 variable12
= variable11
;
694 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable12
) /*String::append*/;
695 variable2
= variable7
;
698 variable5
= ((abstractmetamodel___MMLocalProperty___global_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___global
))( self
) /*MMLocalProperty::global*/;
699 variable5
= ((abstractmetamodel___MMGlobalProperty___is_init_t
)CALL(variable5
,COLOR_abstractmetamodel___MMGlobalProperty___is_init
))(variable5
) /*MMGlobalProperty::is_init*/;
700 if (UNTAG_Bool(variable5
)) { /*if*/
701 variable5
= ((array___Collection___to_a_t
)CALL( variable1
/*cargs*/,COLOR_array___Collection___to_a
))( variable1
/*cargs*/) /*Collection::to_a*/;
702 variable1
= variable5
/*cargs=*/;
703 variable5
= NEW_string___String___with_native(BOX_NativeString("init_table /*YYY*/"), TAG_Int(18)); /*new String*/
704 ((array___AbstractArray___add_t
)CALL( variable1
/*cargs*/,COLOR_abstract_collection___SimpleCollection___add
))( variable1
/*cargs*/, variable5
) /*AbstractArray::add*/;
706 variable6
= NEW_string___String___init(); /*new String*/
707 variable7
= NEW_string___String___with_native(BOX_NativeString("(("), TAG_Int(2)); /*new String*/
708 variable8
= variable7
;
709 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
710 variable9
= ((compiling_base___MMLocalProperty___cname_t
)CALL( self
,COLOR_compiling_base___MMLocalProperty___cname
))( self
) /*MMLocalProperty::cname*/;
711 variable10
= variable9
;
712 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
713 variable11
= NEW_string___String___with_native(BOX_NativeString("_t)CALL("), TAG_Int(8)); /*new String*/
714 variable12
= variable11
;
715 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
716 variable13
= TAG_Int(0);
717 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
718 variable15
= variable14
;
719 if (UNTAG_Bool(variable15
)) { /* and */
720 variable15
= ATTR_array___AbstractArray____length( variable1
/*cargs*/) /*AbstractArray::_length*/;
721 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
723 variable14
= variable15
;
724 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
725 variable14
= ATTR_array___Array____items( variable1
/*cargs*/) /*Array::_items*/;
726 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
728 return_label24
: while(false);
729 variable13
= variable14
;
730 variable14
= variable13
;
731 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
732 variable15
= NEW_string___String___with_native(BOX_NativeString(","), TAG_Int(1)); /*new String*/
733 variable16
= variable15
;
734 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
735 variable17
= ((abstractmetamodel___MMLocalProperty___global_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___global
))( self
) /*MMLocalProperty::global*/;
736 variable17
= ((compiling_base___MMGlobalProperty___color_id_t
)CALL(variable17
,COLOR_compiling_base___MMGlobalProperty___color_id
))(variable17
) /*MMGlobalProperty::color_id*/;
737 variable18
= variable17
;
738 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable18
) /*String::append*/;
739 variable19
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
740 variable20
= variable19
;
741 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable20
) /*String::append*/;
742 variable5
= variable6
;
743 variable7
= NEW_string___String___init(); /*new String*/
744 variable8
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
745 variable9
= variable8
;
746 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable9
) /*String::append*/;
747 variable10
= variable5
/*m*/;
748 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable10
) /*String::append*/;
749 variable11
= NEW_string___String___with_native(BOX_NativeString("("), TAG_Int(1)); /*new String*/
750 variable12
= variable11
;
751 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable12
) /*String::append*/;
752 variable13
= NEW_string___String___with_native(BOX_NativeString(", "), TAG_Int(2)); /*new String*/
753 variable13
= ((string___Collection___join_t
)CALL( variable1
/*cargs*/,COLOR_string___Collection___join
))( variable1
/*cargs*/, variable13
) /*Collection::join*/;
754 variable14
= variable13
;
755 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable14
) /*String::append*/;
756 variable15
= NEW_string___String___with_native(BOX_NativeString(") /*"), TAG_Int(4)); /*new String*/
757 variable16
= variable15
;
758 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable16
) /*String::append*/;
759 variable17
= ((abstractmetamodel___MMLocalProperty___local_class_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___local_class
))( self
) /*MMLocalProperty::local_class*/;
760 variable18
= variable17
;
761 variable18
= ((string___String___to_s_t
)CALL(variable18
,COLOR_string___Object___to_s
))(variable18
) /*String::to_s*/;
762 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable18
) /*String::append*/;
763 variable19
= NEW_string___String___with_native(BOX_NativeString("::"), TAG_Int(2)); /*new String*/
764 variable20
= variable19
;
765 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable20
) /*String::append*/;
766 variable21
= ((abstractmetamodel___MMLocalProperty___name_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___name
))( self
) /*MMLocalProperty::name*/;
767 variable22
= variable21
;
768 variable22
= ((string___String___to_s_t
)CALL(variable22
,COLOR_string___Object___to_s
))(variable22
) /*String::to_s*/;
769 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable22
) /*String::append*/;
770 variable23
= NEW_string___String___with_native(BOX_NativeString("*/"), TAG_Int(2)); /*new String*/
771 variable24
= variable23
;
772 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable24
) /*String::append*/;
773 variable6
= variable7
;
774 variable7
= ((abstractmetamodel___MMLocalProperty___name_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___name
))( self
) /*MMLocalProperty::name*/;
775 variable7
= TAG_Bool((variable7
== variable3
/*ee*/) || ((variable7
!= NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL(variable7
,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN(variable7
, variable3
/*ee*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL(variable7
,COLOR_kernel___Object_____eqeq
))(variable7
, variable3
/*ee*/) /*Object::==*/)))));
776 if (UNTAG_Bool(variable7
)) { /*if*/
777 variable7
= NEW_string___String___init(); /*new String*/
778 variable8
= NEW_string___String___with_native(BOX_NativeString("UNTAG_Bool("), TAG_Int(11)); /*new String*/
779 variable9
= variable8
;
780 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable9
) /*String::append*/;
781 variable10
= variable6
/*vcall*/;
782 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable10
) /*String::append*/;
783 variable11
= NEW_string___String___with_native(BOX_NativeString(")"), TAG_Int(1)); /*new String*/
784 variable12
= variable11
;
785 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable12
) /*String::append*/;
786 variable6
= variable7
/*vcall=*/;
787 if (once_bool_variable8_25
) variable8
= once_value_variable8_25
;
789 variable8
= NEW_string___String___with_native(BOX_NativeString("Object"), TAG_Int(6)); /*new String*/
790 variable8
= ((symbol___String___to_symbol_t
)CALL(variable8
,COLOR_symbol___String___to_symbol
))(variable8
) /*String::to_symbol*/;
791 once_value_variable8_25
= variable8
;
792 once_bool_variable8_25
= true;
794 variable7
= variable8
;
795 variable8
= ((abstractmetamodel___MMLocalProperty___local_class_t
)CALL( variable2
/*i*/,COLOR_abstractmetamodel___MMLocalProperty___local_class
))( variable2
/*i*/) /*MMLocalProperty::local_class*/;
796 variable8
= ((abstractmetamodel___MMLocalClass___name_t
)CALL(variable8
,COLOR_abstractmetamodel___MMLocalClass___name
))(variable8
) /*MMLocalClass::name*/;
797 variable8
= TAG_Bool((variable8
== variable7
/*obj*/) || ((variable8
!= NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL(variable8
,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN(variable8
, variable7
/*obj*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL(variable8
,COLOR_kernel___Object_____eqeq
))(variable8
, variable7
/*obj*/) /*Object::==*/)))));
798 if (UNTAG_Bool(variable8
)) { /*if*/
799 variable8
= NEW_string___String___init(); /*new String*/
800 variable9
= NEW_string___String___with_native(BOX_NativeString("(("), TAG_Int(2)); /*new String*/
801 variable10
= variable9
;
802 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable10
) /*String::append*/;
803 variable11
= variable5
/*m*/;
804 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable11
) /*String::append*/;
805 variable12
= NEW_string___String___with_native(BOX_NativeString("=="), TAG_Int(2)); /*new String*/
806 variable13
= variable12
;
807 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable13
) /*String::append*/;
808 variable14
= ((compiling_base___MMLocalProperty___cname_t
)CALL( variable2
/*i*/,COLOR_compiling_base___MMLocalProperty___cname
))( variable2
/*i*/) /*MMLocalProperty::cname*/;
809 variable15
= variable14
;
810 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable15
) /*String::append*/;
811 variable16
= NEW_string___String___with_native(BOX_NativeString(")?(IS_EQUAL_NN("), TAG_Int(15)); /*new String*/
812 variable17
= variable16
;
813 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable17
) /*String::append*/;
814 variable18
= TAG_Int(0);
815 variable19
= TAG_Bool(UNTAG_Int( variable18
/*index*/)>=UNTAG_Int( TAG_Int(0)));
816 variable20
= variable19
;
817 if (UNTAG_Bool(variable20
)) { /* and */
818 variable20
= ATTR_array___AbstractArray____length( variable1
/*cargs*/) /*AbstractArray::_length*/;
819 variable20
= TAG_Bool(UNTAG_Int( variable18
/*index*/)<UNTAG_Int(variable20
));
821 variable19
= variable20
;
822 if (!UNTAG_Bool(variable19
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
823 variable19
= ATTR_array___Array____items( variable1
/*cargs*/) /*Array::_items*/;
824 variable19
= UNBOX_NativeArray(variable19
)[UNTAG_Int( variable18
/*index*/)];
826 return_label26
: while(false);
827 variable18
= variable19
;
828 variable19
= variable18
;
829 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable19
) /*String::append*/;
830 variable20
= NEW_string___String___with_native(BOX_NativeString(","), TAG_Int(1)); /*new String*/
831 variable21
= variable20
;
832 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable21
) /*String::append*/;
833 variable22
= TAG_Int(1);
834 variable23
= TAG_Bool(UNTAG_Int( variable22
/*index*/)>=UNTAG_Int( TAG_Int(0)));
835 variable24
= variable23
;
836 if (UNTAG_Bool(variable24
)) { /* and */
837 variable24
= ATTR_array___AbstractArray____length( variable1
/*cargs*/) /*AbstractArray::_length*/;
838 variable24
= TAG_Bool(UNTAG_Int( variable22
/*index*/)<UNTAG_Int(variable24
));
840 variable23
= variable24
;
841 if (!UNTAG_Bool(variable23
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
842 variable23
= ATTR_array___Array____items( variable1
/*cargs*/) /*Array::_items*/;
843 variable23
= UNBOX_NativeArray(variable23
)[UNTAG_Int( variable22
/*index*/)];
845 return_label27
: while(false);
846 variable22
= variable23
;
847 variable23
= variable22
;
848 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable23
) /*String::append*/;
849 variable24
= NEW_string___String___with_native(BOX_NativeString(")):("), TAG_Int(4)); /*new String*/
850 variable25
= variable24
;
851 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable25
) /*String::append*/;
852 variable26
= variable6
/*vcall*/;
853 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable26
) /*String::append*/;
854 variable27
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
855 variable28
= variable27
;
856 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable28
) /*String::append*/;
857 variable6
= variable8
/*vcall=*/;
859 variable8
= NEW_string___String___init(); /*new String*/
860 variable9
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(("), TAG_Int(10)); /*new String*/
861 variable10
= variable9
;
862 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable10
) /*String::append*/;
863 variable11
= ((abstract_collection___IndexedCollection___first_t
)CALL( variable1
/*cargs*/,COLOR_abstract_collection___Collection___first
))( variable1
/*cargs*/) /*IndexedCollection::first*/;
864 variable12
= variable11
;
865 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable12
) /*String::append*/;
866 variable13
= NEW_string___String___with_native(BOX_NativeString(" == "), TAG_Int(4)); /*new String*/
867 variable14
= variable13
;
868 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable14
) /*String::append*/;
869 variable15
= TAG_Int(1);
870 variable16
= TAG_Bool(UNTAG_Int( variable15
/*index*/)>=UNTAG_Int( TAG_Int(0)));
871 variable17
= variable16
;
872 if (UNTAG_Bool(variable17
)) { /* and */
873 variable17
= ATTR_array___AbstractArray____length( variable1
/*cargs*/) /*AbstractArray::_length*/;
874 variable17
= TAG_Bool(UNTAG_Int( variable15
/*index*/)<UNTAG_Int(variable17
));
876 variable16
= variable17
;
877 if (!UNTAG_Bool(variable16
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
878 variable16
= ATTR_array___Array____items( variable1
/*cargs*/) /*Array::_items*/;
879 variable16
= UNBOX_NativeArray(variable16
)[UNTAG_Int( variable15
/*index*/)];
881 return_label28
: while(false);
882 variable15
= variable16
;
883 variable16
= variable15
;
884 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable16
) /*String::append*/;
885 variable17
= NEW_string___String___with_native(BOX_NativeString(") || (("), TAG_Int(7)); /*new String*/
886 variable18
= variable17
;
887 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable18
) /*String::append*/;
888 variable19
= ((abstract_collection___IndexedCollection___first_t
)CALL( variable1
/*cargs*/,COLOR_abstract_collection___Collection___first
))( variable1
/*cargs*/) /*IndexedCollection::first*/;
889 variable20
= variable19
;
890 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable20
) /*String::append*/;
891 variable21
= NEW_string___String___with_native(BOX_NativeString(" != NIT_NULL) && "), TAG_Int(17)); /*new String*/
892 variable22
= variable21
;
893 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable22
) /*String::append*/;
894 variable23
= variable6
/*vcall*/;
895 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable23
) /*String::append*/;
896 variable24
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
897 variable25
= variable24
;
898 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable25
) /*String::append*/;
899 variable6
= variable8
/*vcall=*/;
901 variable7
= ((static_type___MMLocalProperty___signature_t
)CALL( self
,COLOR_static_type___MMLocalProperty___signature
))( self
) /*MMLocalProperty::signature*/;
902 variable7
= ((static_type___MMSignature___return_type_t
)CALL(variable7
,COLOR_static_type___MMSignature___return_type
))(variable7
) /*MMSignature::return_type*/;
903 variable7
= TAG_Bool(!UNTAG_Bool(TAG_Bool((variable7
== NIT_NULL
/*null*/) || ((variable7
!= NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL(variable7
,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN(variable7
, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL(variable7
,COLOR_kernel___Object_____eqeq
))(variable7
, NIT_NULL
/*null*/) /*Object::==*/)))))));
904 if (UNTAG_Bool(variable7
)) { /*if*/
905 variable2
= variable6
/*vcall*/;
908 variable7
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
909 variable7
= ((string___String_____plus_t
)CALL( variable6
/*vcall*/,COLOR_string___String_____plus
))( variable6
/*vcall*/, variable7
) /*String::+*/;
910 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable7
) /*CompilerVisitor::add_instr*/;
911 variable2
= NIT_NULL
/*null*/;
914 return_label19
: while(false);
915 tracehead
= trace
.prev
;
918 val_t
compiling_methods___MMMethod___compile_constructor_call(val_t self
, val_t param0
, val_t param1
) {
919 struct trace_t trace
= {NULL
, NULL
, 248, LOCATE_compiling_methods___MMMethod___compile_constructor_call
};
941 trace
.prev
= tracehead
; tracehead
= &trace
;
942 trace
.file
= LOCATE_compiling_methods
;
945 variable3
= ((compiling_methods___CompilerVisitor___get_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___get_var
))( variable0
/*v*/) /*CompilerVisitor::get_var*/;
946 variable2
= variable3
;
947 variable4
= ((static_type___MMLocalProperty___signature_t
)CALL( self
,COLOR_static_type___MMLocalProperty___signature
))( self
) /*MMLocalProperty::signature*/;
948 variable4
= ((static_type___MMSignature___recv_t
)CALL(variable4
,COLOR_static_type___MMSignature___recv
))(variable4
) /*MMSignature::recv*/;
949 variable3
= variable4
;
950 variable4
= NEW_string___String___init(); /*new String*/
951 variable5
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
952 variable6
= variable5
;
953 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable6
) /*String::append*/;
954 variable7
= variable2
/*recv*/;
955 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable7
) /*String::append*/;
956 variable8
= NEW_string___String___with_native(BOX_NativeString(" = NEW_"), TAG_Int(7)); /*new String*/
957 variable9
= variable8
;
958 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable9
) /*String::append*/;
959 variable10
= ((abstractmetamodel___MMLocalProperty___global_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___global
))( self
) /*MMLocalProperty::global*/;
960 variable10
= ((abstractmetamodel___MMGlobalProperty___intro_t
)CALL(variable10
,COLOR_abstractmetamodel___MMGlobalProperty___intro
))(variable10
) /*MMGlobalProperty::intro*/;
961 variable10
= ((compiling_base___MMLocalProperty___cname_t
)CALL(variable10
,COLOR_compiling_base___MMLocalProperty___cname
))(variable10
) /*MMLocalProperty::cname*/;
962 variable11
= variable10
;
963 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable11
) /*String::append*/;
964 variable12
= NEW_string___String___with_native(BOX_NativeString("("), TAG_Int(1)); /*new String*/
965 variable13
= variable12
;
966 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable13
) /*String::append*/;
967 variable14
= NEW_string___String___with_native(BOX_NativeString(", "), TAG_Int(2)); /*new String*/
968 variable14
= ((string___Collection___join_t
)CALL( variable1
/*cargs*/,COLOR_string___Collection___join
))( variable1
/*cargs*/, variable14
) /*Collection::join*/;
969 variable15
= variable14
;
970 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable15
) /*String::append*/;
971 variable16
= NEW_string___String___with_native(BOX_NativeString("); /*new "), TAG_Int(9)); /*new String*/
972 variable17
= variable16
;
973 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable17
) /*String::append*/;
974 variable18
= variable3
/*stype*/;
975 variable18
= ((string___String___to_s_t
)CALL(variable18
,COLOR_string___Object___to_s
))(variable18
) /*String::to_s*/;
976 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable18
) /*String::append*/;
977 variable19
= NEW_string___String___with_native(BOX_NativeString("*/"), TAG_Int(2)); /*new String*/
978 variable20
= variable19
;
979 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable20
) /*String::append*/;
980 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable4
) /*CompilerVisitor::add_instr*/;
981 variable2
= variable2
/*recv*/;
983 return_label29
: while(false);
984 tracehead
= trace
.prev
;
987 val_t
compiling_methods___MMMethod___compile_super_call(val_t self
, val_t param0
, val_t param1
) {
988 struct trace_t trace
= {NULL
, NULL
, 257, LOCATE_compiling_methods___MMMethod___compile_super_call
};
1011 trace
.prev
= tracehead
; tracehead
= &trace
;
1012 trace
.file
= LOCATE_compiling_methods
;
1015 variable3
= NEW_string___String___init(); /*new String*/
1016 variable4
= NEW_string___String___with_native(BOX_NativeString("(("), TAG_Int(2)); /*new String*/
1017 variable5
= variable4
;
1018 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable5
) /*String::append*/;
1019 variable6
= ((compiling_base___MMLocalProperty___cname_t
)CALL( self
,COLOR_compiling_base___MMLocalProperty___cname
))( self
) /*MMLocalProperty::cname*/;
1020 variable7
= variable6
;
1021 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable7
) /*String::append*/;
1022 variable8
= NEW_string___String___with_native(BOX_NativeString("_t)CALL("), TAG_Int(8)); /*new String*/
1023 variable9
= variable8
;
1024 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable9
) /*String::append*/;
1025 variable10
= TAG_Int(0);
1026 variable11
= TAG_Bool(UNTAG_Int( variable10
/*index*/)>=UNTAG_Int( TAG_Int(0)));
1027 variable12
= variable11
;
1028 if (UNTAG_Bool(variable12
)) { /* and */
1029 variable12
= ATTR_array___AbstractArray____length( variable1
/*cargs*/) /*AbstractArray::_length*/;
1030 variable12
= TAG_Bool(UNTAG_Int( variable10
/*index*/)<UNTAG_Int(variable12
));
1032 variable11
= variable12
;
1033 if (!UNTAG_Bool(variable11
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
1034 variable11
= ATTR_array___Array____items( variable1
/*cargs*/) /*Array::_items*/;
1035 variable11
= UNBOX_NativeArray(variable11
)[UNTAG_Int( variable10
/*index*/)];
1036 goto return_label31
;
1037 return_label31
: while(false);
1038 variable10
= variable11
;
1039 variable11
= variable10
;
1040 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable11
) /*String::append*/;
1041 variable12
= NEW_string___String___with_native(BOX_NativeString(","), TAG_Int(1)); /*new String*/
1042 variable13
= variable12
;
1043 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable13
) /*String::append*/;
1044 variable14
= ((compiling_base___MMLocalProperty___color_id_for_super_t
)CALL( self
,COLOR_compiling_base___MMLocalProperty___color_id_for_super
))( self
) /*MMLocalProperty::color_id_for_super*/;
1045 variable15
= variable14
;
1046 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable15
) /*String::append*/;
1047 variable16
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
1048 variable17
= variable16
;
1049 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable17
) /*String::append*/;
1050 variable2
= variable3
;
1051 variable4
= NEW_string___String___init(); /*new String*/
1052 variable5
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
1053 variable6
= variable5
;
1054 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable6
) /*String::append*/;
1055 variable7
= variable2
/*m*/;
1056 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable7
) /*String::append*/;
1057 variable8
= NEW_string___String___with_native(BOX_NativeString("("), TAG_Int(1)); /*new String*/
1058 variable9
= variable8
;
1059 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable9
) /*String::append*/;
1060 variable10
= NEW_string___String___with_native(BOX_NativeString(", "), TAG_Int(2)); /*new String*/
1061 variable10
= ((string___Collection___join_t
)CALL( variable1
/*cargs*/,COLOR_string___Collection___join
))( variable1
/*cargs*/, variable10
) /*Collection::join*/;
1062 variable11
= variable10
;
1063 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable11
) /*String::append*/;
1064 variable12
= NEW_string___String___with_native(BOX_NativeString(") /*super "), TAG_Int(10)); /*new String*/
1065 variable13
= variable12
;
1066 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable13
) /*String::append*/;
1067 variable14
= ((abstractmetamodel___MMLocalProperty___local_class_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___local_class
))( self
) /*MMLocalProperty::local_class*/;
1068 variable15
= variable14
;
1069 variable15
= ((string___String___to_s_t
)CALL(variable15
,COLOR_string___Object___to_s
))(variable15
) /*String::to_s*/;
1070 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable15
) /*String::append*/;
1071 variable16
= NEW_string___String___with_native(BOX_NativeString("::"), TAG_Int(2)); /*new String*/
1072 variable17
= variable16
;
1073 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable17
) /*String::append*/;
1074 variable18
= ((abstractmetamodel___MMLocalProperty___name_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___name
))( self
) /*MMLocalProperty::name*/;
1075 variable19
= variable18
;
1076 variable19
= ((string___String___to_s_t
)CALL(variable19
,COLOR_string___Object___to_s
))(variable19
) /*String::to_s*/;
1077 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable19
) /*String::append*/;
1078 variable20
= NEW_string___String___with_native(BOX_NativeString("*/"), TAG_Int(2)); /*new String*/
1079 variable21
= variable20
;
1080 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable21
) /*String::append*/;
1081 variable3
= variable4
;
1082 variable2
= variable3
/*vcall*/;
1083 goto return_label30
;
1084 return_label30
: while(false);
1085 tracehead
= trace
.prev
;
1088 val_t
compiling_methods___MMAttribute___compile_access(val_t self
, val_t param0
, val_t param1
) {
1089 struct trace_t trace
= {NULL
, NULL
, 267, LOCATE_compiling_methods___MMAttribute___compile_access
};
1110 trace
.prev
= tracehead
; tracehead
= &trace
;
1111 trace
.file
= LOCATE_compiling_methods
;
1114 variable2
= NEW_string___String___init(); /*new String*/
1115 variable3
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
1116 variable4
= variable3
;
1117 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable4
) /*String::append*/;
1118 variable5
= ((abstractmetamodel___MMLocalProperty___global_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___global
))( self
) /*MMLocalProperty::global*/;
1119 variable5
= ((compiling_base___MMGlobalProperty___attr_access_t
)CALL(variable5
,COLOR_compiling_base___MMGlobalProperty___attr_access
))(variable5
) /*MMGlobalProperty::attr_access*/;
1120 variable6
= variable5
;
1121 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable6
) /*String::append*/;
1122 variable7
= NEW_string___String___with_native(BOX_NativeString("("), TAG_Int(1)); /*new String*/
1123 variable8
= variable7
;
1124 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable8
) /*String::append*/;
1125 variable9
= variable1
/*recv*/;
1126 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable9
) /*String::append*/;
1127 variable10
= NEW_string___String___with_native(BOX_NativeString(") /*"), TAG_Int(4)); /*new String*/
1128 variable11
= variable10
;
1129 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable11
) /*String::append*/;
1130 variable12
= ((abstractmetamodel___MMLocalProperty___local_class_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___local_class
))( self
) /*MMLocalProperty::local_class*/;
1131 variable13
= variable12
;
1132 variable13
= ((string___String___to_s_t
)CALL(variable13
,COLOR_string___Object___to_s
))(variable13
) /*String::to_s*/;
1133 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable13
) /*String::append*/;
1134 variable14
= NEW_string___String___with_native(BOX_NativeString("::"), TAG_Int(2)); /*new String*/
1135 variable15
= variable14
;
1136 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable15
) /*String::append*/;
1137 variable16
= ((abstractmetamodel___MMLocalProperty___name_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___name
))( self
) /*MMLocalProperty::name*/;
1138 variable17
= variable16
;
1139 variable17
= ((string___String___to_s_t
)CALL(variable17
,COLOR_string___Object___to_s
))(variable17
) /*String::to_s*/;
1140 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable17
) /*String::append*/;
1141 variable18
= NEW_string___String___with_native(BOX_NativeString("*/"), TAG_Int(2)); /*new String*/
1142 variable19
= variable18
;
1143 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable19
) /*String::append*/;
1144 goto return_label32
;
1145 return_label32
: while(false);
1146 tracehead
= trace
.prev
;
1149 void compiling_methods___MMLocalProperty___compile_property_to_c(val_t self
, val_t param0
) {
1150 struct trace_t trace
= {NULL
, NULL
, 276, LOCATE_compiling_methods___MMLocalProperty___compile_property_to_c
};
1152 trace
.prev
= tracehead
; tracehead
= &trace
;
1153 trace
.file
= LOCATE_compiling_methods
;
1155 tracehead
= trace
.prev
;
1158 val_t
compiling_methods___MMSrcMethod___decl_csignature(val_t self
, val_t param0
, val_t param1
) {
1159 struct trace_t trace
= {NULL
, NULL
, 281, LOCATE_compiling_methods___MMSrcMethod___decl_csignature
};
1180 trace
.prev
= tracehead
; tracehead
= &trace
;
1181 trace
.file
= LOCATE_compiling_methods
;
1184 variable3
= NEW_array___Array___init(); /*new Array[E]*/
1185 variable2
= variable3
;
1186 variable3
= NIT_NULL
/*null*/;
1187 variable4
= ((abstractmetamodel___MMLocalProperty___global_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___global
))( self
) /*MMLocalProperty::global*/;
1188 variable4
= ((abstractmetamodel___MMGlobalProperty___is_init_t
)CALL(variable4
,COLOR_abstractmetamodel___MMGlobalProperty___is_init
))(variable4
) /*MMGlobalProperty::is_init*/;
1189 if (UNTAG_Bool(variable4
)) { /*if*/
1190 variable4
= NEW_array___Array___init(); /*new Array[E]*/
1191 variable3
= variable4
/*params_new=*/;
1193 variable4
= NEW_string___String___init(); /*new String*/
1194 variable5
= NEW_string___String___with_native(BOX_NativeString("val_t "), TAG_Int(6)); /*new String*/
1195 variable6
= variable5
;
1196 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable6
) /*String::append*/;
1197 variable7
= TAG_Int(0);
1198 variable8
= TAG_Bool(UNTAG_Int( variable7
/*index*/)>=UNTAG_Int( TAG_Int(0)));
1199 variable9
= variable8
;
1200 if (UNTAG_Bool(variable9
)) { /* and */
1201 variable9
= ATTR_array___AbstractArray____length( variable1
/*args*/) /*AbstractArray::_length*/;
1202 variable9
= TAG_Bool(UNTAG_Int( variable7
/*index*/)<UNTAG_Int(variable9
));
1204 variable8
= variable9
;
1205 if (!UNTAG_Bool(variable8
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
1206 variable8
= ATTR_array___Array____items( variable1
/*args*/) /*Array::_items*/;
1207 variable8
= UNBOX_NativeArray(variable8
)[UNTAG_Int( variable7
/*index*/)];
1208 goto return_label35
;
1209 return_label35
: while(false);
1210 variable7
= variable8
;
1211 variable8
= variable7
;
1212 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable8
) /*String::append*/;
1213 variable9
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
1214 variable10
= variable9
;
1215 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable10
) /*String::append*/;
1216 ((array___AbstractArray___add_t
)CALL( variable2
/*params*/,COLOR_abstract_collection___SimpleCollection___add
))( variable2
/*params*/, variable4
) /*AbstractArray::add*/;
1217 variable4
= ((static_type___MMLocalProperty___signature_t
)CALL( self
,COLOR_static_type___MMLocalProperty___signature
))( self
) /*MMLocalProperty::signature*/;
1218 variable4
= ((static_type___MMSignature___arity_t
)CALL(variable4
,COLOR_static_type___MMSignature___arity
))(variable4
) /*MMSignature::arity*/;
1219 variable5
= NEW_range___Range___without_last( TAG_Int(0), variable4
); /*new Range[E]*/
1220 variable4
= variable5
;
1221 variable4
= ((range___Range___iterator_t
)CALL(variable4
,COLOR_abstract_collection___Collection___iterator
))(variable4
) /*Range::iterator*/;
1222 while (true) { /*for*/
1223 variable5
= ((abstract_collection___Iterator___is_ok_t
)CALL(variable4
,COLOR_abstract_collection___Iterator___is_ok
))(variable4
) /*Iterator::is_ok*/;
1224 if (!UNTAG_Bool(variable5
)) break; /*for*/
1225 variable5
= ((abstract_collection___Iterator___item_t
)CALL(variable4
,COLOR_abstract_collection___Iterator___item
))(variable4
) /*Iterator::item*/;
1226 variable7
= NEW_string___String___init(); /*new String*/
1227 variable8
= NEW_string___String___with_native(BOX_NativeString("val_t "), TAG_Int(6)); /*new String*/
1228 variable9
= variable8
;
1229 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable9
) /*String::append*/;
1230 variable10
= TAG_Int(UNTAG_Int( variable5
/*i*/)+UNTAG_Int( TAG_Int(1)));
1231 variable11
= variable10
;
1232 variable12
= TAG_Bool(UNTAG_Int( variable11
/*index*/)>=UNTAG_Int( TAG_Int(0)));
1233 variable13
= variable12
;
1234 if (UNTAG_Bool(variable13
)) { /* and */
1235 variable13
= ATTR_array___AbstractArray____length( variable1
/*args*/) /*AbstractArray::_length*/;
1236 variable13
= TAG_Bool(UNTAG_Int( variable11
/*index*/)<UNTAG_Int(variable13
));
1238 variable12
= variable13
;
1239 if (!UNTAG_Bool(variable12
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
1240 variable12
= ATTR_array___Array____items( variable1
/*args*/) /*Array::_items*/;
1241 variable12
= UNBOX_NativeArray(variable12
)[UNTAG_Int( variable11
/*index*/)];
1242 goto return_label37
;
1243 return_label37
: while(false);
1244 variable10
= variable12
;
1245 variable11
= variable10
;
1246 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable11
) /*String::append*/;
1247 variable12
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
1248 variable13
= variable12
;
1249 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable13
) /*String::append*/;
1250 variable6
= variable7
;
1251 ((array___AbstractArray___add_t
)CALL( variable2
/*params*/,COLOR_abstract_collection___SimpleCollection___add
))( variable2
/*params*/, variable6
/*p*/) /*AbstractArray::add*/;
1252 variable7
= TAG_Bool(!UNTAG_Bool(TAG_Bool(( variable3
/*params_new*/ == NIT_NULL
/*null*/) || (( variable3
/*params_new*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable3
/*params_new*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable3
/*params_new*/, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable3
/*params_new*/,COLOR_kernel___Object_____eqeq
))( variable3
/*params_new*/, NIT_NULL
/*null*/) /*Object::==*/)))))));
1253 if (UNTAG_Bool(variable7
)) { /*if*/
1254 ((array___AbstractArray___add_t
)CALL( variable3
/*params_new*/,COLOR_abstract_collection___SimpleCollection___add
))( variable3
/*params_new*/, variable6
/*p*/) /*AbstractArray::add*/;
1256 continue_36
: while(0);
1257 ((abstract_collection___Iterator___next_t
)CALL(variable4
,COLOR_abstract_collection___Iterator___next
))(variable4
) /*Iterator::next*/;
1260 variable4
= ((abstractmetamodel___MMLocalProperty___global_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___global
))( self
) /*MMLocalProperty::global*/;
1261 variable4
= ((abstractmetamodel___MMGlobalProperty___is_init_t
)CALL(variable4
,COLOR_abstractmetamodel___MMGlobalProperty___is_init
))(variable4
) /*MMGlobalProperty::is_init*/;
1262 if (UNTAG_Bool(variable4
)) { /*if*/
1263 variable4
= NEW_string___String___with_native(BOX_NativeString("int* init_table"), TAG_Int(15)); /*new String*/
1264 ((array___AbstractArray___add_t
)CALL( variable2
/*params*/,COLOR_abstract_collection___SimpleCollection___add
))( variable2
/*params*/, variable4
) /*AbstractArray::add*/;
1266 variable4
= NIT_NULL
/*decl variable ret*/;
1267 variable5
= ((static_type___MMLocalProperty___signature_t
)CALL( self
,COLOR_static_type___MMLocalProperty___signature
))( self
) /*MMLocalProperty::signature*/;
1268 variable5
= ((static_type___MMSignature___return_type_t
)CALL(variable5
,COLOR_static_type___MMSignature___return_type
))(variable5
) /*MMSignature::return_type*/;
1269 variable5
= TAG_Bool(!UNTAG_Bool(TAG_Bool((variable5
== NIT_NULL
/*null*/) || ((variable5
!= NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL(variable5
,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN(variable5
, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL(variable5
,COLOR_kernel___Object_____eqeq
))(variable5
, NIT_NULL
/*null*/) /*Object::==*/)))))));
1270 if (UNTAG_Bool(variable5
)) { /*if*/
1271 variable5
= NEW_string___String___with_native(BOX_NativeString("val_t"), TAG_Int(5)); /*new String*/
1272 variable4
= variable5
/*ret=*/;
1274 variable5
= NEW_string___String___with_native(BOX_NativeString("void"), TAG_Int(4)); /*new String*/
1275 variable4
= variable5
/*ret=*/;
1277 variable6
= NEW_string___String___with_native(BOX_NativeString(", "), TAG_Int(2)); /*new String*/
1278 variable6
= ((string___Collection___join_t
)CALL( variable2
/*params*/,COLOR_string___Collection___join
))( variable2
/*params*/, variable6
) /*Collection::join*/;
1279 variable5
= variable6
;
1280 variable7
= NEW_string___String___init(); /*new String*/
1281 variable8
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
1282 variable9
= variable8
;
1283 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable9
) /*String::append*/;
1284 variable10
= variable4
/*ret*/;
1285 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable10
) /*String::append*/;
1286 variable11
= NEW_string___String___with_native(BOX_NativeString(" "), TAG_Int(1)); /*new String*/
1287 variable12
= variable11
;
1288 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable12
) /*String::append*/;
1289 variable13
= ((compiling_base___MMLocalProperty___cname_t
)CALL( self
,COLOR_compiling_base___MMLocalProperty___cname
))( self
) /*MMLocalProperty::cname*/;
1290 variable14
= variable13
;
1291 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable14
) /*String::append*/;
1292 variable15
= NEW_string___String___with_native(BOX_NativeString("("), TAG_Int(1)); /*new String*/
1293 variable16
= variable15
;
1294 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable16
) /*String::append*/;
1295 variable17
= variable5
/*p*/;
1296 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable17
) /*String::append*/;
1297 variable18
= NEW_string___String___with_native(BOX_NativeString(")"), TAG_Int(1)); /*new String*/
1298 variable19
= variable18
;
1299 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable19
) /*String::append*/;
1300 variable6
= variable7
;
1301 variable7
= NEW_string___String___init(); /*new String*/
1302 variable8
= NEW_string___String___with_native(BOX_NativeString("typedef "), TAG_Int(8)); /*new String*/
1303 variable9
= variable8
;
1304 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable9
) /*String::append*/;
1305 variable10
= variable4
/*ret*/;
1306 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable10
) /*String::append*/;
1307 variable11
= NEW_string___String___with_native(BOX_NativeString(" (* "), TAG_Int(4)); /*new String*/
1308 variable12
= variable11
;
1309 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable12
) /*String::append*/;
1310 variable13
= ((compiling_base___MMLocalProperty___cname_t
)CALL( self
,COLOR_compiling_base___MMLocalProperty___cname
))( self
) /*MMLocalProperty::cname*/;
1311 variable14
= variable13
;
1312 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable14
) /*String::append*/;
1313 variable15
= NEW_string___String___with_native(BOX_NativeString("_t)("), TAG_Int(4)); /*new String*/
1314 variable16
= variable15
;
1315 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable16
) /*String::append*/;
1316 variable17
= variable5
/*p*/;
1317 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable17
) /*String::append*/;
1318 variable18
= NEW_string___String___with_native(BOX_NativeString(");"), TAG_Int(2)); /*new String*/
1319 variable19
= variable18
;
1320 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable19
) /*String::append*/;
1321 ((compiling_base___CompilerVisitor___add_decl_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_decl
))( variable0
/*v*/, variable7
) /*CompilerVisitor::add_decl*/;
1322 variable7
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
1323 variable7
= ((string___String_____plus_t
)CALL( variable6
/*s*/,COLOR_string___String_____plus
))( variable6
/*s*/, variable7
) /*String::+*/;
1324 ((compiling_base___CompilerVisitor___add_decl_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_decl
))( variable0
/*v*/, variable7
) /*CompilerVisitor::add_decl*/;
1325 variable7
= TAG_Bool(!UNTAG_Bool(TAG_Bool(( variable3
/*params_new*/ == NIT_NULL
/*null*/) || (( variable3
/*params_new*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable3
/*params_new*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable3
/*params_new*/, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable3
/*params_new*/,COLOR_kernel___Object_____eqeq
))( variable3
/*params_new*/, NIT_NULL
/*null*/) /*Object::==*/)))))));
1326 if (UNTAG_Bool(variable7
)) { /*if*/
1327 variable7
= NEW_string___String___init(); /*new String*/
1328 variable8
= NEW_string___String___with_native(BOX_NativeString("val_t NEW_"), TAG_Int(10)); /*new String*/
1329 variable9
= variable8
;
1330 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable9
) /*String::append*/;
1331 variable10
= ((compiling_base___MMLocalProperty___cname_t
)CALL( self
,COLOR_compiling_base___MMLocalProperty___cname
))( self
) /*MMLocalProperty::cname*/;
1332 variable11
= variable10
;
1333 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable11
) /*String::append*/;
1334 variable12
= NEW_string___String___with_native(BOX_NativeString("("), TAG_Int(1)); /*new String*/
1335 variable13
= variable12
;
1336 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable13
) /*String::append*/;
1337 variable14
= NEW_string___String___with_native(BOX_NativeString(", "), TAG_Int(2)); /*new String*/
1338 variable14
= ((string___Collection___join_t
)CALL( variable3
/*params_new*/,COLOR_string___Collection___join
))( variable3
/*params_new*/, variable14
) /*Collection::join*/;
1339 variable15
= variable14
;
1340 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable15
) /*String::append*/;
1341 variable16
= NEW_string___String___with_native(BOX_NativeString(");"), TAG_Int(2)); /*new String*/
1342 variable17
= variable16
;
1343 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable17
) /*String::append*/;
1344 ((compiling_base___CompilerVisitor___add_decl_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_decl
))( variable0
/*v*/, variable7
) /*CompilerVisitor::add_decl*/;
1346 variable2
= variable6
/*s*/;
1347 goto return_label34
;
1348 return_label34
: while(false);
1349 tracehead
= trace
.prev
;
1352 void compiling_methods___MMSrcMethod___compile_property_to_c(val_t self
, val_t param0
) {
1353 struct trace_t trace
= {NULL
, NULL
, 314, LOCATE_compiling_methods___MMSrcMethod___compile_property_to_c
};
1369 trace
.prev
= tracehead
; tracehead
= &trace
;
1370 trace
.file
= LOCATE_compiling_methods
;
1372 ((compiling_methods___CompilerVisitor___clear_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___clear
))( variable0
/*v*/) /*CompilerVisitor::clear*/;
1373 variable2
= NEW_array___Array___init(); /*new Array[E]*/
1374 variable1
= variable2
;
1375 variable2
= NEW_string___String___with_native(BOX_NativeString(" self"), TAG_Int(5)); /*new String*/
1376 ((array___AbstractArray___add_t
)CALL( variable1
/*args*/,COLOR_abstract_collection___SimpleCollection___add
))( variable1
/*args*/, variable2
) /*AbstractArray::add*/;
1377 variable2
= ((static_type___MMLocalProperty___signature_t
)CALL( self
,COLOR_static_type___MMLocalProperty___signature
))( self
) /*MMLocalProperty::signature*/;
1378 variable2
= ((static_type___MMSignature___arity_t
)CALL(variable2
,COLOR_static_type___MMSignature___arity
))(variable2
) /*MMSignature::arity*/;
1379 variable3
= NEW_range___Range___without_last( TAG_Int(0), variable2
); /*new Range[E]*/
1380 variable2
= variable3
;
1381 variable2
= ((range___Range___iterator_t
)CALL(variable2
,COLOR_abstract_collection___Collection___iterator
))(variable2
) /*Range::iterator*/;
1382 while (true) { /*for*/
1383 variable3
= ((abstract_collection___Iterator___is_ok_t
)CALL(variable2
,COLOR_abstract_collection___Iterator___is_ok
))(variable2
) /*Iterator::is_ok*/;
1384 if (!UNTAG_Bool(variable3
)) break; /*for*/
1385 variable3
= ((abstract_collection___Iterator___item_t
)CALL(variable2
,COLOR_abstract_collection___Iterator___item
))(variable2
) /*Iterator::item*/;
1386 variable4
= NEW_string___String___init(); /*new String*/
1387 variable5
= NEW_string___String___with_native(BOX_NativeString(" param"), TAG_Int(6)); /*new String*/
1388 variable6
= variable5
;
1389 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable6
) /*String::append*/;
1390 variable7
= variable3
/*i*/;
1391 variable7
= ((string___String___to_s_t
)CALL(variable7
,COLOR_string___Object___to_s
))(variable7
) /*String::to_s*/;
1392 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable7
) /*String::append*/;
1393 variable8
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
1394 variable9
= variable8
;
1395 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable9
) /*String::append*/;
1396 ((array___AbstractArray___add_t
)CALL( variable1
/*args*/,COLOR_abstract_collection___SimpleCollection___add
))( variable1
/*args*/, variable4
) /*AbstractArray::add*/;
1397 continue_39
: while(0);
1398 ((abstract_collection___Iterator___next_t
)CALL(variable2
,COLOR_abstract_collection___Iterator___next
))(variable2
) /*Iterator::next*/;
1401 variable3
= ((compiling_methods___MMSrcMethod___decl_csignature_t
)CALL( self
,COLOR_compiling_methods___MMSrcMethod___decl_csignature
))( self
, variable0
/*v*/, variable1
/*args*/) /*MMSrcMethod::decl_csignature*/;
1402 variable2
= variable3
;
1403 variable3
= NEW_string___String___init(); /*new String*/
1404 variable4
= NEW_string___String___with_native(BOX_NativeString("#define LOCATE_"), TAG_Int(15)); /*new String*/
1405 variable5
= variable4
;
1406 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable5
) /*String::append*/;
1407 variable6
= ((compiling_base___MMLocalProperty___cname_t
)CALL( self
,COLOR_compiling_base___MMLocalProperty___cname
))( self
) /*MMLocalProperty::cname*/;
1408 variable7
= variable6
;
1409 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable7
) /*String::append*/;
1410 variable8
= NEW_string___String___with_native(BOX_NativeString(" \""), TAG_Int(2)); /*new String*/
1411 variable9
= variable8
;
1412 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable9
) /*String::append*/;
1413 variable10
= ((abstractmetamodel___MMLocalProperty___full_name_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___full_name
))( self
) /*MMLocalProperty::full_name*/;
1414 variable11
= variable10
;
1415 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable11
) /*String::append*/;
1416 variable12
= NEW_string___String___with_native(BOX_NativeString("\""), TAG_Int(1)); /*new String*/
1417 variable13
= variable12
;
1418 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable13
) /*String::append*/;
1419 ((compiling_base___CompilerVisitor___add_decl_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_decl
))( variable0
/*v*/, variable3
) /*CompilerVisitor::add_decl*/;
1420 variable3
= NEW_string___String___init(); /*new String*/
1421 variable4
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
1422 variable5
= variable4
;
1423 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable5
) /*String::append*/;
1424 variable6
= variable2
/*cs*/;
1425 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable6
) /*String::append*/;
1426 variable7
= NEW_string___String___with_native(BOX_NativeString(" {"), TAG_Int(2)); /*new String*/
1427 variable8
= variable7
;
1428 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable8
) /*String::append*/;
1429 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::add_instr*/;
1430 ((compiling_base___CompilerVisitor___indent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___indent
))( variable0
/*v*/) /*CompilerVisitor::indent*/;
1431 variable4
= ((compiling_base___CompilerVisitor___ctx_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___ctx
))( variable0
/*v*/) /*CompilerVisitor::ctx*/;
1432 variable3
= variable4
;
1433 variable4
= NEW_compiling_base___CContext___init(); /*new CContext*/
1434 ((compiling_base___CompilerVisitor___ctx__eq_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___ctx__eq
))( variable0
/*v*/, variable4
) /*CompilerVisitor::ctx=*/;
1435 variable4
= NEW_string___String___init(); /*new String*/
1436 variable5
= NEW_string___String___with_native(BOX_NativeString("struct trace_t trace = {NULL, NULL, "), TAG_Int(36)); /*new String*/
1437 variable6
= variable5
;
1438 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable6
) /*String::append*/;
1439 variable7
= ((syntax_base___MMLocalProperty___node_t
)CALL( self
,COLOR_syntax_base___MMLocalProperty___node
))( self
) /*MMLocalProperty::node*/;
1440 variable7
= ((parser_prod___PNode___line_number_t
)CALL(variable7
,COLOR_parser_prod___PNode___line_number
))(variable7
) /*PNode::line_number*/;
1441 variable8
= variable7
;
1442 variable8
= ((string___String___to_s_t
)CALL(variable8
,COLOR_string___Object___to_s
))(variable8
) /*String::to_s*/;
1443 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable8
) /*String::append*/;
1444 variable9
= NEW_string___String___with_native(BOX_NativeString(", LOCATE_"), TAG_Int(9)); /*new String*/
1445 variable10
= variable9
;
1446 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable10
) /*String::append*/;
1447 variable11
= ((compiling_base___MMLocalProperty___cname_t
)CALL( self
,COLOR_compiling_base___MMLocalProperty___cname
))( self
) /*MMLocalProperty::cname*/;
1448 variable12
= variable11
;
1449 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable12
) /*String::append*/;
1450 variable13
= NEW_string___String___with_native(BOX_NativeString("};"), TAG_Int(2)); /*new String*/
1451 variable14
= variable13
;
1452 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable14
) /*String::append*/;
1453 ((compiling_base___CompilerVisitor___add_decl_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_decl
))( variable0
/*v*/, variable4
) /*CompilerVisitor::add_decl*/;
1454 variable4
= NEW_string___String___with_native(BOX_NativeString("trace.prev = tracehead; tracehead = &trace;"), TAG_Int(43)); /*new String*/
1455 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable4
) /*CompilerVisitor::add_instr*/;
1456 variable4
= NEW_string___String___init(); /*new String*/
1457 variable5
= NEW_string___String___with_native(BOX_NativeString("trace.file = LOCATE_"), TAG_Int(20)); /*new String*/
1458 variable6
= variable5
;
1459 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable6
) /*String::append*/;
1460 variable7
= ((abstractmetamodel___MMLocalProperty___module_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___module
))( self
) /*MMLocalProperty::module*/;
1461 variable7
= ((abstractmetamodel___MMModule___name_t
)CALL(variable7
,COLOR_abstractmetamodel___MMModule___name
))(variable7
) /*MMModule::name*/;
1462 variable8
= variable7
;
1463 variable8
= ((string___String___to_s_t
)CALL(variable8
,COLOR_string___Object___to_s
))(variable8
) /*String::to_s*/;
1464 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable8
) /*String::append*/;
1465 variable9
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
1466 variable10
= variable9
;
1467 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable10
) /*String::append*/;
1468 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable4
) /*CompilerVisitor::add_instr*/;
1469 variable5
= ((compiling_methods___MMSrcMethod___do_compile_inside_t
)CALL( self
,COLOR_compiling_methods___MMSrcMethod___do_compile_inside
))( self
, variable0
/*v*/, variable1
/*args*/) /*MMSrcMethod::do_compile_inside*/;
1470 variable4
= variable5
;
1471 variable5
= NEW_string___String___with_native(BOX_NativeString("tracehead = trace.prev;"), TAG_Int(23)); /*new String*/
1472 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable5
) /*CompilerVisitor::add_instr*/;
1473 variable5
= TAG_Bool(( variable4
/*s*/ == NIT_NULL
/*null*/) || (( variable4
/*s*/ != NIT_NULL
) && UNTAG_Bool(((string___String_____eqeq_t
)CALL( variable4
/*s*/,COLOR_kernel___Object_____eqeq
))( variable4
/*s*/, NIT_NULL
/*null*/) /*String::==*/)));
1474 if (UNTAG_Bool(variable5
)) { /*if*/
1475 variable5
= NEW_string___String___with_native(BOX_NativeString("return;"), TAG_Int(7)); /*new String*/
1476 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable5
) /*CompilerVisitor::add_instr*/;
1478 variable5
= NEW_string___String___init(); /*new String*/
1479 variable6
= NEW_string___String___with_native(BOX_NativeString("return "), TAG_Int(7)); /*new String*/
1480 variable7
= variable6
;
1481 ((string___String___append_t
)CALL(variable5
,COLOR_abstract_collection___IndexedCollection___append
))(variable5
, variable7
) /*String::append*/;
1482 variable8
= variable4
/*s*/;
1483 ((string___String___append_t
)CALL(variable5
,COLOR_abstract_collection___IndexedCollection___append
))(variable5
, variable8
) /*String::append*/;
1484 variable9
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
1485 variable10
= variable9
;
1486 ((string___String___append_t
)CALL(variable5
,COLOR_abstract_collection___IndexedCollection___append
))(variable5
, variable10
) /*String::append*/;
1487 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable5
) /*CompilerVisitor::add_instr*/;
1489 variable5
= ((compiling_base___CompilerVisitor___ctx_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___ctx
))( variable0
/*v*/) /*CompilerVisitor::ctx*/;
1490 ((compiling_base___CContext___append_t
)CALL( variable3
/*ctx_old*/,COLOR_compiling_base___CContext___append
))( variable3
/*ctx_old*/, variable5
) /*CContext::append*/;
1491 ((compiling_base___CompilerVisitor___ctx__eq_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___ctx__eq
))( variable0
/*v*/, variable3
/*ctx_old*/) /*CompilerVisitor::ctx=*/;
1492 ((compiling_base___CompilerVisitor___unindent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___unindent
))( variable0
/*v*/) /*CompilerVisitor::unindent*/;
1493 variable5
= NEW_string___String___with_native(BOX_NativeString("}"), TAG_Int(1)); /*new String*/
1494 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable5
) /*CompilerVisitor::add_instr*/;
1495 tracehead
= trace
.prev
;
1498 val_t
compiling_methods___MMSrcMethod___do_compile_inside(val_t self
, val_t param0
, val_t param1
) {
1499 struct trace_t trace
= {NULL
, NULL
, 347, LOCATE_compiling_methods___MMSrcMethod___do_compile_inside
};
1500 trace
.prev
= tracehead
; tracehead
= &trace
;
1501 trace
.file
= LOCATE_compiling_methods
;
1502 fprintf(stderr
, "Deferred method %s called");
1503 fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_compiling_methods___MMSrcMethod___compile_property_to_c
, LOCATE_compiling_methods
, 347);
1505 tracehead
= trace
.prev
;
1508 val_t
compiling_methods___MMReadImplementationMethod___do_compile_inside(val_t self
, val_t param0
, val_t param1
) {
1509 struct trace_t trace
= {NULL
, NULL
, 352, LOCATE_compiling_methods___MMReadImplementationMethod___do_compile_inside
};
1516 trace
.prev
= tracehead
; tracehead
= &trace
;
1517 trace
.file
= LOCATE_compiling_methods
;
1520 variable2
= ((syntax_base___MMAttrImplementationMethod___node_t
)CALL( self
,COLOR_syntax_base___MMLocalProperty___node
))( self
) /*MMAttrImplementationMethod::node*/;
1521 variable2
= ((mmbuilder___AAttrPropdef___prop_t
)CALL(variable2
,COLOR_syntax_base___AAttrPropdef___prop
))(variable2
) /*AAttrPropdef::prop*/;
1522 variable3
= TAG_Int(0);
1523 variable4
= TAG_Bool(UNTAG_Int( variable3
/*index*/)>=UNTAG_Int( TAG_Int(0)));
1524 variable5
= variable4
;
1525 if (UNTAG_Bool(variable5
)) { /* and */
1526 variable5
= ATTR_array___AbstractArray____length( variable1
/*params*/) /*AbstractArray::_length*/;
1527 variable5
= TAG_Bool(UNTAG_Int( variable3
/*index*/)<UNTAG_Int(variable5
));
1529 variable4
= variable5
;
1530 if (!UNTAG_Bool(variable4
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
1531 variable4
= ATTR_array___Array____items( variable1
/*params*/) /*Array::_items*/;
1532 variable4
= UNBOX_NativeArray(variable4
)[UNTAG_Int( variable3
/*index*/)];
1533 goto return_label41
;
1534 return_label41
: while(false);
1535 variable3
= variable4
;
1536 variable2
= ((compiling_methods___MMAttribute___compile_access_t
)CALL(variable2
,COLOR_compiling_methods___MMAttribute___compile_access
))(variable2
, variable0
/*v*/, variable3
) /*MMAttribute::compile_access*/;
1537 goto return_label40
;
1538 return_label40
: while(false);
1539 tracehead
= trace
.prev
;
1542 val_t
compiling_methods___MMWriteImplementationMethod___do_compile_inside(val_t self
, val_t param0
, val_t param1
) {
1543 struct trace_t trace
= {NULL
, NULL
, 359, LOCATE_compiling_methods___MMWriteImplementationMethod___do_compile_inside
};
1550 trace
.prev
= tracehead
; tracehead
= &trace
;
1551 trace
.file
= LOCATE_compiling_methods
;
1554 variable2
= ((syntax_base___MMAttrImplementationMethod___node_t
)CALL( self
,COLOR_syntax_base___MMLocalProperty___node
))( self
) /*MMAttrImplementationMethod::node*/;
1555 variable2
= ((mmbuilder___AAttrPropdef___prop_t
)CALL(variable2
,COLOR_syntax_base___AAttrPropdef___prop
))(variable2
) /*AAttrPropdef::prop*/;
1556 variable3
= TAG_Int(0);
1557 variable4
= TAG_Bool(UNTAG_Int( variable3
/*index*/)>=UNTAG_Int( TAG_Int(0)));
1558 variable5
= variable4
;
1559 if (UNTAG_Bool(variable5
)) { /* and */
1560 variable5
= ATTR_array___AbstractArray____length( variable1
/*params*/) /*AbstractArray::_length*/;
1561 variable5
= TAG_Bool(UNTAG_Int( variable3
/*index*/)<UNTAG_Int(variable5
));
1563 variable4
= variable5
;
1564 if (!UNTAG_Bool(variable4
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
1565 variable4
= ATTR_array___Array____items( variable1
/*params*/) /*Array::_items*/;
1566 variable4
= UNBOX_NativeArray(variable4
)[UNTAG_Int( variable3
/*index*/)];
1567 goto return_label43
;
1568 return_label43
: while(false);
1569 variable3
= variable4
;
1570 variable2
= ((compiling_methods___MMAttribute___compile_access_t
)CALL(variable2
,COLOR_compiling_methods___MMAttribute___compile_access
))(variable2
, variable0
/*v*/, variable3
) /*MMAttribute::compile_access*/;
1571 variable3
= TAG_Int(1);
1572 variable4
= TAG_Bool(UNTAG_Int( variable3
/*index*/)>=UNTAG_Int( TAG_Int(0)));
1573 variable5
= variable4
;
1574 if (UNTAG_Bool(variable5
)) { /* and */
1575 variable5
= ATTR_array___AbstractArray____length( variable1
/*params*/) /*AbstractArray::_length*/;
1576 variable5
= TAG_Bool(UNTAG_Int( variable3
/*index*/)<UNTAG_Int(variable5
));
1578 variable4
= variable5
;
1579 if (!UNTAG_Bool(variable4
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
1580 variable4
= ATTR_array___Array____items( variable1
/*params*/) /*Array::_items*/;
1581 variable4
= UNBOX_NativeArray(variable4
)[UNTAG_Int( variable3
/*index*/)];
1582 goto return_label44
;
1583 return_label44
: while(false);
1584 variable3
= variable4
;
1585 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable2
, variable3
) /*CompilerVisitor::add_assignment*/;
1586 variable2
= NIT_NULL
/*null*/;
1587 goto return_label42
;
1588 return_label42
: while(false);
1589 tracehead
= trace
.prev
;
1592 val_t
compiling_methods___MMMethSrcMethod___do_compile_inside(val_t self
, val_t param0
, val_t param1
) {
1593 struct trace_t trace
= {NULL
, NULL
, 367, LOCATE_compiling_methods___MMMethSrcMethod___do_compile_inside
};
1597 trace
.prev
= tracehead
; tracehead
= &trace
;
1598 trace
.file
= LOCATE_compiling_methods
;
1601 variable2
= ((syntax_base___MMMethSrcMethod___node_t
)CALL( self
,COLOR_syntax_base___MMLocalProperty___node
))( self
) /*MMMethSrcMethod::node*/;
1602 variable2
= ((compiling_methods___AMethPropdef___do_compile_inside_t
)CALL(variable2
,COLOR_compiling_methods___AMethPropdef___do_compile_inside
))(variable2
, variable0
/*v*/, self
, variable1
/*params*/) /*AMethPropdef::do_compile_inside*/;
1603 goto return_label45
;
1604 return_label45
: while(false);
1605 tracehead
= trace
.prev
;
1608 val_t
compiling_methods___MMType___compile_cast(val_t self
, val_t param0
, val_t param1
) {
1609 struct trace_t trace
= {NULL
, NULL
, 374, LOCATE_compiling_methods___MMType___compile_cast
};
1633 trace
.prev
= tracehead
; tracehead
= &trace
;
1634 trace
.file
= LOCATE_compiling_methods
;
1637 variable3
= ((static_type___MMType___local_class_t
)CALL( self
,COLOR_static_type___MMType___local_class
))( self
) /*MMType::local_class*/;
1638 variable3
= ((abstractmetamodel___MMLocalClass___global_t
)CALL(variable3
,COLOR_abstractmetamodel___MMLocalClass___global
))(variable3
) /*MMLocalClass::global*/;
1639 variable2
= variable3
;
1640 variable3
= NEW_string___String___init(); /*new String*/
1641 variable4
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(("), TAG_Int(10)); /*new String*/
1642 variable5
= variable4
;
1643 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable5
) /*String::append*/;
1644 variable6
= variable1
/*recv*/;
1645 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable6
) /*String::append*/;
1646 variable7
= NEW_string___String___with_native(BOX_NativeString("==NIT_NULL) || VAL_ISA("), TAG_Int(23)); /*new String*/
1647 variable8
= variable7
;
1648 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable8
) /*String::append*/;
1649 variable9
= variable1
/*recv*/;
1650 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable9
) /*String::append*/;
1651 variable10
= NEW_string___String___with_native(BOX_NativeString(", "), TAG_Int(2)); /*new String*/
1652 variable11
= variable10
;
1653 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable11
) /*String::append*/;
1654 variable12
= ((compiling_base___MMGlobalClass___color_id_t
)CALL( variable2
/*g*/,COLOR_compiling_base___MMGlobalClass___color_id
))( variable2
/*g*/) /*MMGlobalClass::color_id*/;
1655 variable13
= variable12
;
1656 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable13
) /*String::append*/;
1657 variable14
= NEW_string___String___with_native(BOX_NativeString(", "), TAG_Int(2)); /*new String*/
1658 variable15
= variable14
;
1659 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable15
) /*String::append*/;
1660 variable16
= ((compiling_base___MMGlobalClass___id_id_t
)CALL( variable2
/*g*/,COLOR_compiling_base___MMGlobalClass___id_id
))( variable2
/*g*/) /*MMGlobalClass::id_id*/;
1661 variable17
= variable16
;
1662 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable17
) /*String::append*/;
1663 variable18
= NEW_string___String___with_native(BOX_NativeString(")) /*cast "), TAG_Int(10)); /*new String*/
1664 variable19
= variable18
;
1665 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable19
) /*String::append*/;
1667 variable20
= ((string___String___to_s_t
)CALL(variable20
,COLOR_string___Object___to_s
))(variable20
) /*String::to_s*/;
1668 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable20
) /*String::append*/;
1669 variable21
= NEW_string___String___with_native(BOX_NativeString("*/"), TAG_Int(2)); /*new String*/
1670 variable22
= variable21
;
1671 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable22
) /*String::append*/;
1672 variable2
= variable3
;
1673 goto return_label46
;
1674 return_label46
: while(false);
1675 tracehead
= trace
.prev
;
1678 void compiling_methods___MMType___compile_type_check(val_t self
, val_t param0
, val_t param1
, val_t param2
) {
1679 struct trace_t trace
= {NULL
, NULL
, 383, LOCATE_compiling_methods___MMType___compile_type_check
};
1708 trace
.prev
= tracehead
; tracehead
= &trace
;
1709 trace
.file
= LOCATE_compiling_methods
;
1713 variable4
= ((static_type___MMType___local_class_t
)CALL( self
,COLOR_static_type___MMType___local_class
))( self
) /*MMType::local_class*/;
1714 variable4
= ((abstractmetamodel___MMLocalClass___global_t
)CALL(variable4
,COLOR_abstractmetamodel___MMLocalClass___global
))(variable4
) /*MMLocalClass::global*/;
1715 variable3
= variable4
;
1716 variable4
= NEW_string___String___init(); /*new String*/
1717 variable5
= NEW_string___String___with_native(BOX_NativeString("if (("), TAG_Int(5)); /*new String*/
1718 variable6
= variable5
;
1719 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable6
) /*String::append*/;
1720 variable7
= variable1
/*recv*/;
1721 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable7
) /*String::append*/;
1722 variable8
= NEW_string___String___with_native(BOX_NativeString("!=NIT_NULL) && !VAL_ISA("), TAG_Int(24)); /*new String*/
1723 variable9
= variable8
;
1724 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable9
) /*String::append*/;
1725 variable10
= variable1
/*recv*/;
1726 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable10
) /*String::append*/;
1727 variable11
= NEW_string___String___with_native(BOX_NativeString(", "), TAG_Int(2)); /*new String*/
1728 variable12
= variable11
;
1729 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable12
) /*String::append*/;
1730 variable13
= ((compiling_base___MMGlobalClass___color_id_t
)CALL( variable3
/*g*/,COLOR_compiling_base___MMGlobalClass___color_id
))( variable3
/*g*/) /*MMGlobalClass::color_id*/;
1731 variable14
= variable13
;
1732 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable14
) /*String::append*/;
1733 variable15
= NEW_string___String___with_native(BOX_NativeString(", "), TAG_Int(2)); /*new String*/
1734 variable16
= variable15
;
1735 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable16
) /*String::append*/;
1736 variable17
= ((compiling_base___MMGlobalClass___id_id_t
)CALL( variable3
/*g*/,COLOR_compiling_base___MMGlobalClass___id_id
))( variable3
/*g*/) /*MMGlobalClass::id_id*/;
1737 variable18
= variable17
;
1738 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable18
) /*String::append*/;
1739 variable19
= NEW_string___String___with_native(BOX_NativeString(")) { fprintf(stderr, \"Cast failled\"); "), TAG_Int(38)); /*new String*/
1740 variable20
= variable19
;
1741 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable20
) /*String::append*/;
1742 variable21
= ((compiling_methods___CompilerVisitor___printf_locate_error_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___printf_locate_error
))( variable0
/*v*/, variable2
/*n*/) /*CompilerVisitor::printf_locate_error*/;
1743 variable22
= variable21
;
1744 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable22
) /*String::append*/;
1745 variable23
= NEW_string___String___with_native(BOX_NativeString(" nit_exit(1); } /*cast "), TAG_Int(23)); /*new String*/
1746 variable24
= variable23
;
1747 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable24
) /*String::append*/;
1749 variable25
= ((string___String___to_s_t
)CALL(variable25
,COLOR_string___Object___to_s
))(variable25
) /*String::to_s*/;
1750 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable25
) /*String::append*/;
1751 variable26
= NEW_string___String___with_native(BOX_NativeString("*/;"), TAG_Int(3)); /*new String*/
1752 variable27
= variable26
;
1753 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable27
) /*String::append*/;
1754 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable4
) /*CompilerVisitor::add_instr*/;
1755 tracehead
= trace
.prev
;
1758 val_t
compiling_methods___AMethPropdef___do_compile_inside(val_t self
, val_t param0
, val_t param1
, val_t param2
) {
1759 struct trace_t trace
= {NULL
, NULL
, 395, LOCATE_compiling_methods___AMethPropdef___do_compile_inside
};
1760 trace
.prev
= tracehead
; tracehead
= &trace
;
1761 trace
.file
= LOCATE_compiling_methods
;
1762 fprintf(stderr
, "Deferred method %s called");
1763 fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_compiling_methods___MMType___compile_type_check
, LOCATE_compiling_methods
, 395);
1765 tracehead
= trace
.prev
;
1768 val_t
compiling_methods___AConcreteMethPropdef___do_compile_inside(val_t self
, val_t param0
, val_t param1
, val_t param2
) {
1769 struct trace_t trace
= {NULL
, NULL
, 400, LOCATE_compiling_methods___AConcreteMethPropdef___do_compile_inside
};
1791 trace
.prev
= tracehead
; tracehead
= &trace
;
1792 trace
.file
= LOCATE_compiling_methods
;
1796 variable4
= ((abstractmetamodel___MMLocalProperty___global_t
)CALL( variable1
/*method*/,COLOR_abstractmetamodel___MMLocalProperty___global
))( variable1
/*method*/) /*MMLocalProperty::global*/;
1797 variable4
= ((abstractmetamodel___MMGlobalProperty___intro_t
)CALL(variable4
,COLOR_abstractmetamodel___MMGlobalProperty___intro
))(variable4
) /*MMGlobalProperty::intro*/;
1798 variable3
= variable4
;
1799 variable5
= ((static_type___MMLocalProperty___signature_t
)CALL( variable1
/*method*/,COLOR_static_type___MMLocalProperty___signature
))( variable1
/*method*/) /*MMLocalProperty::signature*/;
1800 variable5
= ((static_type___MMSignature___recv_t
)CALL(variable5
,COLOR_static_type___MMSignature___recv
))(variable5
) /*MMSignature::recv*/;
1801 variable5
= ((static_type___MMLocalProperty___signature_for_t
)CALL( variable3
/*orig_meth*/,COLOR_static_type___MMLocalProperty___signature_for
))( variable3
/*orig_meth*/, variable5
) /*MMLocalProperty::signature_for*/;
1802 variable4
= variable5
;
1803 variable5
= ((parser_nodes___AMethPropdef___n_signature_t
)CALL( self
,COLOR_parser_nodes___AMethPropdef___n_signature
))( self
) /*AMethPropdef::n_signature*/;
1804 variable5
= TAG_Bool(!UNTAG_Bool(TAG_Bool((variable5
== NIT_NULL
/*null*/) || ((variable5
!= NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL(variable5
,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN(variable5
, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL(variable5
,COLOR_kernel___Object_____eqeq
))(variable5
, NIT_NULL
/*null*/) /*Object::==*/)))))));
1805 if (UNTAG_Bool(variable5
)) { /*if*/
1806 variable6
= ((parser_nodes___AMethPropdef___n_signature_t
)CALL( self
,COLOR_parser_nodes___AMethPropdef___n_signature
))( self
) /*AMethPropdef::n_signature*/;
1807 variable5
= variable6
;
1808 variable6
= TAG_Bool(( variable5
/*sig*/==NIT_NULL
) || VAL_ISA( variable5
/*sig*/, COLOR_ASignature
, ID_ASignature
)) /*cast ASignature*/;
1809 if (!UNTAG_Bool(variable6
)) { fprintf(stderr
, "Assert%s failed", ""); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_compiling_methods___AConcreteMethPropdef___do_compile_inside
, LOCATE_compiling_methods
, 406); nit_exit(1);}
1810 variable6
= ((parser_nodes___ASignature___n_params_t
)CALL( variable5
/*sig*/,COLOR_parser_nodes___ASignature___n_params
))( variable5
/*sig*/) /*ASignature::n_params*/;
1811 variable6
= ((list___List___iterator_t
)CALL(variable6
,COLOR_abstract_collection___Collection___iterator
))(variable6
) /*List::iterator*/;
1812 while (true) { /*for*/
1813 variable7
= ((list___ListIterator___is_ok_t
)CALL(variable6
,COLOR_abstract_collection___Iterator___is_ok
))(variable6
) /*ListIterator::is_ok*/;
1814 if (!UNTAG_Bool(variable7
)) break; /*for*/
1815 variable7
= ((list___ListIterator___item_t
)CALL(variable6
,COLOR_abstract_collection___Iterator___item
))(variable6
) /*ListIterator::item*/;
1816 variable9
= ((compiling_methods___CompilerVisitor___get_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___get_var
))( variable0
/*v*/) /*CompilerVisitor::get_var*/;
1817 variable8
= variable9
;
1818 variable9
= ((compiling_methods___CompilerVisitor___varnames_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___varnames
))( variable0
/*v*/) /*CompilerVisitor::varnames*/;
1819 variable10
= ((mmbuilder___PParam___variable_t
)CALL( variable7
/*ap*/,COLOR_syntax_base___PParam___variable
))( variable7
/*ap*/) /*PParam::variable*/;
1820 ((abstract_collection___Map_____braeq_t
)CALL(variable9
,COLOR_abstract_collection___Map_____braeq
))(variable9
, variable10
, variable8
/*cname*/) /*Map::[]=*/;
1821 variable10
= ((mmbuilder___PParam___position_t
)CALL( variable7
/*ap*/,COLOR_syntax_base___PParam___position
))( variable7
/*ap*/) /*PParam::position*/;
1822 variable10
= ((static_type___MMSignature_____bra_t
)CALL( variable4
/*orig_sig*/,COLOR_static_type___MMSignature_____bra
))( variable4
/*orig_sig*/, variable10
) /*MMSignature::[]*/;
1823 variable9
= variable10
;
1824 variable10
= ((mmbuilder___PParam___variable_t
)CALL( variable7
/*ap*/,COLOR_syntax_base___PParam___variable
))( variable7
/*ap*/) /*PParam::variable*/;
1825 variable10
= ((syntax_base___Variable___stype_t
)CALL(variable10
,COLOR_syntax_base___Variable___stype
))(variable10
) /*Variable::stype*/;
1826 variable10
= ((static_type___MMType_____l_t
)CALL( variable9
/*orig_type*/,COLOR_static_type___MMType_____l
))( variable9
/*orig_type*/, variable10
) /*MMType::<*/;
1827 if (UNTAG_Bool( TAG_Bool(!UNTAG_Bool(variable10
)))) { /*if*/
1828 variable10
= NEW_string___String___init(); /*new String*/
1829 variable11
= NEW_string___String___with_native(BOX_NativeString("/* check if p<"), TAG_Int(14)); /*new String*/
1830 variable12
= variable11
;
1831 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable12
) /*String::append*/;
1832 variable13
= ((mmbuilder___PParam___variable_t
)CALL( variable7
/*ap*/,COLOR_syntax_base___PParam___variable
))( variable7
/*ap*/) /*PParam::variable*/;
1833 variable13
= ((syntax_base___Variable___stype_t
)CALL(variable13
,COLOR_syntax_base___Variable___stype
))(variable13
) /*Variable::stype*/;
1834 variable14
= variable13
;
1835 variable14
= ((string___String___to_s_t
)CALL(variable14
,COLOR_string___Object___to_s
))(variable14
) /*String::to_s*/;
1836 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable14
) /*String::append*/;
1837 variable15
= NEW_string___String___with_native(BOX_NativeString(" with p:"), TAG_Int(8)); /*new String*/
1838 variable16
= variable15
;
1839 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable16
) /*String::append*/;
1840 variable17
= variable9
/*orig_type*/;
1841 variable17
= ((string___String___to_s_t
)CALL(variable17
,COLOR_string___Object___to_s
))(variable17
) /*String::to_s*/;
1842 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable17
) /*String::append*/;
1843 variable18
= NEW_string___String___with_native(BOX_NativeString(" */"), TAG_Int(3)); /*new String*/
1844 variable19
= variable18
;
1845 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable19
) /*String::append*/;
1846 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable10
) /*CompilerVisitor::add_instr*/;
1847 variable10
= ((mmbuilder___PParam___variable_t
)CALL( variable7
/*ap*/,COLOR_syntax_base___PParam___variable
))( variable7
/*ap*/) /*PParam::variable*/;
1848 variable10
= ((syntax_base___Variable___stype_t
)CALL(variable10
,COLOR_syntax_base___Variable___stype
))(variable10
) /*Variable::stype*/;
1849 variable11
= ((mmbuilder___PParam___position_t
)CALL( variable7
/*ap*/,COLOR_syntax_base___PParam___position
))( variable7
/*ap*/) /*PParam::position*/;
1850 variable11
= TAG_Int(UNTAG_Int(variable11
)+UNTAG_Int( TAG_Int(1)));
1851 variable12
= variable11
;
1852 variable13
= TAG_Bool(UNTAG_Int( variable12
/*index*/)>=UNTAG_Int( TAG_Int(0)));
1853 variable14
= variable13
;
1854 if (UNTAG_Bool(variable14
)) { /* and */
1855 variable14
= ATTR_array___AbstractArray____length( variable2
/*params*/) /*AbstractArray::_length*/;
1856 variable14
= TAG_Bool(UNTAG_Int( variable12
/*index*/)<UNTAG_Int(variable14
));
1858 variable13
= variable14
;
1859 if (!UNTAG_Bool(variable13
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
1860 variable13
= ATTR_array___Array____items( variable2
/*params*/) /*Array::_items*/;
1861 variable13
= UNBOX_NativeArray(variable13
)[UNTAG_Int( variable12
/*index*/)];
1862 goto return_label50
;
1863 return_label50
: while(false);
1864 variable11
= variable13
;
1865 ((compiling_methods___MMType___compile_type_check_t
)CALL(variable10
,COLOR_compiling_methods___MMType___compile_type_check
))(variable10
, variable0
/*v*/, variable11
, variable7
/*ap*/) /*MMType::compile_type_check*/;
1867 variable10
= ((mmbuilder___PParam___position_t
)CALL( variable7
/*ap*/,COLOR_syntax_base___PParam___position
))( variable7
/*ap*/) /*PParam::position*/;
1868 variable10
= TAG_Int(UNTAG_Int(variable10
)+UNTAG_Int( TAG_Int(1)));
1869 variable11
= variable10
;
1870 variable12
= TAG_Bool(UNTAG_Int( variable11
/*index*/)>=UNTAG_Int( TAG_Int(0)));
1871 variable13
= variable12
;
1872 if (UNTAG_Bool(variable13
)) { /* and */
1873 variable13
= ATTR_array___AbstractArray____length( variable2
/*params*/) /*AbstractArray::_length*/;
1874 variable13
= TAG_Bool(UNTAG_Int( variable11
/*index*/)<UNTAG_Int(variable13
));
1876 variable12
= variable13
;
1877 if (!UNTAG_Bool(variable12
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
1878 variable12
= ATTR_array___Array____items( variable2
/*params*/) /*Array::_items*/;
1879 variable12
= UNBOX_NativeArray(variable12
)[UNTAG_Int( variable11
/*index*/)];
1880 goto return_label51
;
1881 return_label51
: while(false);
1882 variable10
= variable12
;
1883 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable8
/*cname*/, variable10
) /*CompilerVisitor::add_assignment*/;
1884 continue_49
: while(0);
1885 ((list___ListIterator___next_t
)CALL(variable6
,COLOR_abstract_collection___Iterator___next
))(variable6
) /*ListIterator::next*/;
1889 variable6
= ((compiling_methods___CompilerVisitor___method_params_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___method_params
))( variable0
/*v*/) /*CompilerVisitor::method_params*/;
1890 variable5
= variable6
;
1891 variable7
= ((compiling_methods___CompilerVisitor___return_label_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___return_label
))( variable0
/*v*/) /*CompilerVisitor::return_label*/;
1892 variable6
= variable7
;
1893 variable8
= ((compiling_methods___CompilerVisitor___return_value_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___return_value
))( variable0
/*v*/) /*CompilerVisitor::return_value*/;
1894 variable7
= variable8
;
1895 variable9
= ((compiling_methods___CompilerVisitor___has_return_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___has_return
))( variable0
/*v*/) /*CompilerVisitor::has_return*/;
1896 variable8
= variable9
;
1897 variable9
= NIT_NULL
/*null*/;
1898 variable10
= TAG_Bool(( self
==NIT_NULL
) || VAL_ISA( self
, COLOR_AConcreteInitPropdef
, ID_AConcreteInitPropdef
)) /*cast AConcreteInitPropdef*/;
1899 if (UNTAG_Bool(variable10
)) { /*if*/
1900 variable10
= NEW_string___String___init(); /*new String*/
1901 variable11
= NEW_string___String___with_native(BOX_NativeString("VAL2OBJ("), TAG_Int(8)); /*new String*/
1902 variable12
= variable11
;
1903 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable12
) /*String::append*/;
1904 variable13
= TAG_Int(0);
1905 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
1906 variable15
= variable14
;
1907 if (UNTAG_Bool(variable15
)) { /* and */
1908 variable15
= ATTR_array___AbstractArray____length( variable2
/*params*/) /*AbstractArray::_length*/;
1909 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
1911 variable14
= variable15
;
1912 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
1913 variable14
= ATTR_array___Array____items( variable2
/*params*/) /*Array::_items*/;
1914 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
1915 goto return_label52
;
1916 return_label52
: while(false);
1917 variable13
= variable14
;
1918 variable14
= variable13
;
1919 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable14
) /*String::append*/;
1920 variable15
= NEW_string___String___with_native(BOX_NativeString(")->vft["), TAG_Int(7)); /*new String*/
1921 variable16
= variable15
;
1922 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable16
) /*String::append*/;
1923 variable17
= ((abstractmetamodel___MMLocalProperty___local_class_t
)CALL( variable1
/*method*/,COLOR_abstractmetamodel___MMLocalProperty___local_class
))( variable1
/*method*/) /*MMLocalProperty::local_class*/;
1924 variable17
= ((abstractmetamodel___MMLocalClass___global_t
)CALL(variable17
,COLOR_abstractmetamodel___MMLocalClass___global
))(variable17
) /*MMLocalClass::global*/;
1925 variable17
= ((compiling_base___MMGlobalClass___init_table_pos_id_t
)CALL(variable17
,COLOR_compiling_base___MMGlobalClass___init_table_pos_id
))(variable17
) /*MMGlobalClass::init_table_pos_id*/;
1926 variable18
= variable17
;
1927 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable18
) /*String::append*/;
1928 variable19
= NEW_string___String___with_native(BOX_NativeString("].i"), TAG_Int(3)); /*new String*/
1929 variable20
= variable19
;
1930 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable20
) /*String::append*/;
1931 variable9
= variable10
/*itpos=*/;
1932 variable10
= NEW_string___String___init(); /*new String*/
1933 variable11
= NEW_string___String___with_native(BOX_NativeString("if (init_table["), TAG_Int(15)); /*new String*/
1934 variable12
= variable11
;
1935 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable12
) /*String::append*/;
1936 variable13
= variable9
/*itpos*/;
1937 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable13
) /*String::append*/;
1938 variable14
= NEW_string___String___with_native(BOX_NativeString("]) return;"), TAG_Int(10)); /*new String*/
1939 variable15
= variable14
;
1940 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable15
) /*String::append*/;
1941 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable10
) /*CompilerVisitor::add_instr*/;
1943 ((compiling_methods___CompilerVisitor___method_params__eq_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___method_params__eq
))( variable0
/*v*/, variable2
/*params*/) /*CompilerVisitor::method_params=*/;
1944 ((compiling_methods___CompilerVisitor___has_return__eq_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___has_return__eq
))( variable0
/*v*/, TAG_Bool(false)) /*CompilerVisitor::has_return=*/;
1945 variable10
= NEW_string___String___init(); /*new String*/
1946 variable11
= NEW_string___String___with_native(BOX_NativeString("return_label"), TAG_Int(12)); /*new String*/
1947 variable12
= variable11
;
1948 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable12
) /*String::append*/;
1949 variable13
= ((compiling_base___CompilerVisitor___new_number_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___new_number
))( variable0
/*v*/) /*CompilerVisitor::new_number*/;
1950 variable14
= variable13
;
1951 variable14
= ((string___String___to_s_t
)CALL(variable14
,COLOR_string___Object___to_s
))(variable14
) /*String::to_s*/;
1952 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable14
) /*String::append*/;
1953 variable15
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
1954 variable16
= variable15
;
1955 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable16
) /*String::append*/;
1956 ((compiling_methods___CompilerVisitor___return_label__eq_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___return_label__eq
))( variable0
/*v*/, variable10
) /*CompilerVisitor::return_label=*/;
1957 variable10
= ((static_type___MMLocalProperty___signature_t
)CALL( variable1
/*method*/,COLOR_static_type___MMLocalProperty___signature
))( variable1
/*method*/) /*MMLocalProperty::signature*/;
1958 variable10
= ((static_type___MMSignature___return_type_t
)CALL(variable10
,COLOR_static_type___MMSignature___return_type
))(variable10
) /*MMSignature::return_type*/;
1959 variable10
= TAG_Bool(!UNTAG_Bool(TAG_Bool((variable10
== NIT_NULL
/*null*/) || ((variable10
!= NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL(variable10
,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN(variable10
, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL(variable10
,COLOR_kernel___Object_____eqeq
))(variable10
, NIT_NULL
/*null*/) /*Object::==*/)))))));
1960 if (UNTAG_Bool(variable10
)) { /*if*/
1961 variable10
= ((compiling_methods___CompilerVisitor___get_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___get_var
))( variable0
/*v*/) /*CompilerVisitor::get_var*/;
1962 ((compiling_methods___CompilerVisitor___return_value__eq_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___return_value__eq
))( variable0
/*v*/, variable10
) /*CompilerVisitor::return_value=*/;
1963 variable10
= ((compiling_methods___CompilerVisitor___return_value_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___return_value
))( variable0
/*v*/) /*CompilerVisitor::return_value*/;
1964 ((compiling_methods___CompilerVisitor___free_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___free_var
))( variable0
/*v*/, variable10
) /*CompilerVisitor::free_var*/;
1966 ((compiling_methods___CompilerVisitor___return_value__eq_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___return_value__eq
))( variable0
/*v*/, NIT_NULL
/*null*/) /*CompilerVisitor::return_value=*/;
1968 ((compiling_methods___CompilerVisitor___method__eq_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___method__eq
))( variable0
/*v*/, variable1
/*method*/) /*CompilerVisitor::method=*/;
1969 variable10
= TAG_Bool(( self
==NIT_NULL
) || VAL_ISA( self
, COLOR_AConcreteInitPropdef
, ID_AConcreteInitPropdef
)) /*cast AConcreteInitPropdef*/;
1970 if (UNTAG_Bool(variable10
)) { /*if*/
1971 ((compiling_methods___CompilerVisitor___invoke_super_init_calls_after_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___invoke_super_init_calls_after
))( variable0
/*v*/, NIT_NULL
/*null*/) /*CompilerVisitor::invoke_super_init_calls_after*/;
1973 variable10
= ((parser_nodes___AConcreteMethPropdef___n_block_t
)CALL( self
,COLOR_parser_nodes___AConcreteMethPropdef___n_block
))( self
) /*AConcreteMethPropdef::n_block*/;
1974 variable10
= TAG_Bool(!UNTAG_Bool(TAG_Bool((variable10
== NIT_NULL
/*null*/) || ((variable10
!= NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL(variable10
,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN(variable10
, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL(variable10
,COLOR_kernel___Object_____eqeq
))(variable10
, NIT_NULL
/*null*/) /*Object::==*/)))))));
1975 if (UNTAG_Bool(variable10
)) { /*if*/
1976 variable10
= ((parser_nodes___AConcreteMethPropdef___n_block_t
)CALL( self
,COLOR_parser_nodes___AConcreteMethPropdef___n_block
))( self
) /*AConcreteMethPropdef::n_block*/;
1977 ((compiling_methods___CompilerVisitor___compile_stmt_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_stmt
))( variable0
/*v*/, variable10
) /*CompilerVisitor::compile_stmt*/;
1979 variable10
= ((compiling_methods___CompilerVisitor___has_return_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___has_return
))( variable0
/*v*/) /*CompilerVisitor::has_return*/;
1980 if (UNTAG_Bool(variable10
)) { /*if*/
1981 variable10
= NEW_string___String___init(); /*new String*/
1982 variable11
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
1983 variable12
= variable11
;
1984 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable12
) /*String::append*/;
1985 variable13
= ((compiling_methods___CompilerVisitor___return_label_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___return_label
))( variable0
/*v*/) /*CompilerVisitor::return_label*/;
1986 variable14
= variable13
;
1987 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable14
) /*String::append*/;
1988 variable15
= NEW_string___String___with_native(BOX_NativeString(": while(false);"), TAG_Int(15)); /*new String*/
1989 variable16
= variable15
;
1990 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable16
) /*String::append*/;
1991 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable10
) /*CompilerVisitor::add_instr*/;
1993 variable10
= TAG_Bool(( self
==NIT_NULL
) || VAL_ISA( self
, COLOR_AConcreteInitPropdef
, ID_AConcreteInitPropdef
)) /*cast AConcreteInitPropdef*/;
1994 if (UNTAG_Bool(variable10
)) { /*if*/
1995 variable10
= NEW_string___String___init(); /*new String*/
1996 variable11
= NEW_string___String___with_native(BOX_NativeString("init_table["), TAG_Int(11)); /*new String*/
1997 variable12
= variable11
;
1998 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable12
) /*String::append*/;
1999 variable13
= variable9
/*itpos*/;
2000 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable13
) /*String::append*/;
2001 variable14
= NEW_string___String___with_native(BOX_NativeString("] = 1;"), TAG_Int(6)); /*new String*/
2002 variable15
= variable14
;
2003 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable15
) /*String::append*/;
2004 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable10
) /*CompilerVisitor::add_instr*/;
2006 variable11
= ((compiling_methods___CompilerVisitor___return_value_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___return_value
))( variable0
/*v*/) /*CompilerVisitor::return_value*/;
2007 variable10
= variable11
;
2008 ((compiling_methods___CompilerVisitor___method_params__eq_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___method_params__eq
))( variable0
/*v*/, variable5
/*old_method_params*/) /*CompilerVisitor::method_params=*/;
2009 ((compiling_methods___CompilerVisitor___return_label__eq_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___return_label__eq
))( variable0
/*v*/, variable6
/*old_return_label*/) /*CompilerVisitor::return_label=*/;
2010 ((compiling_methods___CompilerVisitor___return_value__eq_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___return_value__eq
))( variable0
/*v*/, variable7
/*old_return_value*/) /*CompilerVisitor::return_value=*/;
2011 ((compiling_methods___CompilerVisitor___has_return__eq_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___has_return__eq
))( variable0
/*v*/, variable8
/*old_has_return*/) /*CompilerVisitor::has_return=*/;
2012 variable3
= variable10
/*ret*/;
2013 goto return_label48
;
2014 return_label48
: while(false);
2015 tracehead
= trace
.prev
;
2018 val_t
compiling_methods___ADeferredMethPropdef___do_compile_inside(val_t self
, val_t param0
, val_t param1
, val_t param2
) {
2019 struct trace_t trace
= {NULL
, NULL
, 464, LOCATE_compiling_methods___ADeferredMethPropdef___do_compile_inside
};
2024 trace
.prev
= tracehead
; tracehead
= &trace
;
2025 trace
.file
= LOCATE_compiling_methods
;
2029 variable3
= NEW_string___String___with_native(BOX_NativeString("fprintf(stderr, \"Deferred method %s called\");"), TAG_Int(45)); /*new String*/
2030 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::add_instr*/;
2031 variable3
= ((compiling_methods___CompilerVisitor___printf_locate_error_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___printf_locate_error
))( variable0
/*v*/, self
) /*CompilerVisitor::printf_locate_error*/;
2032 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::add_instr*/;
2033 variable3
= NEW_string___String___with_native(BOX_NativeString("nit_exit(1);"), TAG_Int(12)); /*new String*/
2034 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::add_instr*/;
2035 variable3
= ((static_type___MMLocalProperty___signature_t
)CALL( variable1
/*method*/,COLOR_static_type___MMLocalProperty___signature
))( variable1
/*method*/) /*MMLocalProperty::signature*/;
2036 variable3
= ((static_type___MMSignature___return_type_t
)CALL(variable3
,COLOR_static_type___MMSignature___return_type
))(variable3
) /*MMSignature::return_type*/;
2037 variable3
= TAG_Bool(!UNTAG_Bool(TAG_Bool((variable3
== NIT_NULL
/*null*/) || ((variable3
!= NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL(variable3
,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN(variable3
, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL(variable3
,COLOR_kernel___Object_____eqeq
))(variable3
, NIT_NULL
/*null*/) /*Object::==*/)))))));
2038 if (UNTAG_Bool(variable3
)) { /*if*/
2039 variable3
= NEW_string___String___with_native(BOX_NativeString("NIT_NULL"), TAG_Int(8)); /*new String*/
2040 goto return_label53
;
2042 variable3
= NIT_NULL
/*null*/;
2043 goto return_label53
;
2045 return_label53
: while(false);
2046 tracehead
= trace
.prev
;
2049 val_t
compiling_methods___AExternMethPropdef___do_compile_inside(val_t self
, val_t param0
, val_t param1
, val_t param2
) {
2050 struct trace_t trace
= {NULL
, NULL
, 478, LOCATE_compiling_methods___AExternMethPropdef___do_compile_inside
};
2078 trace
.prev
= tracehead
; tracehead
= &trace
;
2079 trace
.file
= LOCATE_compiling_methods
;
2083 variable4
= NEW_string___String___init(); /*new String*/
2084 variable5
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
2085 variable6
= variable5
;
2086 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable6
) /*String::append*/;
2087 variable7
= ((abstractmetamodel___MMLocalProperty___module_t
)CALL( variable1
/*method*/,COLOR_abstractmetamodel___MMLocalProperty___module
))( variable1
/*method*/) /*MMLocalProperty::module*/;
2088 variable7
= ((abstractmetamodel___MMModule___name_t
)CALL(variable7
,COLOR_abstractmetamodel___MMModule___name
))(variable7
) /*MMModule::name*/;
2089 variable8
= variable7
;
2090 variable8
= ((string___String___to_s_t
)CALL(variable8
,COLOR_string___Object___to_s
))(variable8
) /*String::to_s*/;
2091 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable8
) /*String::append*/;
2092 variable9
= NEW_string___String___with_native(BOX_NativeString("_"), TAG_Int(1)); /*new String*/
2093 variable10
= variable9
;
2094 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable10
) /*String::append*/;
2095 variable11
= ((abstractmetamodel___MMLocalProperty___local_class_t
)CALL( variable1
/*method*/,COLOR_abstractmetamodel___MMLocalProperty___local_class
))( variable1
/*method*/) /*MMLocalProperty::local_class*/;
2096 variable11
= ((abstractmetamodel___MMLocalClass___name_t
)CALL(variable11
,COLOR_abstractmetamodel___MMLocalClass___name
))(variable11
) /*MMLocalClass::name*/;
2097 variable12
= variable11
;
2098 variable12
= ((string___String___to_s_t
)CALL(variable12
,COLOR_string___Object___to_s
))(variable12
) /*String::to_s*/;
2099 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable12
) /*String::append*/;
2100 variable13
= NEW_string___String___with_native(BOX_NativeString("_"), TAG_Int(1)); /*new String*/
2101 variable14
= variable13
;
2102 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable14
) /*String::append*/;
2103 variable15
= ((abstractmetamodel___MMLocalProperty___local_class_t
)CALL( variable1
/*method*/,COLOR_abstractmetamodel___MMLocalProperty___local_class
))( variable1
/*method*/) /*MMLocalProperty::local_class*/;
2104 variable15
= ((abstractmetamodel___MMLocalClass___name_t
)CALL(variable15
,COLOR_abstractmetamodel___MMLocalClass___name
))(variable15
) /*MMLocalClass::name*/;
2105 variable16
= variable15
;
2106 variable16
= ((string___String___to_s_t
)CALL(variable16
,COLOR_string___Object___to_s
))(variable16
) /*String::to_s*/;
2107 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable16
) /*String::append*/;
2108 variable17
= NEW_string___String___with_native(BOX_NativeString("_"), TAG_Int(1)); /*new String*/
2109 variable18
= variable17
;
2110 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable18
) /*String::append*/;
2111 variable19
= ((abstractmetamodel___MMLocalProperty___name_t
)CALL( variable1
/*method*/,COLOR_abstractmetamodel___MMLocalProperty___name
))( variable1
/*method*/) /*MMLocalProperty::name*/;
2112 variable20
= variable19
;
2113 variable20
= ((string___String___to_s_t
)CALL(variable20
,COLOR_string___Object___to_s
))(variable20
) /*String::to_s*/;
2114 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable20
) /*String::append*/;
2115 variable21
= NEW_string___String___with_native(BOX_NativeString("_"), TAG_Int(1)); /*new String*/
2116 variable22
= variable21
;
2117 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable22
) /*String::append*/;
2118 variable23
= ((static_type___MMLocalProperty___signature_t
)CALL( variable1
/*method*/,COLOR_static_type___MMLocalProperty___signature
))( variable1
/*method*/) /*MMLocalProperty::signature*/;
2119 variable23
= ((static_type___MMSignature___arity_t
)CALL(variable23
,COLOR_static_type___MMSignature___arity
))(variable23
) /*MMSignature::arity*/;
2120 variable24
= variable23
;
2121 variable24
= ((string___String___to_s_t
)CALL(variable24
,COLOR_string___Object___to_s
))(variable24
) /*String::to_s*/;
2122 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable24
) /*String::append*/;
2123 variable25
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
2124 variable26
= variable25
;
2125 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable26
) /*String::append*/;
2126 variable3
= variable4
;
2127 variable4
= ((parser_nodes___AExternMethPropdef___n_extern_t
)CALL( self
,COLOR_parser_nodes___AExternMethPropdef___n_extern
))( self
) /*AExternMethPropdef::n_extern*/;
2128 variable4
= TAG_Bool(!UNTAG_Bool(TAG_Bool((variable4
== NIT_NULL
/*null*/) || ((variable4
!= NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL(variable4
,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN(variable4
, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL(variable4
,COLOR_kernel___Object_____eqeq
))(variable4
, NIT_NULL
/*null*/) /*Object::==*/)))))));
2129 if (UNTAG_Bool(variable4
)) { /*if*/
2130 variable4
= ((parser_nodes___AExternMethPropdef___n_extern_t
)CALL( self
,COLOR_parser_nodes___AExternMethPropdef___n_extern
))( self
) /*AExternMethPropdef::n_extern*/;
2131 variable4
= ((lexer___Token___text_t
)CALL(variable4
,COLOR_lexer___Token___text
))(variable4
) /*Token::text*/;
2132 variable3
= variable4
/*ename=*/;
2133 variable4
= ((array___AbstractArray___length_t
)CALL( variable3
/*ename*/,COLOR_abstract_collection___Collection___length
))( variable3
/*ename*/) /*AbstractArray::length*/;
2134 variable4
= TAG_Int(UNTAG_Int(variable4
)-UNTAG_Int( TAG_Int(2)));
2135 variable4
= ((string___String___substring_t
)CALL( variable3
/*ename*/,COLOR_string___String___substring
))( variable3
/*ename*/, TAG_Int(1), variable4
) /*String::substring*/;
2136 variable3
= variable4
/*ename=*/;
2138 variable5
= ((static_type___MMLocalProperty___signature_t
)CALL( variable1
/*method*/,COLOR_static_type___MMLocalProperty___signature
))( variable1
/*method*/) /*MMLocalProperty::signature*/;
2139 variable4
= variable5
;
2140 variable5
= ((array___AbstractArray___length_t
)CALL( variable2
/*params*/,COLOR_abstract_collection___Collection___length
))( variable2
/*params*/) /*AbstractArray::length*/;
2141 variable6
= ((static_type___MMSignature___arity_t
)CALL( variable4
/*sig*/,COLOR_static_type___MMSignature___arity
))( variable4
/*sig*/) /*MMSignature::arity*/;
2142 variable6
= TAG_Int(UNTAG_Int(variable6
)+UNTAG_Int( TAG_Int(1)));
2143 variable5
= TAG_Bool((variable5
)!=(variable6
));
2144 if (UNTAG_Bool(variable5
)) { /*if*/
2145 variable5
= NEW_string___String___init(); /*new String*/
2146 variable6
= NEW_string___String___with_native(BOX_NativeString("par:"), TAG_Int(4)); /*new String*/
2147 variable7
= variable6
;
2148 ((string___String___append_t
)CALL(variable5
,COLOR_abstract_collection___IndexedCollection___append
))(variable5
, variable7
) /*String::append*/;
2149 variable8
= ((array___AbstractArray___length_t
)CALL( variable2
/*params*/,COLOR_abstract_collection___Collection___length
))( variable2
/*params*/) /*AbstractArray::length*/;
2150 variable9
= variable8
;
2151 variable9
= ((string___String___to_s_t
)CALL(variable9
,COLOR_string___Object___to_s
))(variable9
) /*String::to_s*/;
2152 ((string___String___append_t
)CALL(variable5
,COLOR_abstract_collection___IndexedCollection___append
))(variable5
, variable9
) /*String::append*/;
2153 variable10
= NEW_string___String___with_native(BOX_NativeString(" sig:"), TAG_Int(5)); /*new String*/
2154 variable11
= variable10
;
2155 ((string___String___append_t
)CALL(variable5
,COLOR_abstract_collection___IndexedCollection___append
))(variable5
, variable11
) /*String::append*/;
2156 variable12
= ((static_type___MMSignature___arity_t
)CALL( variable4
/*sig*/,COLOR_static_type___MMSignature___arity
))( variable4
/*sig*/) /*MMSignature::arity*/;
2157 variable13
= variable12
;
2158 variable13
= ((string___String___to_s_t
)CALL(variable13
,COLOR_string___Object___to_s
))(variable13
) /*String::to_s*/;
2159 ((string___String___append_t
)CALL(variable5
,COLOR_abstract_collection___IndexedCollection___append
))(variable5
, variable13
) /*String::append*/;
2160 variable14
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
2161 variable15
= variable14
;
2162 ((string___String___append_t
)CALL(variable5
,COLOR_abstract_collection___IndexedCollection___append
))(variable5
, variable15
) /*String::append*/;
2163 ((parser_prod___PNode___printl_t
)CALL( self
,COLOR_parser_prod___PNode___printl
))( self
, variable5
) /*PNode::printl*/;
2165 variable6
= NEW_array___Array___init(); /*new Array[E]*/
2166 variable5
= variable6
;
2167 variable6
= ((static_type___MMSignature___recv_t
)CALL( variable4
/*sig*/,COLOR_static_type___MMSignature___recv
))( variable4
/*sig*/) /*MMSignature::recv*/;
2168 variable7
= TAG_Int(0);
2169 variable8
= TAG_Bool(UNTAG_Int( variable7
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2170 variable9
= variable8
;
2171 if (UNTAG_Bool(variable9
)) { /* and */
2172 variable9
= ATTR_array___AbstractArray____length( variable2
/*params*/) /*AbstractArray::_length*/;
2173 variable9
= TAG_Bool(UNTAG_Int( variable7
/*index*/)<UNTAG_Int(variable9
));
2175 variable8
= variable9
;
2176 if (!UNTAG_Bool(variable8
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
2177 variable8
= ATTR_array___Array____items( variable2
/*params*/) /*Array::_items*/;
2178 variable8
= UNBOX_NativeArray(variable8
)[UNTAG_Int( variable7
/*index*/)];
2179 goto return_label55
;
2180 return_label55
: while(false);
2181 variable7
= variable8
;
2182 variable6
= ((compiling_base___MMType___unboxtype_t
)CALL(variable6
,COLOR_compiling_base___MMType___unboxtype
))(variable6
, variable7
) /*MMType::unboxtype*/;
2183 ((array___AbstractArray___add_t
)CALL( variable5
/*args*/,COLOR_abstract_collection___SimpleCollection___add
))( variable5
/*args*/, variable6
) /*AbstractArray::add*/;
2184 variable6
= ((static_type___MMSignature___arity_t
)CALL( variable4
/*sig*/,COLOR_static_type___MMSignature___arity
))( variable4
/*sig*/) /*MMSignature::arity*/;
2185 variable7
= NEW_range___Range___without_last( TAG_Int(0), variable6
); /*new Range[E]*/
2186 variable6
= variable7
;
2187 variable6
= ((range___Range___iterator_t
)CALL(variable6
,COLOR_abstract_collection___Collection___iterator
))(variable6
) /*Range::iterator*/;
2188 while (true) { /*for*/
2189 variable7
= ((abstract_collection___Iterator___is_ok_t
)CALL(variable6
,COLOR_abstract_collection___Iterator___is_ok
))(variable6
) /*Iterator::is_ok*/;
2190 if (!UNTAG_Bool(variable7
)) break; /*for*/
2191 variable7
= ((abstract_collection___Iterator___item_t
)CALL(variable6
,COLOR_abstract_collection___Iterator___item
))(variable6
) /*Iterator::item*/;
2192 variable8
= ((static_type___MMSignature_____bra_t
)CALL( variable4
/*sig*/,COLOR_static_type___MMSignature_____bra
))( variable4
/*sig*/, variable7
/*i*/) /*MMSignature::[]*/;
2193 variable9
= TAG_Int(UNTAG_Int( variable7
/*i*/)+UNTAG_Int( TAG_Int(1)));
2194 variable10
= variable9
;
2195 variable11
= TAG_Bool(UNTAG_Int( variable10
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2196 variable12
= variable11
;
2197 if (UNTAG_Bool(variable12
)) { /* and */
2198 variable12
= ATTR_array___AbstractArray____length( variable2
/*params*/) /*AbstractArray::_length*/;
2199 variable12
= TAG_Bool(UNTAG_Int( variable10
/*index*/)<UNTAG_Int(variable12
));
2201 variable11
= variable12
;
2202 if (!UNTAG_Bool(variable11
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
2203 variable11
= ATTR_array___Array____items( variable2
/*params*/) /*Array::_items*/;
2204 variable11
= UNBOX_NativeArray(variable11
)[UNTAG_Int( variable10
/*index*/)];
2205 goto return_label57
;
2206 return_label57
: while(false);
2207 variable9
= variable11
;
2208 variable8
= ((compiling_base___MMType___unboxtype_t
)CALL(variable8
,COLOR_compiling_base___MMType___unboxtype
))(variable8
, variable9
) /*MMType::unboxtype*/;
2209 ((array___AbstractArray___add_t
)CALL( variable5
/*args*/,COLOR_abstract_collection___SimpleCollection___add
))( variable5
/*args*/, variable8
) /*AbstractArray::add*/;
2210 continue_56
: while(0);
2211 ((abstract_collection___Iterator___next_t
)CALL(variable6
,COLOR_abstract_collection___Iterator___next
))(variable6
) /*Iterator::next*/;
2214 variable7
= NEW_string___String___init(); /*new String*/
2215 variable8
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
2216 variable9
= variable8
;
2217 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable9
) /*String::append*/;
2218 variable10
= variable3
/*ename*/;
2219 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable10
) /*String::append*/;
2220 variable11
= NEW_string___String___with_native(BOX_NativeString("("), TAG_Int(1)); /*new String*/
2221 variable12
= variable11
;
2222 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable12
) /*String::append*/;
2223 variable13
= NEW_string___String___with_native(BOX_NativeString(", "), TAG_Int(2)); /*new String*/
2224 variable13
= ((string___Collection___join_t
)CALL( variable5
/*args*/,COLOR_string___Collection___join
))( variable5
/*args*/, variable13
) /*Collection::join*/;
2225 variable14
= variable13
;
2226 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable14
) /*String::append*/;
2227 variable15
= NEW_string___String___with_native(BOX_NativeString(")"), TAG_Int(1)); /*new String*/
2228 variable16
= variable15
;
2229 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable16
) /*String::append*/;
2230 variable6
= variable7
;
2231 variable7
= ((static_type___MMSignature___return_type_t
)CALL( variable4
/*sig*/,COLOR_static_type___MMSignature___return_type
))( variable4
/*sig*/) /*MMSignature::return_type*/;
2232 variable7
= TAG_Bool(!UNTAG_Bool(TAG_Bool((variable7
== NIT_NULL
/*null*/) || ((variable7
!= NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL(variable7
,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN(variable7
, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL(variable7
,COLOR_kernel___Object_____eqeq
))(variable7
, NIT_NULL
/*null*/) /*Object::==*/)))))));
2233 if (UNTAG_Bool(variable7
)) { /*if*/
2234 variable7
= ((static_type___MMSignature___return_type_t
)CALL( variable4
/*sig*/,COLOR_static_type___MMSignature___return_type
))( variable4
/*sig*/) /*MMSignature::return_type*/;
2235 variable7
= ((compiling_base___MMType___boxtype_t
)CALL(variable7
,COLOR_compiling_base___MMType___boxtype
))(variable7
, variable6
/*s*/) /*MMType::boxtype*/;
2236 variable3
= variable7
;
2237 goto return_label54
;
2239 variable7
= NEW_string___String___init(); /*new String*/
2240 variable8
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
2241 variable9
= variable8
;
2242 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable9
) /*String::append*/;
2243 variable10
= variable6
/*s*/;
2244 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable10
) /*String::append*/;
2245 variable11
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
2246 variable12
= variable11
;
2247 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable12
) /*String::append*/;
2248 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable7
) /*CompilerVisitor::add_instr*/;
2249 variable3
= NIT_NULL
/*null*/;
2250 goto return_label54
;
2252 return_label54
: while(false);
2253 tracehead
= trace
.prev
;
2256 val_t
compiling_methods___AInternMethPropdef___do_compile_inside(val_t self
, val_t param0
, val_t param1
, val_t param2
) {
2257 struct trace_t trace
= {NULL
, NULL
, 505, LOCATE_compiling_methods___AInternMethPropdef___do_compile_inside
};
2265 static val_t once_value_variable6_59
; static int once_bool_variable6_59
;
2266 static val_t once_value_variable6_60
; static int once_bool_variable6_60
;
2273 static val_t once_value_variable6_62
; static int once_bool_variable6_62
;
2274 static val_t once_value_variable6_64
; static int once_bool_variable6_64
;
2275 static val_t once_value_variable6_66
; static int once_bool_variable6_66
;
2276 static val_t once_value_variable6_68
; static int once_bool_variable6_68
;
2277 static val_t once_value_variable6_70
; static int once_bool_variable6_70
;
2278 static val_t once_value_variable6_72
; static int once_bool_variable6_72
;
2279 static val_t once_value_variable6_74
; static int once_bool_variable6_74
;
2284 static val_t once_value_variable6_77
; static int once_bool_variable6_77
;
2285 static val_t once_value_variable6_80
; static int once_bool_variable6_80
;
2286 static val_t once_value_variable6_83
; static int once_bool_variable6_83
;
2287 static val_t once_value_variable6_86
; static int once_bool_variable6_86
;
2288 static val_t once_value_variable6_89
; static int once_bool_variable6_89
;
2289 static val_t once_value_variable6_92
; static int once_bool_variable6_92
;
2290 static val_t once_value_variable6_95
; static int once_bool_variable6_95
;
2291 static val_t once_value_variable6_98
; static int once_bool_variable6_98
;
2292 static val_t once_value_variable6_101
; static int once_bool_variable6_101
;
2293 static val_t once_value_variable6_104
; static int once_bool_variable6_104
;
2294 static val_t once_value_variable6_107
; static int once_bool_variable6_107
;
2295 static val_t once_value_variable6_110
; static int once_bool_variable6_110
;
2296 static val_t once_value_variable6_113
; static int once_bool_variable6_113
;
2297 static val_t once_value_variable6_114
; static int once_bool_variable6_114
;
2298 static val_t once_value_variable6_116
; static int once_bool_variable6_116
;
2299 static val_t once_value_variable6_118
; static int once_bool_variable6_118
;
2300 static val_t once_value_variable6_120
; static int once_bool_variable6_120
;
2301 static val_t once_value_variable6_122
; static int once_bool_variable6_122
;
2302 static val_t once_value_variable6_125
; static int once_bool_variable6_125
;
2303 static val_t once_value_variable6_128
; static int once_bool_variable6_128
;
2304 static val_t once_value_variable6_131
; static int once_bool_variable6_131
;
2305 static val_t once_value_variable6_134
; static int once_bool_variable6_134
;
2306 static val_t once_value_variable6_137
; static int once_bool_variable6_137
;
2307 static val_t once_value_variable6_140
; static int once_bool_variable6_140
;
2308 static val_t once_value_variable6_143
; static int once_bool_variable6_143
;
2309 static val_t once_value_variable6_146
; static int once_bool_variable6_146
;
2310 static val_t once_value_variable6_147
; static int once_bool_variable6_147
;
2311 static val_t once_value_variable6_149
; static int once_bool_variable6_149
;
2312 static val_t once_value_variable6_151
; static int once_bool_variable6_151
;
2313 static val_t once_value_variable6_153
; static int once_bool_variable6_153
;
2314 static val_t once_value_variable6_155
; static int once_bool_variable6_155
;
2315 static val_t once_value_variable6_157
; static int once_bool_variable6_157
;
2316 static val_t once_value_variable6_159
; static int once_bool_variable6_159
;
2317 static val_t once_value_variable6_161
; static int once_bool_variable6_161
;
2318 static val_t once_value_variable6_164
; static int once_bool_variable6_164
;
2319 static val_t once_value_variable6_167
; static int once_bool_variable6_167
;
2320 static val_t once_value_variable6_170
; static int once_bool_variable6_170
;
2321 static val_t once_value_variable6_173
; static int once_bool_variable6_173
;
2322 static val_t once_value_variable6_176
; static int once_bool_variable6_176
;
2323 static val_t once_value_variable6_179
; static int once_bool_variable6_179
;
2324 static val_t once_value_variable6_182
; static int once_bool_variable6_182
;
2325 static val_t once_value_variable6_185
; static int once_bool_variable6_185
;
2326 static val_t once_value_variable6_188
; static int once_bool_variable6_188
;
2327 static val_t once_value_variable6_191
; static int once_bool_variable6_191
;
2328 static val_t once_value_variable6_194
; static int once_bool_variable6_194
;
2329 static val_t once_value_variable6_195
; static int once_bool_variable6_195
;
2330 static val_t once_value_variable6_197
; static int once_bool_variable6_197
;
2331 static val_t once_value_variable6_199
; static int once_bool_variable6_199
;
2332 static val_t once_value_variable6_201
; static int once_bool_variable6_201
;
2333 static val_t once_value_variable6_203
; static int once_bool_variable6_203
;
2334 static val_t once_value_variable6_205
; static int once_bool_variable6_205
;
2335 static val_t once_value_variable6_208
; static int once_bool_variable6_208
;
2336 static val_t once_value_variable6_211
; static int once_bool_variable6_211
;
2337 static val_t once_value_variable6_212
; static int once_bool_variable6_212
;
2338 static val_t once_value_variable6_214
; static int once_bool_variable6_214
;
2339 static val_t once_value_variable6_217
; static int once_bool_variable6_217
;
2344 static val_t once_value_variable6_221
; static int once_bool_variable6_221
;
2345 static val_t once_value_variable6_225
; static int once_bool_variable6_225
;
2346 static val_t once_value_variable6_226
; static int once_bool_variable6_226
;
2347 static val_t once_value_variable6_228
; static int once_bool_variable6_228
;
2348 static val_t once_value_variable6_230
; static int once_bool_variable6_230
;
2349 static val_t once_value_variable6_233
; static int once_bool_variable6_233
;
2350 static val_t once_value_variable6_237
; static int once_bool_variable6_237
;
2359 static val_t once_value_variable6_243
; static int once_bool_variable6_243
;
2360 static val_t once_value_variable6_245
; static int once_bool_variable6_245
;
2361 static val_t once_value_variable6_246
; static int once_bool_variable6_246
;
2362 static val_t once_value_variable6_249
; static int once_bool_variable6_249
;
2363 static val_t once_value_variable6_251
; static int once_bool_variable6_251
;
2364 static val_t once_value_variable6_253
; static int once_bool_variable6_253
;
2365 trace
.prev
= tracehead
; tracehead
= &trace
;
2366 trace
.file
= LOCATE_compiling_methods
;
2370 variable4
= ((abstractmetamodel___MMLocalProperty___local_class_t
)CALL( variable1
/*method*/,COLOR_abstractmetamodel___MMLocalProperty___local_class
))( variable1
/*method*/) /*MMLocalProperty::local_class*/;
2371 variable4
= ((abstractmetamodel___MMLocalClass___name_t
)CALL(variable4
,COLOR_abstractmetamodel___MMLocalClass___name
))(variable4
) /*MMLocalClass::name*/;
2372 variable3
= variable4
;
2373 variable5
= ((abstractmetamodel___MMLocalProperty___name_t
)CALL( variable1
/*method*/,COLOR_abstractmetamodel___MMLocalProperty___name
))( variable1
/*method*/) /*MMLocalProperty::name*/;
2374 variable4
= variable5
;
2375 variable5
= NIT_NULL
/*null*/;
2376 if (once_bool_variable6_59
) variable6
= once_value_variable6_59
;
2378 variable6
= NEW_string___String___with_native(BOX_NativeString("Int"), TAG_Int(3)); /*new String*/
2379 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2380 once_value_variable6_59
= variable6
;
2381 once_bool_variable6_59
= true;
2383 variable6
= TAG_Bool(( variable3
/*c*/ == variable6
) || (( variable3
/*c*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable3
/*c*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable3
/*c*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable3
/*c*/,COLOR_kernel___Object_____eqeq
))( variable3
/*c*/, variable6
) /*Object::==*/)))));
2384 if (UNTAG_Bool(variable6
)) { /*if*/
2385 if (once_bool_variable6_60
) variable6
= once_value_variable6_60
;
2387 variable6
= NEW_string___String___with_native(BOX_NativeString("object_id"), TAG_Int(9)); /*new String*/
2388 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2389 once_value_variable6_60
= variable6
;
2390 once_bool_variable6_60
= true;
2392 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
2393 if (UNTAG_Bool(variable6
)) { /*if*/
2394 variable6
= NEW_string___String___init(); /*new String*/
2395 variable7
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
2396 variable8
= variable7
;
2397 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
2398 variable9
= TAG_Int(0);
2399 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2400 variable11
= variable10
;
2401 if (UNTAG_Bool(variable11
)) { /* and */
2402 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2403 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
2405 variable10
= variable11
;
2406 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
2407 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2408 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
2409 goto return_label61
;
2410 return_label61
: while(false);
2411 variable9
= variable10
;
2412 variable10
= variable9
;
2413 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
2414 variable11
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
2415 variable12
= variable11
;
2416 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
2417 variable5
= variable6
/*s=*/;
2419 if (once_bool_variable6_62
) variable6
= once_value_variable6_62
;
2421 variable6
= NEW_string___String___with_native(BOX_NativeString("unary -"), TAG_Int(7)); /*new String*/
2422 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2423 once_value_variable6_62
= variable6
;
2424 once_bool_variable6_62
= true;
2426 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
2427 if (UNTAG_Bool(variable6
)) { /*if*/
2428 variable6
= NEW_string___String___init(); /*new String*/
2429 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(-UNTAG_Int("), TAG_Int(19)); /*new String*/
2430 variable8
= variable7
;
2431 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
2432 variable9
= TAG_Int(0);
2433 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2434 variable11
= variable10
;
2435 if (UNTAG_Bool(variable11
)) { /* and */
2436 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2437 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
2439 variable10
= variable11
;
2440 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
2441 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2442 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
2443 goto return_label63
;
2444 return_label63
: while(false);
2445 variable9
= variable10
;
2446 variable10
= variable9
;
2447 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
2448 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
2449 variable12
= variable11
;
2450 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
2451 variable5
= variable6
/*s=*/;
2453 if (once_bool_variable6_64
) variable6
= once_value_variable6_64
;
2455 variable6
= NEW_string___String___with_native(BOX_NativeString("output"), TAG_Int(6)); /*new String*/
2456 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2457 once_value_variable6_64
= variable6
;
2458 once_bool_variable6_64
= true;
2460 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
2461 if (UNTAG_Bool(variable6
)) { /*if*/
2462 variable6
= NEW_string___String___init(); /*new String*/
2463 variable7
= NEW_string___String___with_native(BOX_NativeString("printf(\"%d\\n\", UNTAG_Int("), TAG_Int(25)); /*new String*/
2464 variable8
= variable7
;
2465 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
2466 variable9
= TAG_Int(0);
2467 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2468 variable11
= variable10
;
2469 if (UNTAG_Bool(variable11
)) { /* and */
2470 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2471 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
2473 variable10
= variable11
;
2474 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
2475 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2476 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
2477 goto return_label65
;
2478 return_label65
: while(false);
2479 variable9
= variable10
;
2480 variable10
= variable9
;
2481 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
2482 variable11
= NEW_string___String___with_native(BOX_NativeString("));"), TAG_Int(3)); /*new String*/
2483 variable12
= variable11
;
2484 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
2485 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable6
) /*CompilerVisitor::add_instr*/;
2487 if (once_bool_variable6_66
) variable6
= once_value_variable6_66
;
2489 variable6
= NEW_string___String___with_native(BOX_NativeString("ascii"), TAG_Int(5)); /*new String*/
2490 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2491 once_value_variable6_66
= variable6
;
2492 once_bool_variable6_66
= true;
2494 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
2495 if (UNTAG_Bool(variable6
)) { /*if*/
2496 variable6
= NEW_string___String___init(); /*new String*/
2497 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Char(UNTAG_Int("), TAG_Int(19)); /*new String*/
2498 variable8
= variable7
;
2499 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
2500 variable9
= TAG_Int(0);
2501 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2502 variable11
= variable10
;
2503 if (UNTAG_Bool(variable11
)) { /* and */
2504 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2505 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
2507 variable10
= variable11
;
2508 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
2509 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2510 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
2511 goto return_label67
;
2512 return_label67
: while(false);
2513 variable9
= variable10
;
2514 variable10
= variable9
;
2515 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
2516 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
2517 variable12
= variable11
;
2518 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
2519 variable5
= variable6
/*s=*/;
2521 if (once_bool_variable6_68
) variable6
= once_value_variable6_68
;
2523 variable6
= NEW_string___String___with_native(BOX_NativeString("succ"), TAG_Int(4)); /*new String*/
2524 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2525 once_value_variable6_68
= variable6
;
2526 once_bool_variable6_68
= true;
2528 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
2529 if (UNTAG_Bool(variable6
)) { /*if*/
2530 variable6
= NEW_string___String___init(); /*new String*/
2531 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNTAG_Int("), TAG_Int(18)); /*new String*/
2532 variable8
= variable7
;
2533 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
2534 variable9
= TAG_Int(0);
2535 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2536 variable11
= variable10
;
2537 if (UNTAG_Bool(variable11
)) { /* and */
2538 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2539 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
2541 variable10
= variable11
;
2542 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
2543 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2544 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
2545 goto return_label69
;
2546 return_label69
: while(false);
2547 variable9
= variable10
;
2548 variable10
= variable9
;
2549 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
2550 variable11
= NEW_string___String___with_native(BOX_NativeString(")+1)"), TAG_Int(4)); /*new String*/
2551 variable12
= variable11
;
2552 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
2553 variable5
= variable6
/*s=*/;
2555 if (once_bool_variable6_70
) variable6
= once_value_variable6_70
;
2557 variable6
= NEW_string___String___with_native(BOX_NativeString("prec"), TAG_Int(4)); /*new String*/
2558 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2559 once_value_variable6_70
= variable6
;
2560 once_bool_variable6_70
= true;
2562 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
2563 if (UNTAG_Bool(variable6
)) { /*if*/
2564 variable6
= NEW_string___String___init(); /*new String*/
2565 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNTAG_Int("), TAG_Int(18)); /*new String*/
2566 variable8
= variable7
;
2567 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
2568 variable9
= TAG_Int(0);
2569 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2570 variable11
= variable10
;
2571 if (UNTAG_Bool(variable11
)) { /* and */
2572 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2573 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
2575 variable10
= variable11
;
2576 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
2577 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2578 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
2579 goto return_label71
;
2580 return_label71
: while(false);
2581 variable9
= variable10
;
2582 variable10
= variable9
;
2583 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
2584 variable11
= NEW_string___String___with_native(BOX_NativeString(")-1)"), TAG_Int(4)); /*new String*/
2585 variable12
= variable11
;
2586 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
2587 variable5
= variable6
/*s=*/;
2589 if (once_bool_variable6_72
) variable6
= once_value_variable6_72
;
2591 variable6
= NEW_string___String___with_native(BOX_NativeString("to_f"), TAG_Int(4)); /*new String*/
2592 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2593 once_value_variable6_72
= variable6
;
2594 once_bool_variable6_72
= true;
2596 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
2597 if (UNTAG_Bool(variable6
)) { /*if*/
2598 variable6
= NEW_string___String___init(); /*new String*/
2599 variable7
= NEW_string___String___with_native(BOX_NativeString("BOX_Float((float)UNTAG_Int("), TAG_Int(27)); /*new String*/
2600 variable8
= variable7
;
2601 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
2602 variable9
= TAG_Int(0);
2603 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2604 variable11
= variable10
;
2605 if (UNTAG_Bool(variable11
)) { /* and */
2606 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2607 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
2609 variable10
= variable11
;
2610 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
2611 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2612 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
2613 goto return_label73
;
2614 return_label73
: while(false);
2615 variable9
= variable10
;
2616 variable10
= variable9
;
2617 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
2618 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
2619 variable12
= variable11
;
2620 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
2621 variable5
= variable6
/*s=*/;
2623 if (once_bool_variable6_74
) variable6
= once_value_variable6_74
;
2625 variable6
= NEW_string___String___with_native(BOX_NativeString("+"), TAG_Int(1)); /*new String*/
2626 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2627 once_value_variable6_74
= variable6
;
2628 once_bool_variable6_74
= true;
2630 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
2631 if (UNTAG_Bool(variable6
)) { /*if*/
2632 variable6
= NEW_string___String___init(); /*new String*/
2633 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNTAG_Int("), TAG_Int(18)); /*new String*/
2634 variable8
= variable7
;
2635 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
2636 variable9
= TAG_Int(0);
2637 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2638 variable11
= variable10
;
2639 if (UNTAG_Bool(variable11
)) { /* and */
2640 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2641 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
2643 variable10
= variable11
;
2644 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
2645 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2646 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
2647 goto return_label75
;
2648 return_label75
: while(false);
2649 variable9
= variable10
;
2650 variable10
= variable9
;
2651 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
2652 variable11
= NEW_string___String___with_native(BOX_NativeString(")+UNTAG_Int("), TAG_Int(12)); /*new String*/
2653 variable12
= variable11
;
2654 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
2655 variable13
= TAG_Int(1);
2656 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2657 variable15
= variable14
;
2658 if (UNTAG_Bool(variable15
)) { /* and */
2659 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2660 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
2662 variable14
= variable15
;
2663 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
2664 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2665 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
2666 goto return_label76
;
2667 return_label76
: while(false);
2668 variable13
= variable14
;
2669 variable14
= variable13
;
2670 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
2671 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
2672 variable16
= variable15
;
2673 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
2674 variable5
= variable6
/*s=*/;
2676 if (once_bool_variable6_77
) variable6
= once_value_variable6_77
;
2678 variable6
= NEW_string___String___with_native(BOX_NativeString("-"), TAG_Int(1)); /*new String*/
2679 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2680 once_value_variable6_77
= variable6
;
2681 once_bool_variable6_77
= true;
2683 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
2684 if (UNTAG_Bool(variable6
)) { /*if*/
2685 variable6
= NEW_string___String___init(); /*new String*/
2686 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNTAG_Int("), TAG_Int(18)); /*new String*/
2687 variable8
= variable7
;
2688 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
2689 variable9
= TAG_Int(0);
2690 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2691 variable11
= variable10
;
2692 if (UNTAG_Bool(variable11
)) { /* and */
2693 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2694 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
2696 variable10
= variable11
;
2697 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
2698 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2699 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
2700 goto return_label78
;
2701 return_label78
: while(false);
2702 variable9
= variable10
;
2703 variable10
= variable9
;
2704 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
2705 variable11
= NEW_string___String___with_native(BOX_NativeString(")-UNTAG_Int("), TAG_Int(12)); /*new String*/
2706 variable12
= variable11
;
2707 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
2708 variable13
= TAG_Int(1);
2709 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2710 variable15
= variable14
;
2711 if (UNTAG_Bool(variable15
)) { /* and */
2712 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2713 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
2715 variable14
= variable15
;
2716 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
2717 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2718 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
2719 goto return_label79
;
2720 return_label79
: while(false);
2721 variable13
= variable14
;
2722 variable14
= variable13
;
2723 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
2724 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
2725 variable16
= variable15
;
2726 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
2727 variable5
= variable6
/*s=*/;
2729 if (once_bool_variable6_80
) variable6
= once_value_variable6_80
;
2731 variable6
= NEW_string___String___with_native(BOX_NativeString("*"), TAG_Int(1)); /*new String*/
2732 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2733 once_value_variable6_80
= variable6
;
2734 once_bool_variable6_80
= true;
2736 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
2737 if (UNTAG_Bool(variable6
)) { /*if*/
2738 variable6
= NEW_string___String___init(); /*new String*/
2739 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNTAG_Int("), TAG_Int(18)); /*new String*/
2740 variable8
= variable7
;
2741 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
2742 variable9
= TAG_Int(0);
2743 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2744 variable11
= variable10
;
2745 if (UNTAG_Bool(variable11
)) { /* and */
2746 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2747 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
2749 variable10
= variable11
;
2750 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
2751 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2752 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
2753 goto return_label81
;
2754 return_label81
: while(false);
2755 variable9
= variable10
;
2756 variable10
= variable9
;
2757 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
2758 variable11
= NEW_string___String___with_native(BOX_NativeString(")*UNTAG_Int("), TAG_Int(12)); /*new String*/
2759 variable12
= variable11
;
2760 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
2761 variable13
= TAG_Int(1);
2762 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2763 variable15
= variable14
;
2764 if (UNTAG_Bool(variable15
)) { /* and */
2765 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2766 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
2768 variable14
= variable15
;
2769 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
2770 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2771 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
2772 goto return_label82
;
2773 return_label82
: while(false);
2774 variable13
= variable14
;
2775 variable14
= variable13
;
2776 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
2777 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
2778 variable16
= variable15
;
2779 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
2780 variable5
= variable6
/*s=*/;
2782 if (once_bool_variable6_83
) variable6
= once_value_variable6_83
;
2784 variable6
= NEW_string___String___with_native(BOX_NativeString("/"), TAG_Int(1)); /*new String*/
2785 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2786 once_value_variable6_83
= variable6
;
2787 once_bool_variable6_83
= true;
2789 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
2790 if (UNTAG_Bool(variable6
)) { /*if*/
2791 variable6
= NEW_string___String___init(); /*new String*/
2792 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNTAG_Int("), TAG_Int(18)); /*new String*/
2793 variable8
= variable7
;
2794 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
2795 variable9
= TAG_Int(0);
2796 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2797 variable11
= variable10
;
2798 if (UNTAG_Bool(variable11
)) { /* and */
2799 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2800 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
2802 variable10
= variable11
;
2803 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
2804 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2805 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
2806 goto return_label84
;
2807 return_label84
: while(false);
2808 variable9
= variable10
;
2809 variable10
= variable9
;
2810 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
2811 variable11
= NEW_string___String___with_native(BOX_NativeString(")/UNTAG_Int("), TAG_Int(12)); /*new String*/
2812 variable12
= variable11
;
2813 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
2814 variable13
= TAG_Int(1);
2815 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2816 variable15
= variable14
;
2817 if (UNTAG_Bool(variable15
)) { /* and */
2818 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2819 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
2821 variable14
= variable15
;
2822 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
2823 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2824 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
2825 goto return_label85
;
2826 return_label85
: while(false);
2827 variable13
= variable14
;
2828 variable14
= variable13
;
2829 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
2830 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
2831 variable16
= variable15
;
2832 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
2833 variable5
= variable6
/*s=*/;
2835 if (once_bool_variable6_86
) variable6
= once_value_variable6_86
;
2837 variable6
= NEW_string___String___with_native(BOX_NativeString("%"), TAG_Int(1)); /*new String*/
2838 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2839 once_value_variable6_86
= variable6
;
2840 once_bool_variable6_86
= true;
2842 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
2843 if (UNTAG_Bool(variable6
)) { /*if*/
2844 variable6
= NEW_string___String___init(); /*new String*/
2845 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNTAG_Int("), TAG_Int(18)); /*new String*/
2846 variable8
= variable7
;
2847 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
2848 variable9
= TAG_Int(0);
2849 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2850 variable11
= variable10
;
2851 if (UNTAG_Bool(variable11
)) { /* and */
2852 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2853 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
2855 variable10
= variable11
;
2856 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
2857 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2858 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
2859 goto return_label87
;
2860 return_label87
: while(false);
2861 variable9
= variable10
;
2862 variable10
= variable9
;
2863 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
2864 variable11
= NEW_string___String___with_native(BOX_NativeString(")%UNTAG_Int("), TAG_Int(12)); /*new String*/
2865 variable12
= variable11
;
2866 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
2867 variable13
= TAG_Int(1);
2868 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2869 variable15
= variable14
;
2870 if (UNTAG_Bool(variable15
)) { /* and */
2871 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2872 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
2874 variable14
= variable15
;
2875 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
2876 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2877 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
2878 goto return_label88
;
2879 return_label88
: while(false);
2880 variable13
= variable14
;
2881 variable14
= variable13
;
2882 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
2883 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
2884 variable16
= variable15
;
2885 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
2886 variable5
= variable6
/*s=*/;
2888 if (once_bool_variable6_89
) variable6
= once_value_variable6_89
;
2890 variable6
= NEW_string___String___with_native(BOX_NativeString("<"), TAG_Int(1)); /*new String*/
2891 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2892 once_value_variable6_89
= variable6
;
2893 once_bool_variable6_89
= true;
2895 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
2896 if (UNTAG_Bool(variable6
)) { /*if*/
2897 variable6
= NEW_string___String___init(); /*new String*/
2898 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(UNTAG_Int("), TAG_Int(19)); /*new String*/
2899 variable8
= variable7
;
2900 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
2901 variable9
= TAG_Int(0);
2902 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2903 variable11
= variable10
;
2904 if (UNTAG_Bool(variable11
)) { /* and */
2905 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2906 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
2908 variable10
= variable11
;
2909 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
2910 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2911 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
2912 goto return_label90
;
2913 return_label90
: while(false);
2914 variable9
= variable10
;
2915 variable10
= variable9
;
2916 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
2917 variable11
= NEW_string___String___with_native(BOX_NativeString(")<UNTAG_Int("), TAG_Int(12)); /*new String*/
2918 variable12
= variable11
;
2919 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
2920 variable13
= TAG_Int(1);
2921 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2922 variable15
= variable14
;
2923 if (UNTAG_Bool(variable15
)) { /* and */
2924 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2925 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
2927 variable14
= variable15
;
2928 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
2929 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2930 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
2931 goto return_label91
;
2932 return_label91
: while(false);
2933 variable13
= variable14
;
2934 variable14
= variable13
;
2935 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
2936 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
2937 variable16
= variable15
;
2938 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
2939 variable5
= variable6
/*s=*/;
2941 if (once_bool_variable6_92
) variable6
= once_value_variable6_92
;
2943 variable6
= NEW_string___String___with_native(BOX_NativeString(">"), TAG_Int(1)); /*new String*/
2944 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2945 once_value_variable6_92
= variable6
;
2946 once_bool_variable6_92
= true;
2948 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
2949 if (UNTAG_Bool(variable6
)) { /*if*/
2950 variable6
= NEW_string___String___init(); /*new String*/
2951 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(UNTAG_Int("), TAG_Int(19)); /*new String*/
2952 variable8
= variable7
;
2953 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
2954 variable9
= TAG_Int(0);
2955 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2956 variable11
= variable10
;
2957 if (UNTAG_Bool(variable11
)) { /* and */
2958 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2959 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
2961 variable10
= variable11
;
2962 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
2963 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2964 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
2965 goto return_label93
;
2966 return_label93
: while(false);
2967 variable9
= variable10
;
2968 variable10
= variable9
;
2969 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
2970 variable11
= NEW_string___String___with_native(BOX_NativeString(")>UNTAG_Int("), TAG_Int(12)); /*new String*/
2971 variable12
= variable11
;
2972 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
2973 variable13
= TAG_Int(1);
2974 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2975 variable15
= variable14
;
2976 if (UNTAG_Bool(variable15
)) { /* and */
2977 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2978 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
2980 variable14
= variable15
;
2981 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
2982 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2983 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
2984 goto return_label94
;
2985 return_label94
: while(false);
2986 variable13
= variable14
;
2987 variable14
= variable13
;
2988 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
2989 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
2990 variable16
= variable15
;
2991 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
2992 variable5
= variable6
/*s=*/;
2994 if (once_bool_variable6_95
) variable6
= once_value_variable6_95
;
2996 variable6
= NEW_string___String___with_native(BOX_NativeString("<="), TAG_Int(2)); /*new String*/
2997 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2998 once_value_variable6_95
= variable6
;
2999 once_bool_variable6_95
= true;
3001 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
3002 if (UNTAG_Bool(variable6
)) { /*if*/
3003 variable6
= NEW_string___String___init(); /*new String*/
3004 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(UNTAG_Int("), TAG_Int(19)); /*new String*/
3005 variable8
= variable7
;
3006 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3007 variable9
= TAG_Int(0);
3008 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3009 variable11
= variable10
;
3010 if (UNTAG_Bool(variable11
)) { /* and */
3011 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3012 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3014 variable10
= variable11
;
3015 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3016 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3017 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3018 goto return_label96
;
3019 return_label96
: while(false);
3020 variable9
= variable10
;
3021 variable10
= variable9
;
3022 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3023 variable11
= NEW_string___String___with_native(BOX_NativeString(")<=UNTAG_Int("), TAG_Int(13)); /*new String*/
3024 variable12
= variable11
;
3025 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3026 variable13
= TAG_Int(1);
3027 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3028 variable15
= variable14
;
3029 if (UNTAG_Bool(variable15
)) { /* and */
3030 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3031 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
3033 variable14
= variable15
;
3034 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3035 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3036 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
3037 goto return_label97
;
3038 return_label97
: while(false);
3039 variable13
= variable14
;
3040 variable14
= variable13
;
3041 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
3042 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3043 variable16
= variable15
;
3044 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
3045 variable5
= variable6
/*s=*/;
3047 if (once_bool_variable6_98
) variable6
= once_value_variable6_98
;
3049 variable6
= NEW_string___String___with_native(BOX_NativeString(">="), TAG_Int(2)); /*new String*/
3050 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3051 once_value_variable6_98
= variable6
;
3052 once_bool_variable6_98
= true;
3054 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
3055 if (UNTAG_Bool(variable6
)) { /*if*/
3056 variable6
= NEW_string___String___init(); /*new String*/
3057 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(UNTAG_Int("), TAG_Int(19)); /*new String*/
3058 variable8
= variable7
;
3059 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3060 variable9
= TAG_Int(0);
3061 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3062 variable11
= variable10
;
3063 if (UNTAG_Bool(variable11
)) { /* and */
3064 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3065 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3067 variable10
= variable11
;
3068 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3069 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3070 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3071 goto return_label99
;
3072 return_label99
: while(false);
3073 variable9
= variable10
;
3074 variable10
= variable9
;
3075 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3076 variable11
= NEW_string___String___with_native(BOX_NativeString(")>=UNTAG_Int("), TAG_Int(13)); /*new String*/
3077 variable12
= variable11
;
3078 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3079 variable13
= TAG_Int(1);
3080 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3081 variable15
= variable14
;
3082 if (UNTAG_Bool(variable15
)) { /* and */
3083 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3084 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
3086 variable14
= variable15
;
3087 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3088 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3089 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
3090 goto return_label100
;
3091 return_label100
: while(false);
3092 variable13
= variable14
;
3093 variable14
= variable13
;
3094 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
3095 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3096 variable16
= variable15
;
3097 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
3098 variable5
= variable6
/*s=*/;
3100 if (once_bool_variable6_101
) variable6
= once_value_variable6_101
;
3102 variable6
= NEW_string___String___with_native(BOX_NativeString("lshift"), TAG_Int(6)); /*new String*/
3103 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3104 once_value_variable6_101
= variable6
;
3105 once_bool_variable6_101
= true;
3107 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
3108 if (UNTAG_Bool(variable6
)) { /*if*/
3109 variable6
= NEW_string___String___init(); /*new String*/
3110 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNTAG_Int("), TAG_Int(18)); /*new String*/
3111 variable8
= variable7
;
3112 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3113 variable9
= TAG_Int(0);
3114 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3115 variable11
= variable10
;
3116 if (UNTAG_Bool(variable11
)) { /* and */
3117 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3118 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3120 variable10
= variable11
;
3121 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3122 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3123 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3124 goto return_label102
;
3125 return_label102
: while(false);
3126 variable9
= variable10
;
3127 variable10
= variable9
;
3128 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3129 variable11
= NEW_string___String___with_native(BOX_NativeString(")<<UNTAG_Int("), TAG_Int(13)); /*new String*/
3130 variable12
= variable11
;
3131 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3132 variable13
= TAG_Int(1);
3133 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3134 variable15
= variable14
;
3135 if (UNTAG_Bool(variable15
)) { /* and */
3136 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3137 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
3139 variable14
= variable15
;
3140 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3141 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3142 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
3143 goto return_label103
;
3144 return_label103
: while(false);
3145 variable13
= variable14
;
3146 variable14
= variable13
;
3147 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
3148 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3149 variable16
= variable15
;
3150 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
3151 variable5
= variable6
/*s=*/;
3153 if (once_bool_variable6_104
) variable6
= once_value_variable6_104
;
3155 variable6
= NEW_string___String___with_native(BOX_NativeString("rshift"), TAG_Int(6)); /*new String*/
3156 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3157 once_value_variable6_104
= variable6
;
3158 once_bool_variable6_104
= true;
3160 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
3161 if (UNTAG_Bool(variable6
)) { /*if*/
3162 variable6
= NEW_string___String___init(); /*new String*/
3163 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNTAG_Int("), TAG_Int(18)); /*new String*/
3164 variable8
= variable7
;
3165 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3166 variable9
= TAG_Int(0);
3167 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3168 variable11
= variable10
;
3169 if (UNTAG_Bool(variable11
)) { /* and */
3170 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3171 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3173 variable10
= variable11
;
3174 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3175 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3176 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3177 goto return_label105
;
3178 return_label105
: while(false);
3179 variable9
= variable10
;
3180 variable10
= variable9
;
3181 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3182 variable11
= NEW_string___String___with_native(BOX_NativeString(")>>UNTAG_Int("), TAG_Int(13)); /*new String*/
3183 variable12
= variable11
;
3184 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3185 variable13
= TAG_Int(1);
3186 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3187 variable15
= variable14
;
3188 if (UNTAG_Bool(variable15
)) { /* and */
3189 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3190 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
3192 variable14
= variable15
;
3193 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3194 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3195 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
3196 goto return_label106
;
3197 return_label106
: while(false);
3198 variable13
= variable14
;
3199 variable14
= variable13
;
3200 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
3201 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3202 variable16
= variable15
;
3203 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
3204 variable5
= variable6
/*s=*/;
3206 if (once_bool_variable6_107
) variable6
= once_value_variable6_107
;
3208 variable6
= NEW_string___String___with_native(BOX_NativeString("=="), TAG_Int(2)); /*new String*/
3209 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3210 once_value_variable6_107
= variable6
;
3211 once_bool_variable6_107
= true;
3213 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
3214 if (UNTAG_Bool(variable6
)) { /*if*/
3215 variable6
= NEW_string___String___init(); /*new String*/
3216 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(("), TAG_Int(10)); /*new String*/
3217 variable8
= variable7
;
3218 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3219 variable9
= TAG_Int(0);
3220 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3221 variable11
= variable10
;
3222 if (UNTAG_Bool(variable11
)) { /* and */
3223 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3224 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3226 variable10
= variable11
;
3227 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3228 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3229 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3230 goto return_label108
;
3231 return_label108
: while(false);
3232 variable9
= variable10
;
3233 variable10
= variable9
;
3234 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3235 variable11
= NEW_string___String___with_native(BOX_NativeString(")==("), TAG_Int(4)); /*new String*/
3236 variable12
= variable11
;
3237 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3238 variable13
= TAG_Int(1);
3239 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3240 variable15
= variable14
;
3241 if (UNTAG_Bool(variable15
)) { /* and */
3242 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3243 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
3245 variable14
= variable15
;
3246 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3247 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3248 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
3249 goto return_label109
;
3250 return_label109
: while(false);
3251 variable13
= variable14
;
3252 variable14
= variable13
;
3253 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
3254 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3255 variable16
= variable15
;
3256 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
3257 variable5
= variable6
/*s=*/;
3259 if (once_bool_variable6_110
) variable6
= once_value_variable6_110
;
3261 variable6
= NEW_string___String___with_native(BOX_NativeString("!="), TAG_Int(2)); /*new String*/
3262 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3263 once_value_variable6_110
= variable6
;
3264 once_bool_variable6_110
= true;
3266 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
3267 if (UNTAG_Bool(variable6
)) { /*if*/
3268 variable6
= NEW_string___String___init(); /*new String*/
3269 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(("), TAG_Int(10)); /*new String*/
3270 variable8
= variable7
;
3271 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3272 variable9
= TAG_Int(0);
3273 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3274 variable11
= variable10
;
3275 if (UNTAG_Bool(variable11
)) { /* and */
3276 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3277 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3279 variable10
= variable11
;
3280 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3281 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3282 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3283 goto return_label111
;
3284 return_label111
: while(false);
3285 variable9
= variable10
;
3286 variable10
= variable9
;
3287 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3288 variable11
= NEW_string___String___with_native(BOX_NativeString(")!=("), TAG_Int(4)); /*new String*/
3289 variable12
= variable11
;
3290 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3291 variable13
= TAG_Int(1);
3292 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3293 variable15
= variable14
;
3294 if (UNTAG_Bool(variable15
)) { /* and */
3295 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3296 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
3298 variable14
= variable15
;
3299 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3300 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3301 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
3302 goto return_label112
;
3303 return_label112
: while(false);
3304 variable13
= variable14
;
3305 variable14
= variable13
;
3306 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
3307 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3308 variable16
= variable15
;
3309 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
3310 variable5
= variable6
/*s=*/;
3332 if (once_bool_variable6_113
) variable6
= once_value_variable6_113
;
3334 variable6
= NEW_string___String___with_native(BOX_NativeString("Float"), TAG_Int(5)); /*new String*/
3335 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3336 once_value_variable6_113
= variable6
;
3337 once_bool_variable6_113
= true;
3339 variable6
= TAG_Bool(( variable3
/*c*/ == variable6
) || (( variable3
/*c*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable3
/*c*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable3
/*c*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable3
/*c*/,COLOR_kernel___Object_____eqeq
))( variable3
/*c*/, variable6
) /*Object::==*/)))));
3340 if (UNTAG_Bool(variable6
)) { /*if*/
3341 if (once_bool_variable6_114
) variable6
= once_value_variable6_114
;
3343 variable6
= NEW_string___String___with_native(BOX_NativeString("object_id"), TAG_Int(9)); /*new String*/
3344 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3345 once_value_variable6_114
= variable6
;
3346 once_bool_variable6_114
= true;
3348 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
3349 if (UNTAG_Bool(variable6
)) { /*if*/
3350 variable6
= NEW_string___String___init(); /*new String*/
3351 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int((bigint)UNBOX_Float("), TAG_Int(28)); /*new String*/
3352 variable8
= variable7
;
3353 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3354 variable9
= TAG_Int(0);
3355 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3356 variable11
= variable10
;
3357 if (UNTAG_Bool(variable11
)) { /* and */
3358 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3359 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3361 variable10
= variable11
;
3362 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3363 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3364 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3365 goto return_label115
;
3366 return_label115
: while(false);
3367 variable9
= variable10
;
3368 variable10
= variable9
;
3369 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3370 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3371 variable12
= variable11
;
3372 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3373 variable5
= variable6
/*s=*/;
3375 if (once_bool_variable6_116
) variable6
= once_value_variable6_116
;
3377 variable6
= NEW_string___String___with_native(BOX_NativeString("unary -"), TAG_Int(7)); /*new String*/
3378 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3379 once_value_variable6_116
= variable6
;
3380 once_bool_variable6_116
= true;
3382 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
3383 if (UNTAG_Bool(variable6
)) { /*if*/
3384 variable6
= NEW_string___String___init(); /*new String*/
3385 variable7
= NEW_string___String___with_native(BOX_NativeString("BOX_Float(-UNBOX_Float("), TAG_Int(23)); /*new String*/
3386 variable8
= variable7
;
3387 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3388 variable9
= TAG_Int(0);
3389 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3390 variable11
= variable10
;
3391 if (UNTAG_Bool(variable11
)) { /* and */
3392 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3393 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3395 variable10
= variable11
;
3396 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3397 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3398 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3399 goto return_label117
;
3400 return_label117
: while(false);
3401 variable9
= variable10
;
3402 variable10
= variable9
;
3403 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3404 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3405 variable12
= variable11
;
3406 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3407 variable5
= variable6
/*s=*/;
3409 if (once_bool_variable6_118
) variable6
= once_value_variable6_118
;
3411 variable6
= NEW_string___String___with_native(BOX_NativeString("output"), TAG_Int(6)); /*new String*/
3412 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3413 once_value_variable6_118
= variable6
;
3414 once_bool_variable6_118
= true;
3416 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
3417 if (UNTAG_Bool(variable6
)) { /*if*/
3418 variable6
= NEW_string___String___init(); /*new String*/
3419 variable7
= NEW_string___String___with_native(BOX_NativeString("printf(\"%f\\n\", UNBOX_Float("), TAG_Int(27)); /*new String*/
3420 variable8
= variable7
;
3421 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3422 variable9
= TAG_Int(0);
3423 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3424 variable11
= variable10
;
3425 if (UNTAG_Bool(variable11
)) { /* and */
3426 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3427 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3429 variable10
= variable11
;
3430 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3431 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3432 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3433 goto return_label119
;
3434 return_label119
: while(false);
3435 variable9
= variable10
;
3436 variable10
= variable9
;
3437 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3438 variable11
= NEW_string___String___with_native(BOX_NativeString("));"), TAG_Int(3)); /*new String*/
3439 variable12
= variable11
;
3440 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3441 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable6
) /*CompilerVisitor::add_instr*/;
3443 if (once_bool_variable6_120
) variable6
= once_value_variable6_120
;
3445 variable6
= NEW_string___String___with_native(BOX_NativeString("to_i"), TAG_Int(4)); /*new String*/
3446 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3447 once_value_variable6_120
= variable6
;
3448 once_bool_variable6_120
= true;
3450 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
3451 if (UNTAG_Bool(variable6
)) { /*if*/
3452 variable6
= NEW_string___String___init(); /*new String*/
3453 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int((bigint)UNBOX_Float("), TAG_Int(28)); /*new String*/
3454 variable8
= variable7
;
3455 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3456 variable9
= TAG_Int(0);
3457 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3458 variable11
= variable10
;
3459 if (UNTAG_Bool(variable11
)) { /* and */
3460 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3461 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3463 variable10
= variable11
;
3464 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3465 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3466 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3467 goto return_label121
;
3468 return_label121
: while(false);
3469 variable9
= variable10
;
3470 variable10
= variable9
;
3471 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3472 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3473 variable12
= variable11
;
3474 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3475 variable5
= variable6
/*s=*/;
3477 if (once_bool_variable6_122
) variable6
= once_value_variable6_122
;
3479 variable6
= NEW_string___String___with_native(BOX_NativeString("+"), TAG_Int(1)); /*new String*/
3480 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3481 once_value_variable6_122
= variable6
;
3482 once_bool_variable6_122
= true;
3484 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
3485 if (UNTAG_Bool(variable6
)) { /*if*/
3486 variable6
= NEW_string___String___init(); /*new String*/
3487 variable7
= NEW_string___String___with_native(BOX_NativeString("BOX_Float(UNBOX_Float("), TAG_Int(22)); /*new String*/
3488 variable8
= variable7
;
3489 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3490 variable9
= TAG_Int(0);
3491 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3492 variable11
= variable10
;
3493 if (UNTAG_Bool(variable11
)) { /* and */
3494 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3495 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3497 variable10
= variable11
;
3498 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3499 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3500 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3501 goto return_label123
;
3502 return_label123
: while(false);
3503 variable9
= variable10
;
3504 variable10
= variable9
;
3505 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3506 variable11
= NEW_string___String___with_native(BOX_NativeString(")+UNBOX_Float("), TAG_Int(14)); /*new String*/
3507 variable12
= variable11
;
3508 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3509 variable13
= TAG_Int(1);
3510 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3511 variable15
= variable14
;
3512 if (UNTAG_Bool(variable15
)) { /* and */
3513 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3514 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
3516 variable14
= variable15
;
3517 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3518 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3519 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
3520 goto return_label124
;
3521 return_label124
: while(false);
3522 variable13
= variable14
;
3523 variable14
= variable13
;
3524 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
3525 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3526 variable16
= variable15
;
3527 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
3528 variable5
= variable6
/*s=*/;
3530 if (once_bool_variable6_125
) variable6
= once_value_variable6_125
;
3532 variable6
= NEW_string___String___with_native(BOX_NativeString("-"), TAG_Int(1)); /*new String*/
3533 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3534 once_value_variable6_125
= variable6
;
3535 once_bool_variable6_125
= true;
3537 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
3538 if (UNTAG_Bool(variable6
)) { /*if*/
3539 variable6
= NEW_string___String___init(); /*new String*/
3540 variable7
= NEW_string___String___with_native(BOX_NativeString("BOX_Float(UNBOX_Float("), TAG_Int(22)); /*new String*/
3541 variable8
= variable7
;
3542 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3543 variable9
= TAG_Int(0);
3544 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3545 variable11
= variable10
;
3546 if (UNTAG_Bool(variable11
)) { /* and */
3547 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3548 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3550 variable10
= variable11
;
3551 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3552 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3553 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3554 goto return_label126
;
3555 return_label126
: while(false);
3556 variable9
= variable10
;
3557 variable10
= variable9
;
3558 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3559 variable11
= NEW_string___String___with_native(BOX_NativeString(")-UNBOX_Float("), TAG_Int(14)); /*new String*/
3560 variable12
= variable11
;
3561 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3562 variable13
= TAG_Int(1);
3563 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3564 variable15
= variable14
;
3565 if (UNTAG_Bool(variable15
)) { /* and */
3566 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3567 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
3569 variable14
= variable15
;
3570 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3571 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3572 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
3573 goto return_label127
;
3574 return_label127
: while(false);
3575 variable13
= variable14
;
3576 variable14
= variable13
;
3577 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
3578 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3579 variable16
= variable15
;
3580 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
3581 variable5
= variable6
/*s=*/;
3583 if (once_bool_variable6_128
) variable6
= once_value_variable6_128
;
3585 variable6
= NEW_string___String___with_native(BOX_NativeString("*"), TAG_Int(1)); /*new String*/
3586 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3587 once_value_variable6_128
= variable6
;
3588 once_bool_variable6_128
= true;
3590 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
3591 if (UNTAG_Bool(variable6
)) { /*if*/
3592 variable6
= NEW_string___String___init(); /*new String*/
3593 variable7
= NEW_string___String___with_native(BOX_NativeString("BOX_Float(UNBOX_Float("), TAG_Int(22)); /*new String*/
3594 variable8
= variable7
;
3595 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3596 variable9
= TAG_Int(0);
3597 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3598 variable11
= variable10
;
3599 if (UNTAG_Bool(variable11
)) { /* and */
3600 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3601 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3603 variable10
= variable11
;
3604 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3605 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3606 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3607 goto return_label129
;
3608 return_label129
: while(false);
3609 variable9
= variable10
;
3610 variable10
= variable9
;
3611 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3612 variable11
= NEW_string___String___with_native(BOX_NativeString(")*UNBOX_Float("), TAG_Int(14)); /*new String*/
3613 variable12
= variable11
;
3614 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3615 variable13
= TAG_Int(1);
3616 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3617 variable15
= variable14
;
3618 if (UNTAG_Bool(variable15
)) { /* and */
3619 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3620 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
3622 variable14
= variable15
;
3623 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3624 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3625 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
3626 goto return_label130
;
3627 return_label130
: while(false);
3628 variable13
= variable14
;
3629 variable14
= variable13
;
3630 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
3631 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3632 variable16
= variable15
;
3633 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
3634 variable5
= variable6
/*s=*/;
3636 if (once_bool_variable6_131
) variable6
= once_value_variable6_131
;
3638 variable6
= NEW_string___String___with_native(BOX_NativeString("/"), TAG_Int(1)); /*new String*/
3639 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3640 once_value_variable6_131
= variable6
;
3641 once_bool_variable6_131
= true;
3643 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
3644 if (UNTAG_Bool(variable6
)) { /*if*/
3645 variable6
= NEW_string___String___init(); /*new String*/
3646 variable7
= NEW_string___String___with_native(BOX_NativeString("BOX_Float(UNBOX_Float("), TAG_Int(22)); /*new String*/
3647 variable8
= variable7
;
3648 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3649 variable9
= TAG_Int(0);
3650 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3651 variable11
= variable10
;
3652 if (UNTAG_Bool(variable11
)) { /* and */
3653 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3654 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3656 variable10
= variable11
;
3657 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3658 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3659 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3660 goto return_label132
;
3661 return_label132
: while(false);
3662 variable9
= variable10
;
3663 variable10
= variable9
;
3664 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3665 variable11
= NEW_string___String___with_native(BOX_NativeString(")/UNBOX_Float("), TAG_Int(14)); /*new String*/
3666 variable12
= variable11
;
3667 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3668 variable13
= TAG_Int(1);
3669 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3670 variable15
= variable14
;
3671 if (UNTAG_Bool(variable15
)) { /* and */
3672 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3673 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
3675 variable14
= variable15
;
3676 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3677 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3678 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
3679 goto return_label133
;
3680 return_label133
: while(false);
3681 variable13
= variable14
;
3682 variable14
= variable13
;
3683 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
3684 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3685 variable16
= variable15
;
3686 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
3687 variable5
= variable6
/*s=*/;
3689 if (once_bool_variable6_134
) variable6
= once_value_variable6_134
;
3691 variable6
= NEW_string___String___with_native(BOX_NativeString("<"), TAG_Int(1)); /*new String*/
3692 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3693 once_value_variable6_134
= variable6
;
3694 once_bool_variable6_134
= true;
3696 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
3697 if (UNTAG_Bool(variable6
)) { /*if*/
3698 variable6
= NEW_string___String___init(); /*new String*/
3699 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(UNBOX_Float("), TAG_Int(21)); /*new String*/
3700 variable8
= variable7
;
3701 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3702 variable9
= TAG_Int(0);
3703 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3704 variable11
= variable10
;
3705 if (UNTAG_Bool(variable11
)) { /* and */
3706 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3707 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3709 variable10
= variable11
;
3710 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3711 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3712 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3713 goto return_label135
;
3714 return_label135
: while(false);
3715 variable9
= variable10
;
3716 variable10
= variable9
;
3717 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3718 variable11
= NEW_string___String___with_native(BOX_NativeString(")<UNBOX_Float("), TAG_Int(14)); /*new String*/
3719 variable12
= variable11
;
3720 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3721 variable13
= TAG_Int(1);
3722 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3723 variable15
= variable14
;
3724 if (UNTAG_Bool(variable15
)) { /* and */
3725 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3726 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
3728 variable14
= variable15
;
3729 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3730 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3731 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
3732 goto return_label136
;
3733 return_label136
: while(false);
3734 variable13
= variable14
;
3735 variable14
= variable13
;
3736 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
3737 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3738 variable16
= variable15
;
3739 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
3740 variable5
= variable6
/*s=*/;
3742 if (once_bool_variable6_137
) variable6
= once_value_variable6_137
;
3744 variable6
= NEW_string___String___with_native(BOX_NativeString(">"), TAG_Int(1)); /*new String*/
3745 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3746 once_value_variable6_137
= variable6
;
3747 once_bool_variable6_137
= true;
3749 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
3750 if (UNTAG_Bool(variable6
)) { /*if*/
3751 variable6
= NEW_string___String___init(); /*new String*/
3752 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(UNBOX_Float("), TAG_Int(21)); /*new String*/
3753 variable8
= variable7
;
3754 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3755 variable9
= TAG_Int(0);
3756 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3757 variable11
= variable10
;
3758 if (UNTAG_Bool(variable11
)) { /* and */
3759 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3760 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3762 variable10
= variable11
;
3763 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3764 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3765 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3766 goto return_label138
;
3767 return_label138
: while(false);
3768 variable9
= variable10
;
3769 variable10
= variable9
;
3770 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3771 variable11
= NEW_string___String___with_native(BOX_NativeString(")>UNBOX_Float("), TAG_Int(14)); /*new String*/
3772 variable12
= variable11
;
3773 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3774 variable13
= TAG_Int(1);
3775 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3776 variable15
= variable14
;
3777 if (UNTAG_Bool(variable15
)) { /* and */
3778 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3779 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
3781 variable14
= variable15
;
3782 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3783 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3784 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
3785 goto return_label139
;
3786 return_label139
: while(false);
3787 variable13
= variable14
;
3788 variable14
= variable13
;
3789 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
3790 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3791 variable16
= variable15
;
3792 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
3793 variable5
= variable6
/*s=*/;
3795 if (once_bool_variable6_140
) variable6
= once_value_variable6_140
;
3797 variable6
= NEW_string___String___with_native(BOX_NativeString("<="), TAG_Int(2)); /*new String*/
3798 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3799 once_value_variable6_140
= variable6
;
3800 once_bool_variable6_140
= true;
3802 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
3803 if (UNTAG_Bool(variable6
)) { /*if*/
3804 variable6
= NEW_string___String___init(); /*new String*/
3805 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(UNBOX_Float("), TAG_Int(21)); /*new String*/
3806 variable8
= variable7
;
3807 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3808 variable9
= TAG_Int(0);
3809 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3810 variable11
= variable10
;
3811 if (UNTAG_Bool(variable11
)) { /* and */
3812 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3813 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3815 variable10
= variable11
;
3816 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3817 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3818 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3819 goto return_label141
;
3820 return_label141
: while(false);
3821 variable9
= variable10
;
3822 variable10
= variable9
;
3823 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3824 variable11
= NEW_string___String___with_native(BOX_NativeString(")<=UNBOX_Float("), TAG_Int(15)); /*new String*/
3825 variable12
= variable11
;
3826 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3827 variable13
= TAG_Int(1);
3828 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3829 variable15
= variable14
;
3830 if (UNTAG_Bool(variable15
)) { /* and */
3831 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3832 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
3834 variable14
= variable15
;
3835 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3836 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3837 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
3838 goto return_label142
;
3839 return_label142
: while(false);
3840 variable13
= variable14
;
3841 variable14
= variable13
;
3842 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
3843 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3844 variable16
= variable15
;
3845 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
3846 variable5
= variable6
/*s=*/;
3848 if (once_bool_variable6_143
) variable6
= once_value_variable6_143
;
3850 variable6
= NEW_string___String___with_native(BOX_NativeString(">="), TAG_Int(2)); /*new String*/
3851 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3852 once_value_variable6_143
= variable6
;
3853 once_bool_variable6_143
= true;
3855 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
3856 if (UNTAG_Bool(variable6
)) { /*if*/
3857 variable6
= NEW_string___String___init(); /*new String*/
3858 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(UNBOX_Float("), TAG_Int(21)); /*new String*/
3859 variable8
= variable7
;
3860 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3861 variable9
= TAG_Int(0);
3862 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3863 variable11
= variable10
;
3864 if (UNTAG_Bool(variable11
)) { /* and */
3865 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3866 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3868 variable10
= variable11
;
3869 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3870 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3871 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3872 goto return_label144
;
3873 return_label144
: while(false);
3874 variable9
= variable10
;
3875 variable10
= variable9
;
3876 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3877 variable11
= NEW_string___String___with_native(BOX_NativeString(")>=UNBOX_Float("), TAG_Int(15)); /*new String*/
3878 variable12
= variable11
;
3879 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3880 variable13
= TAG_Int(1);
3881 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3882 variable15
= variable14
;
3883 if (UNTAG_Bool(variable15
)) { /* and */
3884 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3885 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
3887 variable14
= variable15
;
3888 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3889 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3890 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
3891 goto return_label145
;
3892 return_label145
: while(false);
3893 variable13
= variable14
;
3894 variable14
= variable13
;
3895 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
3896 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3897 variable16
= variable15
;
3898 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
3899 variable5
= variable6
/*s=*/;
3913 if (once_bool_variable6_146
) variable6
= once_value_variable6_146
;
3915 variable6
= NEW_string___String___with_native(BOX_NativeString("Char"), TAG_Int(4)); /*new String*/
3916 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3917 once_value_variable6_146
= variable6
;
3918 once_bool_variable6_146
= true;
3920 variable6
= TAG_Bool(( variable3
/*c*/ == variable6
) || (( variable3
/*c*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable3
/*c*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable3
/*c*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable3
/*c*/,COLOR_kernel___Object_____eqeq
))( variable3
/*c*/, variable6
) /*Object::==*/)))));
3921 if (UNTAG_Bool(variable6
)) { /*if*/
3922 if (once_bool_variable6_147
) variable6
= once_value_variable6_147
;
3924 variable6
= NEW_string___String___with_native(BOX_NativeString("object_id"), TAG_Int(9)); /*new String*/
3925 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3926 once_value_variable6_147
= variable6
;
3927 once_bool_variable6_147
= true;
3929 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
3930 if (UNTAG_Bool(variable6
)) { /*if*/
3931 variable6
= NEW_string___String___init(); /*new String*/
3932 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNTAG_Char("), TAG_Int(19)); /*new String*/
3933 variable8
= variable7
;
3934 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3935 variable9
= TAG_Int(0);
3936 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3937 variable11
= variable10
;
3938 if (UNTAG_Bool(variable11
)) { /* and */
3939 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3940 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3942 variable10
= variable11
;
3943 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3944 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3945 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3946 goto return_label148
;
3947 return_label148
: while(false);
3948 variable9
= variable10
;
3949 variable10
= variable9
;
3950 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3951 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3952 variable12
= variable11
;
3953 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3954 variable5
= variable6
/*s=*/;
3956 if (once_bool_variable6_149
) variable6
= once_value_variable6_149
;
3958 variable6
= NEW_string___String___with_native(BOX_NativeString("unary -"), TAG_Int(7)); /*new String*/
3959 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3960 once_value_variable6_149
= variable6
;
3961 once_bool_variable6_149
= true;
3963 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
3964 if (UNTAG_Bool(variable6
)) { /*if*/
3965 variable6
= NEW_string___String___init(); /*new String*/
3966 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Char(-UNTAG_Char("), TAG_Int(21)); /*new String*/
3967 variable8
= variable7
;
3968 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3969 variable9
= TAG_Int(0);
3970 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3971 variable11
= variable10
;
3972 if (UNTAG_Bool(variable11
)) { /* and */
3973 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3974 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3976 variable10
= variable11
;
3977 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
3978 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3979 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3980 goto return_label150
;
3981 return_label150
: while(false);
3982 variable9
= variable10
;
3983 variable10
= variable9
;
3984 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3985 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3986 variable12
= variable11
;
3987 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3988 variable5
= variable6
/*s=*/;
3990 if (once_bool_variable6_151
) variable6
= once_value_variable6_151
;
3992 variable6
= NEW_string___String___with_native(BOX_NativeString("output"), TAG_Int(6)); /*new String*/
3993 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3994 once_value_variable6_151
= variable6
;
3995 once_bool_variable6_151
= true;
3997 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
3998 if (UNTAG_Bool(variable6
)) { /*if*/
3999 variable6
= NEW_string___String___init(); /*new String*/
4000 variable7
= NEW_string___String___with_native(BOX_NativeString("printf(\"%c\", (unsigned char)UNTAG_Char("), TAG_Int(39)); /*new String*/
4001 variable8
= variable7
;
4002 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4003 variable9
= TAG_Int(0);
4004 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4005 variable11
= variable10
;
4006 if (UNTAG_Bool(variable11
)) { /* and */
4007 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4008 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4010 variable10
= variable11
;
4011 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4012 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4013 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4014 goto return_label152
;
4015 return_label152
: while(false);
4016 variable9
= variable10
;
4017 variable10
= variable9
;
4018 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4019 variable11
= NEW_string___String___with_native(BOX_NativeString("));"), TAG_Int(3)); /*new String*/
4020 variable12
= variable11
;
4021 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4022 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable6
) /*CompilerVisitor::add_instr*/;
4024 if (once_bool_variable6_153
) variable6
= once_value_variable6_153
;
4026 variable6
= NEW_string___String___with_native(BOX_NativeString("ascii"), TAG_Int(5)); /*new String*/
4027 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4028 once_value_variable6_153
= variable6
;
4029 once_bool_variable6_153
= true;
4031 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
4032 if (UNTAG_Bool(variable6
)) { /*if*/
4033 variable6
= NEW_string___String___init(); /*new String*/
4034 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int((unsigned char)UNTAG_Char("), TAG_Int(34)); /*new String*/
4035 variable8
= variable7
;
4036 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4037 variable9
= TAG_Int(0);
4038 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4039 variable11
= variable10
;
4040 if (UNTAG_Bool(variable11
)) { /* and */
4041 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4042 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4044 variable10
= variable11
;
4045 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4046 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4047 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4048 goto return_label154
;
4049 return_label154
: while(false);
4050 variable9
= variable10
;
4051 variable10
= variable9
;
4052 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4053 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4054 variable12
= variable11
;
4055 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4056 variable5
= variable6
/*s=*/;
4058 if (once_bool_variable6_155
) variable6
= once_value_variable6_155
;
4060 variable6
= NEW_string___String___with_native(BOX_NativeString("succ"), TAG_Int(4)); /*new String*/
4061 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4062 once_value_variable6_155
= variable6
;
4063 once_bool_variable6_155
= true;
4065 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
4066 if (UNTAG_Bool(variable6
)) { /*if*/
4067 variable6
= NEW_string___String___init(); /*new String*/
4068 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Char(UNTAG_Char("), TAG_Int(20)); /*new String*/
4069 variable8
= variable7
;
4070 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4071 variable9
= TAG_Int(0);
4072 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4073 variable11
= variable10
;
4074 if (UNTAG_Bool(variable11
)) { /* and */
4075 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4076 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4078 variable10
= variable11
;
4079 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4080 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4081 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4082 goto return_label156
;
4083 return_label156
: while(false);
4084 variable9
= variable10
;
4085 variable10
= variable9
;
4086 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4087 variable11
= NEW_string___String___with_native(BOX_NativeString(")+1)"), TAG_Int(4)); /*new String*/
4088 variable12
= variable11
;
4089 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4090 variable5
= variable6
/*s=*/;
4092 if (once_bool_variable6_157
) variable6
= once_value_variable6_157
;
4094 variable6
= NEW_string___String___with_native(BOX_NativeString("prec"), TAG_Int(4)); /*new String*/
4095 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4096 once_value_variable6_157
= variable6
;
4097 once_bool_variable6_157
= true;
4099 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
4100 if (UNTAG_Bool(variable6
)) { /*if*/
4101 variable6
= NEW_string___String___init(); /*new String*/
4102 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Char(UNTAG_Char("), TAG_Int(20)); /*new String*/
4103 variable8
= variable7
;
4104 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4105 variable9
= TAG_Int(0);
4106 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4107 variable11
= variable10
;
4108 if (UNTAG_Bool(variable11
)) { /* and */
4109 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4110 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4112 variable10
= variable11
;
4113 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4114 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4115 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4116 goto return_label158
;
4117 return_label158
: while(false);
4118 variable9
= variable10
;
4119 variable10
= variable9
;
4120 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4121 variable11
= NEW_string___String___with_native(BOX_NativeString(")-1)"), TAG_Int(4)); /*new String*/
4122 variable12
= variable11
;
4123 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4124 variable5
= variable6
/*s=*/;
4126 if (once_bool_variable6_159
) variable6
= once_value_variable6_159
;
4128 variable6
= NEW_string___String___with_native(BOX_NativeString("to_i"), TAG_Int(4)); /*new String*/
4129 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4130 once_value_variable6_159
= variable6
;
4131 once_bool_variable6_159
= true;
4133 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
4134 if (UNTAG_Bool(variable6
)) { /*if*/
4135 variable6
= NEW_string___String___init(); /*new String*/
4136 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNTAG_Char("), TAG_Int(19)); /*new String*/
4137 variable8
= variable7
;
4138 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4139 variable9
= TAG_Int(0);
4140 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4141 variable11
= variable10
;
4142 if (UNTAG_Bool(variable11
)) { /* and */
4143 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4144 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4146 variable10
= variable11
;
4147 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4148 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4149 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4150 goto return_label160
;
4151 return_label160
: while(false);
4152 variable9
= variable10
;
4153 variable10
= variable9
;
4154 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4155 variable11
= NEW_string___String___with_native(BOX_NativeString(")-'0')"), TAG_Int(6)); /*new String*/
4156 variable12
= variable11
;
4157 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4158 variable5
= variable6
/*s=*/;
4160 if (once_bool_variable6_161
) variable6
= once_value_variable6_161
;
4162 variable6
= NEW_string___String___with_native(BOX_NativeString("+"), TAG_Int(1)); /*new String*/
4163 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4164 once_value_variable6_161
= variable6
;
4165 once_bool_variable6_161
= true;
4167 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
4168 if (UNTAG_Bool(variable6
)) { /*if*/
4169 variable6
= NEW_string___String___init(); /*new String*/
4170 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Char(UNTAG_Char("), TAG_Int(20)); /*new String*/
4171 variable8
= variable7
;
4172 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4173 variable9
= TAG_Int(0);
4174 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4175 variable11
= variable10
;
4176 if (UNTAG_Bool(variable11
)) { /* and */
4177 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4178 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4180 variable10
= variable11
;
4181 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4182 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4183 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4184 goto return_label162
;
4185 return_label162
: while(false);
4186 variable9
= variable10
;
4187 variable10
= variable9
;
4188 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4189 variable11
= NEW_string___String___with_native(BOX_NativeString(")+UNTAG_Char("), TAG_Int(13)); /*new String*/
4190 variable12
= variable11
;
4191 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4192 variable13
= TAG_Int(1);
4193 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4194 variable15
= variable14
;
4195 if (UNTAG_Bool(variable15
)) { /* and */
4196 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4197 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
4199 variable14
= variable15
;
4200 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4201 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4202 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
4203 goto return_label163
;
4204 return_label163
: while(false);
4205 variable13
= variable14
;
4206 variable14
= variable13
;
4207 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
4208 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4209 variable16
= variable15
;
4210 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
4211 variable5
= variable6
/*s=*/;
4213 if (once_bool_variable6_164
) variable6
= once_value_variable6_164
;
4215 variable6
= NEW_string___String___with_native(BOX_NativeString("-"), TAG_Int(1)); /*new String*/
4216 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4217 once_value_variable6_164
= variable6
;
4218 once_bool_variable6_164
= true;
4220 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
4221 if (UNTAG_Bool(variable6
)) { /*if*/
4222 variable6
= NEW_string___String___init(); /*new String*/
4223 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Char(UNTAG_Char("), TAG_Int(20)); /*new String*/
4224 variable8
= variable7
;
4225 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4226 variable9
= TAG_Int(0);
4227 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4228 variable11
= variable10
;
4229 if (UNTAG_Bool(variable11
)) { /* and */
4230 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4231 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4233 variable10
= variable11
;
4234 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4235 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4236 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4237 goto return_label165
;
4238 return_label165
: while(false);
4239 variable9
= variable10
;
4240 variable10
= variable9
;
4241 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4242 variable11
= NEW_string___String___with_native(BOX_NativeString(")-UNTAG_Char("), TAG_Int(13)); /*new String*/
4243 variable12
= variable11
;
4244 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4245 variable13
= TAG_Int(1);
4246 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4247 variable15
= variable14
;
4248 if (UNTAG_Bool(variable15
)) { /* and */
4249 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4250 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
4252 variable14
= variable15
;
4253 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4254 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4255 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
4256 goto return_label166
;
4257 return_label166
: while(false);
4258 variable13
= variable14
;
4259 variable14
= variable13
;
4260 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
4261 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4262 variable16
= variable15
;
4263 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
4264 variable5
= variable6
/*s=*/;
4266 if (once_bool_variable6_167
) variable6
= once_value_variable6_167
;
4268 variable6
= NEW_string___String___with_native(BOX_NativeString("*"), TAG_Int(1)); /*new String*/
4269 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4270 once_value_variable6_167
= variable6
;
4271 once_bool_variable6_167
= true;
4273 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
4274 if (UNTAG_Bool(variable6
)) { /*if*/
4275 variable6
= NEW_string___String___init(); /*new String*/
4276 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Char(UNTAG_Char("), TAG_Int(20)); /*new String*/
4277 variable8
= variable7
;
4278 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4279 variable9
= TAG_Int(0);
4280 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4281 variable11
= variable10
;
4282 if (UNTAG_Bool(variable11
)) { /* and */
4283 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4284 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4286 variable10
= variable11
;
4287 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4288 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4289 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4290 goto return_label168
;
4291 return_label168
: while(false);
4292 variable9
= variable10
;
4293 variable10
= variable9
;
4294 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4295 variable11
= NEW_string___String___with_native(BOX_NativeString(")*UNTAG_Char("), TAG_Int(13)); /*new String*/
4296 variable12
= variable11
;
4297 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4298 variable13
= TAG_Int(1);
4299 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4300 variable15
= variable14
;
4301 if (UNTAG_Bool(variable15
)) { /* and */
4302 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4303 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
4305 variable14
= variable15
;
4306 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4307 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4308 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
4309 goto return_label169
;
4310 return_label169
: while(false);
4311 variable13
= variable14
;
4312 variable14
= variable13
;
4313 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
4314 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4315 variable16
= variable15
;
4316 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
4317 variable5
= variable6
/*s=*/;
4319 if (once_bool_variable6_170
) variable6
= once_value_variable6_170
;
4321 variable6
= NEW_string___String___with_native(BOX_NativeString("/"), TAG_Int(1)); /*new String*/
4322 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4323 once_value_variable6_170
= variable6
;
4324 once_bool_variable6_170
= true;
4326 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
4327 if (UNTAG_Bool(variable6
)) { /*if*/
4328 variable6
= NEW_string___String___init(); /*new String*/
4329 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Char(UNTAG_Char("), TAG_Int(20)); /*new String*/
4330 variable8
= variable7
;
4331 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4332 variable9
= TAG_Int(0);
4333 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4334 variable11
= variable10
;
4335 if (UNTAG_Bool(variable11
)) { /* and */
4336 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4337 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4339 variable10
= variable11
;
4340 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4341 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4342 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4343 goto return_label171
;
4344 return_label171
: while(false);
4345 variable9
= variable10
;
4346 variable10
= variable9
;
4347 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4348 variable11
= NEW_string___String___with_native(BOX_NativeString(")/UNTAG_Char("), TAG_Int(13)); /*new String*/
4349 variable12
= variable11
;
4350 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4351 variable13
= TAG_Int(1);
4352 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4353 variable15
= variable14
;
4354 if (UNTAG_Bool(variable15
)) { /* and */
4355 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4356 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
4358 variable14
= variable15
;
4359 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4360 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4361 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
4362 goto return_label172
;
4363 return_label172
: while(false);
4364 variable13
= variable14
;
4365 variable14
= variable13
;
4366 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
4367 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4368 variable16
= variable15
;
4369 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
4370 variable5
= variable6
/*s=*/;
4372 if (once_bool_variable6_173
) variable6
= once_value_variable6_173
;
4374 variable6
= NEW_string___String___with_native(BOX_NativeString("%"), TAG_Int(1)); /*new String*/
4375 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4376 once_value_variable6_173
= variable6
;
4377 once_bool_variable6_173
= true;
4379 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
4380 if (UNTAG_Bool(variable6
)) { /*if*/
4381 variable6
= NEW_string___String___init(); /*new String*/
4382 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Char(UNTAG_Char("), TAG_Int(20)); /*new String*/
4383 variable8
= variable7
;
4384 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4385 variable9
= TAG_Int(0);
4386 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4387 variable11
= variable10
;
4388 if (UNTAG_Bool(variable11
)) { /* and */
4389 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4390 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4392 variable10
= variable11
;
4393 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4394 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4395 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4396 goto return_label174
;
4397 return_label174
: while(false);
4398 variable9
= variable10
;
4399 variable10
= variable9
;
4400 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4401 variable11
= NEW_string___String___with_native(BOX_NativeString(")%UNTAG_Char("), TAG_Int(13)); /*new String*/
4402 variable12
= variable11
;
4403 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4404 variable13
= TAG_Int(1);
4405 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4406 variable15
= variable14
;
4407 if (UNTAG_Bool(variable15
)) { /* and */
4408 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4409 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
4411 variable14
= variable15
;
4412 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4413 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4414 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
4415 goto return_label175
;
4416 return_label175
: while(false);
4417 variable13
= variable14
;
4418 variable14
= variable13
;
4419 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
4420 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4421 variable16
= variable15
;
4422 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
4423 variable5
= variable6
/*s=*/;
4425 if (once_bool_variable6_176
) variable6
= once_value_variable6_176
;
4427 variable6
= NEW_string___String___with_native(BOX_NativeString("<"), TAG_Int(1)); /*new String*/
4428 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4429 once_value_variable6_176
= variable6
;
4430 once_bool_variable6_176
= true;
4432 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
4433 if (UNTAG_Bool(variable6
)) { /*if*/
4434 variable6
= NEW_string___String___init(); /*new String*/
4435 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(UNTAG_Char("), TAG_Int(20)); /*new String*/
4436 variable8
= variable7
;
4437 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4438 variable9
= TAG_Int(0);
4439 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4440 variable11
= variable10
;
4441 if (UNTAG_Bool(variable11
)) { /* and */
4442 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4443 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4445 variable10
= variable11
;
4446 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4447 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4448 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4449 goto return_label177
;
4450 return_label177
: while(false);
4451 variable9
= variable10
;
4452 variable10
= variable9
;
4453 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4454 variable11
= NEW_string___String___with_native(BOX_NativeString(")<UNTAG_Char("), TAG_Int(13)); /*new String*/
4455 variable12
= variable11
;
4456 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4457 variable13
= TAG_Int(1);
4458 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4459 variable15
= variable14
;
4460 if (UNTAG_Bool(variable15
)) { /* and */
4461 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4462 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
4464 variable14
= variable15
;
4465 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4466 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4467 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
4468 goto return_label178
;
4469 return_label178
: while(false);
4470 variable13
= variable14
;
4471 variable14
= variable13
;
4472 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
4473 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4474 variable16
= variable15
;
4475 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
4476 variable5
= variable6
/*s=*/;
4478 if (once_bool_variable6_179
) variable6
= once_value_variable6_179
;
4480 variable6
= NEW_string___String___with_native(BOX_NativeString(">"), TAG_Int(1)); /*new String*/
4481 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4482 once_value_variable6_179
= variable6
;
4483 once_bool_variable6_179
= true;
4485 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
4486 if (UNTAG_Bool(variable6
)) { /*if*/
4487 variable6
= NEW_string___String___init(); /*new String*/
4488 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(UNTAG_Char("), TAG_Int(20)); /*new String*/
4489 variable8
= variable7
;
4490 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4491 variable9
= TAG_Int(0);
4492 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4493 variable11
= variable10
;
4494 if (UNTAG_Bool(variable11
)) { /* and */
4495 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4496 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4498 variable10
= variable11
;
4499 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4500 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4501 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4502 goto return_label180
;
4503 return_label180
: while(false);
4504 variable9
= variable10
;
4505 variable10
= variable9
;
4506 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4507 variable11
= NEW_string___String___with_native(BOX_NativeString(")>UNTAG_Char("), TAG_Int(13)); /*new String*/
4508 variable12
= variable11
;
4509 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4510 variable13
= TAG_Int(1);
4511 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4512 variable15
= variable14
;
4513 if (UNTAG_Bool(variable15
)) { /* and */
4514 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4515 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
4517 variable14
= variable15
;
4518 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4519 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4520 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
4521 goto return_label181
;
4522 return_label181
: while(false);
4523 variable13
= variable14
;
4524 variable14
= variable13
;
4525 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
4526 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4527 variable16
= variable15
;
4528 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
4529 variable5
= variable6
/*s=*/;
4531 if (once_bool_variable6_182
) variable6
= once_value_variable6_182
;
4533 variable6
= NEW_string___String___with_native(BOX_NativeString("<="), TAG_Int(2)); /*new String*/
4534 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4535 once_value_variable6_182
= variable6
;
4536 once_bool_variable6_182
= true;
4538 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
4539 if (UNTAG_Bool(variable6
)) { /*if*/
4540 variable6
= NEW_string___String___init(); /*new String*/
4541 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(UNTAG_Char("), TAG_Int(20)); /*new String*/
4542 variable8
= variable7
;
4543 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4544 variable9
= TAG_Int(0);
4545 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4546 variable11
= variable10
;
4547 if (UNTAG_Bool(variable11
)) { /* and */
4548 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4549 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4551 variable10
= variable11
;
4552 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4553 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4554 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4555 goto return_label183
;
4556 return_label183
: while(false);
4557 variable9
= variable10
;
4558 variable10
= variable9
;
4559 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4560 variable11
= NEW_string___String___with_native(BOX_NativeString(")<=UNTAG_Char("), TAG_Int(14)); /*new String*/
4561 variable12
= variable11
;
4562 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4563 variable13
= TAG_Int(1);
4564 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4565 variable15
= variable14
;
4566 if (UNTAG_Bool(variable15
)) { /* and */
4567 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4568 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
4570 variable14
= variable15
;
4571 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4572 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4573 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
4574 goto return_label184
;
4575 return_label184
: while(false);
4576 variable13
= variable14
;
4577 variable14
= variable13
;
4578 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
4579 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4580 variable16
= variable15
;
4581 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
4582 variable5
= variable6
/*s=*/;
4584 if (once_bool_variable6_185
) variable6
= once_value_variable6_185
;
4586 variable6
= NEW_string___String___with_native(BOX_NativeString(">="), TAG_Int(2)); /*new String*/
4587 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4588 once_value_variable6_185
= variable6
;
4589 once_bool_variable6_185
= true;
4591 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
4592 if (UNTAG_Bool(variable6
)) { /*if*/
4593 variable6
= NEW_string___String___init(); /*new String*/
4594 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(UNTAG_Char("), TAG_Int(20)); /*new String*/
4595 variable8
= variable7
;
4596 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4597 variable9
= TAG_Int(0);
4598 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4599 variable11
= variable10
;
4600 if (UNTAG_Bool(variable11
)) { /* and */
4601 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4602 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4604 variable10
= variable11
;
4605 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4606 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4607 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4608 goto return_label186
;
4609 return_label186
: while(false);
4610 variable9
= variable10
;
4611 variable10
= variable9
;
4612 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4613 variable11
= NEW_string___String___with_native(BOX_NativeString(")>=UNTAG_Char("), TAG_Int(14)); /*new String*/
4614 variable12
= variable11
;
4615 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4616 variable13
= TAG_Int(1);
4617 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4618 variable15
= variable14
;
4619 if (UNTAG_Bool(variable15
)) { /* and */
4620 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4621 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
4623 variable14
= variable15
;
4624 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4625 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4626 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
4627 goto return_label187
;
4628 return_label187
: while(false);
4629 variable13
= variable14
;
4630 variable14
= variable13
;
4631 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
4632 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4633 variable16
= variable15
;
4634 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
4635 variable5
= variable6
/*s=*/;
4637 if (once_bool_variable6_188
) variable6
= once_value_variable6_188
;
4639 variable6
= NEW_string___String___with_native(BOX_NativeString("=="), TAG_Int(2)); /*new String*/
4640 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4641 once_value_variable6_188
= variable6
;
4642 once_bool_variable6_188
= true;
4644 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
4645 if (UNTAG_Bool(variable6
)) { /*if*/
4646 variable6
= NEW_string___String___init(); /*new String*/
4647 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(("), TAG_Int(10)); /*new String*/
4648 variable8
= variable7
;
4649 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4650 variable9
= TAG_Int(0);
4651 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4652 variable11
= variable10
;
4653 if (UNTAG_Bool(variable11
)) { /* and */
4654 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4655 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4657 variable10
= variable11
;
4658 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4659 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4660 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4661 goto return_label189
;
4662 return_label189
: while(false);
4663 variable9
= variable10
;
4664 variable10
= variable9
;
4665 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4666 variable11
= NEW_string___String___with_native(BOX_NativeString(")==("), TAG_Int(4)); /*new String*/
4667 variable12
= variable11
;
4668 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4669 variable13
= TAG_Int(1);
4670 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4671 variable15
= variable14
;
4672 if (UNTAG_Bool(variable15
)) { /* and */
4673 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4674 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
4676 variable14
= variable15
;
4677 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4678 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4679 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
4680 goto return_label190
;
4681 return_label190
: while(false);
4682 variable13
= variable14
;
4683 variable14
= variable13
;
4684 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
4685 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4686 variable16
= variable15
;
4687 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
4688 variable5
= variable6
/*s=*/;
4690 if (once_bool_variable6_191
) variable6
= once_value_variable6_191
;
4692 variable6
= NEW_string___String___with_native(BOX_NativeString("!="), TAG_Int(2)); /*new String*/
4693 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4694 once_value_variable6_191
= variable6
;
4695 once_bool_variable6_191
= true;
4697 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
4698 if (UNTAG_Bool(variable6
)) { /*if*/
4699 variable6
= NEW_string___String___init(); /*new String*/
4700 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(("), TAG_Int(10)); /*new String*/
4701 variable8
= variable7
;
4702 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4703 variable9
= TAG_Int(0);
4704 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4705 variable11
= variable10
;
4706 if (UNTAG_Bool(variable11
)) { /* and */
4707 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4708 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4710 variable10
= variable11
;
4711 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4712 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4713 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4714 goto return_label192
;
4715 return_label192
: while(false);
4716 variable9
= variable10
;
4717 variable10
= variable9
;
4718 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4719 variable11
= NEW_string___String___with_native(BOX_NativeString(")!=("), TAG_Int(4)); /*new String*/
4720 variable12
= variable11
;
4721 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4722 variable13
= TAG_Int(1);
4723 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4724 variable15
= variable14
;
4725 if (UNTAG_Bool(variable15
)) { /* and */
4726 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4727 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
4729 variable14
= variable15
;
4730 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4731 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4732 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
4733 goto return_label193
;
4734 return_label193
: while(false);
4735 variable13
= variable14
;
4736 variable14
= variable13
;
4737 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
4738 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4739 variable16
= variable15
;
4740 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
4741 variable5
= variable6
/*s=*/;
4761 if (once_bool_variable6_194
) variable6
= once_value_variable6_194
;
4763 variable6
= NEW_string___String___with_native(BOX_NativeString("Bool"), TAG_Int(4)); /*new String*/
4764 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4765 once_value_variable6_194
= variable6
;
4766 once_bool_variable6_194
= true;
4768 variable6
= TAG_Bool(( variable3
/*c*/ == variable6
) || (( variable3
/*c*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable3
/*c*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable3
/*c*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable3
/*c*/,COLOR_kernel___Object_____eqeq
))( variable3
/*c*/, variable6
) /*Object::==*/)))));
4769 if (UNTAG_Bool(variable6
)) { /*if*/
4770 if (once_bool_variable6_195
) variable6
= once_value_variable6_195
;
4772 variable6
= NEW_string___String___with_native(BOX_NativeString("object_id"), TAG_Int(9)); /*new String*/
4773 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4774 once_value_variable6_195
= variable6
;
4775 once_bool_variable6_195
= true;
4777 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
4778 if (UNTAG_Bool(variable6
)) { /*if*/
4779 variable6
= NEW_string___String___init(); /*new String*/
4780 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNTAG_Bool("), TAG_Int(19)); /*new String*/
4781 variable8
= variable7
;
4782 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4783 variable9
= TAG_Int(0);
4784 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4785 variable11
= variable10
;
4786 if (UNTAG_Bool(variable11
)) { /* and */
4787 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4788 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4790 variable10
= variable11
;
4791 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4792 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4793 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4794 goto return_label196
;
4795 return_label196
: while(false);
4796 variable9
= variable10
;
4797 variable10
= variable9
;
4798 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4799 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4800 variable12
= variable11
;
4801 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4802 variable5
= variable6
/*s=*/;
4804 if (once_bool_variable6_197
) variable6
= once_value_variable6_197
;
4806 variable6
= NEW_string___String___with_native(BOX_NativeString("unary -"), TAG_Int(7)); /*new String*/
4807 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4808 once_value_variable6_197
= variable6
;
4809 once_bool_variable6_197
= true;
4811 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
4812 if (UNTAG_Bool(variable6
)) { /*if*/
4813 variable6
= NEW_string___String___init(); /*new String*/
4814 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(-UNTAG_Bool("), TAG_Int(21)); /*new String*/
4815 variable8
= variable7
;
4816 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4817 variable9
= TAG_Int(0);
4818 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4819 variable11
= variable10
;
4820 if (UNTAG_Bool(variable11
)) { /* and */
4821 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4822 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4824 variable10
= variable11
;
4825 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4826 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4827 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4828 goto return_label198
;
4829 return_label198
: while(false);
4830 variable9
= variable10
;
4831 variable10
= variable9
;
4832 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4833 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4834 variable12
= variable11
;
4835 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4836 variable5
= variable6
/*s=*/;
4838 if (once_bool_variable6_199
) variable6
= once_value_variable6_199
;
4840 variable6
= NEW_string___String___with_native(BOX_NativeString("output"), TAG_Int(6)); /*new String*/
4841 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4842 once_value_variable6_199
= variable6
;
4843 once_bool_variable6_199
= true;
4845 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
4846 if (UNTAG_Bool(variable6
)) { /*if*/
4847 variable6
= NEW_string___String___init(); /*new String*/
4848 variable7
= NEW_string___String___with_native(BOX_NativeString("(void)printf(UNTAG_Bool("), TAG_Int(24)); /*new String*/
4849 variable8
= variable7
;
4850 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4851 variable9
= TAG_Int(0);
4852 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4853 variable11
= variable10
;
4854 if (UNTAG_Bool(variable11
)) { /* and */
4855 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4856 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4858 variable10
= variable11
;
4859 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4860 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4861 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4862 goto return_label200
;
4863 return_label200
: while(false);
4864 variable9
= variable10
;
4865 variable10
= variable9
;
4866 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4867 variable11
= NEW_string___String___with_native(BOX_NativeString(")?\"true\\n\":\"false\\n\");"), TAG_Int(22)); /*new String*/
4868 variable12
= variable11
;
4869 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4870 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable6
) /*CompilerVisitor::add_instr*/;
4872 if (once_bool_variable6_201
) variable6
= once_value_variable6_201
;
4874 variable6
= NEW_string___String___with_native(BOX_NativeString("ascii"), TAG_Int(5)); /*new String*/
4875 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4876 once_value_variable6_201
= variable6
;
4877 once_bool_variable6_201
= true;
4879 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
4880 if (UNTAG_Bool(variable6
)) { /*if*/
4881 variable6
= NEW_string___String___init(); /*new String*/
4882 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(UNTAG_Bool("), TAG_Int(20)); /*new String*/
4883 variable8
= variable7
;
4884 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4885 variable9
= TAG_Int(0);
4886 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4887 variable11
= variable10
;
4888 if (UNTAG_Bool(variable11
)) { /* and */
4889 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4890 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4892 variable10
= variable11
;
4893 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4894 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4895 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4896 goto return_label202
;
4897 return_label202
: while(false);
4898 variable9
= variable10
;
4899 variable10
= variable9
;
4900 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4901 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4902 variable12
= variable11
;
4903 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4904 variable5
= variable6
/*s=*/;
4906 if (once_bool_variable6_203
) variable6
= once_value_variable6_203
;
4908 variable6
= NEW_string___String___with_native(BOX_NativeString("to_i"), TAG_Int(4)); /*new String*/
4909 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4910 once_value_variable6_203
= variable6
;
4911 once_bool_variable6_203
= true;
4913 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
4914 if (UNTAG_Bool(variable6
)) { /*if*/
4915 variable6
= NEW_string___String___init(); /*new String*/
4916 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNTAG_Bool("), TAG_Int(19)); /*new String*/
4917 variable8
= variable7
;
4918 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4919 variable9
= TAG_Int(0);
4920 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4921 variable11
= variable10
;
4922 if (UNTAG_Bool(variable11
)) { /* and */
4923 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4924 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4926 variable10
= variable11
;
4927 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4928 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4929 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4930 goto return_label204
;
4931 return_label204
: while(false);
4932 variable9
= variable10
;
4933 variable10
= variable9
;
4934 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4935 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4936 variable12
= variable11
;
4937 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4938 variable5
= variable6
/*s=*/;
4940 if (once_bool_variable6_205
) variable6
= once_value_variable6_205
;
4942 variable6
= NEW_string___String___with_native(BOX_NativeString("=="), TAG_Int(2)); /*new String*/
4943 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4944 once_value_variable6_205
= variable6
;
4945 once_bool_variable6_205
= true;
4947 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
4948 if (UNTAG_Bool(variable6
)) { /*if*/
4949 variable6
= NEW_string___String___init(); /*new String*/
4950 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(("), TAG_Int(10)); /*new String*/
4951 variable8
= variable7
;
4952 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4953 variable9
= TAG_Int(0);
4954 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4955 variable11
= variable10
;
4956 if (UNTAG_Bool(variable11
)) { /* and */
4957 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4958 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4960 variable10
= variable11
;
4961 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4962 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4963 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4964 goto return_label206
;
4965 return_label206
: while(false);
4966 variable9
= variable10
;
4967 variable10
= variable9
;
4968 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4969 variable11
= NEW_string___String___with_native(BOX_NativeString(")==("), TAG_Int(4)); /*new String*/
4970 variable12
= variable11
;
4971 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4972 variable13
= TAG_Int(1);
4973 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4974 variable15
= variable14
;
4975 if (UNTAG_Bool(variable15
)) { /* and */
4976 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4977 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
4979 variable14
= variable15
;
4980 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
4981 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4982 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
4983 goto return_label207
;
4984 return_label207
: while(false);
4985 variable13
= variable14
;
4986 variable14
= variable13
;
4987 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
4988 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4989 variable16
= variable15
;
4990 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
4991 variable5
= variable6
/*s=*/;
4993 if (once_bool_variable6_208
) variable6
= once_value_variable6_208
;
4995 variable6
= NEW_string___String___with_native(BOX_NativeString("!="), TAG_Int(2)); /*new String*/
4996 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4997 once_value_variable6_208
= variable6
;
4998 once_bool_variable6_208
= true;
5000 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
5001 if (UNTAG_Bool(variable6
)) { /*if*/
5002 variable6
= NEW_string___String___init(); /*new String*/
5003 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(("), TAG_Int(10)); /*new String*/
5004 variable8
= variable7
;
5005 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5006 variable9
= TAG_Int(0);
5007 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5008 variable11
= variable10
;
5009 if (UNTAG_Bool(variable11
)) { /* and */
5010 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5011 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
5013 variable10
= variable11
;
5014 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
5015 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5016 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
5017 goto return_label209
;
5018 return_label209
: while(false);
5019 variable9
= variable10
;
5020 variable10
= variable9
;
5021 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
5022 variable11
= NEW_string___String___with_native(BOX_NativeString(")!=("), TAG_Int(4)); /*new String*/
5023 variable12
= variable11
;
5024 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
5025 variable13
= TAG_Int(1);
5026 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5027 variable15
= variable14
;
5028 if (UNTAG_Bool(variable15
)) { /* and */
5029 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5030 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
5032 variable14
= variable15
;
5033 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
5034 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5035 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
5036 goto return_label210
;
5037 return_label210
: while(false);
5038 variable13
= variable14
;
5039 variable14
= variable13
;
5040 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
5041 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
5042 variable16
= variable15
;
5043 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
5044 variable5
= variable6
/*s=*/;
5053 if (once_bool_variable6_211
) variable6
= once_value_variable6_211
;
5055 variable6
= NEW_string___String___with_native(BOX_NativeString("NativeArray"), TAG_Int(11)); /*new String*/
5056 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5057 once_value_variable6_211
= variable6
;
5058 once_bool_variable6_211
= true;
5060 variable6
= TAG_Bool(( variable3
/*c*/ == variable6
) || (( variable3
/*c*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable3
/*c*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable3
/*c*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable3
/*c*/,COLOR_kernel___Object_____eqeq
))( variable3
/*c*/, variable6
) /*Object::==*/)))));
5061 if (UNTAG_Bool(variable6
)) { /*if*/
5062 if (once_bool_variable6_212
) variable6
= once_value_variable6_212
;
5064 variable6
= NEW_string___String___with_native(BOX_NativeString("object_id"), TAG_Int(9)); /*new String*/
5065 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5066 once_value_variable6_212
= variable6
;
5067 once_bool_variable6_212
= true;
5069 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
5070 if (UNTAG_Bool(variable6
)) { /*if*/
5071 variable6
= NEW_string___String___init(); /*new String*/
5072 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNBOX_NativeArray("), TAG_Int(26)); /*new String*/
5073 variable8
= variable7
;
5074 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5075 variable9
= TAG_Int(0);
5076 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5077 variable11
= variable10
;
5078 if (UNTAG_Bool(variable11
)) { /* and */
5079 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5080 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
5082 variable10
= variable11
;
5083 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
5084 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5085 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
5086 goto return_label213
;
5087 return_label213
: while(false);
5088 variable9
= variable10
;
5089 variable10
= variable9
;
5090 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
5091 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
5092 variable12
= variable11
;
5093 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
5094 variable5
= variable6
/*s=*/;
5096 if (once_bool_variable6_214
) variable6
= once_value_variable6_214
;
5098 variable6
= NEW_string___String___with_native(BOX_NativeString("[]"), TAG_Int(2)); /*new String*/
5099 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5100 once_value_variable6_214
= variable6
;
5101 once_bool_variable6_214
= true;
5103 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
5104 if (UNTAG_Bool(variable6
)) { /*if*/
5105 variable6
= NEW_string___String___init(); /*new String*/
5106 variable7
= NEW_string___String___with_native(BOX_NativeString("UNBOX_NativeArray("), TAG_Int(18)); /*new String*/
5107 variable8
= variable7
;
5108 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5109 variable9
= TAG_Int(0);
5110 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5111 variable11
= variable10
;
5112 if (UNTAG_Bool(variable11
)) { /* and */
5113 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5114 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
5116 variable10
= variable11
;
5117 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
5118 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5119 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
5120 goto return_label215
;
5121 return_label215
: while(false);
5122 variable9
= variable10
;
5123 variable10
= variable9
;
5124 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
5125 variable11
= NEW_string___String___with_native(BOX_NativeString(")[UNTAG_Int("), TAG_Int(12)); /*new String*/
5126 variable12
= variable11
;
5127 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
5128 variable13
= TAG_Int(1);
5129 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5130 variable15
= variable14
;
5131 if (UNTAG_Bool(variable15
)) { /* and */
5132 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5133 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
5135 variable14
= variable15
;
5136 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
5137 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5138 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
5139 goto return_label216
;
5140 return_label216
: while(false);
5141 variable13
= variable14
;
5142 variable14
= variable13
;
5143 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
5144 variable15
= NEW_string___String___with_native(BOX_NativeString(")]"), TAG_Int(2)); /*new String*/
5145 variable16
= variable15
;
5146 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
5147 variable5
= variable6
/*s=*/;
5149 if (once_bool_variable6_217
) variable6
= once_value_variable6_217
;
5151 variable6
= NEW_string___String___with_native(BOX_NativeString("[]="), TAG_Int(3)); /*new String*/
5152 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5153 once_value_variable6_217
= variable6
;
5154 once_bool_variable6_217
= true;
5156 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
5157 if (UNTAG_Bool(variable6
)) { /*if*/
5158 variable6
= NEW_string___String___init(); /*new String*/
5159 variable7
= NEW_string___String___with_native(BOX_NativeString("UNBOX_NativeArray("), TAG_Int(18)); /*new String*/
5160 variable8
= variable7
;
5161 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5162 variable9
= TAG_Int(0);
5163 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5164 variable11
= variable10
;
5165 if (UNTAG_Bool(variable11
)) { /* and */
5166 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5167 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
5169 variable10
= variable11
;
5170 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
5171 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5172 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
5173 goto return_label218
;
5174 return_label218
: while(false);
5175 variable9
= variable10
;
5176 variable10
= variable9
;
5177 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
5178 variable11
= NEW_string___String___with_native(BOX_NativeString(")[UNTAG_Int("), TAG_Int(12)); /*new String*/
5179 variable12
= variable11
;
5180 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
5181 variable13
= TAG_Int(1);
5182 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5183 variable15
= variable14
;
5184 if (UNTAG_Bool(variable15
)) { /* and */
5185 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5186 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
5188 variable14
= variable15
;
5189 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
5190 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5191 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
5192 goto return_label219
;
5193 return_label219
: while(false);
5194 variable13
= variable14
;
5195 variable14
= variable13
;
5196 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
5197 variable15
= NEW_string___String___with_native(BOX_NativeString(")]="), TAG_Int(3)); /*new String*/
5198 variable16
= variable15
;
5199 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
5200 variable17
= TAG_Int(2);
5201 variable18
= TAG_Bool(UNTAG_Int( variable17
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5202 variable19
= variable18
;
5203 if (UNTAG_Bool(variable19
)) { /* and */
5204 variable19
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5205 variable19
= TAG_Bool(UNTAG_Int( variable17
/*index*/)<UNTAG_Int(variable19
));
5207 variable18
= variable19
;
5208 if (!UNTAG_Bool(variable18
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
5209 variable18
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5210 variable18
= UNBOX_NativeArray(variable18
)[UNTAG_Int( variable17
/*index*/)];
5211 goto return_label220
;
5212 return_label220
: while(false);
5213 variable17
= variable18
;
5214 variable18
= variable17
;
5215 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable18
) /*String::append*/;
5216 variable19
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
5217 variable20
= variable19
;
5218 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable20
) /*String::append*/;
5219 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable6
) /*CompilerVisitor::add_instr*/;
5221 if (once_bool_variable6_221
) variable6
= once_value_variable6_221
;
5223 variable6
= NEW_string___String___with_native(BOX_NativeString("copy_to"), TAG_Int(7)); /*new String*/
5224 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5225 once_value_variable6_221
= variable6
;
5226 once_bool_variable6_221
= true;
5228 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
5229 if (UNTAG_Bool(variable6
)) { /*if*/
5230 variable6
= NEW_string___String___init(); /*new String*/
5231 variable7
= NEW_string___String___with_native(BOX_NativeString("(void)memcpy(UNBOX_NativeArray("), TAG_Int(31)); /*new String*/
5232 variable8
= variable7
;
5233 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5234 variable9
= TAG_Int(1);
5235 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5236 variable11
= variable10
;
5237 if (UNTAG_Bool(variable11
)) { /* and */
5238 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5239 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
5241 variable10
= variable11
;
5242 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
5243 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5244 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
5245 goto return_label222
;
5246 return_label222
: while(false);
5247 variable9
= variable10
;
5248 variable10
= variable9
;
5249 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
5250 variable11
= NEW_string___String___with_native(BOX_NativeString("), UNBOX_NativeArray("), TAG_Int(21)); /*new String*/
5251 variable12
= variable11
;
5252 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
5253 variable13
= TAG_Int(0);
5254 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5255 variable15
= variable14
;
5256 if (UNTAG_Bool(variable15
)) { /* and */
5257 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5258 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
5260 variable14
= variable15
;
5261 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
5262 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5263 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
5264 goto return_label223
;
5265 return_label223
: while(false);
5266 variable13
= variable14
;
5267 variable14
= variable13
;
5268 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
5269 variable15
= NEW_string___String___with_native(BOX_NativeString("), UNTAG_Int("), TAG_Int(13)); /*new String*/
5270 variable16
= variable15
;
5271 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
5272 variable17
= TAG_Int(2);
5273 variable18
= TAG_Bool(UNTAG_Int( variable17
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5274 variable19
= variable18
;
5275 if (UNTAG_Bool(variable19
)) { /* and */
5276 variable19
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5277 variable19
= TAG_Bool(UNTAG_Int( variable17
/*index*/)<UNTAG_Int(variable19
));
5279 variable18
= variable19
;
5280 if (!UNTAG_Bool(variable18
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
5281 variable18
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5282 variable18
= UNBOX_NativeArray(variable18
)[UNTAG_Int( variable17
/*index*/)];
5283 goto return_label224
;
5284 return_label224
: while(false);
5285 variable17
= variable18
;
5286 variable18
= variable17
;
5287 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable18
) /*String::append*/;
5288 variable19
= NEW_string___String___with_native(BOX_NativeString(")*sizeof(val_t));"), TAG_Int(17)); /*new String*/
5289 variable20
= variable19
;
5290 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable20
) /*String::append*/;
5291 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable6
) /*CompilerVisitor::add_instr*/;
5297 if (once_bool_variable6_225
) variable6
= once_value_variable6_225
;
5299 variable6
= NEW_string___String___with_native(BOX_NativeString("NativeString"), TAG_Int(12)); /*new String*/
5300 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5301 once_value_variable6_225
= variable6
;
5302 once_bool_variable6_225
= true;
5304 variable6
= TAG_Bool(( variable3
/*c*/ == variable6
) || (( variable3
/*c*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable3
/*c*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable3
/*c*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable3
/*c*/,COLOR_kernel___Object_____eqeq
))( variable3
/*c*/, variable6
) /*Object::==*/)))));
5305 if (UNTAG_Bool(variable6
)) { /*if*/
5306 if (once_bool_variable6_226
) variable6
= once_value_variable6_226
;
5308 variable6
= NEW_string___String___with_native(BOX_NativeString("object_id"), TAG_Int(9)); /*new String*/
5309 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5310 once_value_variable6_226
= variable6
;
5311 once_bool_variable6_226
= true;
5313 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
5314 if (UNTAG_Bool(variable6
)) { /*if*/
5315 variable6
= NEW_string___String___init(); /*new String*/
5316 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNBOX_NativeString("), TAG_Int(27)); /*new String*/
5317 variable8
= variable7
;
5318 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5319 variable9
= TAG_Int(0);
5320 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5321 variable11
= variable10
;
5322 if (UNTAG_Bool(variable11
)) { /* and */
5323 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5324 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
5326 variable10
= variable11
;
5327 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
5328 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5329 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
5330 goto return_label227
;
5331 return_label227
: while(false);
5332 variable9
= variable10
;
5333 variable10
= variable9
;
5334 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
5335 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
5336 variable12
= variable11
;
5337 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
5338 variable5
= variable6
/*s=*/;
5340 if (once_bool_variable6_228
) variable6
= once_value_variable6_228
;
5342 variable6
= NEW_string___String___with_native(BOX_NativeString("atoi"), TAG_Int(4)); /*new String*/
5343 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5344 once_value_variable6_228
= variable6
;
5345 once_bool_variable6_228
= true;
5347 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
5348 if (UNTAG_Bool(variable6
)) { /*if*/
5349 variable6
= NEW_string___String___init(); /*new String*/
5350 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(atoi(UNBOX_NativeString("), TAG_Int(32)); /*new String*/
5351 variable8
= variable7
;
5352 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5353 variable9
= TAG_Int(0);
5354 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5355 variable11
= variable10
;
5356 if (UNTAG_Bool(variable11
)) { /* and */
5357 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5358 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
5360 variable10
= variable11
;
5361 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
5362 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5363 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
5364 goto return_label229
;
5365 return_label229
: while(false);
5366 variable9
= variable10
;
5367 variable10
= variable9
;
5368 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
5369 variable11
= NEW_string___String___with_native(BOX_NativeString(")))"), TAG_Int(3)); /*new String*/
5370 variable12
= variable11
;
5371 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
5372 variable5
= variable6
/*s=*/;
5374 if (once_bool_variable6_230
) variable6
= once_value_variable6_230
;
5376 variable6
= NEW_string___String___with_native(BOX_NativeString("[]"), TAG_Int(2)); /*new String*/
5377 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5378 once_value_variable6_230
= variable6
;
5379 once_bool_variable6_230
= true;
5381 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
5382 if (UNTAG_Bool(variable6
)) { /*if*/
5383 variable6
= NEW_string___String___init(); /*new String*/
5384 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Char(UNBOX_NativeString("), TAG_Int(28)); /*new String*/
5385 variable8
= variable7
;
5386 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5387 variable9
= TAG_Int(0);
5388 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5389 variable11
= variable10
;
5390 if (UNTAG_Bool(variable11
)) { /* and */
5391 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5392 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
5394 variable10
= variable11
;
5395 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
5396 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5397 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
5398 goto return_label231
;
5399 return_label231
: while(false);
5400 variable9
= variable10
;
5401 variable10
= variable9
;
5402 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
5403 variable11
= NEW_string___String___with_native(BOX_NativeString(")[UNTAG_Int("), TAG_Int(12)); /*new String*/
5404 variable12
= variable11
;
5405 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
5406 variable13
= TAG_Int(1);
5407 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5408 variable15
= variable14
;
5409 if (UNTAG_Bool(variable15
)) { /* and */
5410 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5411 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
5413 variable14
= variable15
;
5414 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
5415 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5416 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
5417 goto return_label232
;
5418 return_label232
: while(false);
5419 variable13
= variable14
;
5420 variable14
= variable13
;
5421 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
5422 variable15
= NEW_string___String___with_native(BOX_NativeString(")])"), TAG_Int(3)); /*new String*/
5423 variable16
= variable15
;
5424 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
5425 variable5
= variable6
/*s=*/;
5427 if (once_bool_variable6_233
) variable6
= once_value_variable6_233
;
5429 variable6
= NEW_string___String___with_native(BOX_NativeString("[]="), TAG_Int(3)); /*new String*/
5430 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5431 once_value_variable6_233
= variable6
;
5432 once_bool_variable6_233
= true;
5434 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
5435 if (UNTAG_Bool(variable6
)) { /*if*/
5436 variable6
= NEW_string___String___init(); /*new String*/
5437 variable7
= NEW_string___String___with_native(BOX_NativeString("UNBOX_NativeString("), TAG_Int(19)); /*new String*/
5438 variable8
= variable7
;
5439 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5440 variable9
= TAG_Int(0);
5441 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5442 variable11
= variable10
;
5443 if (UNTAG_Bool(variable11
)) { /* and */
5444 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5445 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
5447 variable10
= variable11
;
5448 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
5449 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5450 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
5451 goto return_label234
;
5452 return_label234
: while(false);
5453 variable9
= variable10
;
5454 variable10
= variable9
;
5455 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
5456 variable11
= NEW_string___String___with_native(BOX_NativeString(")[UNTAG_Int("), TAG_Int(12)); /*new String*/
5457 variable12
= variable11
;
5458 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
5459 variable13
= TAG_Int(1);
5460 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5461 variable15
= variable14
;
5462 if (UNTAG_Bool(variable15
)) { /* and */
5463 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5464 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
5466 variable14
= variable15
;
5467 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
5468 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5469 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
5470 goto return_label235
;
5471 return_label235
: while(false);
5472 variable13
= variable14
;
5473 variable14
= variable13
;
5474 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
5475 variable15
= NEW_string___String___with_native(BOX_NativeString(")]=UNTAG_Char("), TAG_Int(14)); /*new String*/
5476 variable16
= variable15
;
5477 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
5478 variable17
= TAG_Int(2);
5479 variable18
= TAG_Bool(UNTAG_Int( variable17
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5480 variable19
= variable18
;
5481 if (UNTAG_Bool(variable19
)) { /* and */
5482 variable19
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5483 variable19
= TAG_Bool(UNTAG_Int( variable17
/*index*/)<UNTAG_Int(variable19
));
5485 variable18
= variable19
;
5486 if (!UNTAG_Bool(variable18
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
5487 variable18
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5488 variable18
= UNBOX_NativeArray(variable18
)[UNTAG_Int( variable17
/*index*/)];
5489 goto return_label236
;
5490 return_label236
: while(false);
5491 variable17
= variable18
;
5492 variable18
= variable17
;
5493 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable18
) /*String::append*/;
5494 variable19
= NEW_string___String___with_native(BOX_NativeString(");"), TAG_Int(2)); /*new String*/
5495 variable20
= variable19
;
5496 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable20
) /*String::append*/;
5497 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable6
) /*CompilerVisitor::add_instr*/;
5499 if (once_bool_variable6_237
) variable6
= once_value_variable6_237
;
5501 variable6
= NEW_string___String___with_native(BOX_NativeString("copy_to"), TAG_Int(7)); /*new String*/
5502 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5503 once_value_variable6_237
= variable6
;
5504 once_bool_variable6_237
= true;
5506 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
5507 if (UNTAG_Bool(variable6
)) { /*if*/
5508 variable6
= NEW_string___String___init(); /*new String*/
5509 variable7
= NEW_string___String___with_native(BOX_NativeString("(void)memcpy(UNBOX_NativeString("), TAG_Int(32)); /*new String*/
5510 variable8
= variable7
;
5511 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5512 variable9
= TAG_Int(1);
5513 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5514 variable11
= variable10
;
5515 if (UNTAG_Bool(variable11
)) { /* and */
5516 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5517 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
5519 variable10
= variable11
;
5520 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
5521 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5522 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
5523 goto return_label238
;
5524 return_label238
: while(false);
5525 variable9
= variable10
;
5526 variable10
= variable9
;
5527 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
5528 variable11
= NEW_string___String___with_native(BOX_NativeString(")+UNTAG_Int("), TAG_Int(12)); /*new String*/
5529 variable12
= variable11
;
5530 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
5531 variable13
= TAG_Int(4);
5532 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5533 variable15
= variable14
;
5534 if (UNTAG_Bool(variable15
)) { /* and */
5535 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5536 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
5538 variable14
= variable15
;
5539 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
5540 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5541 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
5542 goto return_label239
;
5543 return_label239
: while(false);
5544 variable13
= variable14
;
5545 variable14
= variable13
;
5546 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
5547 variable15
= NEW_string___String___with_native(BOX_NativeString("), UNBOX_NativeString("), TAG_Int(22)); /*new String*/
5548 variable16
= variable15
;
5549 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
5550 variable17
= TAG_Int(0);
5551 variable18
= TAG_Bool(UNTAG_Int( variable17
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5552 variable19
= variable18
;
5553 if (UNTAG_Bool(variable19
)) { /* and */
5554 variable19
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5555 variable19
= TAG_Bool(UNTAG_Int( variable17
/*index*/)<UNTAG_Int(variable19
));
5557 variable18
= variable19
;
5558 if (!UNTAG_Bool(variable18
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
5559 variable18
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5560 variable18
= UNBOX_NativeArray(variable18
)[UNTAG_Int( variable17
/*index*/)];
5561 goto return_label240
;
5562 return_label240
: while(false);
5563 variable17
= variable18
;
5564 variable18
= variable17
;
5565 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable18
) /*String::append*/;
5566 variable19
= NEW_string___String___with_native(BOX_NativeString(")+UNTAG_Int("), TAG_Int(12)); /*new String*/
5567 variable20
= variable19
;
5568 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable20
) /*String::append*/;
5569 variable21
= TAG_Int(3);
5570 variable22
= TAG_Bool(UNTAG_Int( variable21
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5571 variable23
= variable22
;
5572 if (UNTAG_Bool(variable23
)) { /* and */
5573 variable23
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5574 variable23
= TAG_Bool(UNTAG_Int( variable21
/*index*/)<UNTAG_Int(variable23
));
5576 variable22
= variable23
;
5577 if (!UNTAG_Bool(variable22
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
5578 variable22
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5579 variable22
= UNBOX_NativeArray(variable22
)[UNTAG_Int( variable21
/*index*/)];
5580 goto return_label241
;
5581 return_label241
: while(false);
5582 variable21
= variable22
;
5583 variable22
= variable21
;
5584 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable22
) /*String::append*/;
5585 variable23
= NEW_string___String___with_native(BOX_NativeString("), UNTAG_Int("), TAG_Int(13)); /*new String*/
5586 variable24
= variable23
;
5587 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable24
) /*String::append*/;
5588 variable25
= TAG_Int(2);
5589 variable26
= TAG_Bool(UNTAG_Int( variable25
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5590 variable27
= variable26
;
5591 if (UNTAG_Bool(variable27
)) { /* and */
5592 variable27
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5593 variable27
= TAG_Bool(UNTAG_Int( variable25
/*index*/)<UNTAG_Int(variable27
));
5595 variable26
= variable27
;
5596 if (!UNTAG_Bool(variable26
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
5597 variable26
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5598 variable26
= UNBOX_NativeArray(variable26
)[UNTAG_Int( variable25
/*index*/)];
5599 goto return_label242
;
5600 return_label242
: while(false);
5601 variable25
= variable26
;
5602 variable26
= variable25
;
5603 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable26
) /*String::append*/;
5604 variable27
= NEW_string___String___with_native(BOX_NativeString("));"), TAG_Int(3)); /*new String*/
5605 variable28
= variable27
;
5606 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable28
) /*String::append*/;
5607 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable6
) /*CompilerVisitor::add_instr*/;
5614 if (once_bool_variable6_243
) variable6
= once_value_variable6_243
;
5616 variable6
= NEW_string___String___with_native(BOX_NativeString("object_id"), TAG_Int(9)); /*new String*/
5617 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5618 once_value_variable6_243
= variable6
;
5619 once_bool_variable6_243
= true;
5621 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
5622 if (UNTAG_Bool(variable6
)) { /*if*/
5623 variable6
= NEW_string___String___init(); /*new String*/
5624 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int((bigint)"), TAG_Int(16)); /*new String*/
5625 variable8
= variable7
;
5626 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5627 variable9
= TAG_Int(0);
5628 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5629 variable11
= variable10
;
5630 if (UNTAG_Bool(variable11
)) { /* and */
5631 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5632 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
5634 variable10
= variable11
;
5635 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
5636 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5637 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
5638 goto return_label244
;
5639 return_label244
: while(false);
5640 variable9
= variable10
;
5641 variable10
= variable9
;
5642 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
5643 variable11
= NEW_string___String___with_native(BOX_NativeString(")"), TAG_Int(1)); /*new String*/
5644 variable12
= variable11
;
5645 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
5646 variable5
= variable6
/*s=*/;
5648 if (once_bool_variable6_245
) variable6
= once_value_variable6_245
;
5650 variable6
= NEW_string___String___with_native(BOX_NativeString("sys"), TAG_Int(3)); /*new String*/
5651 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5652 once_value_variable6_245
= variable6
;
5653 once_bool_variable6_245
= true;
5655 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
5656 if (UNTAG_Bool(variable6
)) { /*if*/
5657 variable6
= NEW_string___String___with_native(BOX_NativeString("(G_sys)"), TAG_Int(7)); /*new String*/
5658 variable5
= variable6
/*s=*/;
5660 if (once_bool_variable6_246
) variable6
= once_value_variable6_246
;
5662 variable6
= NEW_string___String___with_native(BOX_NativeString("is_same_type"), TAG_Int(12)); /*new String*/
5663 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5664 once_value_variable6_246
= variable6
;
5665 once_bool_variable6_246
= true;
5667 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
5668 if (UNTAG_Bool(variable6
)) { /*if*/
5669 variable6
= NEW_string___String___init(); /*new String*/
5670 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool((VAL2VFT("), TAG_Int(18)); /*new String*/
5671 variable8
= variable7
;
5672 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5673 variable9
= TAG_Int(0);
5674 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5675 variable11
= variable10
;
5676 if (UNTAG_Bool(variable11
)) { /* and */
5677 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5678 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
5680 variable10
= variable11
;
5681 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
5682 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5683 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
5684 goto return_label247
;
5685 return_label247
: while(false);
5686 variable9
= variable10
;
5687 variable10
= variable9
;
5688 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
5689 variable11
= NEW_string___String___with_native(BOX_NativeString(")==VAL2VFT("), TAG_Int(11)); /*new String*/
5690 variable12
= variable11
;
5691 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
5692 variable13
= TAG_Int(1);
5693 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5694 variable15
= variable14
;
5695 if (UNTAG_Bool(variable15
)) { /* and */
5696 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5697 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
5699 variable14
= variable15
;
5700 if (!UNTAG_Bool(variable14
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
5701 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5702 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
5703 goto return_label248
;
5704 return_label248
: while(false);
5705 variable13
= variable14
;
5706 variable14
= variable13
;
5707 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
5708 variable15
= NEW_string___String___with_native(BOX_NativeString(")))"), TAG_Int(3)); /*new String*/
5709 variable16
= variable15
;
5710 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
5711 variable5
= variable6
/*s=*/;
5713 if (once_bool_variable6_249
) variable6
= once_value_variable6_249
;
5715 variable6
= NEW_string___String___with_native(BOX_NativeString("exit"), TAG_Int(4)); /*new String*/
5716 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5717 once_value_variable6_249
= variable6
;
5718 once_bool_variable6_249
= true;
5720 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
5721 if (UNTAG_Bool(variable6
)) { /*if*/
5722 variable6
= NEW_string___String___init(); /*new String*/
5723 variable7
= NEW_string___String___with_native(BOX_NativeString("exit(UNTAG_Int("), TAG_Int(15)); /*new String*/
5724 variable8
= variable7
;
5725 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5726 variable9
= TAG_Int(1);
5727 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5728 variable11
= variable10
;
5729 if (UNTAG_Bool(variable11
)) { /* and */
5730 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5731 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
5733 variable10
= variable11
;
5734 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
5735 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5736 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
5737 goto return_label250
;
5738 return_label250
: while(false);
5739 variable9
= variable10
;
5740 variable10
= variable9
;
5741 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
5742 variable11
= NEW_string___String___with_native(BOX_NativeString("));"), TAG_Int(3)); /*new String*/
5743 variable12
= variable11
;
5744 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
5745 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable6
) /*CompilerVisitor::add_instr*/;
5747 if (once_bool_variable6_251
) variable6
= once_value_variable6_251
;
5749 variable6
= NEW_string___String___with_native(BOX_NativeString("calloc_array"), TAG_Int(12)); /*new String*/
5750 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5751 once_value_variable6_251
= variable6
;
5752 once_bool_variable6_251
= true;
5754 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
5755 if (UNTAG_Bool(variable6
)) { /*if*/
5756 variable6
= NEW_string___String___init(); /*new String*/
5757 variable7
= NEW_string___String___with_native(BOX_NativeString("BOX_NativeArray((val_t*)malloc((UNTAG_Int("), TAG_Int(42)); /*new String*/
5758 variable8
= variable7
;
5759 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5760 variable9
= TAG_Int(1);
5761 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5762 variable11
= variable10
;
5763 if (UNTAG_Bool(variable11
)) { /* and */
5764 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5765 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
5767 variable10
= variable11
;
5768 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
5769 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5770 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
5771 goto return_label252
;
5772 return_label252
: while(false);
5773 variable9
= variable10
;
5774 variable10
= variable9
;
5775 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
5776 variable11
= NEW_string___String___with_native(BOX_NativeString(") * sizeof(val_t))))"), TAG_Int(20)); /*new String*/
5777 variable12
= variable11
;
5778 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
5779 variable5
= variable6
/*s=*/;
5781 if (once_bool_variable6_253
) variable6
= once_value_variable6_253
;
5783 variable6
= NEW_string___String___with_native(BOX_NativeString("calloc_string"), TAG_Int(13)); /*new String*/
5784 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5785 once_value_variable6_253
= variable6
;
5786 once_bool_variable6_253
= true;
5788 variable6
= TAG_Bool(( variable4
/*n*/ == variable6
) || (( variable4
/*n*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable4
/*n*/,variable6
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable4
/*n*/,COLOR_kernel___Object_____eqeq
))( variable4
/*n*/, variable6
) /*Object::==*/)))));
5789 if (UNTAG_Bool(variable6
)) { /*if*/
5790 variable6
= NEW_string___String___init(); /*new String*/
5791 variable7
= NEW_string___String___with_native(BOX_NativeString("BOX_NativeString((char*)malloc((UNTAG_Int("), TAG_Int(42)); /*new String*/
5792 variable8
= variable7
;
5793 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5794 variable9
= TAG_Int(1);
5795 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5796 variable11
= variable10
;
5797 if (UNTAG_Bool(variable11
)) { /* and */
5798 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5799 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
5801 variable10
= variable11
;
5802 if (!UNTAG_Bool(variable10
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
5803 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5804 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
5805 goto return_label254
;
5806 return_label254
: while(false);
5807 variable9
= variable10
;
5808 variable10
= variable9
;
5809 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
5810 variable11
= NEW_string___String___with_native(BOX_NativeString(") * sizeof(char))))"), TAG_Int(19)); /*new String*/
5811 variable12
= variable11
;
5812 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
5813 variable5
= variable6
/*s=*/;
5815 variable6
= NEW_string___String___init(); /*new String*/
5816 variable7
= NEW_string___String___with_native(BOX_NativeString("fprintf(stderr, \"Intern "), TAG_Int(24)); /*new String*/
5817 variable8
= variable7
;
5818 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5819 variable9
= variable4
/*n*/;
5820 variable9
= ((string___String___to_s_t
)CALL(variable9
,COLOR_string___Object___to_s
))(variable9
) /*String::to_s*/;
5821 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable9
) /*String::append*/;
5822 variable10
= NEW_string___String___with_native(BOX_NativeString("\\n\"); nit_exit(1);"), TAG_Int(18)); /*new String*/
5823 variable11
= variable10
;
5824 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable11
) /*String::append*/;
5825 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable6
) /*CompilerVisitor::add_instr*/;
5838 variable6
= ((static_type___MMLocalProperty___signature_t
)CALL( variable1
/*method*/,COLOR_static_type___MMLocalProperty___signature
))( variable1
/*method*/) /*MMLocalProperty::signature*/;
5839 variable6
= ((static_type___MMSignature___return_type_t
)CALL(variable6
,COLOR_static_type___MMSignature___return_type
))(variable6
) /*MMSignature::return_type*/;
5840 variable6
= TAG_Bool(!UNTAG_Bool(TAG_Bool((variable6
== NIT_NULL
/*null*/) || ((variable6
!= NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL(variable6
,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN(variable6
, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL(variable6
,COLOR_kernel___Object_____eqeq
))(variable6
, NIT_NULL
/*null*/) /*Object::==*/)))))));
5841 variable7
= variable6
;
5842 if (UNTAG_Bool(variable7
)) { /* and */
5843 variable7
= TAG_Bool(( variable5
/*s*/ == NIT_NULL
/*null*/) || (( variable5
/*s*/ != NIT_NULL
) && UNTAG_Bool(((string___String_____eqeq_t
)CALL( variable5
/*s*/,COLOR_kernel___Object_____eqeq
))( variable5
/*s*/, NIT_NULL
/*null*/) /*String::==*/)));
5845 variable6
= variable7
;
5846 if (UNTAG_Bool(variable6
)) { /*if*/
5847 variable6
= NEW_string___String___with_native(BOX_NativeString("NIT_NULL /*stub*/"), TAG_Int(17)); /*new String*/
5848 variable5
= variable6
/*s=*/;
5850 variable3
= variable5
/*s*/;
5851 goto return_label58
;
5852 return_label58
: while(false);
5853 tracehead
= trace
.prev
;
5856 val_t
compiling_methods___PExpr___compile_expr(val_t self
, val_t param0
) {
5857 struct trace_t trace
= {NULL
, NULL
, 680, LOCATE_compiling_methods___PExpr___compile_expr
};
5858 trace
.prev
= tracehead
; tracehead
= &trace
;
5859 trace
.file
= LOCATE_compiling_methods
;
5860 fprintf(stderr
, "Deferred method %s called");
5861 fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 680);
5863 tracehead
= trace
.prev
;
5866 void compiling_methods___PExpr___prepare_compile_stmt(val_t self
, val_t param0
) {
5867 struct trace_t trace
= {NULL
, NULL
, 684, LOCATE_compiling_methods___PExpr___prepare_compile_stmt
};
5869 trace
.prev
= tracehead
; tracehead
= &trace
;
5870 trace
.file
= LOCATE_compiling_methods
;
5872 tracehead
= trace
.prev
;
5875 void compiling_methods___PExpr___compile_stmt(val_t self
, val_t param0
) {
5876 struct trace_t trace
= {NULL
, NULL
, 689, LOCATE_compiling_methods___PExpr___compile_stmt
};
5879 trace
.prev
= tracehead
; tracehead
= &trace
;
5880 trace
.file
= LOCATE_compiling_methods
;
5882 variable1
= NEW_string___String___with_native(BOX_NativeString("Error!"), TAG_Int(6)); /*new String*/
5883 ((parser_prod___PNode___printl_t
)CALL( self
,COLOR_parser_prod___PNode___printl
))( self
, variable1
) /*PNode::printl*/;
5884 tracehead
= trace
.prev
;
5887 void compiling_methods___ABlockExpr___compile_stmt(val_t self
, val_t param0
) {
5888 struct trace_t trace
= {NULL
, NULL
, 695, LOCATE_compiling_methods___ABlockExpr___compile_stmt
};
5892 trace
.prev
= tracehead
; tracehead
= &trace
;
5893 trace
.file
= LOCATE_compiling_methods
;
5895 variable1
= ((parser_nodes___ABlockExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___ABlockExpr___n_expr
))( self
) /*ABlockExpr::n_expr*/;
5896 variable1
= ((list___List___iterator_t
)CALL(variable1
,COLOR_abstract_collection___Collection___iterator
))(variable1
) /*List::iterator*/;
5897 while (true) { /*for*/
5898 variable2
= ((list___ListIterator___is_ok_t
)CALL(variable1
,COLOR_abstract_collection___Iterator___is_ok
))(variable1
) /*ListIterator::is_ok*/;
5899 if (!UNTAG_Bool(variable2
)) break; /*for*/
5900 variable2
= ((list___ListIterator___item_t
)CALL(variable1
,COLOR_abstract_collection___Iterator___item
))(variable1
) /*ListIterator::item*/;
5901 ((compiling_methods___CompilerVisitor___compile_stmt_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_stmt
))( variable0
/*v*/, variable2
/*n*/) /*CompilerVisitor::compile_stmt*/;
5902 continue_258
: while(0);
5903 ((list___ListIterator___next_t
)CALL(variable1
,COLOR_abstract_collection___Iterator___next
))(variable1
) /*ListIterator::next*/;
5905 break_258
: while(0);
5906 tracehead
= trace
.prev
;
5909 void compiling_methods___AVardeclExpr___prepare_compile_stmt(val_t self
, val_t param0
) {
5910 struct trace_t trace
= {NULL
, NULL
, 704, LOCATE_compiling_methods___AVardeclExpr___prepare_compile_stmt
};
5915 trace
.prev
= tracehead
; tracehead
= &trace
;
5916 trace
.file
= LOCATE_compiling_methods
;
5918 variable2
= ((compiling_methods___CompilerVisitor___get_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___get_var
))( variable0
/*v*/) /*CompilerVisitor::get_var*/;
5919 variable1
= variable2
;
5920 variable2
= ((compiling_methods___CompilerVisitor___varnames_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___varnames
))( variable0
/*v*/) /*CompilerVisitor::varnames*/;
5921 variable3
= ((syntax_base___AVardeclExpr___variable_t
)CALL( self
,COLOR_syntax_base___AVardeclExpr___variable
))( self
) /*AVardeclExpr::variable*/;
5922 ((abstract_collection___Map_____braeq_t
)CALL(variable2
,COLOR_abstract_collection___Map_____braeq
))(variable2
, variable3
, variable1
/*cname*/) /*Map::[]=*/;
5923 tracehead
= trace
.prev
;
5926 void compiling_methods___AVardeclExpr___compile_stmt(val_t self
, val_t param0
) {
5927 struct trace_t trace
= {NULL
, NULL
, 710, LOCATE_compiling_methods___AVardeclExpr___compile_stmt
};
5942 trace
.prev
= tracehead
; tracehead
= &trace
;
5943 trace
.file
= LOCATE_compiling_methods
;
5945 variable2
= ((compiling_methods___CompilerVisitor___varnames_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___varnames
))( variable0
/*v*/) /*CompilerVisitor::varnames*/;
5946 variable3
= ((syntax_base___AVardeclExpr___variable_t
)CALL( self
,COLOR_syntax_base___AVardeclExpr___variable
))( self
) /*AVardeclExpr::variable*/;
5947 variable2
= ((abstract_collection___Map_____bra_t
)CALL(variable2
,COLOR_abstract_collection___Map_____bra
))(variable2
, variable3
) /*Map::[]*/;
5948 variable1
= variable2
;
5949 variable2
= ((parser_nodes___AVardeclExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AVardeclExpr___n_expr
))( self
) /*AVardeclExpr::n_expr*/;
5950 variable2
= TAG_Bool((variable2
== NIT_NULL
/*null*/) || ((variable2
!= NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL(variable2
,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN(variable2
, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL(variable2
,COLOR_kernel___Object_____eqeq
))(variable2
, NIT_NULL
/*null*/) /*Object::==*/)))));
5951 if (UNTAG_Bool(variable2
)) { /*if*/
5952 variable3
= ((syntax_base___AVardeclExpr___variable_t
)CALL( self
,COLOR_syntax_base___AVardeclExpr___variable
))( self
) /*AVardeclExpr::variable*/;
5953 variable3
= ((syntax_base___Variable___stype_t
)CALL(variable3
,COLOR_syntax_base___Variable___stype
))(variable3
) /*Variable::stype*/;
5954 variable2
= variable3
;
5955 variable3
= NEW_string___String___init(); /*new String*/
5956 variable4
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
5957 variable5
= variable4
;
5958 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable5
) /*String::append*/;
5959 variable6
= ((compiling_base___MMType___default_cvalue_t
)CALL( variable2
/*t*/,COLOR_compiling_base___MMType___default_cvalue
))( variable2
/*t*/) /*MMType::default_cvalue*/;
5960 variable7
= variable6
;
5961 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable7
) /*String::append*/;
5962 variable8
= NEW_string___String___with_native(BOX_NativeString(" /*decl variable "), TAG_Int(17)); /*new String*/
5963 variable9
= variable8
;
5964 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable9
) /*String::append*/;
5965 variable10
= ((syntax_base___AVardeclExpr___variable_t
)CALL( self
,COLOR_syntax_base___AVardeclExpr___variable
))( self
) /*AVardeclExpr::variable*/;
5966 variable10
= ((syntax_base___Variable___name_t
)CALL(variable10
,COLOR_syntax_base___Variable___name
))(variable10
) /*Variable::name*/;
5967 variable11
= variable10
;
5968 variable11
= ((string___String___to_s_t
)CALL(variable11
,COLOR_string___Object___to_s
))(variable11
) /*String::to_s*/;
5969 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable11
) /*String::append*/;
5970 variable12
= NEW_string___String___with_native(BOX_NativeString("*/"), TAG_Int(2)); /*new String*/
5971 variable13
= variable12
;
5972 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable13
) /*String::append*/;
5973 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable1
/*cname*/, variable3
) /*CompilerVisitor::add_assignment*/;
5975 variable3
= ((parser_nodes___AVardeclExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AVardeclExpr___n_expr
))( self
) /*AVardeclExpr::n_expr*/;
5976 variable3
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::compile_expr*/;
5977 variable2
= variable3
;
5978 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable1
/*cname*/, variable2
/*e*/) /*CompilerVisitor::add_assignment*/;
5980 tracehead
= trace
.prev
;
5983 void compiling_methods___AReturnExpr___compile_stmt(val_t self
, val_t param0
) {
5984 struct trace_t trace
= {NULL
, NULL
, 724, LOCATE_compiling_methods___AReturnExpr___compile_stmt
};
5993 trace
.prev
= tracehead
; tracehead
= &trace
;
5994 trace
.file
= LOCATE_compiling_methods
;
5996 ((compiling_methods___CompilerVisitor___has_return__eq_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___has_return__eq
))( variable0
/*v*/, TAG_Bool(true)) /*CompilerVisitor::has_return=*/;
5997 variable1
= ((parser_nodes___AReturnExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AReturnExpr___n_expr
))( self
) /*AReturnExpr::n_expr*/;
5998 variable1
= TAG_Bool(!UNTAG_Bool(TAG_Bool((variable1
== NIT_NULL
/*null*/) || ((variable1
!= NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL(variable1
,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN(variable1
, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL(variable1
,COLOR_kernel___Object_____eqeq
))(variable1
, NIT_NULL
/*null*/) /*Object::==*/)))))));
5999 if (UNTAG_Bool(variable1
)) { /*if*/
6000 variable2
= ((parser_nodes___AReturnExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AReturnExpr___n_expr
))( self
) /*AReturnExpr::n_expr*/;
6001 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
6002 variable1
= variable2
;
6003 variable2
= ((compiling_methods___CompilerVisitor___return_value_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___return_value
))( variable0
/*v*/) /*CompilerVisitor::return_value*/;
6004 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable2
, variable1
/*e*/) /*CompilerVisitor::add_assignment*/;
6006 variable1
= NEW_string___String___init(); /*new String*/
6007 variable2
= NEW_string___String___with_native(BOX_NativeString("goto "), TAG_Int(5)); /*new String*/
6008 variable3
= variable2
;
6009 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable3
) /*String::append*/;
6010 variable4
= ((compiling_methods___CompilerVisitor___return_label_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___return_label
))( variable0
/*v*/) /*CompilerVisitor::return_label*/;
6011 variable5
= variable4
;
6012 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable5
) /*String::append*/;
6013 variable6
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
6014 variable7
= variable6
;
6015 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable7
) /*String::append*/;
6016 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable1
) /*CompilerVisitor::add_instr*/;
6017 tracehead
= trace
.prev
;
6020 void compiling_methods___ABreakExpr___compile_stmt(val_t self
, val_t param0
) {
6021 struct trace_t trace
= {NULL
, NULL
, 736, LOCATE_compiling_methods___ABreakExpr___compile_stmt
};
6030 trace
.prev
= tracehead
; tracehead
= &trace
;
6031 trace
.file
= LOCATE_compiling_methods
;
6033 variable1
= NEW_string___String___init(); /*new String*/
6034 variable2
= NEW_string___String___with_native(BOX_NativeString("goto "), TAG_Int(5)); /*new String*/
6035 variable3
= variable2
;
6036 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable3
) /*String::append*/;
6037 variable4
= ((compiling_methods___CompilerVisitor___break_label_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___break_label
))( variable0
/*v*/) /*CompilerVisitor::break_label*/;
6038 variable5
= variable4
;
6039 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable5
) /*String::append*/;
6040 variable6
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
6041 variable7
= variable6
;
6042 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable7
) /*String::append*/;
6043 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable1
) /*CompilerVisitor::add_instr*/;
6044 tracehead
= trace
.prev
;
6047 void compiling_methods___AContinueExpr___compile_stmt(val_t self
, val_t param0
) {
6048 struct trace_t trace
= {NULL
, NULL
, 743, LOCATE_compiling_methods___AContinueExpr___compile_stmt
};
6057 trace
.prev
= tracehead
; tracehead
= &trace
;
6058 trace
.file
= LOCATE_compiling_methods
;
6060 variable1
= NEW_string___String___init(); /*new String*/
6061 variable2
= NEW_string___String___with_native(BOX_NativeString("goto "), TAG_Int(5)); /*new String*/
6062 variable3
= variable2
;
6063 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable3
) /*String::append*/;
6064 variable4
= ((compiling_methods___CompilerVisitor___continue_label_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___continue_label
))( variable0
/*v*/) /*CompilerVisitor::continue_label*/;
6065 variable5
= variable4
;
6066 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable5
) /*String::append*/;
6067 variable6
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
6068 variable7
= variable6
;
6069 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable7
) /*String::append*/;
6070 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable1
) /*CompilerVisitor::add_instr*/;
6071 tracehead
= trace
.prev
;
6074 void compiling_methods___AAbortExpr___compile_stmt(val_t self
, val_t param0
) {
6075 struct trace_t trace
= {NULL
, NULL
, 750, LOCATE_compiling_methods___AAbortExpr___compile_stmt
};
6084 trace
.prev
= tracehead
; tracehead
= &trace
;
6085 trace
.file
= LOCATE_compiling_methods
;
6087 variable1
= NEW_string___String___init(); /*new String*/
6088 variable2
= NEW_string___String___with_native(BOX_NativeString("fprintf(stderr, \"Aborted\"); "), TAG_Int(28)); /*new String*/
6089 variable3
= variable2
;
6090 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable3
) /*String::append*/;
6091 variable4
= ((compiling_methods___CompilerVisitor___printf_locate_error_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___printf_locate_error
))( variable0
/*v*/, self
) /*CompilerVisitor::printf_locate_error*/;
6092 variable5
= variable4
;
6093 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable5
) /*String::append*/;
6094 variable6
= NEW_string___String___with_native(BOX_NativeString(" nit_exit(1);"), TAG_Int(13)); /*new String*/
6095 variable7
= variable6
;
6096 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable7
) /*String::append*/;
6097 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable1
) /*CompilerVisitor::add_instr*/;
6098 tracehead
= trace
.prev
;
6101 void compiling_methods___ADoExpr___compile_stmt(val_t self
, val_t param0
) {
6102 struct trace_t trace
= {NULL
, NULL
, 757, LOCATE_compiling_methods___ADoExpr___compile_stmt
};
6105 trace
.prev
= tracehead
; tracehead
= &trace
;
6106 trace
.file
= LOCATE_compiling_methods
;
6108 variable1
= ((parser_nodes___ADoExpr___n_block_t
)CALL( self
,COLOR_parser_nodes___ADoExpr___n_block
))( self
) /*ADoExpr::n_block*/;
6109 variable1
= TAG_Bool(!UNTAG_Bool(TAG_Bool((variable1
== NIT_NULL
/*null*/) || ((variable1
!= NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL(variable1
,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN(variable1
, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL(variable1
,COLOR_kernel___Object_____eqeq
))(variable1
, NIT_NULL
/*null*/) /*Object::==*/)))))));
6110 if (UNTAG_Bool(variable1
)) { /*if*/
6111 variable1
= ((parser_nodes___ADoExpr___n_block_t
)CALL( self
,COLOR_parser_nodes___ADoExpr___n_block
))( self
) /*ADoExpr::n_block*/;
6112 ((compiling_methods___CompilerVisitor___compile_stmt_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_stmt
))( variable0
/*v*/, variable1
) /*CompilerVisitor::compile_stmt*/;
6114 tracehead
= trace
.prev
;
6117 void compiling_methods___AIfExpr___compile_stmt(val_t self
, val_t param0
) {
6118 struct trace_t trace
= {NULL
, NULL
, 766, LOCATE_compiling_methods___AIfExpr___compile_stmt
};
6127 trace
.prev
= tracehead
; tracehead
= &trace
;
6128 trace
.file
= LOCATE_compiling_methods
;
6130 variable2
= ((parser_nodes___AIfExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AIfExpr___n_expr
))( self
) /*AIfExpr::n_expr*/;
6131 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
6132 variable1
= variable2
;
6133 variable2
= NEW_string___String___init(); /*new String*/
6134 variable3
= NEW_string___String___with_native(BOX_NativeString("if (UNTAG_Bool("), TAG_Int(15)); /*new String*/
6135 variable4
= variable3
;
6136 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable4
) /*String::append*/;
6137 variable5
= variable1
/*e*/;
6138 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable5
) /*String::append*/;
6139 variable6
= NEW_string___String___with_native(BOX_NativeString(")) { /*if*/"), TAG_Int(11)); /*new String*/
6140 variable7
= variable6
;
6141 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable7
) /*String::append*/;
6142 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::add_instr*/;
6143 ((compiling_methods___CompilerVisitor___free_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___free_var
))( variable0
/*v*/, variable1
/*e*/) /*CompilerVisitor::free_var*/;
6144 variable2
= ((parser_nodes___AIfExpr___n_then_t
)CALL( self
,COLOR_parser_nodes___AIfExpr___n_then
))( self
) /*AIfExpr::n_then*/;
6145 variable2
= TAG_Bool(!UNTAG_Bool(TAG_Bool((variable2
== NIT_NULL
/*null*/) || ((variable2
!= NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL(variable2
,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN(variable2
, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL(variable2
,COLOR_kernel___Object_____eqeq
))(variable2
, NIT_NULL
/*null*/) /*Object::==*/)))))));
6146 if (UNTAG_Bool(variable2
)) { /*if*/
6147 ((compiling_base___CompilerVisitor___indent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___indent
))( variable0
/*v*/) /*CompilerVisitor::indent*/;
6148 variable2
= ((parser_nodes___AIfExpr___n_then_t
)CALL( self
,COLOR_parser_nodes___AIfExpr___n_then
))( self
) /*AIfExpr::n_then*/;
6149 ((compiling_methods___CompilerVisitor___compile_stmt_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_stmt
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_stmt*/;
6150 ((compiling_base___CompilerVisitor___unindent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___unindent
))( variable0
/*v*/) /*CompilerVisitor::unindent*/;
6152 variable2
= ((parser_nodes___AIfExpr___n_else_t
)CALL( self
,COLOR_parser_nodes___AIfExpr___n_else
))( self
) /*AIfExpr::n_else*/;
6153 variable2
= TAG_Bool(!UNTAG_Bool(TAG_Bool((variable2
== NIT_NULL
/*null*/) || ((variable2
!= NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL(variable2
,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN(variable2
, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL(variable2
,COLOR_kernel___Object_____eqeq
))(variable2
, NIT_NULL
/*null*/) /*Object::==*/)))))));
6154 if (UNTAG_Bool(variable2
)) { /*if*/
6155 variable2
= NEW_string___String___with_native(BOX_NativeString("} else { /*if*/"), TAG_Int(15)); /*new String*/
6156 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::add_instr*/;
6157 ((compiling_base___CompilerVisitor___indent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___indent
))( variable0
/*v*/) /*CompilerVisitor::indent*/;
6158 variable2
= ((parser_nodes___AIfExpr___n_else_t
)CALL( self
,COLOR_parser_nodes___AIfExpr___n_else
))( self
) /*AIfExpr::n_else*/;
6159 ((compiling_methods___CompilerVisitor___compile_stmt_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_stmt
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_stmt*/;
6160 ((compiling_base___CompilerVisitor___unindent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___unindent
))( variable0
/*v*/) /*CompilerVisitor::unindent*/;
6162 variable2
= NEW_string___String___with_native(BOX_NativeString("}"), TAG_Int(1)); /*new String*/
6163 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::add_instr*/;
6164 tracehead
= trace
.prev
;
6167 val_t
compiling_methods___AIfexprExpr___compile_expr(val_t self
, val_t param0
) {
6168 struct trace_t trace
= {NULL
, NULL
, 787, LOCATE_compiling_methods___AIfexprExpr___compile_expr
};
6177 trace
.prev
= tracehead
; tracehead
= &trace
;
6178 trace
.file
= LOCATE_compiling_methods
;
6180 variable2
= ((parser_nodes___AIfexprExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AIfexprExpr___n_expr
))( self
) /*AIfexprExpr::n_expr*/;
6181 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
6182 variable1
= variable2
;
6183 variable2
= NEW_string___String___init(); /*new String*/
6184 variable3
= NEW_string___String___with_native(BOX_NativeString("if (UNTAG_Bool("), TAG_Int(15)); /*new String*/
6185 variable4
= variable3
;
6186 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable4
) /*String::append*/;
6187 variable5
= variable1
/*e*/;
6188 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable5
) /*String::append*/;
6189 variable6
= NEW_string___String___with_native(BOX_NativeString(")) { /*if*/"), TAG_Int(11)); /*new String*/
6190 variable7
= variable6
;
6191 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable7
) /*String::append*/;
6192 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::add_instr*/;
6193 ((compiling_methods___CompilerVisitor___free_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___free_var
))( variable0
/*v*/, variable1
/*e*/) /*CompilerVisitor::free_var*/;
6194 ((compiling_base___CompilerVisitor___indent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___indent
))( variable0
/*v*/) /*CompilerVisitor::indent*/;
6195 variable3
= ((parser_nodes___AIfexprExpr___n_then_t
)CALL( self
,COLOR_parser_nodes___AIfexprExpr___n_then
))( self
) /*AIfexprExpr::n_then*/;
6196 variable3
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::compile_expr*/;
6197 variable3
= ((compiling_methods___CompilerVisitor___ensure_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___ensure_var
))( variable0
/*v*/, variable3
) /*CompilerVisitor::ensure_var*/;
6198 variable2
= variable3
;
6199 ((compiling_base___CompilerVisitor___unindent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___unindent
))( variable0
/*v*/) /*CompilerVisitor::unindent*/;
6200 variable3
= NEW_string___String___with_native(BOX_NativeString("} else { /*if*/"), TAG_Int(15)); /*new String*/
6201 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::add_instr*/;
6202 ((compiling_methods___CompilerVisitor___free_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___free_var
))( variable0
/*v*/, variable2
/*e*/) /*CompilerVisitor::free_var*/;
6203 ((compiling_base___CompilerVisitor___indent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___indent
))( variable0
/*v*/) /*CompilerVisitor::indent*/;
6204 variable4
= ((parser_nodes___AIfexprExpr___n_else_t
)CALL( self
,COLOR_parser_nodes___AIfexprExpr___n_else
))( self
) /*AIfexprExpr::n_else*/;
6205 variable4
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable4
) /*CompilerVisitor::compile_expr*/;
6206 variable4
= ((compiling_methods___CompilerVisitor___ensure_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___ensure_var
))( variable0
/*v*/, variable4
) /*CompilerVisitor::ensure_var*/;
6207 variable3
= variable4
;
6208 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable2
/*e*/, variable3
/*e2*/) /*CompilerVisitor::add_assignment*/;
6209 ((compiling_base___CompilerVisitor___unindent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___unindent
))( variable0
/*v*/) /*CompilerVisitor::unindent*/;
6210 variable4
= NEW_string___String___with_native(BOX_NativeString("}"), TAG_Int(1)); /*new String*/
6211 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable4
) /*CompilerVisitor::add_instr*/;
6212 variable1
= variable2
/*e*/;
6213 goto return_label267
;
6214 return_label267
: while(false);
6215 tracehead
= trace
.prev
;
6218 void compiling_methods___AControlableBlock___compile_inside_block(val_t self
, val_t param0
) {
6219 struct trace_t trace
= {NULL
, NULL
, 807, LOCATE_compiling_methods___AControlableBlock___compile_inside_block
};
6220 trace
.prev
= tracehead
; tracehead
= &trace
;
6221 trace
.file
= LOCATE_compiling_methods
;
6222 fprintf(stderr
, "Deferred method %s called");
6223 fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_compiling_methods___AIfexprExpr___compile_expr
, LOCATE_compiling_methods
, 807);
6225 tracehead
= trace
.prev
;
6228 void compiling_methods___AControlableBlock___compile_stmt(val_t self
, val_t param0
) {
6229 struct trace_t trace
= {NULL
, NULL
, 808, LOCATE_compiling_methods___AControlableBlock___compile_stmt
};
6240 trace
.prev
= tracehead
; tracehead
= &trace
;
6241 trace
.file
= LOCATE_compiling_methods
;
6243 variable2
= ((compiling_methods___CompilerVisitor___break_label_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___break_label
))( variable0
/*v*/) /*CompilerVisitor::break_label*/;
6244 variable1
= variable2
;
6245 variable3
= ((compiling_methods___CompilerVisitor___continue_label_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___continue_label
))( variable0
/*v*/) /*CompilerVisitor::continue_label*/;
6246 variable2
= variable3
;
6247 variable4
= ((compiling_base___CompilerVisitor___new_number_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___new_number
))( variable0
/*v*/) /*CompilerVisitor::new_number*/;
6248 variable3
= variable4
;
6249 variable4
= NEW_string___String___init(); /*new String*/
6250 variable5
= NEW_string___String___with_native(BOX_NativeString("break_"), TAG_Int(6)); /*new String*/
6251 variable6
= variable5
;
6252 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable6
) /*String::append*/;
6253 variable7
= variable3
/*id*/;
6254 variable7
= ((string___String___to_s_t
)CALL(variable7
,COLOR_string___Object___to_s
))(variable7
) /*String::to_s*/;
6255 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable7
) /*String::append*/;
6256 variable8
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
6257 variable9
= variable8
;
6258 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable9
) /*String::append*/;
6259 ((compiling_methods___CompilerVisitor___break_label__eq_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___break_label__eq
))( variable0
/*v*/, variable4
) /*CompilerVisitor::break_label=*/;
6260 variable4
= NEW_string___String___init(); /*new String*/
6261 variable5
= NEW_string___String___with_native(BOX_NativeString("continue_"), TAG_Int(9)); /*new String*/
6262 variable6
= variable5
;
6263 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable6
) /*String::append*/;
6264 variable7
= variable3
/*id*/;
6265 variable7
= ((string___String___to_s_t
)CALL(variable7
,COLOR_string___Object___to_s
))(variable7
) /*String::to_s*/;
6266 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable7
) /*String::append*/;
6267 variable8
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
6268 variable9
= variable8
;
6269 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable9
) /*String::append*/;
6270 ((compiling_methods___CompilerVisitor___continue_label__eq_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___continue_label__eq
))( variable0
/*v*/, variable4
) /*CompilerVisitor::continue_label=*/;
6271 ((compiling_methods___AControlableBlock___compile_inside_block_t
)CALL( self
,COLOR_compiling_methods___AControlableBlock___compile_inside_block
))( self
, variable0
/*v*/) /*AControlableBlock::compile_inside_block*/;
6272 ((compiling_methods___CompilerVisitor___break_label__eq_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___break_label__eq
))( variable0
/*v*/, variable1
/*old_break_label*/) /*CompilerVisitor::break_label=*/;
6273 ((compiling_methods___CompilerVisitor___continue_label__eq_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___continue_label__eq
))( variable0
/*v*/, variable2
/*old_continue_label*/) /*CompilerVisitor::continue_label=*/;
6274 tracehead
= trace
.prev
;
6277 void compiling_methods___AWhileExpr___compile_inside_block(val_t self
, val_t param0
) {
6278 struct trace_t trace
= {NULL
, NULL
, 825, LOCATE_compiling_methods___AWhileExpr___compile_inside_block
};
6288 trace
.prev
= tracehead
; tracehead
= &trace
;
6289 trace
.file
= LOCATE_compiling_methods
;
6291 variable1
= NEW_string___String___with_native(BOX_NativeString("while (true) { /*while*/"), TAG_Int(24)); /*new String*/
6292 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable1
) /*CompilerVisitor::add_instr*/;
6293 ((compiling_base___CompilerVisitor___indent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___indent
))( variable0
/*v*/) /*CompilerVisitor::indent*/;
6294 variable2
= ((parser_nodes___AWhileExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AWhileExpr___n_expr
))( self
) /*AWhileExpr::n_expr*/;
6295 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
6296 variable1
= variable2
;
6297 variable2
= NEW_string___String___init(); /*new String*/
6298 variable3
= NEW_string___String___with_native(BOX_NativeString("if (!UNTAG_Bool("), TAG_Int(16)); /*new String*/
6299 variable4
= variable3
;
6300 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable4
) /*String::append*/;
6301 variable5
= variable1
/*e*/;
6302 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable5
) /*String::append*/;
6303 variable6
= NEW_string___String___with_native(BOX_NativeString(")) break; /* while*/"), TAG_Int(20)); /*new String*/
6304 variable7
= variable6
;
6305 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable7
) /*String::append*/;
6306 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::add_instr*/;
6307 ((compiling_methods___CompilerVisitor___free_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___free_var
))( variable0
/*v*/, variable1
/*e*/) /*CompilerVisitor::free_var*/;
6308 variable2
= ((parser_nodes___AWhileExpr___n_block_t
)CALL( self
,COLOR_parser_nodes___AWhileExpr___n_block
))( self
) /*AWhileExpr::n_block*/;
6309 variable2
= TAG_Bool(!UNTAG_Bool(TAG_Bool((variable2
== NIT_NULL
/*null*/) || ((variable2
!= NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL(variable2
,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN(variable2
, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL(variable2
,COLOR_kernel___Object_____eqeq
))(variable2
, NIT_NULL
/*null*/) /*Object::==*/)))))));
6310 if (UNTAG_Bool(variable2
)) { /*if*/
6311 variable2
= ((parser_nodes___AWhileExpr___n_block_t
)CALL( self
,COLOR_parser_nodes___AWhileExpr___n_block
))( self
) /*AWhileExpr::n_block*/;
6312 ((compiling_methods___CompilerVisitor___compile_stmt_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_stmt
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_stmt*/;
6314 variable2
= NEW_string___String___init(); /*new String*/
6315 variable3
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
6316 variable4
= variable3
;
6317 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable4
) /*String::append*/;
6318 variable5
= ((compiling_methods___CompilerVisitor___continue_label_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___continue_label
))( variable0
/*v*/) /*CompilerVisitor::continue_label*/;
6319 variable6
= variable5
;
6320 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable6
) /*String::append*/;
6321 variable7
= NEW_string___String___with_native(BOX_NativeString(": while(0);"), TAG_Int(11)); /*new String*/
6322 variable8
= variable7
;
6323 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable8
) /*String::append*/;
6324 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::add_instr*/;
6325 ((compiling_base___CompilerVisitor___unindent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___unindent
))( variable0
/*v*/) /*CompilerVisitor::unindent*/;
6326 variable2
= NEW_string___String___with_native(BOX_NativeString("}"), TAG_Int(1)); /*new String*/
6327 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::add_instr*/;
6328 variable2
= NEW_string___String___init(); /*new String*/
6329 variable3
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
6330 variable4
= variable3
;
6331 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable4
) /*String::append*/;
6332 variable5
= ((compiling_methods___CompilerVisitor___break_label_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___break_label
))( variable0
/*v*/) /*CompilerVisitor::break_label*/;
6333 variable6
= variable5
;
6334 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable6
) /*String::append*/;
6335 variable7
= NEW_string___String___with_native(BOX_NativeString(": while(0);"), TAG_Int(11)); /*new String*/
6336 variable8
= variable7
;
6337 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable8
) /*String::append*/;
6338 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::add_instr*/;
6339 tracehead
= trace
.prev
;
6342 void compiling_methods___AForExpr___compile_inside_block(val_t self
, val_t param0
) {
6343 struct trace_t trace
= {NULL
, NULL
, 843, LOCATE_compiling_methods___AForExpr___compile_inside_block
};
6346 trace
.prev
= tracehead
; tracehead
= &trace
;
6347 trace
.file
= LOCATE_compiling_methods
;
6349 variable1
= ((parser_nodes___AForExpr___n_vardecl_t
)CALL( self
,COLOR_parser_nodes___AForExpr___n_vardecl
))( self
) /*AForExpr::n_vardecl*/;
6350 ((compiling_methods___CompilerVisitor___compile_stmt_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_stmt
))( variable0
/*v*/, variable1
) /*CompilerVisitor::compile_stmt*/;
6351 tracehead
= trace
.prev
;
6354 void compiling_methods___AForVardeclExpr___compile_stmt(val_t self
, val_t param0
) {
6355 struct trace_t trace
= {NULL
, NULL
, 850, LOCATE_compiling_methods___AForVardeclExpr___compile_stmt
};
6361 static val_t once_value_variable4_272
; static int once_bool_variable4_272
;
6365 static val_t once_value_variable7_273
; static int once_bool_variable7_273
;
6367 static val_t once_value_variable8_274
; static int once_bool_variable8_274
;
6369 static val_t once_value_variable9_275
; static int once_bool_variable9_275
;
6379 trace
.prev
= tracehead
; tracehead
= &trace
;
6380 trace
.file
= LOCATE_compiling_methods
;
6382 variable2
= ((parser_nodes___AForVardeclExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AForVardeclExpr___n_expr
))( self
) /*AForVardeclExpr::n_expr*/;
6383 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
6384 variable1
= variable2
;
6385 variable3
= ((parser_nodes___AForVardeclExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AForVardeclExpr___n_expr
))( self
) /*AForVardeclExpr::n_expr*/;
6386 variable3
= ((typing___PExpr___stype_t
)CALL(variable3
,COLOR_syntax_base___PExpr___stype
))(variable3
) /*PExpr::stype*/;
6387 variable3
= ((static_type___MMType___local_class_t
)CALL(variable3
,COLOR_static_type___MMType___local_class
))(variable3
) /*MMType::local_class*/;
6388 if (once_bool_variable4_272
) variable4
= once_value_variable4_272
;
6390 variable4
= NEW_string___String___with_native(BOX_NativeString("iterator"), TAG_Int(8)); /*new String*/
6391 variable4
= ((symbol___String___to_symbol_t
)CALL(variable4
,COLOR_symbol___String___to_symbol
))(variable4
) /*String::to_symbol*/;
6392 once_value_variable4_272
= variable4
;
6393 once_bool_variable4_272
= true;
6395 variable3
= ((abstractmetamodel___MMLocalClass___select_method_t
)CALL(variable3
,COLOR_abstractmetamodel___MMLocalClass___select_method
))(variable3
, variable4
) /*MMLocalClass::select_method*/;
6396 variable2
= variable3
;
6397 variable3
= TAG_Bool(( variable2
/*prop*/ == NIT_NULL
/*null*/) || (( variable2
/*prop*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable2
/*prop*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable2
/*prop*/, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable2
/*prop*/,COLOR_kernel___Object_____eqeq
))( variable2
/*prop*/, NIT_NULL
/*null*/) /*Object::==*/)))));
6398 if (UNTAG_Bool(variable3
)) { /*if*/
6399 variable3
= NEW_string___String___with_native(BOX_NativeString("No iterator"), TAG_Int(11)); /*new String*/
6400 ((parser_prod___PNode___printl_t
)CALL( self
,COLOR_parser_prod___PNode___printl
))( self
, variable3
) /*PNode::printl*/;
6401 goto return_label271
;
6403 variable4
= ((static_type___MMLocalProperty___signature_t
)CALL( variable2
/*prop*/,COLOR_static_type___MMLocalProperty___signature
))( variable2
/*prop*/) /*MMLocalProperty::signature*/;
6404 variable4
= ((static_type___MMSignature___return_type_t
)CALL(variable4
,COLOR_static_type___MMSignature___return_type
))(variable4
) /*MMSignature::return_type*/;
6405 variable3
= variable4
;
6406 ((compiling_methods___CompilerVisitor___free_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___free_var
))( variable0
/*v*/, variable1
/*e*/) /*CompilerVisitor::free_var*/;
6407 variable5
= ((compiling_methods___CompilerVisitor___get_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___get_var
))( variable0
/*v*/) /*CompilerVisitor::get_var*/;
6408 variable4
= variable5
;
6409 variable5
= NEW_array___Array___with_capacity(TAG_Int(1)); /*new Array[E]*/
6410 ((array___AbstractArray___add_t
)CALL(variable5
,COLOR_abstract_collection___SimpleCollection___add
))(variable5
, variable1
/*e*/) /*AbstractArray::add*/;
6411 variable5
= ((compiling_methods___MMMethod___compile_call_t
)CALL( variable2
/*prop*/,COLOR_compiling_methods___MMMethod___compile_call
))( variable2
/*prop*/, variable0
/*v*/, variable5
) /*MMMethod::compile_call*/;
6412 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable4
/*iter*/, variable5
) /*CompilerVisitor::add_assignment*/;
6413 variable6
= ((static_type___MMType___local_class_t
)CALL( variable3
/*ittype*/,COLOR_static_type___MMType___local_class
))( variable3
/*ittype*/) /*MMType::local_class*/;
6414 if (once_bool_variable7_273
) variable7
= once_value_variable7_273
;
6416 variable7
= NEW_string___String___with_native(BOX_NativeString("is_ok"), TAG_Int(5)); /*new String*/
6417 variable7
= ((symbol___String___to_symbol_t
)CALL(variable7
,COLOR_symbol___String___to_symbol
))(variable7
) /*String::to_symbol*/;
6418 once_value_variable7_273
= variable7
;
6419 once_bool_variable7_273
= true;
6421 variable6
= ((abstractmetamodel___MMLocalClass___select_method_t
)CALL(variable6
,COLOR_abstractmetamodel___MMLocalClass___select_method
))(variable6
, variable7
) /*MMLocalClass::select_method*/;
6422 variable5
= variable6
;
6423 variable6
= TAG_Bool(( variable5
/*prop2*/ == NIT_NULL
/*null*/) || (( variable5
/*prop2*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable5
/*prop2*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable5
/*prop2*/, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable5
/*prop2*/,COLOR_kernel___Object_____eqeq
))( variable5
/*prop2*/, NIT_NULL
/*null*/) /*Object::==*/)))));
6424 if (UNTAG_Bool(variable6
)) { /*if*/
6425 variable6
= NEW_string___String___with_native(BOX_NativeString("No is_ok"), TAG_Int(8)); /*new String*/
6426 ((parser_prod___PNode___printl_t
)CALL( self
,COLOR_parser_prod___PNode___printl
))( self
, variable6
) /*PNode::printl*/;
6427 goto return_label271
;
6429 variable7
= ((static_type___MMType___local_class_t
)CALL( variable3
/*ittype*/,COLOR_static_type___MMType___local_class
))( variable3
/*ittype*/) /*MMType::local_class*/;
6430 if (once_bool_variable8_274
) variable8
= once_value_variable8_274
;
6432 variable8
= NEW_string___String___with_native(BOX_NativeString("item"), TAG_Int(4)); /*new String*/
6433 variable8
= ((symbol___String___to_symbol_t
)CALL(variable8
,COLOR_symbol___String___to_symbol
))(variable8
) /*String::to_symbol*/;
6434 once_value_variable8_274
= variable8
;
6435 once_bool_variable8_274
= true;
6437 variable7
= ((abstractmetamodel___MMLocalClass___select_method_t
)CALL(variable7
,COLOR_abstractmetamodel___MMLocalClass___select_method
))(variable7
, variable8
) /*MMLocalClass::select_method*/;
6438 variable6
= variable7
;
6439 variable7
= TAG_Bool(( variable6
/*prop3*/ == NIT_NULL
/*null*/) || (( variable6
/*prop3*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable6
/*prop3*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable6
/*prop3*/, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable6
/*prop3*/,COLOR_kernel___Object_____eqeq
))( variable6
/*prop3*/, NIT_NULL
/*null*/) /*Object::==*/)))));
6440 if (UNTAG_Bool(variable7
)) { /*if*/
6441 variable7
= NEW_string___String___with_native(BOX_NativeString("No item"), TAG_Int(7)); /*new String*/
6442 ((parser_prod___PNode___printl_t
)CALL( self
,COLOR_parser_prod___PNode___printl
))( self
, variable7
) /*PNode::printl*/;
6443 goto return_label271
;
6445 variable8
= ((static_type___MMType___local_class_t
)CALL( variable3
/*ittype*/,COLOR_static_type___MMType___local_class
))( variable3
/*ittype*/) /*MMType::local_class*/;
6446 if (once_bool_variable9_275
) variable9
= once_value_variable9_275
;
6448 variable9
= NEW_string___String___with_native(BOX_NativeString("next"), TAG_Int(4)); /*new String*/
6449 variable9
= ((symbol___String___to_symbol_t
)CALL(variable9
,COLOR_symbol___String___to_symbol
))(variable9
) /*String::to_symbol*/;
6450 once_value_variable9_275
= variable9
;
6451 once_bool_variable9_275
= true;
6453 variable8
= ((abstractmetamodel___MMLocalClass___select_method_t
)CALL(variable8
,COLOR_abstractmetamodel___MMLocalClass___select_method
))(variable8
, variable9
) /*MMLocalClass::select_method*/;
6454 variable7
= variable8
;
6455 variable8
= TAG_Bool(( variable7
/*prop4*/ == NIT_NULL
/*null*/) || (( variable7
/*prop4*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable7
/*prop4*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable7
/*prop4*/, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable7
/*prop4*/,COLOR_kernel___Object_____eqeq
))( variable7
/*prop4*/, NIT_NULL
/*null*/) /*Object::==*/)))));
6456 if (UNTAG_Bool(variable8
)) { /*if*/
6457 variable8
= NEW_string___String___with_native(BOX_NativeString("No next"), TAG_Int(7)); /*new String*/
6458 ((parser_prod___PNode___printl_t
)CALL( self
,COLOR_parser_prod___PNode___printl
))( self
, variable8
) /*PNode::printl*/;
6459 goto return_label271
;
6461 variable8
= NEW_string___String___with_native(BOX_NativeString("while (true) { /*for*/"), TAG_Int(22)); /*new String*/
6462 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable8
) /*CompilerVisitor::add_instr*/;
6463 ((compiling_base___CompilerVisitor___indent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___indent
))( variable0
/*v*/) /*CompilerVisitor::indent*/;
6464 variable9
= ((compiling_methods___CompilerVisitor___get_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___get_var
))( variable0
/*v*/) /*CompilerVisitor::get_var*/;
6465 variable8
= variable9
;
6466 variable9
= NEW_array___Array___with_capacity(TAG_Int(1)); /*new Array[E]*/
6467 ((array___AbstractArray___add_t
)CALL(variable9
,COLOR_abstract_collection___SimpleCollection___add
))(variable9
, variable4
/*iter*/) /*AbstractArray::add*/;
6468 variable9
= ((compiling_methods___MMMethod___compile_call_t
)CALL( variable5
/*prop2*/,COLOR_compiling_methods___MMMethod___compile_call
))( variable5
/*prop2*/, variable0
/*v*/, variable9
) /*MMMethod::compile_call*/;
6469 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable8
/*ok*/, variable9
) /*CompilerVisitor::add_assignment*/;
6470 variable9
= NEW_string___String___init(); /*new String*/
6471 variable10
= NEW_string___String___with_native(BOX_NativeString("if (!UNTAG_Bool("), TAG_Int(16)); /*new String*/
6472 variable11
= variable10
;
6473 ((string___String___append_t
)CALL(variable9
,COLOR_abstract_collection___IndexedCollection___append
))(variable9
, variable11
) /*String::append*/;
6474 variable12
= variable8
/*ok*/;
6475 ((string___String___append_t
)CALL(variable9
,COLOR_abstract_collection___IndexedCollection___append
))(variable9
, variable12
) /*String::append*/;
6476 variable13
= NEW_string___String___with_native(BOX_NativeString(")) break; /*for*/"), TAG_Int(17)); /*new String*/
6477 variable14
= variable13
;
6478 ((string___String___append_t
)CALL(variable9
,COLOR_abstract_collection___IndexedCollection___append
))(variable9
, variable14
) /*String::append*/;
6479 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable9
) /*CompilerVisitor::add_instr*/;
6480 ((compiling_methods___CompilerVisitor___free_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___free_var
))( variable0
/*v*/, variable8
/*ok*/) /*CompilerVisitor::free_var*/;
6481 variable10
= NEW_array___Array___with_capacity(TAG_Int(1)); /*new Array[E]*/
6482 ((array___AbstractArray___add_t
)CALL(variable10
,COLOR_abstract_collection___SimpleCollection___add
))(variable10
, variable4
/*iter*/) /*AbstractArray::add*/;
6483 variable10
= ((compiling_methods___MMMethod___compile_call_t
)CALL( variable6
/*prop3*/,COLOR_compiling_methods___MMMethod___compile_call
))( variable6
/*prop3*/, variable0
/*v*/, variable10
) /*MMMethod::compile_call*/;
6484 variable9
= variable10
;
6485 variable10
= ((compiling_methods___CompilerVisitor___ensure_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___ensure_var
))( variable0
/*v*/, variable9
/*e*/) /*CompilerVisitor::ensure_var*/;
6486 variable9
= variable10
/*e=*/;
6487 variable10
= ((compiling_methods___CompilerVisitor___varnames_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___varnames
))( variable0
/*v*/) /*CompilerVisitor::varnames*/;
6488 variable11
= ((syntax_base___AForVardeclExpr___variable_t
)CALL( self
,COLOR_syntax_base___AForVardeclExpr___variable
))( self
) /*AForVardeclExpr::variable*/;
6489 ((abstract_collection___Map_____braeq_t
)CALL(variable10
,COLOR_abstract_collection___Map_____braeq
))(variable10
, variable11
, variable9
/*e*/) /*Map::[]=*/;
6490 variable11
= ((parser_prod___PNode___parent_t
)CALL( self
,COLOR_parser_prod___PNode___parent
))( self
) /*PNode::parent*/;
6491 variable10
= variable11
;
6492 variable11
= TAG_Bool(( variable10
/*par*/==NIT_NULL
) || VAL_ISA( variable10
/*par*/, COLOR_AForExpr
, ID_AForExpr
)) /*cast AForExpr*/;
6493 if (!UNTAG_Bool(variable11
)) { fprintf(stderr
, "Assert%s failed", ""); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_compiling_methods___AForVardeclExpr___compile_stmt
, LOCATE_compiling_methods
, 887); nit_exit(1);}
6494 variable12
= ((parser_nodes___AForExpr___n_block_t
)CALL( variable10
/*par*/,COLOR_parser_nodes___AForExpr___n_block
))( variable10
/*par*/) /*AForExpr::n_block*/;
6495 variable11
= variable12
;
6496 variable12
= TAG_Bool(!UNTAG_Bool(TAG_Bool(( variable11
/*n_block*/ == NIT_NULL
/*null*/) || (( variable11
/*n_block*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable11
/*n_block*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable11
/*n_block*/, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable11
/*n_block*/,COLOR_kernel___Object_____eqeq
))( variable11
/*n_block*/, NIT_NULL
/*null*/) /*Object::==*/)))))));
6497 if (UNTAG_Bool(variable12
)) { /*if*/
6498 ((compiling_methods___CompilerVisitor___compile_stmt_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_stmt
))( variable0
/*v*/, variable11
/*n_block*/) /*CompilerVisitor::compile_stmt*/;
6500 variable12
= NEW_string___String___init(); /*new String*/
6501 variable13
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
6502 variable14
= variable13
;
6503 ((string___String___append_t
)CALL(variable12
,COLOR_abstract_collection___IndexedCollection___append
))(variable12
, variable14
) /*String::append*/;
6504 variable15
= ((compiling_methods___CompilerVisitor___continue_label_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___continue_label
))( variable0
/*v*/) /*CompilerVisitor::continue_label*/;
6505 variable16
= variable15
;
6506 ((string___String___append_t
)CALL(variable12
,COLOR_abstract_collection___IndexedCollection___append
))(variable12
, variable16
) /*String::append*/;
6507 variable17
= NEW_string___String___with_native(BOX_NativeString(": while(0);"), TAG_Int(11)); /*new String*/
6508 variable18
= variable17
;
6509 ((string___String___append_t
)CALL(variable12
,COLOR_abstract_collection___IndexedCollection___append
))(variable12
, variable18
) /*String::append*/;
6510 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable12
) /*CompilerVisitor::add_instr*/;
6511 variable12
= NEW_array___Array___with_capacity(TAG_Int(1)); /*new Array[E]*/
6512 ((array___AbstractArray___add_t
)CALL(variable12
,COLOR_abstract_collection___SimpleCollection___add
))(variable12
, variable4
/*iter*/) /*AbstractArray::add*/;
6513 variable12
= ((compiling_methods___MMMethod___compile_call_t
)CALL( variable7
/*prop4*/,COLOR_compiling_methods___MMMethod___compile_call
))( variable7
/*prop4*/, variable0
/*v*/, variable12
) /*MMMethod::compile_call*/;
6514 variable9
= variable12
/*e=*/;
6515 variable12
= TAG_Bool(( variable9
/*e*/ == NIT_NULL
/*null*/) || (( variable9
/*e*/ != NIT_NULL
) && UNTAG_Bool(((string___String_____eqeq_t
)CALL( variable9
/*e*/,COLOR_kernel___Object_____eqeq
))( variable9
/*e*/, NIT_NULL
/*null*/) /*String::==*/)));
6516 if (!UNTAG_Bool(variable12
)) { fprintf(stderr
, "Assert%s failed", ""); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_compiling_methods___AForVardeclExpr___compile_stmt
, LOCATE_compiling_methods
, 894); nit_exit(1);}
6517 ((compiling_base___CompilerVisitor___unindent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___unindent
))( variable0
/*v*/) /*CompilerVisitor::unindent*/;
6518 variable12
= NEW_string___String___with_native(BOX_NativeString("}"), TAG_Int(1)); /*new String*/
6519 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable12
) /*CompilerVisitor::add_instr*/;
6520 variable12
= NEW_string___String___init(); /*new String*/
6521 variable13
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
6522 variable14
= variable13
;
6523 ((string___String___append_t
)CALL(variable12
,COLOR_abstract_collection___IndexedCollection___append
))(variable12
, variable14
) /*String::append*/;
6524 variable15
= ((compiling_methods___CompilerVisitor___break_label_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___break_label
))( variable0
/*v*/) /*CompilerVisitor::break_label*/;
6525 variable16
= variable15
;
6526 ((string___String___append_t
)CALL(variable12
,COLOR_abstract_collection___IndexedCollection___append
))(variable12
, variable16
) /*String::append*/;
6527 variable17
= NEW_string___String___with_native(BOX_NativeString(": while(0);"), TAG_Int(11)); /*new String*/
6528 variable18
= variable17
;
6529 ((string___String___append_t
)CALL(variable12
,COLOR_abstract_collection___IndexedCollection___append
))(variable12
, variable18
) /*String::append*/;
6530 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable12
) /*CompilerVisitor::add_instr*/;
6531 return_label271
: while(false);
6532 tracehead
= trace
.prev
;
6535 void compiling_methods___AAssertExpr___compile_stmt(val_t self
, val_t param0
) {
6536 struct trace_t trace
= {NULL
, NULL
, 902, LOCATE_compiling_methods___AAssertExpr___compile_stmt
};
6553 trace
.prev
= tracehead
; tracehead
= &trace
;
6554 trace
.file
= LOCATE_compiling_methods
;
6556 variable2
= ((parser_nodes___AAssertExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AAssertExpr___n_expr
))( self
) /*AAssertExpr::n_expr*/;
6557 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
6558 variable1
= variable2
;
6559 variable3
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
6560 variable2
= variable3
;
6561 variable3
= ((parser_nodes___AAssertExpr___n_id_t
)CALL( self
,COLOR_parser_nodes___AAssertExpr___n_id
))( self
) /*AAssertExpr::n_id*/;
6562 variable3
= TAG_Bool(!UNTAG_Bool(TAG_Bool((variable3
== NIT_NULL
/*null*/) || ((variable3
!= NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL(variable3
,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN(variable3
, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL(variable3
,COLOR_kernel___Object_____eqeq
))(variable3
, NIT_NULL
/*null*/) /*Object::==*/)))))));
6563 if (UNTAG_Bool(variable3
)) { /*if*/
6564 variable3
= NEW_string___String___init(); /*new String*/
6565 variable4
= NEW_string___String___with_native(BOX_NativeString(" '"), TAG_Int(2)); /*new String*/
6566 variable5
= variable4
;
6567 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable5
) /*String::append*/;
6568 variable6
= ((parser_nodes___AAssertExpr___n_id_t
)CALL( self
,COLOR_parser_nodes___AAssertExpr___n_id
))( self
) /*AAssertExpr::n_id*/;
6569 variable6
= ((lexer___Token___text_t
)CALL(variable6
,COLOR_lexer___Token___text
))(variable6
) /*Token::text*/;
6570 variable7
= variable6
;
6571 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable7
) /*String::append*/;
6572 variable8
= NEW_string___String___with_native(BOX_NativeString("' "), TAG_Int(2)); /*new String*/
6573 variable9
= variable8
;
6574 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable9
) /*String::append*/;
6575 variable2
= variable3
/*s=*/;
6577 variable3
= NEW_string___String___init(); /*new String*/
6578 variable4
= NEW_string___String___with_native(BOX_NativeString("if (!UNTAG_Bool("), TAG_Int(16)); /*new String*/
6579 variable5
= variable4
;
6580 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable5
) /*String::append*/;
6581 variable6
= variable1
/*e*/;
6582 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable6
) /*String::append*/;
6583 variable7
= NEW_string___String___with_native(BOX_NativeString(")) { fprintf(stderr, \"Assert%s failed\", \""), TAG_Int(41)); /*new String*/
6584 variable8
= variable7
;
6585 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable8
) /*String::append*/;
6586 variable9
= variable2
/*s*/;
6587 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable9
) /*String::append*/;
6588 variable10
= NEW_string___String___with_native(BOX_NativeString("\"); "), TAG_Int(4)); /*new String*/
6589 variable11
= variable10
;
6590 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable11
) /*String::append*/;
6591 variable12
= ((compiling_methods___CompilerVisitor___printf_locate_error_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___printf_locate_error
))( variable0
/*v*/, self
) /*CompilerVisitor::printf_locate_error*/;
6592 variable13
= variable12
;
6593 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable13
) /*String::append*/;
6594 variable14
= NEW_string___String___with_native(BOX_NativeString(" nit_exit(1);}"), TAG_Int(14)); /*new String*/
6595 variable15
= variable14
;
6596 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable15
) /*String::append*/;
6597 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::add_instr*/;
6598 tracehead
= trace
.prev
;
6601 val_t
compiling_methods___AVarExpr___compile_expr(val_t self
, val_t param0
) {
6602 struct trace_t trace
= {NULL
, NULL
, 914, LOCATE_compiling_methods___AVarExpr___compile_expr
};
6615 trace
.prev
= tracehead
; tracehead
= &trace
;
6616 trace
.file
= LOCATE_compiling_methods
;
6618 variable1
= NEW_string___String___init(); /*new String*/
6619 variable2
= NEW_string___String___with_native(BOX_NativeString(" "), TAG_Int(1)); /*new String*/
6620 variable3
= variable2
;
6621 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable3
) /*String::append*/;
6622 variable4
= ((compiling_methods___CompilerVisitor___varnames_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___varnames
))( variable0
/*v*/) /*CompilerVisitor::varnames*/;
6623 variable5
= ((syntax_base___AVarFormExpr___variable_t
)CALL( self
,COLOR_syntax_base___AVarFormExpr___variable
))( self
) /*AVarFormExpr::variable*/;
6624 variable4
= ((abstract_collection___Map_____bra_t
)CALL(variable4
,COLOR_abstract_collection___Map_____bra
))(variable4
, variable5
) /*Map::[]*/;
6625 variable5
= variable4
;
6626 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable5
) /*String::append*/;
6627 variable6
= NEW_string___String___with_native(BOX_NativeString(" /*"), TAG_Int(3)); /*new String*/
6628 variable7
= variable6
;
6629 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable7
) /*String::append*/;
6630 variable8
= ((syntax_base___AVarFormExpr___variable_t
)CALL( self
,COLOR_syntax_base___AVarFormExpr___variable
))( self
) /*AVarFormExpr::variable*/;
6631 variable8
= ((syntax_base___Variable___name_t
)CALL(variable8
,COLOR_syntax_base___Variable___name
))(variable8
) /*Variable::name*/;
6632 variable9
= variable8
;
6633 variable9
= ((string___String___to_s_t
)CALL(variable9
,COLOR_string___Object___to_s
))(variable9
) /*String::to_s*/;
6634 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable9
) /*String::append*/;
6635 variable10
= NEW_string___String___with_native(BOX_NativeString("*/"), TAG_Int(2)); /*new String*/
6636 variable11
= variable10
;
6637 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable11
) /*String::append*/;
6638 goto return_label277
;
6639 return_label277
: while(false);
6640 tracehead
= trace
.prev
;
6643 void compiling_methods___AVarAssignExpr___compile_stmt(val_t self
, val_t param0
) {
6644 struct trace_t trace
= {NULL
, NULL
, 921, LOCATE_compiling_methods___AVarAssignExpr___compile_stmt
};
6658 trace
.prev
= tracehead
; tracehead
= &trace
;
6659 trace
.file
= LOCATE_compiling_methods
;
6661 variable2
= ((parser_nodes___AAssignFormExpr___n_value_t
)CALL( self
,COLOR_parser_nodes___AAssignFormExpr___n_value
))( self
) /*AAssignFormExpr::n_value*/;
6662 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
6663 variable1
= variable2
;
6664 variable2
= ((compiling_methods___CompilerVisitor___varnames_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___varnames
))( variable0
/*v*/) /*CompilerVisitor::varnames*/;
6665 variable3
= ((syntax_base___AVarFormExpr___variable_t
)CALL( self
,COLOR_syntax_base___AVarFormExpr___variable
))( self
) /*AVarFormExpr::variable*/;
6666 variable2
= ((abstract_collection___Map_____bra_t
)CALL(variable2
,COLOR_abstract_collection___Map_____bra
))(variable2
, variable3
) /*Map::[]*/;
6667 variable3
= NEW_string___String___init(); /*new String*/
6668 variable4
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
6669 variable5
= variable4
;
6670 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable5
) /*String::append*/;
6671 variable6
= variable1
/*e*/;
6672 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable6
) /*String::append*/;
6673 variable7
= NEW_string___String___with_native(BOX_NativeString(" /*"), TAG_Int(3)); /*new String*/
6674 variable8
= variable7
;
6675 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable8
) /*String::append*/;
6676 variable9
= ((syntax_base___AVarFormExpr___variable_t
)CALL( self
,COLOR_syntax_base___AVarFormExpr___variable
))( self
) /*AVarFormExpr::variable*/;
6677 variable9
= ((syntax_base___Variable___name_t
)CALL(variable9
,COLOR_syntax_base___Variable___name
))(variable9
) /*Variable::name*/;
6678 variable10
= variable9
;
6679 variable10
= ((string___String___to_s_t
)CALL(variable10
,COLOR_string___Object___to_s
))(variable10
) /*String::to_s*/;
6680 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable10
) /*String::append*/;
6681 variable11
= NEW_string___String___with_native(BOX_NativeString("=*/"), TAG_Int(3)); /*new String*/
6682 variable12
= variable11
;
6683 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable12
) /*String::append*/;
6684 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable2
, variable3
) /*CompilerVisitor::add_assignment*/;
6685 tracehead
= trace
.prev
;
6688 void compiling_methods___AVarReassignExpr___compile_stmt(val_t self
, val_t param0
) {
6689 struct trace_t trace
= {NULL
, NULL
, 929, LOCATE_compiling_methods___AVarReassignExpr___compile_stmt
};
6705 trace
.prev
= tracehead
; tracehead
= &trace
;
6706 trace
.file
= LOCATE_compiling_methods
;
6708 variable2
= ((compiling_methods___CompilerVisitor___varnames_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___varnames
))( variable0
/*v*/) /*CompilerVisitor::varnames*/;
6709 variable3
= ((syntax_base___AVarFormExpr___variable_t
)CALL( self
,COLOR_syntax_base___AVarFormExpr___variable
))( self
) /*AVarFormExpr::variable*/;
6710 variable2
= ((abstract_collection___Map_____bra_t
)CALL(variable2
,COLOR_abstract_collection___Map_____bra
))(variable2
, variable3
) /*Map::[]*/;
6711 variable1
= variable2
;
6712 variable3
= ((parser_nodes___AReassignFormExpr___n_value_t
)CALL( self
,COLOR_parser_nodes___AReassignFormExpr___n_value
))( self
) /*AReassignFormExpr::n_value*/;
6713 variable3
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::compile_expr*/;
6714 variable2
= variable3
;
6715 variable4
= ((typing___AReassignFormExpr___assign_method_t
)CALL( self
,COLOR_typing___AReassignFormExpr___assign_method
))( self
) /*AReassignFormExpr::assign_method*/;
6716 variable5
= NEW_array___Array___with_capacity(TAG_Int(2)); /*new Array[E]*/
6717 ((array___AbstractArray___add_t
)CALL(variable5
,COLOR_abstract_collection___SimpleCollection___add
))(variable5
, variable1
/*e1*/) /*AbstractArray::add*/;
6718 ((array___AbstractArray___add_t
)CALL(variable5
,COLOR_abstract_collection___SimpleCollection___add
))(variable5
, variable2
/*e2*/) /*AbstractArray::add*/;
6719 variable4
= ((compiling_methods___MMMethod___compile_call_t
)CALL(variable4
,COLOR_compiling_methods___MMMethod___compile_call
))(variable4
, variable0
/*v*/, variable5
) /*MMMethod::compile_call*/;
6720 variable3
= variable4
;
6721 variable4
= ((compiling_methods___CompilerVisitor___varnames_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___varnames
))( variable0
/*v*/) /*CompilerVisitor::varnames*/;
6722 variable5
= ((syntax_base___AVarFormExpr___variable_t
)CALL( self
,COLOR_syntax_base___AVarFormExpr___variable
))( self
) /*AVarFormExpr::variable*/;
6723 variable4
= ((abstract_collection___Map_____bra_t
)CALL(variable4
,COLOR_abstract_collection___Map_____bra
))(variable4
, variable5
) /*Map::[]*/;
6724 variable5
= NEW_string___String___init(); /*new String*/
6725 variable6
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
6726 variable7
= variable6
;
6727 ((string___String___append_t
)CALL(variable5
,COLOR_abstract_collection___IndexedCollection___append
))(variable5
, variable7
) /*String::append*/;
6728 variable8
= variable3
/*e3*/;
6729 ((string___String___append_t
)CALL(variable5
,COLOR_abstract_collection___IndexedCollection___append
))(variable5
, variable8
) /*String::append*/;
6730 variable9
= NEW_string___String___with_native(BOX_NativeString(" /*"), TAG_Int(3)); /*new String*/
6731 variable10
= variable9
;
6732 ((string___String___append_t
)CALL(variable5
,COLOR_abstract_collection___IndexedCollection___append
))(variable5
, variable10
) /*String::append*/;
6733 variable11
= ((syntax_base___AVarFormExpr___variable_t
)CALL( self
,COLOR_syntax_base___AVarFormExpr___variable
))( self
) /*AVarFormExpr::variable*/;
6734 variable11
= ((syntax_base___Variable___name_t
)CALL(variable11
,COLOR_syntax_base___Variable___name
))(variable11
) /*Variable::name*/;
6735 variable12
= variable11
;
6736 variable12
= ((string___String___to_s_t
)CALL(variable12
,COLOR_string___Object___to_s
))(variable12
) /*String::to_s*/;
6737 ((string___String___append_t
)CALL(variable5
,COLOR_abstract_collection___IndexedCollection___append
))(variable5
, variable12
) /*String::append*/;
6738 variable13
= NEW_string___String___with_native(BOX_NativeString("*/"), TAG_Int(2)); /*new String*/
6739 variable14
= variable13
;
6740 ((string___String___append_t
)CALL(variable5
,COLOR_abstract_collection___IndexedCollection___append
))(variable5
, variable14
) /*String::append*/;
6741 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable4
, variable5
) /*CompilerVisitor::add_assignment*/;
6742 tracehead
= trace
.prev
;
6745 val_t
compiling_methods___ASelfExpr___compile_expr(val_t self
, val_t param0
) {
6746 struct trace_t trace
= {NULL
, NULL
, 939, LOCATE_compiling_methods___ASelfExpr___compile_expr
};
6752 trace
.prev
= tracehead
; tracehead
= &trace
;
6753 trace
.file
= LOCATE_compiling_methods
;
6755 variable1
= ((compiling_methods___CompilerVisitor___method_params_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___method_params
))( variable0
/*v*/) /*CompilerVisitor::method_params*/;
6756 variable2
= TAG_Int(0);
6757 variable3
= TAG_Bool(UNTAG_Int( variable2
/*index*/)>=UNTAG_Int( TAG_Int(0)));
6758 variable4
= variable3
;
6759 if (UNTAG_Bool(variable4
)) { /* and */
6760 variable4
= variable1
;
6761 variable4
= ATTR_array___AbstractArray____length(variable4
) /*AbstractArray::_length*/;
6762 variable4
= TAG_Bool(UNTAG_Int( variable2
/*index*/)<UNTAG_Int(variable4
));
6764 variable3
= variable4
;
6765 if (!UNTAG_Bool(variable3
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
6766 variable3
= variable1
;
6767 variable3
= ATTR_array___Array____items(variable3
) /*Array::_items*/;
6768 variable3
= UNBOX_NativeArray(variable3
)[UNTAG_Int( variable2
/*index*/)];
6769 goto return_label281
;
6770 return_label281
: while(false);
6771 variable1
= variable3
;
6772 goto return_label280
;
6773 return_label280
: while(false);
6774 tracehead
= trace
.prev
;
6777 val_t
compiling_methods___AOrExpr___compile_expr(val_t self
, val_t param0
) {
6778 struct trace_t trace
= {NULL
, NULL
, 946, LOCATE_compiling_methods___AOrExpr___compile_expr
};
6787 trace
.prev
= tracehead
; tracehead
= &trace
;
6788 trace
.file
= LOCATE_compiling_methods
;
6790 variable2
= ((parser_nodes___AOrExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AOrExpr___n_expr
))( self
) /*AOrExpr::n_expr*/;
6791 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
6792 variable2
= ((compiling_methods___CompilerVisitor___ensure_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___ensure_var
))( variable0
/*v*/, variable2
) /*CompilerVisitor::ensure_var*/;
6793 variable1
= variable2
;
6794 variable2
= NEW_string___String___init(); /*new String*/
6795 variable3
= NEW_string___String___with_native(BOX_NativeString("if (!UNTAG_Bool("), TAG_Int(16)); /*new String*/
6796 variable4
= variable3
;
6797 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable4
) /*String::append*/;
6798 variable5
= variable1
/*e*/;
6799 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable5
) /*String::append*/;
6800 variable6
= NEW_string___String___with_native(BOX_NativeString(")) { /* or */"), TAG_Int(13)); /*new String*/
6801 variable7
= variable6
;
6802 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable7
) /*String::append*/;
6803 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::add_instr*/;
6804 ((compiling_methods___CompilerVisitor___free_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___free_var
))( variable0
/*v*/, variable1
/*e*/) /*CompilerVisitor::free_var*/;
6805 ((compiling_base___CompilerVisitor___indent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___indent
))( variable0
/*v*/) /*CompilerVisitor::indent*/;
6806 variable3
= ((parser_nodes___AOrExpr___n_expr2_t
)CALL( self
,COLOR_parser_nodes___AOrExpr___n_expr2
))( self
) /*AOrExpr::n_expr2*/;
6807 variable3
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::compile_expr*/;
6808 variable2
= variable3
;
6809 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable1
/*e*/, variable2
/*e2*/) /*CompilerVisitor::add_assignment*/;
6810 ((compiling_base___CompilerVisitor___unindent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___unindent
))( variable0
/*v*/) /*CompilerVisitor::unindent*/;
6811 variable3
= NEW_string___String___with_native(BOX_NativeString("}"), TAG_Int(1)); /*new String*/
6812 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::add_instr*/;
6813 variable1
= variable1
/*e*/;
6814 goto return_label282
;
6815 return_label282
: while(false);
6816 tracehead
= trace
.prev
;
6819 val_t
compiling_methods___AAndExpr___compile_expr(val_t self
, val_t param0
) {
6820 struct trace_t trace
= {NULL
, NULL
, 961, LOCATE_compiling_methods___AAndExpr___compile_expr
};
6829 trace
.prev
= tracehead
; tracehead
= &trace
;
6830 trace
.file
= LOCATE_compiling_methods
;
6832 variable2
= ((parser_nodes___AAndExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AAndExpr___n_expr
))( self
) /*AAndExpr::n_expr*/;
6833 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
6834 variable2
= ((compiling_methods___CompilerVisitor___ensure_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___ensure_var
))( variable0
/*v*/, variable2
) /*CompilerVisitor::ensure_var*/;
6835 variable1
= variable2
;
6836 variable2
= NEW_string___String___init(); /*new String*/
6837 variable3
= NEW_string___String___with_native(BOX_NativeString("if (UNTAG_Bool("), TAG_Int(15)); /*new String*/
6838 variable4
= variable3
;
6839 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable4
) /*String::append*/;
6840 variable5
= variable1
/*e*/;
6841 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable5
) /*String::append*/;
6842 variable6
= NEW_string___String___with_native(BOX_NativeString(")) { /* and */"), TAG_Int(14)); /*new String*/
6843 variable7
= variable6
;
6844 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable7
) /*String::append*/;
6845 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::add_instr*/;
6846 ((compiling_methods___CompilerVisitor___free_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___free_var
))( variable0
/*v*/, variable1
/*e*/) /*CompilerVisitor::free_var*/;
6847 ((compiling_base___CompilerVisitor___indent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___indent
))( variable0
/*v*/) /*CompilerVisitor::indent*/;
6848 variable3
= ((parser_nodes___AAndExpr___n_expr2_t
)CALL( self
,COLOR_parser_nodes___AAndExpr___n_expr2
))( self
) /*AAndExpr::n_expr2*/;
6849 variable3
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::compile_expr*/;
6850 variable2
= variable3
;
6851 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable1
/*e*/, variable2
/*e2*/) /*CompilerVisitor::add_assignment*/;
6852 ((compiling_base___CompilerVisitor___unindent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___unindent
))( variable0
/*v*/) /*CompilerVisitor::unindent*/;
6853 variable3
= NEW_string___String___with_native(BOX_NativeString("}"), TAG_Int(1)); /*new String*/
6854 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::add_instr*/;
6855 variable1
= variable1
/*e*/;
6856 goto return_label283
;
6857 return_label283
: while(false);
6858 tracehead
= trace
.prev
;
6861 val_t
compiling_methods___ANotExpr___compile_expr(val_t self
, val_t param0
) {
6862 struct trace_t trace
= {NULL
, NULL
, 976, LOCATE_compiling_methods___ANotExpr___compile_expr
};
6871 trace
.prev
= tracehead
; tracehead
= &trace
;
6872 trace
.file
= LOCATE_compiling_methods
;
6874 variable1
= NEW_string___String___init(); /*new String*/
6875 variable2
= NEW_string___String___with_native(BOX_NativeString(" TAG_Bool(!UNTAG_Bool("), TAG_Int(22)); /*new String*/
6876 variable3
= variable2
;
6877 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable3
) /*String::append*/;
6878 variable4
= ((parser_nodes___ANotExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___ANotExpr___n_expr
))( self
) /*ANotExpr::n_expr*/;
6879 variable4
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable4
) /*CompilerVisitor::compile_expr*/;
6880 variable5
= variable4
;
6881 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable5
) /*String::append*/;
6882 variable6
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
6883 variable7
= variable6
;
6884 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable7
) /*String::append*/;
6885 goto return_label284
;
6886 return_label284
: while(false);
6887 tracehead
= trace
.prev
;
6890 val_t
compiling_methods___AEeExpr___compile_expr(val_t self
, val_t param0
) {
6891 struct trace_t trace
= {NULL
, NULL
, 983, LOCATE_compiling_methods___AEeExpr___compile_expr
};
6904 trace
.prev
= tracehead
; tracehead
= &trace
;
6905 trace
.file
= LOCATE_compiling_methods
;
6907 variable2
= ((parser_nodes___AEeExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AEeExpr___n_expr
))( self
) /*AEeExpr::n_expr*/;
6908 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
6909 variable1
= variable2
;
6910 variable3
= ((parser_nodes___AEeExpr___n_expr2_t
)CALL( self
,COLOR_parser_nodes___AEeExpr___n_expr2
))( self
) /*AEeExpr::n_expr2*/;
6911 variable3
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::compile_expr*/;
6912 variable2
= variable3
;
6913 variable3
= NEW_string___String___init(); /*new String*/
6914 variable4
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(IS_EQUAL_NN("), TAG_Int(21)); /*new String*/
6915 variable5
= variable4
;
6916 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable5
) /*String::append*/;
6917 variable6
= variable1
/*e*/;
6918 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable6
) /*String::append*/;
6919 variable7
= NEW_string___String___with_native(BOX_NativeString(","), TAG_Int(1)); /*new String*/
6920 variable8
= variable7
;
6921 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable8
) /*String::append*/;
6922 variable9
= variable2
/*e2*/;
6923 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable9
) /*String::append*/;
6924 variable10
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
6925 variable11
= variable10
;
6926 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable11
) /*String::append*/;
6927 variable1
= variable3
;
6928 goto return_label285
;
6929 return_label285
: while(false);
6930 tracehead
= trace
.prev
;
6933 val_t
compiling_methods___AIsaExpr___compile_expr(val_t self
, val_t param0
) {
6934 struct trace_t trace
= {NULL
, NULL
, 992, LOCATE_compiling_methods___AIsaExpr___compile_expr
};
6938 trace
.prev
= tracehead
; tracehead
= &trace
;
6939 trace
.file
= LOCATE_compiling_methods
;
6941 variable2
= ((parser_nodes___AIsaExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AIsaExpr___n_expr
))( self
) /*AIsaExpr::n_expr*/;
6942 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
6943 variable1
= variable2
;
6944 variable2
= ((parser_nodes___AIsaExpr___n_type_t
)CALL( self
,COLOR_parser_nodes___AIsaExpr___n_type
))( self
) /*AIsaExpr::n_type*/;
6945 variable2
= ((typing___PType___stype_t
)CALL(variable2
,COLOR_typing___PType___stype
))(variable2
) /*PType::stype*/;
6946 variable2
= ((compiling_methods___MMType___compile_cast_t
)CALL(variable2
,COLOR_compiling_methods___MMType___compile_cast
))(variable2
, variable0
/*v*/, variable1
/*e*/) /*MMType::compile_cast*/;
6947 variable1
= variable2
;
6948 goto return_label286
;
6949 return_label286
: while(false);
6950 tracehead
= trace
.prev
;
6953 val_t
compiling_methods___AAsCastExpr___compile_expr(val_t self
, val_t param0
) {
6954 struct trace_t trace
= {NULL
, NULL
, 1000, LOCATE_compiling_methods___AAsCastExpr___compile_expr
};
6958 trace
.prev
= tracehead
; tracehead
= &trace
;
6959 trace
.file
= LOCATE_compiling_methods
;
6961 variable2
= ((parser_nodes___AAsCastExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AAsCastExpr___n_expr
))( self
) /*AAsCastExpr::n_expr*/;
6962 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
6963 variable1
= variable2
;
6964 variable2
= ((parser_nodes___AAsCastExpr___n_type_t
)CALL( self
,COLOR_parser_nodes___AAsCastExpr___n_type
))( self
) /*AAsCastExpr::n_type*/;
6965 variable2
= ((typing___PType___stype_t
)CALL(variable2
,COLOR_typing___PType___stype
))(variable2
) /*PType::stype*/;
6966 ((compiling_methods___MMType___compile_type_check_t
)CALL(variable2
,COLOR_compiling_methods___MMType___compile_type_check
))(variable2
, variable0
/*v*/, variable1
/*e*/, self
) /*MMType::compile_type_check*/;
6967 variable1
= variable1
/*e*/;
6968 goto return_label287
;
6969 return_label287
: while(false);
6970 tracehead
= trace
.prev
;
6973 val_t
compiling_methods___ATrueExpr___compile_expr(val_t self
, val_t param0
) {
6974 struct trace_t trace
= {NULL
, NULL
, 1009, LOCATE_compiling_methods___ATrueExpr___compile_expr
};
6977 trace
.prev
= tracehead
; tracehead
= &trace
;
6978 trace
.file
= LOCATE_compiling_methods
;
6980 variable1
= NEW_string___String___with_native(BOX_NativeString(" TAG_Bool(true)"), TAG_Int(15)); /*new String*/
6981 goto return_label288
;
6982 return_label288
: while(false);
6983 tracehead
= trace
.prev
;
6986 val_t
compiling_methods___AFalseExpr___compile_expr(val_t self
, val_t param0
) {
6987 struct trace_t trace
= {NULL
, NULL
, 1016, LOCATE_compiling_methods___AFalseExpr___compile_expr
};
6990 trace
.prev
= tracehead
; tracehead
= &trace
;
6991 trace
.file
= LOCATE_compiling_methods
;
6993 variable1
= NEW_string___String___with_native(BOX_NativeString(" TAG_Bool(false)"), TAG_Int(16)); /*new String*/
6994 goto return_label289
;
6995 return_label289
: while(false);
6996 tracehead
= trace
.prev
;
6999 val_t
compiling_methods___AIntExpr___compile_expr(val_t self
, val_t param0
) {
7000 struct trace_t trace
= {NULL
, NULL
, 1023, LOCATE_compiling_methods___AIntExpr___compile_expr
};
7009 trace
.prev
= tracehead
; tracehead
= &trace
;
7010 trace
.file
= LOCATE_compiling_methods
;
7012 variable1
= NEW_string___String___init(); /*new String*/
7013 variable2
= NEW_string___String___with_native(BOX_NativeString(" TAG_Int("), TAG_Int(9)); /*new String*/
7014 variable3
= variable2
;
7015 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable3
) /*String::append*/;
7016 variable4
= ((parser_nodes___AIntExpr___n_number_t
)CALL( self
,COLOR_parser_nodes___AIntExpr___n_number
))( self
) /*AIntExpr::n_number*/;
7017 variable4
= ((lexer___Token___text_t
)CALL(variable4
,COLOR_lexer___Token___text
))(variable4
) /*Token::text*/;
7018 variable5
= variable4
;
7019 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable5
) /*String::append*/;
7020 variable6
= NEW_string___String___with_native(BOX_NativeString(")"), TAG_Int(1)); /*new String*/
7021 variable7
= variable6
;
7022 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable7
) /*String::append*/;
7023 goto return_label290
;
7024 return_label290
: while(false);
7025 tracehead
= trace
.prev
;
7028 val_t
compiling_methods___AFloatExpr___compile_expr(val_t self
, val_t param0
) {
7029 struct trace_t trace
= {NULL
, NULL
, 1030, LOCATE_compiling_methods___AFloatExpr___compile_expr
};
7038 trace
.prev
= tracehead
; tracehead
= &trace
;
7039 trace
.file
= LOCATE_compiling_methods
;
7041 variable1
= NEW_string___String___init(); /*new String*/
7042 variable2
= NEW_string___String___with_native(BOX_NativeString("BOX_Float("), TAG_Int(10)); /*new String*/
7043 variable3
= variable2
;
7044 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable3
) /*String::append*/;
7045 variable4
= ((parser_nodes___AFloatExpr___n_float_t
)CALL( self
,COLOR_parser_nodes___AFloatExpr___n_float
))( self
) /*AFloatExpr::n_float*/;
7046 variable4
= ((lexer___Token___text_t
)CALL(variable4
,COLOR_lexer___Token___text
))(variable4
) /*Token::text*/;
7047 variable5
= variable4
;
7048 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable5
) /*String::append*/;
7049 variable6
= NEW_string___String___with_native(BOX_NativeString(")"), TAG_Int(1)); /*new String*/
7050 variable7
= variable6
;
7051 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable7
) /*String::append*/;
7052 goto return_label291
;
7053 return_label291
: while(false);
7054 tracehead
= trace
.prev
;
7057 val_t
compiling_methods___ACharExpr___compile_expr(val_t self
, val_t param0
) {
7058 struct trace_t trace
= {NULL
, NULL
, 1037, LOCATE_compiling_methods___ACharExpr___compile_expr
};
7067 trace
.prev
= tracehead
; tracehead
= &trace
;
7068 trace
.file
= LOCATE_compiling_methods
;
7070 variable1
= NEW_string___String___init(); /*new String*/
7071 variable2
= NEW_string___String___with_native(BOX_NativeString(" TAG_Char("), TAG_Int(10)); /*new String*/
7072 variable3
= variable2
;
7073 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable3
) /*String::append*/;
7074 variable4
= ((parser_nodes___ACharExpr___n_char_t
)CALL( self
,COLOR_parser_nodes___ACharExpr___n_char
))( self
) /*ACharExpr::n_char*/;
7075 variable4
= ((lexer___Token___text_t
)CALL(variable4
,COLOR_lexer___Token___text
))(variable4
) /*Token::text*/;
7076 variable5
= variable4
;
7077 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable5
) /*String::append*/;
7078 variable6
= NEW_string___String___with_native(BOX_NativeString(")"), TAG_Int(1)); /*new String*/
7079 variable7
= variable6
;
7080 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable7
) /*String::append*/;
7081 goto return_label292
;
7082 return_label292
: while(false);
7083 tracehead
= trace
.prev
;
7086 val_t
compiling_methods___AStringFormExpr___compile_expr(val_t self
, val_t param0
) {
7087 struct trace_t trace
= {NULL
, NULL
, 1044, LOCATE_compiling_methods___AStringFormExpr___compile_expr
};
7092 static val_t once_value_variable3_294
; static int once_bool_variable3_294
;
7100 trace
.prev
= tracehead
; tracehead
= &trace
;
7101 trace
.file
= LOCATE_compiling_methods
;
7103 variable2
= ((typing___PExpr___stype_t
)CALL( self
,COLOR_syntax_base___PExpr___stype
))( self
) /*PExpr::stype*/;
7104 variable2
= ((static_type___MMType___local_class_t
)CALL(variable2
,COLOR_static_type___MMType___local_class
))(variable2
) /*MMType::local_class*/;
7105 if (once_bool_variable3_294
) variable3
= once_value_variable3_294
;
7107 variable3
= NEW_string___String___with_native(BOX_NativeString("with_native"), TAG_Int(11)); /*new String*/
7108 variable3
= ((symbol___String___to_symbol_t
)CALL(variable3
,COLOR_symbol___String___to_symbol
))(variable3
) /*String::to_symbol*/;
7109 once_value_variable3_294
= variable3
;
7110 once_bool_variable3_294
= true;
7112 variable2
= ((abstractmetamodel___MMLocalClass___select_method_t
)CALL(variable2
,COLOR_abstractmetamodel___MMLocalClass___select_method
))(variable2
, variable3
) /*MMLocalClass::select_method*/;
7113 variable1
= variable2
;
7114 ((compiling_methods___AStringFormExpr___compute_string_info_t
)CALL( self
,COLOR_compiling_methods___AStringFormExpr___compute_string_info
))( self
) /*AStringFormExpr::compute_string_info*/;
7115 variable2
= NEW_array___Array___with_capacity(TAG_Int(2)); /*new Array[E]*/
7116 variable3
= NEW_string___String___init(); /*new String*/
7117 variable4
= NEW_string___String___with_native(BOX_NativeString("BOX_NativeString(\""), TAG_Int(18)); /*new String*/
7118 variable5
= variable4
;
7119 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable5
) /*String::append*/;
7120 variable6
= ATTR_compiling_methods___AStringFormExpr____cstring( self
) /*AStringFormExpr::_cstring*/;
7121 variable7
= variable6
;
7122 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable7
) /*String::append*/;
7123 variable8
= NEW_string___String___with_native(BOX_NativeString("\")"), TAG_Int(2)); /*new String*/
7124 variable9
= variable8
;
7125 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable9
) /*String::append*/;
7126 ((array___AbstractArray___add_t
)CALL(variable2
,COLOR_abstract_collection___SimpleCollection___add
))(variable2
, variable3
) /*AbstractArray::add*/;
7127 variable4
= NEW_string___String___init(); /*new String*/
7128 variable5
= NEW_string___String___with_native(BOX_NativeString("TAG_Int("), TAG_Int(8)); /*new String*/
7129 variable6
= variable5
;
7130 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable6
) /*String::append*/;
7131 variable7
= ATTR_compiling_methods___AStringFormExpr____cstring_length( self
) /*AStringFormExpr::_cstring_length*/;
7132 variable8
= variable7
;
7133 variable8
= ((string___String___to_s_t
)CALL(variable8
,COLOR_string___Object___to_s
))(variable8
) /*String::to_s*/;
7134 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable8
) /*String::append*/;
7135 variable9
= NEW_string___String___with_native(BOX_NativeString(")"), TAG_Int(1)); /*new String*/
7136 variable10
= variable9
;
7137 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable10
) /*String::append*/;
7138 ((array___AbstractArray___add_t
)CALL(variable2
,COLOR_abstract_collection___SimpleCollection___add
))(variable2
, variable4
) /*AbstractArray::add*/;
7139 variable2
= ((compiling_methods___MMMethod___compile_constructor_call_t
)CALL( variable1
/*prop*/,COLOR_compiling_methods___MMMethod___compile_constructor_call
))( variable1
/*prop*/, variable0
/*v*/, variable2
) /*MMMethod::compile_constructor_call*/;
7140 variable1
= variable2
;
7141 goto return_label293
;
7142 return_label293
: while(false);
7143 tracehead
= trace
.prev
;
7146 val_t
compiling_methods___AStringFormExpr___string_text(val_t self
) {
7147 struct trace_t trace
= {NULL
, NULL
, 1051, LOCATE_compiling_methods___AStringFormExpr___string_text
};
7148 trace
.prev
= tracehead
; tracehead
= &trace
;
7149 trace
.file
= LOCATE_compiling_methods
;
7150 fprintf(stderr
, "Deferred method %s called");
7151 fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_compiling_methods___AStringFormExpr___compile_expr
, LOCATE_compiling_methods
, 1051);
7153 tracehead
= trace
.prev
;
7156 void compiling_methods___AStringFormExpr___compute_string_info(val_t self
) {
7157 struct trace_t trace
= {NULL
, NULL
, 1060, LOCATE_compiling_methods___AStringFormExpr___compute_string_info
};
7166 trace
.prev
= tracehead
; tracehead
= &trace
;
7167 trace
.file
= LOCATE_compiling_methods
;
7168 variable0
= TAG_Int(0);
7169 variable2
= ((compiling_methods___AStringFormExpr___string_text_t
)CALL( self
,COLOR_compiling_methods___AStringFormExpr___string_text
))( self
) /*AStringFormExpr::string_text*/;
7170 variable1
= variable2
;
7171 variable3
= NEW_string___String___init(); /*new String*/
7172 variable2
= variable3
;
7173 variable3
= TAG_Int(0);
7174 while (true) { /*while*/
7175 variable4
= ((array___AbstractArray___length_t
)CALL( variable1
/*str*/,COLOR_abstract_collection___Collection___length
))( variable1
/*str*/) /*AbstractArray::length*/;
7176 variable4
= TAG_Bool(UNTAG_Int( variable3
/*i*/)<UNTAG_Int(variable4
));
7177 if (!UNTAG_Bool(variable4
)) break; /* while*/
7178 variable5
= ((string___String_____bra_t
)CALL( variable1
/*str*/,COLOR_abstract_collection___Map_____bra
))( variable1
/*str*/, variable3
/*i*/) /*String::[]*/;
7179 variable4
= variable5
;
7180 variable5
= TAG_Bool(( variable4
/*c*/)==( TAG_Char('\\')));
7181 if (UNTAG_Bool(variable5
)) { /*if*/
7182 variable5
= TAG_Int(UNTAG_Int( variable3
/*i*/)+UNTAG_Int( TAG_Int(1)));
7183 variable3
= variable5
/*i=*/;
7184 variable6
= ((string___String_____bra_t
)CALL( variable1
/*str*/,COLOR_abstract_collection___Map_____bra
))( variable1
/*str*/, variable3
/*i*/) /*String::[]*/;
7185 variable5
= variable6
;
7186 variable6
= TAG_Bool(( variable5
/*c2*/)!=( TAG_Char('{')));
7187 variable7
= variable6
;
7188 if (UNTAG_Bool(variable7
)) { /* and */
7189 variable7
= TAG_Bool(( variable5
/*c2*/)!=( TAG_Char('}')));
7191 variable6
= variable7
;
7192 if (UNTAG_Bool(variable6
)) { /*if*/
7193 ((string___String___add_t
)CALL( variable2
/*res*/,COLOR_abstract_collection___SimpleCollection___add
))( variable2
/*res*/, variable4
/*c*/) /*String::add*/;
7195 variable4
= variable5
/*c2*/ /*c=*/;
7197 variable5
= TAG_Int(UNTAG_Int( variable0
/*len*/)+UNTAG_Int( TAG_Int(1)));
7198 variable0
= variable5
/*len=*/;
7199 ((string___String___add_t
)CALL( variable2
/*res*/,COLOR_abstract_collection___SimpleCollection___add
))( variable2
/*res*/, variable4
/*c*/) /*String::add*/;
7200 variable5
= TAG_Int(UNTAG_Int( variable3
/*i*/)+UNTAG_Int( TAG_Int(1)));
7201 variable3
= variable5
/*i=*/;
7202 continue_296
: while(0);
7204 break_296
: while(0);
7205 ATTR_compiling_methods___AStringFormExpr____cstring( self
) /*AStringFormExpr::_cstring*/ = variable2
/*res*/;
7206 ATTR_compiling_methods___AStringFormExpr____cstring_length( self
) /*AStringFormExpr::_cstring_length*/ = variable0
/*len*/;
7207 tracehead
= trace
.prev
;
7210 val_t
compiling_methods___AStringExpr___string_text(val_t self
) {
7211 struct trace_t trace
= {NULL
, NULL
, 1087, LOCATE_compiling_methods___AStringExpr___string_text
};
7214 trace
.prev
= tracehead
; tracehead
= &trace
;
7215 trace
.file
= LOCATE_compiling_methods
;
7216 variable0
= ((parser_nodes___AStringExpr___n_string_t
)CALL( self
,COLOR_parser_nodes___AStringExpr___n_string
))( self
) /*AStringExpr::n_string*/;
7217 variable0
= ((lexer___Token___text_t
)CALL(variable0
,COLOR_lexer___Token___text
))(variable0
) /*Token::text*/;
7218 variable1
= ((parser_nodes___AStringExpr___n_string_t
)CALL( self
,COLOR_parser_nodes___AStringExpr___n_string
))( self
) /*AStringExpr::n_string*/;
7219 variable1
= ((lexer___Token___text_t
)CALL(variable1
,COLOR_lexer___Token___text
))(variable1
) /*Token::text*/;
7220 variable1
= ((array___AbstractArray___length_t
)CALL(variable1
,COLOR_abstract_collection___Collection___length
))(variable1
) /*AbstractArray::length*/;
7221 variable1
= TAG_Int(UNTAG_Int(variable1
)-UNTAG_Int( TAG_Int(2)));
7222 variable0
= ((string___String___substring_t
)CALL(variable0
,COLOR_string___String___substring
))(variable0
, TAG_Int(1), variable1
) /*String::substring*/;
7223 goto return_label297
;
7224 return_label297
: while(false);
7225 tracehead
= trace
.prev
;
7228 val_t
compiling_methods___AStartStringExpr___string_text(val_t self
) {
7229 struct trace_t trace
= {NULL
, NULL
, 1090, LOCATE_compiling_methods___AStartStringExpr___string_text
};
7232 trace
.prev
= tracehead
; tracehead
= &trace
;
7233 trace
.file
= LOCATE_compiling_methods
;
7234 variable0
= ((parser_nodes___AStartStringExpr___n_string_t
)CALL( self
,COLOR_parser_nodes___AStartStringExpr___n_string
))( self
) /*AStartStringExpr::n_string*/;
7235 variable0
= ((lexer___Token___text_t
)CALL(variable0
,COLOR_lexer___Token___text
))(variable0
) /*Token::text*/;
7236 variable1
= ((parser_nodes___AStartStringExpr___n_string_t
)CALL( self
,COLOR_parser_nodes___AStartStringExpr___n_string
))( self
) /*AStartStringExpr::n_string*/;
7237 variable1
= ((lexer___Token___text_t
)CALL(variable1
,COLOR_lexer___Token___text
))(variable1
) /*Token::text*/;
7238 variable1
= ((array___AbstractArray___length_t
)CALL(variable1
,COLOR_abstract_collection___Collection___length
))(variable1
) /*AbstractArray::length*/;
7239 variable1
= TAG_Int(UNTAG_Int(variable1
)-UNTAG_Int( TAG_Int(2)));
7240 variable0
= ((string___String___substring_t
)CALL(variable0
,COLOR_string___String___substring
))(variable0
, TAG_Int(1), variable1
) /*String::substring*/;
7241 goto return_label298
;
7242 return_label298
: while(false);
7243 tracehead
= trace
.prev
;
7246 val_t
compiling_methods___AMidStringExpr___string_text(val_t self
) {
7247 struct trace_t trace
= {NULL
, NULL
, 1093, LOCATE_compiling_methods___AMidStringExpr___string_text
};
7250 trace
.prev
= tracehead
; tracehead
= &trace
;
7251 trace
.file
= LOCATE_compiling_methods
;
7252 variable0
= ((parser_nodes___AMidStringExpr___n_string_t
)CALL( self
,COLOR_parser_nodes___AMidStringExpr___n_string
))( self
) /*AMidStringExpr::n_string*/;
7253 variable0
= ((lexer___Token___text_t
)CALL(variable0
,COLOR_lexer___Token___text
))(variable0
) /*Token::text*/;
7254 variable1
= ((parser_nodes___AMidStringExpr___n_string_t
)CALL( self
,COLOR_parser_nodes___AMidStringExpr___n_string
))( self
) /*AMidStringExpr::n_string*/;
7255 variable1
= ((lexer___Token___text_t
)CALL(variable1
,COLOR_lexer___Token___text
))(variable1
) /*Token::text*/;
7256 variable1
= ((array___AbstractArray___length_t
)CALL(variable1
,COLOR_abstract_collection___Collection___length
))(variable1
) /*AbstractArray::length*/;
7257 variable1
= TAG_Int(UNTAG_Int(variable1
)-UNTAG_Int( TAG_Int(2)));
7258 variable0
= ((string___String___substring_t
)CALL(variable0
,COLOR_string___String___substring
))(variable0
, TAG_Int(1), variable1
) /*String::substring*/;
7259 goto return_label299
;
7260 return_label299
: while(false);
7261 tracehead
= trace
.prev
;
7264 val_t
compiling_methods___AEndStringExpr___string_text(val_t self
) {
7265 struct trace_t trace
= {NULL
, NULL
, 1096, LOCATE_compiling_methods___AEndStringExpr___string_text
};
7268 trace
.prev
= tracehead
; tracehead
= &trace
;
7269 trace
.file
= LOCATE_compiling_methods
;
7270 variable0
= ((parser_nodes___AEndStringExpr___n_string_t
)CALL( self
,COLOR_parser_nodes___AEndStringExpr___n_string
))( self
) /*AEndStringExpr::n_string*/;
7271 variable0
= ((lexer___Token___text_t
)CALL(variable0
,COLOR_lexer___Token___text
))(variable0
) /*Token::text*/;
7272 variable1
= ((parser_nodes___AEndStringExpr___n_string_t
)CALL( self
,COLOR_parser_nodes___AEndStringExpr___n_string
))( self
) /*AEndStringExpr::n_string*/;
7273 variable1
= ((lexer___Token___text_t
)CALL(variable1
,COLOR_lexer___Token___text
))(variable1
) /*Token::text*/;
7274 variable1
= ((array___AbstractArray___length_t
)CALL(variable1
,COLOR_abstract_collection___Collection___length
))(variable1
) /*AbstractArray::length*/;
7275 variable1
= TAG_Int(UNTAG_Int(variable1
)-UNTAG_Int( TAG_Int(2)));
7276 variable0
= ((string___String___substring_t
)CALL(variable0
,COLOR_string___String___substring
))(variable0
, TAG_Int(1), variable1
) /*String::substring*/;
7277 goto return_label300
;
7278 return_label300
: while(false);
7279 tracehead
= trace
.prev
;
7282 val_t
compiling_methods___ASuperstringExpr___compile_expr(val_t self
, val_t param0
) {
7283 struct trace_t trace
= {NULL
, NULL
, 1100, LOCATE_compiling_methods___ASuperstringExpr___compile_expr
};
7288 static val_t once_value_variable3_302
; static int once_bool_variable3_302
;
7291 static val_t once_value_variable5_303
; static int once_bool_variable5_303
;
7293 static val_t once_value_variable6_304
; static int once_bool_variable6_304
;
7297 trace
.prev
= tracehead
; tracehead
= &trace
;
7298 trace
.file
= LOCATE_compiling_methods
;
7300 variable2
= ((typing___PExpr___stype_t
)CALL( self
,COLOR_syntax_base___PExpr___stype
))( self
) /*PExpr::stype*/;
7301 variable2
= ((static_type___MMType___local_class_t
)CALL(variable2
,COLOR_static_type___MMType___local_class
))(variable2
) /*MMType::local_class*/;
7302 if (once_bool_variable3_302
) variable3
= once_value_variable3_302
;
7304 variable3
= NEW_string___String___with_native(BOX_NativeString("init"), TAG_Int(4)); /*new String*/
7305 variable3
= ((symbol___String___to_symbol_t
)CALL(variable3
,COLOR_symbol___String___to_symbol
))(variable3
) /*String::to_symbol*/;
7306 once_value_variable3_302
= variable3
;
7307 once_bool_variable3_302
= true;
7309 variable2
= ((abstractmetamodel___MMLocalClass___select_method_t
)CALL(variable2
,COLOR_abstractmetamodel___MMLocalClass___select_method
))(variable2
, variable3
) /*MMLocalClass::select_method*/;
7310 variable1
= variable2
;
7311 variable3
= NEW_array___Array___init(); /*new Array[E]*/
7312 variable3
= ((compiling_methods___MMMethod___compile_constructor_call_t
)CALL( variable1
/*prop*/,COLOR_compiling_methods___MMMethod___compile_constructor_call
))( variable1
/*prop*/, variable0
/*v*/, variable3
) /*MMMethod::compile_constructor_call*/;
7313 variable2
= variable3
;
7314 variable4
= ((typing___PExpr___stype_t
)CALL( self
,COLOR_syntax_base___PExpr___stype
))( self
) /*PExpr::stype*/;
7315 variable4
= ((static_type___MMType___local_class_t
)CALL(variable4
,COLOR_static_type___MMType___local_class
))(variable4
) /*MMType::local_class*/;
7316 if (once_bool_variable5_303
) variable5
= once_value_variable5_303
;
7318 variable5
= NEW_string___String___with_native(BOX_NativeString("append"), TAG_Int(6)); /*new String*/
7319 variable5
= ((symbol___String___to_symbol_t
)CALL(variable5
,COLOR_symbol___String___to_symbol
))(variable5
) /*String::to_symbol*/;
7320 once_value_variable5_303
= variable5
;
7321 once_bool_variable5_303
= true;
7323 variable4
= ((abstractmetamodel___MMLocalClass___select_method_t
)CALL(variable4
,COLOR_abstractmetamodel___MMLocalClass___select_method
))(variable4
, variable5
) /*MMLocalClass::select_method*/;
7324 variable3
= variable4
;
7325 variable5
= ((typing___PExpr___stype_t
)CALL( self
,COLOR_syntax_base___PExpr___stype
))( self
) /*PExpr::stype*/;
7326 variable5
= ((static_type___MMType___local_class_t
)CALL(variable5
,COLOR_static_type___MMType___local_class
))(variable5
) /*MMType::local_class*/;
7327 if (once_bool_variable6_304
) variable6
= once_value_variable6_304
;
7329 variable6
= NEW_string___String___with_native(BOX_NativeString("to_s"), TAG_Int(4)); /*new String*/
7330 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
7331 once_value_variable6_304
= variable6
;
7332 once_bool_variable6_304
= true;
7334 variable5
= ((abstractmetamodel___MMLocalClass___select_method_t
)CALL(variable5
,COLOR_abstractmetamodel___MMLocalClass___select_method
))(variable5
, variable6
) /*MMLocalClass::select_method*/;
7335 variable4
= variable5
;
7336 variable5
= ((parser_nodes___ASuperstringExpr___n_exprs_t
)CALL( self
,COLOR_parser_nodes___ASuperstringExpr___n_exprs
))( self
) /*ASuperstringExpr::n_exprs*/;
7337 variable5
= ((list___List___iterator_t
)CALL(variable5
,COLOR_abstract_collection___Collection___iterator
))(variable5
) /*List::iterator*/;
7338 while (true) { /*for*/
7339 variable6
= ((list___ListIterator___is_ok_t
)CALL(variable5
,COLOR_abstract_collection___Iterator___is_ok
))(variable5
) /*ListIterator::is_ok*/;
7340 if (!UNTAG_Bool(variable6
)) break; /*for*/
7341 variable6
= ((list___ListIterator___item_t
)CALL(variable5
,COLOR_abstract_collection___Iterator___item
))(variable5
) /*ListIterator::item*/;
7342 variable8
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable6
/*ne*/) /*CompilerVisitor::compile_expr*/;
7343 variable8
= ((compiling_methods___CompilerVisitor___ensure_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___ensure_var
))( variable0
/*v*/, variable8
) /*CompilerVisitor::ensure_var*/;
7344 variable7
= variable8
;
7345 variable8
= ((typing___PExpr___stype_t
)CALL( variable6
/*ne*/,COLOR_syntax_base___PExpr___stype
))( variable6
/*ne*/) /*PExpr::stype*/;
7346 variable9
= ((typing___PExpr___stype_t
)CALL( self
,COLOR_syntax_base___PExpr___stype
))( self
) /*PExpr::stype*/;
7347 variable8
= TAG_Bool(!UNTAG_Bool(TAG_Bool((variable8
== variable9
) || ((variable8
!= NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL(variable8
,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN(variable8
,variable9
)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL(variable8
,COLOR_kernel___Object_____eqeq
))(variable8
, variable9
) /*Object::==*/)))))));
7348 if (UNTAG_Bool(variable8
)) { /*if*/
7349 variable8
= NEW_array___Array___with_capacity(TAG_Int(1)); /*new Array[E]*/
7350 ((array___AbstractArray___add_t
)CALL(variable8
,COLOR_abstract_collection___SimpleCollection___add
))(variable8
, variable7
/*e*/) /*AbstractArray::add*/;
7351 variable8
= ((compiling_methods___MMMethod___compile_call_t
)CALL( variable4
/*prop3*/,COLOR_compiling_methods___MMMethod___compile_call
))( variable4
/*prop3*/, variable0
/*v*/, variable8
) /*MMMethod::compile_call*/;
7352 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable7
/*e*/, variable8
) /*CompilerVisitor::add_assignment*/;
7354 variable8
= NEW_array___Array___with_capacity(TAG_Int(2)); /*new Array[E]*/
7355 ((array___AbstractArray___add_t
)CALL(variable8
,COLOR_abstract_collection___SimpleCollection___add
))(variable8
, variable2
/*recv*/) /*AbstractArray::add*/;
7356 ((array___AbstractArray___add_t
)CALL(variable8
,COLOR_abstract_collection___SimpleCollection___add
))(variable8
, variable7
/*e*/) /*AbstractArray::add*/;
7357 ((compiling_methods___MMMethod___compile_call_t
)CALL( variable3
/*prop2*/,COLOR_compiling_methods___MMMethod___compile_call
))( variable3
/*prop2*/, variable0
/*v*/, variable8
) /*MMMethod::compile_call*/;
7358 continue_305
: while(0);
7359 ((list___ListIterator___next_t
)CALL(variable5
,COLOR_abstract_collection___Iterator___next
))(variable5
) /*ListIterator::next*/;
7361 break_305
: while(0);
7362 variable1
= variable2
/*recv*/;
7363 goto return_label301
;
7364 return_label301
: while(false);
7365 tracehead
= trace
.prev
;
7368 val_t
compiling_methods___ANullExpr___compile_expr(val_t self
, val_t param0
) {
7369 struct trace_t trace
= {NULL
, NULL
, 1121, LOCATE_compiling_methods___ANullExpr___compile_expr
};
7372 trace
.prev
= tracehead
; tracehead
= &trace
;
7373 trace
.file
= LOCATE_compiling_methods
;
7375 variable1
= NEW_string___String___with_native(BOX_NativeString(" NIT_NULL /*null*/"), TAG_Int(18)); /*new String*/
7376 goto return_label306
;
7377 return_label306
: while(false);
7378 tracehead
= trace
.prev
;
7381 val_t
compiling_methods___AArrayExpr___compile_expr(val_t self
, val_t param0
) {
7382 struct trace_t trace
= {NULL
, NULL
, 1128, LOCATE_compiling_methods___AArrayExpr___compile_expr
};
7387 static val_t once_value_variable3_308
; static int once_bool_variable3_308
;
7395 static val_t once_value_variable5_309
; static int once_bool_variable5_309
;
7396 trace
.prev
= tracehead
; tracehead
= &trace
;
7397 trace
.file
= LOCATE_compiling_methods
;
7399 variable2
= ((typing___PExpr___stype_t
)CALL( self
,COLOR_syntax_base___PExpr___stype
))( self
) /*PExpr::stype*/;
7400 variable2
= ((static_type___MMType___local_class_t
)CALL(variable2
,COLOR_static_type___MMType___local_class
))(variable2
) /*MMType::local_class*/;
7401 if (once_bool_variable3_308
) variable3
= once_value_variable3_308
;
7403 variable3
= NEW_string___String___with_native(BOX_NativeString("with_capacity"), TAG_Int(13)); /*new String*/
7404 variable3
= ((symbol___String___to_symbol_t
)CALL(variable3
,COLOR_symbol___String___to_symbol
))(variable3
) /*String::to_symbol*/;
7405 once_value_variable3_308
= variable3
;
7406 once_bool_variable3_308
= true;
7408 variable2
= ((abstractmetamodel___MMLocalClass___select_method_t
)CALL(variable2
,COLOR_abstractmetamodel___MMLocalClass___select_method
))(variable2
, variable3
) /*MMLocalClass::select_method*/;
7409 variable1
= variable2
;
7410 variable3
= NEW_array___Array___with_capacity(TAG_Int(1)); /*new Array[E]*/
7411 variable4
= NEW_string___String___init(); /*new String*/
7412 variable5
= NEW_string___String___with_native(BOX_NativeString("TAG_Int("), TAG_Int(8)); /*new String*/
7413 variable6
= variable5
;
7414 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable6
) /*String::append*/;
7415 variable7
= ((parser_nodes___AArrayExpr___n_exprs_t
)CALL( self
,COLOR_parser_nodes___AArrayExpr___n_exprs
))( self
) /*AArrayExpr::n_exprs*/;
7416 variable7
= ((list___List___length_t
)CALL(variable7
,COLOR_abstract_collection___Collection___length
))(variable7
) /*List::length*/;
7417 variable8
= variable7
;
7418 variable8
= ((string___String___to_s_t
)CALL(variable8
,COLOR_string___Object___to_s
))(variable8
) /*String::to_s*/;
7419 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable8
) /*String::append*/;
7420 variable9
= NEW_string___String___with_native(BOX_NativeString(")"), TAG_Int(1)); /*new String*/
7421 variable10
= variable9
;
7422 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable10
) /*String::append*/;
7423 ((array___AbstractArray___add_t
)CALL(variable3
,COLOR_abstract_collection___SimpleCollection___add
))(variable3
, variable4
) /*AbstractArray::add*/;
7424 variable3
= ((compiling_methods___MMMethod___compile_constructor_call_t
)CALL( variable1
/*prop*/,COLOR_compiling_methods___MMMethod___compile_constructor_call
))( variable1
/*prop*/, variable0
/*v*/, variable3
) /*MMMethod::compile_constructor_call*/;
7425 variable2
= variable3
;
7426 variable4
= ((typing___PExpr___stype_t
)CALL( self
,COLOR_syntax_base___PExpr___stype
))( self
) /*PExpr::stype*/;
7427 variable4
= ((static_type___MMType___local_class_t
)CALL(variable4
,COLOR_static_type___MMType___local_class
))(variable4
) /*MMType::local_class*/;
7428 if (once_bool_variable5_309
) variable5
= once_value_variable5_309
;
7430 variable5
= NEW_string___String___with_native(BOX_NativeString("add"), TAG_Int(3)); /*new String*/
7431 variable5
= ((symbol___String___to_symbol_t
)CALL(variable5
,COLOR_symbol___String___to_symbol
))(variable5
) /*String::to_symbol*/;
7432 once_value_variable5_309
= variable5
;
7433 once_bool_variable5_309
= true;
7435 variable4
= ((abstractmetamodel___MMLocalClass___select_method_t
)CALL(variable4
,COLOR_abstractmetamodel___MMLocalClass___select_method
))(variable4
, variable5
) /*MMLocalClass::select_method*/;
7436 variable3
= variable4
;
7437 variable4
= ((parser_nodes___AArrayExpr___n_exprs_t
)CALL( self
,COLOR_parser_nodes___AArrayExpr___n_exprs
))( self
) /*AArrayExpr::n_exprs*/;
7438 variable4
= ((list___List___iterator_t
)CALL(variable4
,COLOR_abstract_collection___Collection___iterator
))(variable4
) /*List::iterator*/;
7439 while (true) { /*for*/
7440 variable5
= ((list___ListIterator___is_ok_t
)CALL(variable4
,COLOR_abstract_collection___Iterator___is_ok
))(variable4
) /*ListIterator::is_ok*/;
7441 if (!UNTAG_Bool(variable5
)) break; /*for*/
7442 variable5
= ((list___ListIterator___item_t
)CALL(variable4
,COLOR_abstract_collection___Iterator___item
))(variable4
) /*ListIterator::item*/;
7443 variable7
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable5
/*ne*/) /*CompilerVisitor::compile_expr*/;
7444 variable6
= variable7
;
7445 variable7
= NEW_array___Array___with_capacity(TAG_Int(2)); /*new Array[E]*/
7446 ((array___AbstractArray___add_t
)CALL(variable7
,COLOR_abstract_collection___SimpleCollection___add
))(variable7
, variable2
/*recv*/) /*AbstractArray::add*/;
7447 ((array___AbstractArray___add_t
)CALL(variable7
,COLOR_abstract_collection___SimpleCollection___add
))(variable7
, variable6
/*e*/) /*AbstractArray::add*/;
7448 ((compiling_methods___MMMethod___compile_call_t
)CALL( variable3
/*prop2*/,COLOR_compiling_methods___MMMethod___compile_call
))( variable3
/*prop2*/, variable0
/*v*/, variable7
) /*MMMethod::compile_call*/;
7449 continue_310
: while(0);
7450 ((list___ListIterator___next_t
)CALL(variable4
,COLOR_abstract_collection___Iterator___next
))(variable4
) /*ListIterator::next*/;
7452 break_310
: while(0);
7453 variable1
= variable2
/*recv*/;
7454 goto return_label307
;
7455 return_label307
: while(false);
7456 tracehead
= trace
.prev
;
7459 val_t
compiling_methods___ARangeExpr___compile_expr(val_t self
, val_t param0
) {
7460 struct trace_t trace
= {NULL
, NULL
, 1143, LOCATE_compiling_methods___ARangeExpr___compile_expr
};
7466 trace
.prev
= tracehead
; tracehead
= &trace
;
7467 trace
.file
= LOCATE_compiling_methods
;
7469 variable2
= ((typing___PExpr___stype_t
)CALL( self
,COLOR_syntax_base___PExpr___stype
))( self
) /*PExpr::stype*/;
7470 variable2
= ((static_type___MMType___local_class_t
)CALL(variable2
,COLOR_static_type___MMType___local_class
))(variable2
) /*MMType::local_class*/;
7471 variable3
= ((compiling_methods___ARangeExpr___propname_t
)CALL( self
,COLOR_compiling_methods___ARangeExpr___propname
))( self
) /*ARangeExpr::propname*/;
7472 variable2
= ((abstractmetamodel___MMLocalClass___select_method_t
)CALL(variable2
,COLOR_abstractmetamodel___MMLocalClass___select_method
))(variable2
, variable3
) /*MMLocalClass::select_method*/;
7473 variable1
= variable2
;
7474 variable3
= ((parser_nodes___ARangeExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___ARangeExpr___n_expr
))( self
) /*ARangeExpr::n_expr*/;
7475 variable3
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::compile_expr*/;
7476 variable2
= variable3
;
7477 variable4
= ((parser_nodes___ARangeExpr___n_expr2_t
)CALL( self
,COLOR_parser_nodes___ARangeExpr___n_expr2
))( self
) /*ARangeExpr::n_expr2*/;
7478 variable4
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable4
) /*CompilerVisitor::compile_expr*/;
7479 variable3
= variable4
;
7480 variable4
= NEW_array___Array___with_capacity(TAG_Int(2)); /*new Array[E]*/
7481 ((array___AbstractArray___add_t
)CALL(variable4
,COLOR_abstract_collection___SimpleCollection___add
))(variable4
, variable2
/*e*/) /*AbstractArray::add*/;
7482 ((array___AbstractArray___add_t
)CALL(variable4
,COLOR_abstract_collection___SimpleCollection___add
))(variable4
, variable3
/*e2*/) /*AbstractArray::add*/;
7483 variable4
= ((compiling_methods___MMMethod___compile_constructor_call_t
)CALL( variable1
/*prop*/,COLOR_compiling_methods___MMMethod___compile_constructor_call
))( variable1
/*prop*/, variable0
/*v*/, variable4
) /*MMMethod::compile_constructor_call*/;
7484 variable1
= variable4
;
7485 goto return_label311
;
7486 return_label311
: while(false);
7487 tracehead
= trace
.prev
;
7490 val_t
compiling_methods___ARangeExpr___propname(val_t self
) {
7491 struct trace_t trace
= {NULL
, NULL
, 1150, LOCATE_compiling_methods___ARangeExpr___propname
};
7492 trace
.prev
= tracehead
; tracehead
= &trace
;
7493 trace
.file
= LOCATE_compiling_methods
;
7494 fprintf(stderr
, "Deferred method %s called");
7495 fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_compiling_methods___ARangeExpr___compile_expr
, LOCATE_compiling_methods
, 1150);
7497 tracehead
= trace
.prev
;
7500 val_t
compiling_methods___ACrangeExpr___propname(val_t self
) {
7501 struct trace_t trace
= {NULL
, NULL
, 1155, LOCATE_compiling_methods___ACrangeExpr___propname
};
7503 static val_t once_value_variable0_313
; static int once_bool_variable0_313
;
7504 trace
.prev
= tracehead
; tracehead
= &trace
;
7505 trace
.file
= LOCATE_compiling_methods
;
7506 if (once_bool_variable0_313
) variable0
= once_value_variable0_313
;
7508 variable0
= NEW_string___String___with_native(BOX_NativeString("init"), TAG_Int(4)); /*new String*/
7509 variable0
= ((symbol___String___to_symbol_t
)CALL(variable0
,COLOR_symbol___String___to_symbol
))(variable0
) /*String::to_symbol*/;
7510 once_value_variable0_313
= variable0
;
7511 once_bool_variable0_313
= true;
7513 goto return_label312
;
7514 return_label312
: while(false);
7515 tracehead
= trace
.prev
;
7518 val_t
compiling_methods___AOrangeExpr___propname(val_t self
) {
7519 struct trace_t trace
= {NULL
, NULL
, 1158, LOCATE_compiling_methods___AOrangeExpr___propname
};
7521 static val_t once_value_variable0_315
; static int once_bool_variable0_315
;
7522 trace
.prev
= tracehead
; tracehead
= &trace
;
7523 trace
.file
= LOCATE_compiling_methods
;
7524 if (once_bool_variable0_315
) variable0
= once_value_variable0_315
;
7526 variable0
= NEW_string___String___with_native(BOX_NativeString("without_last"), TAG_Int(12)); /*new String*/
7527 variable0
= ((symbol___String___to_symbol_t
)CALL(variable0
,COLOR_symbol___String___to_symbol
))(variable0
) /*String::to_symbol*/;
7528 once_value_variable0_315
= variable0
;
7529 once_bool_variable0_315
= true;
7531 goto return_label314
;
7532 return_label314
: while(false);
7533 tracehead
= trace
.prev
;
7536 void compiling_methods___ASuperExpr___compile_stmt(val_t self
, val_t param0
) {
7537 struct trace_t trace
= {NULL
, NULL
, 1162, LOCATE_compiling_methods___ASuperExpr___compile_stmt
};
7546 trace
.prev
= tracehead
; tracehead
= &trace
;
7547 trace
.file
= LOCATE_compiling_methods
;
7549 variable2
= ((compiling_methods___ASuperExpr___compile_expr_t
)CALL( self
,COLOR_compiling_methods___PExpr___compile_expr
))( self
, variable0
/*v*/) /*ASuperExpr::compile_expr*/;
7550 variable1
= variable2
;
7551 variable2
= TAG_Bool(!UNTAG_Bool(TAG_Bool(( variable1
/*e*/ == NIT_NULL
/*null*/) || (( variable1
/*e*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable1
/*e*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable1
/*e*/, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable1
/*e*/,COLOR_kernel___Object_____eqeq
))( variable1
/*e*/, NIT_NULL
/*null*/) /*Object::==*/)))))));
7552 if (UNTAG_Bool(variable2
)) { /*if*/
7553 variable2
= NEW_string___String___init(); /*new String*/
7554 variable3
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
7555 variable4
= variable3
;
7556 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable4
) /*String::append*/;
7557 variable5
= variable1
/*e*/;
7558 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable5
) /*String::append*/;
7559 variable6
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
7560 variable7
= variable6
;
7561 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable7
) /*String::append*/;
7562 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::add_instr*/;
7564 tracehead
= trace
.prev
;
7567 val_t
compiling_methods___ASuperExpr___compile_expr(val_t self
, val_t param0
) {
7568 struct trace_t trace
= {NULL
, NULL
, 1168, LOCATE_compiling_methods___ASuperExpr___compile_expr
};
7579 trace
.prev
= tracehead
; tracehead
= &trace
;
7580 trace
.file
= LOCATE_compiling_methods
;
7582 variable2
= ((compiling_methods___CompilerVisitor___method_params_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___method_params
))( variable0
/*v*/) /*CompilerVisitor::method_params*/;
7583 variable2
= ((array___AbstractArray___length_t
)CALL(variable2
,COLOR_abstract_collection___Collection___length
))(variable2
) /*AbstractArray::length*/;
7584 variable2
= TAG_Int(UNTAG_Int(variable2
)-UNTAG_Int( TAG_Int(1)));
7585 variable1
= variable2
;
7586 variable2
= ((typing___ASuperExpr___init_in_superclass_t
)CALL( self
,COLOR_typing___ASuperExpr___init_in_superclass
))( self
) /*ASuperExpr::init_in_superclass*/;
7587 variable2
= TAG_Bool(!UNTAG_Bool(TAG_Bool((variable2
== NIT_NULL
/*null*/) || ((variable2
!= NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL(variable2
,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN(variable2
, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL(variable2
,COLOR_kernel___Object_____eqeq
))(variable2
, NIT_NULL
/*null*/) /*Object::==*/)))))));
7588 if (UNTAG_Bool(variable2
)) { /*if*/
7589 variable2
= ((typing___ASuperExpr___init_in_superclass_t
)CALL( self
,COLOR_typing___ASuperExpr___init_in_superclass
))( self
) /*ASuperExpr::init_in_superclass*/;
7590 variable2
= ((static_type___MMLocalProperty___signature_t
)CALL(variable2
,COLOR_static_type___MMLocalProperty___signature
))(variable2
) /*MMLocalProperty::signature*/;
7591 variable2
= ((static_type___MMSignature___arity_t
)CALL(variable2
,COLOR_static_type___MMSignature___arity
))(variable2
) /*MMSignature::arity*/;
7592 variable1
= variable2
/*arity=*/;
7594 variable3
= TAG_Int(UNTAG_Int( variable1
/*arity*/)+UNTAG_Int( TAG_Int(1)));
7595 variable4
= NEW_array___Array___with_capacity(variable3
); /*new Array[E]*/
7596 variable3
= variable4
;
7597 variable2
= variable3
;
7598 variable3
= ((compiling_methods___CompilerVisitor___method_params_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___method_params
))( variable0
/*v*/) /*CompilerVisitor::method_params*/;
7599 variable4
= TAG_Int(0);
7600 variable5
= TAG_Bool(UNTAG_Int( variable4
/*index*/)>=UNTAG_Int( TAG_Int(0)));
7601 variable6
= variable5
;
7602 if (UNTAG_Bool(variable6
)) { /* and */
7603 variable6
= variable3
;
7604 variable6
= ATTR_array___AbstractArray____length(variable6
) /*AbstractArray::_length*/;
7605 variable6
= TAG_Bool(UNTAG_Int( variable4
/*index*/)<UNTAG_Int(variable6
));
7607 variable5
= variable6
;
7608 if (!UNTAG_Bool(variable5
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
7609 variable5
= variable3
;
7610 variable5
= ATTR_array___Array____items(variable5
) /*Array::_items*/;
7611 variable5
= UNBOX_NativeArray(variable5
)[UNTAG_Int( variable4
/*index*/)];
7612 goto return_label318
;
7613 return_label318
: while(false);
7614 variable3
= variable5
;
7615 ((array___AbstractArray___add_t
)CALL( variable2
/*args*/,COLOR_abstract_collection___SimpleCollection___add
))( variable2
/*args*/, variable3
) /*AbstractArray::add*/;
7616 variable3
= ((parser_nodes___ASuperExpr___n_args_t
)CALL( self
,COLOR_parser_nodes___ASuperExpr___n_args
))( self
) /*ASuperExpr::n_args*/;
7617 variable3
= ((list___List___length_t
)CALL(variable3
,COLOR_abstract_collection___Collection___length
))(variable3
) /*List::length*/;
7618 variable3
= TAG_Bool((variable3
)!=( variable1
/*arity*/));
7619 if (UNTAG_Bool(variable3
)) { /*if*/
7620 variable3
= NEW_range___Range___without_last( TAG_Int(0), variable1
/*arity*/); /*new Range[E]*/
7621 variable3
= ((range___Range___iterator_t
)CALL(variable3
,COLOR_abstract_collection___Collection___iterator
))(variable3
) /*Range::iterator*/;
7622 while (true) { /*for*/
7623 variable4
= ((abstract_collection___Iterator___is_ok_t
)CALL(variable3
,COLOR_abstract_collection___Iterator___is_ok
))(variable3
) /*Iterator::is_ok*/;
7624 if (!UNTAG_Bool(variable4
)) break; /*for*/
7625 variable4
= ((abstract_collection___Iterator___item_t
)CALL(variable3
,COLOR_abstract_collection___Iterator___item
))(variable3
) /*Iterator::item*/;
7626 variable5
= ((compiling_methods___CompilerVisitor___method_params_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___method_params
))( variable0
/*v*/) /*CompilerVisitor::method_params*/;
7627 variable6
= TAG_Int(UNTAG_Int( variable4
/*i*/)+UNTAG_Int( TAG_Int(1)));
7628 variable7
= variable6
;
7629 variable8
= TAG_Bool(UNTAG_Int( variable7
/*index*/)>=UNTAG_Int( TAG_Int(0)));
7630 variable9
= variable8
;
7631 if (UNTAG_Bool(variable9
)) { /* and */
7632 variable9
= variable5
;
7633 variable9
= ATTR_array___AbstractArray____length(variable9
) /*AbstractArray::_length*/;
7634 variable9
= TAG_Bool(UNTAG_Int( variable7
/*index*/)<UNTAG_Int(variable9
));
7636 variable8
= variable9
;
7637 if (!UNTAG_Bool(variable8
)) { fprintf(stderr
, "Assert%s failed", " 'index' "); fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 229); nit_exit(1);}
7638 variable8
= variable5
;
7639 variable8
= ATTR_array___Array____items(variable8
) /*Array::_items*/;
7640 variable8
= UNBOX_NativeArray(variable8
)[UNTAG_Int( variable7
/*index*/)];
7641 goto return_label320
;
7642 return_label320
: while(false);
7643 variable5
= variable8
;
7644 ((array___AbstractArray___add_t
)CALL( variable2
/*args*/,COLOR_abstract_collection___SimpleCollection___add
))( variable2
/*args*/, variable5
) /*AbstractArray::add*/;
7645 continue_319
: while(0);
7646 ((abstract_collection___Iterator___next_t
)CALL(variable3
,COLOR_abstract_collection___Iterator___next
))(variable3
) /*Iterator::next*/;
7648 break_319
: while(0);
7650 variable3
= ((parser_nodes___ASuperExpr___n_args_t
)CALL( self
,COLOR_parser_nodes___ASuperExpr___n_args
))( self
) /*ASuperExpr::n_args*/;
7651 variable3
= ((list___List___iterator_t
)CALL(variable3
,COLOR_abstract_collection___Collection___iterator
))(variable3
) /*List::iterator*/;
7652 while (true) { /*for*/
7653 variable4
= ((list___ListIterator___is_ok_t
)CALL(variable3
,COLOR_abstract_collection___Iterator___is_ok
))(variable3
) /*ListIterator::is_ok*/;
7654 if (!UNTAG_Bool(variable4
)) break; /*for*/
7655 variable4
= ((list___ListIterator___item_t
)CALL(variable3
,COLOR_abstract_collection___Iterator___item
))(variable3
) /*ListIterator::item*/;
7656 variable5
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable4
/*na*/) /*CompilerVisitor::compile_expr*/;
7657 ((array___AbstractArray___add_t
)CALL( variable2
/*args*/,COLOR_abstract_collection___SimpleCollection___add
))( variable2
/*args*/, variable5
) /*AbstractArray::add*/;
7658 continue_321
: while(0);
7659 ((list___ListIterator___next_t
)CALL(variable3
,COLOR_abstract_collection___Iterator___next
))(variable3
) /*ListIterator::next*/;
7661 break_321
: while(0);
7663 variable3
= ((typing___ASuperExpr___init_in_superclass_t
)CALL( self
,COLOR_typing___ASuperExpr___init_in_superclass
))( self
) /*ASuperExpr::init_in_superclass*/;
7664 variable3
= TAG_Bool(!UNTAG_Bool(TAG_Bool((variable3
== NIT_NULL
/*null*/) || ((variable3
!= NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL(variable3
,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN(variable3
, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL(variable3
,COLOR_kernel___Object_____eqeq
))(variable3
, NIT_NULL
/*null*/) /*Object::==*/)))))));
7665 if (UNTAG_Bool(variable3
)) { /*if*/
7666 variable3
= ((typing___ASuperExpr___init_in_superclass_t
)CALL( self
,COLOR_typing___ASuperExpr___init_in_superclass
))( self
) /*ASuperExpr::init_in_superclass*/;
7667 variable3
= ((compiling_methods___MMMethod___compile_call_t
)CALL(variable3
,COLOR_compiling_methods___MMMethod___compile_call
))(variable3
, variable0
/*v*/, variable2
/*args*/) /*MMMethod::compile_call*/;
7668 variable1
= variable3
;
7669 goto return_label317
;
7671 variable3
= ((typing___AAbsSendExpr___prop_t
)CALL( self
,COLOR_typing___AAbsSendExpr___prop
))( self
) /*AAbsSendExpr::prop*/;
7672 variable3
= ((abstractmetamodel___MMLocalProperty___global_t
)CALL(variable3
,COLOR_abstractmetamodel___MMLocalProperty___global
))(variable3
) /*MMLocalProperty::global*/;
7673 variable3
= ((abstractmetamodel___MMGlobalProperty___is_init_t
)CALL(variable3
,COLOR_abstractmetamodel___MMGlobalProperty___is_init
))(variable3
) /*MMGlobalProperty::is_init*/;
7674 if (UNTAG_Bool(variable3
)) { /*if*/
7675 variable3
= NEW_string___String___with_native(BOX_NativeString("init_table"), TAG_Int(10)); /*new String*/
7676 ((array___AbstractArray___add_t
)CALL( variable2
/*args*/,COLOR_abstract_collection___SimpleCollection___add
))( variable2
/*args*/, variable3
) /*AbstractArray::add*/;
7678 variable3
= ((typing___AAbsSendExpr___prop_t
)CALL( self
,COLOR_typing___AAbsSendExpr___prop
))( self
) /*AAbsSendExpr::prop*/;
7679 variable3
= ((compiling_methods___MMMethod___compile_super_call_t
)CALL(variable3
,COLOR_compiling_methods___MMMethod___compile_super_call
))(variable3
, variable0
/*v*/, variable2
/*args*/) /*MMMethod::compile_super_call*/;
7680 variable1
= variable3
;
7681 goto return_label317
;
7683 return_label317
: while(false);
7684 tracehead
= trace
.prev
;
7687 val_t
compiling_methods___AAttrExpr___compile_expr(val_t self
, val_t param0
) {
7688 struct trace_t trace
= {NULL
, NULL
, 1196, LOCATE_compiling_methods___AAttrExpr___compile_expr
};
7692 trace
.prev
= tracehead
; tracehead
= &trace
;
7693 trace
.file
= LOCATE_compiling_methods
;
7695 variable2
= ((parser_nodes___AAttrFormExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AAttrFormExpr___n_expr
))( self
) /*AAttrFormExpr::n_expr*/;
7696 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
7697 variable1
= variable2
;
7698 variable2
= ((typing___AAttrFormExpr___prop_t
)CALL( self
,COLOR_typing___AAttrFormExpr___prop
))( self
) /*AAttrFormExpr::prop*/;
7699 variable2
= ((compiling_methods___MMAttribute___compile_access_t
)CALL(variable2
,COLOR_compiling_methods___MMAttribute___compile_access
))(variable2
, variable0
/*v*/, variable1
/*e*/) /*MMAttribute::compile_access*/;
7700 variable1
= variable2
;
7701 goto return_label322
;
7702 return_label322
: while(false);
7703 tracehead
= trace
.prev
;
7706 void compiling_methods___AAttrAssignExpr___compile_stmt(val_t self
, val_t param0
) {
7707 struct trace_t trace
= {NULL
, NULL
, 1204, LOCATE_compiling_methods___AAttrAssignExpr___compile_stmt
};
7712 trace
.prev
= tracehead
; tracehead
= &trace
;
7713 trace
.file
= LOCATE_compiling_methods
;
7715 variable2
= ((parser_nodes___AAttrFormExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AAttrFormExpr___n_expr
))( self
) /*AAttrFormExpr::n_expr*/;
7716 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
7717 variable1
= variable2
;
7718 variable3
= ((parser_nodes___AAssignFormExpr___n_value_t
)CALL( self
,COLOR_parser_nodes___AAssignFormExpr___n_value
))( self
) /*AAssignFormExpr::n_value*/;
7719 variable3
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::compile_expr*/;
7720 variable2
= variable3
;
7721 variable3
= ((typing___AAttrFormExpr___prop_t
)CALL( self
,COLOR_typing___AAttrFormExpr___prop
))( self
) /*AAttrFormExpr::prop*/;
7722 variable3
= ((compiling_methods___MMAttribute___compile_access_t
)CALL(variable3
,COLOR_compiling_methods___MMAttribute___compile_access
))(variable3
, variable0
/*v*/, variable1
/*e*/) /*MMAttribute::compile_access*/;
7723 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable3
, variable2
/*e2*/) /*CompilerVisitor::add_assignment*/;
7724 tracehead
= trace
.prev
;
7727 void compiling_methods___AAttrReassignExpr___compile_stmt(val_t self
, val_t param0
) {
7728 struct trace_t trace
= {NULL
, NULL
, 1212, LOCATE_compiling_methods___AAttrReassignExpr___compile_stmt
};
7736 trace
.prev
= tracehead
; tracehead
= &trace
;
7737 trace
.file
= LOCATE_compiling_methods
;
7739 variable2
= ((parser_nodes___AAttrFormExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AAttrFormExpr___n_expr
))( self
) /*AAttrFormExpr::n_expr*/;
7740 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
7741 variable1
= variable2
;
7742 variable3
= ((typing___AAttrFormExpr___prop_t
)CALL( self
,COLOR_typing___AAttrFormExpr___prop
))( self
) /*AAttrFormExpr::prop*/;
7743 variable3
= ((compiling_methods___MMAttribute___compile_access_t
)CALL(variable3
,COLOR_compiling_methods___MMAttribute___compile_access
))(variable3
, variable0
/*v*/, variable1
/*e1*/) /*MMAttribute::compile_access*/;
7744 variable2
= variable3
;
7745 variable4
= ((parser_nodes___AReassignFormExpr___n_value_t
)CALL( self
,COLOR_parser_nodes___AReassignFormExpr___n_value
))( self
) /*AReassignFormExpr::n_value*/;
7746 variable4
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable4
) /*CompilerVisitor::compile_expr*/;
7747 variable3
= variable4
;
7748 variable5
= ((typing___AReassignFormExpr___assign_method_t
)CALL( self
,COLOR_typing___AReassignFormExpr___assign_method
))( self
) /*AReassignFormExpr::assign_method*/;
7749 variable6
= NEW_array___Array___with_capacity(TAG_Int(2)); /*new Array[E]*/
7750 ((array___AbstractArray___add_t
)CALL(variable6
,COLOR_abstract_collection___SimpleCollection___add
))(variable6
, variable2
/*e2*/) /*AbstractArray::add*/;
7751 ((array___AbstractArray___add_t
)CALL(variable6
,COLOR_abstract_collection___SimpleCollection___add
))(variable6
, variable3
/*e3*/) /*AbstractArray::add*/;
7752 variable5
= ((compiling_methods___MMMethod___compile_call_t
)CALL(variable5
,COLOR_compiling_methods___MMMethod___compile_call
))(variable5
, variable0
/*v*/, variable6
) /*MMMethod::compile_call*/;
7753 variable4
= variable5
;
7754 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable2
/*e2*/, variable4
/*e4*/) /*CompilerVisitor::add_assignment*/;
7755 tracehead
= trace
.prev
;
7758 val_t
compiling_methods___ASendExpr___compile_expr(val_t self
, val_t param0
) {
7759 struct trace_t trace
= {NULL
, NULL
, 1223, LOCATE_compiling_methods___ASendExpr___compile_expr
};
7766 trace
.prev
= tracehead
; tracehead
= &trace
;
7767 trace
.file
= LOCATE_compiling_methods
;
7769 variable2
= ((parser_nodes___ASendExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___ASendExpr___n_expr
))( self
) /*ASendExpr::n_expr*/;
7770 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
7771 variable1
= variable2
;
7772 variable3
= NEW_array___Array___init(); /*new Array[E]*/
7773 variable2
= variable3
;
7774 ((array___AbstractArray___add_t
)CALL( variable2
/*cargs*/,COLOR_abstract_collection___SimpleCollection___add
))( variable2
/*cargs*/, variable1
/*recv*/) /*AbstractArray::add*/;
7775 variable3
= ((typing___AAbsSendExpr___arguments_t
)CALL( self
,COLOR_typing___AAbsSendExpr___arguments
))( self
) /*AAbsSendExpr::arguments*/;
7776 variable3
= ((array___AbstractArray___iterator_t
)CALL(variable3
,COLOR_abstract_collection___Collection___iterator
))(variable3
) /*AbstractArray::iterator*/;
7777 while (true) { /*for*/
7778 variable4
= ((array___ArrayIterator___is_ok_t
)CALL(variable3
,COLOR_abstract_collection___Iterator___is_ok
))(variable3
) /*ArrayIterator::is_ok*/;
7779 if (!UNTAG_Bool(variable4
)) break; /*for*/
7780 variable4
= ((array___ArrayIterator___item_t
)CALL(variable3
,COLOR_abstract_collection___Iterator___item
))(variable3
) /*ArrayIterator::item*/;
7781 variable5
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable4
/*a*/) /*CompilerVisitor::compile_expr*/;
7782 ((array___AbstractArray___add_t
)CALL( variable2
/*cargs*/,COLOR_abstract_collection___SimpleCollection___add
))( variable2
/*cargs*/, variable5
) /*AbstractArray::add*/;
7783 continue_326
: while(0);
7784 ((array___ArrayIterator___next_t
)CALL(variable3
,COLOR_abstract_collection___Iterator___next
))(variable3
) /*ArrayIterator::next*/;
7786 break_326
: while(0);
7787 variable4
= ((typing___AAbsSendExpr___prop_t
)CALL( self
,COLOR_typing___AAbsSendExpr___prop
))( self
) /*AAbsSendExpr::prop*/;
7788 variable4
= ((compiling_methods___MMMethod___compile_call_t
)CALL(variable4
,COLOR_compiling_methods___MMMethod___compile_call
))(variable4
, variable0
/*v*/, variable2
/*cargs*/) /*MMMethod::compile_call*/;
7789 variable3
= variable4
;
7790 variable4
= ((typing___AAbsSendExpr___prop_t
)CALL( self
,COLOR_typing___AAbsSendExpr___prop
))( self
) /*AAbsSendExpr::prop*/;
7791 variable4
= ((abstractmetamodel___MMLocalProperty___global_t
)CALL(variable4
,COLOR_abstractmetamodel___MMLocalProperty___global
))(variable4
) /*MMLocalProperty::global*/;
7792 variable4
= ((abstractmetamodel___MMGlobalProperty___is_init_t
)CALL(variable4
,COLOR_abstractmetamodel___MMGlobalProperty___is_init
))(variable4
) /*MMGlobalProperty::is_init*/;
7793 if (UNTAG_Bool(variable4
)) { /*if*/
7794 variable4
= ((typing___AAbsSendExpr___prop_t
)CALL( self
,COLOR_typing___AAbsSendExpr___prop
))( self
) /*AAbsSendExpr::prop*/;
7795 ((compiling_methods___CompilerVisitor___invoke_super_init_calls_after_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___invoke_super_init_calls_after
))( variable0
/*v*/, variable4
) /*CompilerVisitor::invoke_super_init_calls_after*/;
7797 variable1
= variable3
/*e*/;
7798 goto return_label325
;
7799 return_label325
: while(false);
7800 tracehead
= trace
.prev
;
7803 void compiling_methods___ASendExpr___compile_stmt(val_t self
, val_t param0
) {
7804 struct trace_t trace
= {NULL
, NULL
, 1239, LOCATE_compiling_methods___ASendExpr___compile_stmt
};
7808 trace
.prev
= tracehead
; tracehead
= &trace
;
7809 trace
.file
= LOCATE_compiling_methods
;
7811 variable2
= ((compiling_methods___ASendExpr___compile_expr_t
)CALL( self
,COLOR_compiling_methods___PExpr___compile_expr
))( self
, variable0
/*v*/) /*ASendExpr::compile_expr*/;
7812 variable1
= variable2
;
7813 variable2
= TAG_Bool(!UNTAG_Bool(TAG_Bool(( variable1
/*e*/ == NIT_NULL
/*null*/) || (( variable1
/*e*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable1
/*e*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable1
/*e*/, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable1
/*e*/,COLOR_kernel___Object_____eqeq
))( variable1
/*e*/, NIT_NULL
/*null*/) /*Object::==*/)))))));
7814 if (UNTAG_Bool(variable2
)) { /*if*/
7815 variable2
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
7816 variable2
= ((string___String_____plus_t
)CALL( variable1
/*e*/,COLOR_string___String_____plus
))( variable1
/*e*/, variable2
) /*String::+*/;
7817 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::add_instr*/;
7819 tracehead
= trace
.prev
;
7822 val_t
compiling_methods___ASendReassignExpr___compile_expr(val_t self
, val_t param0
) {
7823 struct trace_t trace
= {NULL
, NULL
, 1249, LOCATE_compiling_methods___ASendReassignExpr___compile_expr
};
7832 trace
.prev
= tracehead
; tracehead
= &trace
;
7833 trace
.file
= LOCATE_compiling_methods
;
7835 variable2
= ((parser_nodes___ASendExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___ASendExpr___n_expr
))( self
) /*ASendExpr::n_expr*/;
7836 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
7837 variable1
= variable2
;
7838 variable3
= NEW_array___Array___init(); /*new Array[E]*/
7839 variable2
= variable3
;
7840 ((array___AbstractArray___add_t
)CALL( variable2
/*cargs*/,COLOR_abstract_collection___SimpleCollection___add
))( variable2
/*cargs*/, variable1
/*recv*/) /*AbstractArray::add*/;
7841 variable3
= ((typing___AAbsSendExpr___arguments_t
)CALL( self
,COLOR_typing___AAbsSendExpr___arguments
))( self
) /*AAbsSendExpr::arguments*/;
7842 variable3
= ((array___AbstractArray___iterator_t
)CALL(variable3
,COLOR_abstract_collection___Collection___iterator
))(variable3
) /*AbstractArray::iterator*/;
7843 while (true) { /*for*/
7844 variable4
= ((array___ArrayIterator___is_ok_t
)CALL(variable3
,COLOR_abstract_collection___Iterator___is_ok
))(variable3
) /*ArrayIterator::is_ok*/;
7845 if (!UNTAG_Bool(variable4
)) break; /*for*/
7846 variable4
= ((array___ArrayIterator___item_t
)CALL(variable3
,COLOR_abstract_collection___Iterator___item
))(variable3
) /*ArrayIterator::item*/;
7847 variable5
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable4
/*a*/) /*CompilerVisitor::compile_expr*/;
7848 ((array___AbstractArray___add_t
)CALL( variable2
/*cargs*/,COLOR_abstract_collection___SimpleCollection___add
))( variable2
/*cargs*/, variable5
) /*AbstractArray::add*/;
7849 continue_329
: while(0);
7850 ((array___ArrayIterator___next_t
)CALL(variable3
,COLOR_abstract_collection___Iterator___next
))(variable3
) /*ArrayIterator::next*/;
7852 break_329
: while(0);
7853 variable4
= ((typing___ASendReassignExpr___read_prop_t
)CALL( self
,COLOR_typing___ASendReassignExpr___read_prop
))( self
) /*ASendReassignExpr::read_prop*/;
7854 variable4
= ((compiling_methods___MMMethod___compile_call_t
)CALL(variable4
,COLOR_compiling_methods___MMMethod___compile_call
))(variable4
, variable0
/*v*/, variable2
/*cargs*/) /*MMMethod::compile_call*/;
7855 variable3
= variable4
;
7856 variable5
= ((parser_nodes___AReassignFormExpr___n_value_t
)CALL( self
,COLOR_parser_nodes___AReassignFormExpr___n_value
))( self
) /*AReassignFormExpr::n_value*/;
7857 variable5
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable5
) /*CompilerVisitor::compile_expr*/;
7858 variable4
= variable5
;
7859 variable6
= ((typing___AReassignFormExpr___assign_method_t
)CALL( self
,COLOR_typing___AReassignFormExpr___assign_method
))( self
) /*AReassignFormExpr::assign_method*/;
7860 variable7
= NEW_array___Array___with_capacity(TAG_Int(2)); /*new Array[E]*/
7861 ((array___AbstractArray___add_t
)CALL(variable7
,COLOR_abstract_collection___SimpleCollection___add
))(variable7
, variable3
/*e2*/) /*AbstractArray::add*/;
7862 ((array___AbstractArray___add_t
)CALL(variable7
,COLOR_abstract_collection___SimpleCollection___add
))(variable7
, variable4
/*e3*/) /*AbstractArray::add*/;
7863 variable6
= ((compiling_methods___MMMethod___compile_call_t
)CALL(variable6
,COLOR_compiling_methods___MMMethod___compile_call
))(variable6
, variable0
/*v*/, variable7
) /*MMMethod::compile_call*/;
7864 variable5
= variable6
;
7865 ((array___AbstractArray___add_t
)CALL( variable2
/*cargs*/,COLOR_abstract_collection___SimpleCollection___add
))( variable2
/*cargs*/, variable5
/*e4*/) /*AbstractArray::add*/;
7866 variable6
= ((typing___AAbsSendExpr___prop_t
)CALL( self
,COLOR_typing___AAbsSendExpr___prop
))( self
) /*AAbsSendExpr::prop*/;
7867 variable6
= ((compiling_methods___MMMethod___compile_call_t
)CALL(variable6
,COLOR_compiling_methods___MMMethod___compile_call
))(variable6
, variable0
/*v*/, variable2
/*cargs*/) /*MMMethod::compile_call*/;
7868 variable1
= variable6
;
7869 goto return_label328
;
7870 return_label328
: while(false);
7871 tracehead
= trace
.prev
;
7874 val_t
compiling_methods___ANewExpr___compile_expr(val_t self
, val_t param0
) {
7875 struct trace_t trace
= {NULL
, NULL
, 1267, LOCATE_compiling_methods___ANewExpr___compile_expr
};
7881 trace
.prev
= tracehead
; tracehead
= &trace
;
7882 trace
.file
= LOCATE_compiling_methods
;
7884 variable2
= NEW_array___Array___init(); /*new Array[E]*/
7885 variable1
= variable2
;
7886 variable2
= ((typing___AAbsSendExpr___arguments_t
)CALL( self
,COLOR_typing___AAbsSendExpr___arguments
))( self
) /*AAbsSendExpr::arguments*/;
7887 variable2
= ((array___AbstractArray___iterator_t
)CALL(variable2
,COLOR_abstract_collection___Collection___iterator
))(variable2
) /*AbstractArray::iterator*/;
7888 while (true) { /*for*/
7889 variable3
= ((array___ArrayIterator___is_ok_t
)CALL(variable2
,COLOR_abstract_collection___Iterator___is_ok
))(variable2
) /*ArrayIterator::is_ok*/;
7890 if (!UNTAG_Bool(variable3
)) break; /*for*/
7891 variable3
= ((array___ArrayIterator___item_t
)CALL(variable2
,COLOR_abstract_collection___Iterator___item
))(variable2
) /*ArrayIterator::item*/;
7892 variable4
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable3
/*a*/) /*CompilerVisitor::compile_expr*/;
7893 ((array___AbstractArray___add_t
)CALL( variable1
/*cargs*/,COLOR_abstract_collection___SimpleCollection___add
))( variable1
/*cargs*/, variable4
) /*AbstractArray::add*/;
7894 continue_331
: while(0);
7895 ((array___ArrayIterator___next_t
)CALL(variable2
,COLOR_abstract_collection___Iterator___next
))(variable2
) /*ArrayIterator::next*/;
7897 break_331
: while(0);
7898 variable2
= ((typing___AAbsSendExpr___prop_t
)CALL( self
,COLOR_typing___AAbsSendExpr___prop
))( self
) /*AAbsSendExpr::prop*/;
7899 variable2
= ((compiling_methods___MMMethod___compile_constructor_call_t
)CALL(variable2
,COLOR_compiling_methods___MMMethod___compile_constructor_call
))(variable2
, variable0
/*v*/, variable1
/*cargs*/) /*MMMethod::compile_constructor_call*/;
7900 variable1
= variable2
;
7901 goto return_label330
;
7902 return_label330
: while(false);
7903 tracehead
= trace
.prev
;
7906 val_t
compiling_methods___AProxyExpr___compile_expr(val_t self
, val_t param0
) {
7907 struct trace_t trace
= {NULL
, NULL
, 1278, LOCATE_compiling_methods___AProxyExpr___compile_expr
};
7910 trace
.prev
= tracehead
; tracehead
= &trace
;
7911 trace
.file
= LOCATE_compiling_methods
;
7913 variable1
= ((parser_nodes___AProxyExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AProxyExpr___n_expr
))( self
) /*AProxyExpr::n_expr*/;
7914 variable1
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable1
) /*CompilerVisitor::compile_expr*/;
7915 goto return_label332
;
7916 return_label332
: while(false);
7917 tracehead
= trace
.prev
;
7920 val_t
compiling_methods___AOnceExpr___compile_expr(val_t self
, val_t param0
) {
7921 struct trace_t trace
= {NULL
, NULL
, 1285, LOCATE_compiling_methods___AOnceExpr___compile_expr
};
7943 trace
.prev
= tracehead
; tracehead
= &trace
;
7944 trace
.file
= LOCATE_compiling_methods
;
7946 variable2
= ((compiling_base___CompilerVisitor___new_number_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___new_number
))( variable0
/*v*/) /*CompilerVisitor::new_number*/;
7947 variable1
= variable2
;
7948 variable3
= ((compiling_methods___CompilerVisitor___get_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___get_var
))( variable0
/*v*/) /*CompilerVisitor::get_var*/;
7949 variable2
= variable3
;
7950 variable3
= NEW_string___String___init(); /*new String*/
7951 variable4
= NEW_string___String___with_native(BOX_NativeString("static val_t once_value_"), TAG_Int(24)); /*new String*/
7952 variable5
= variable4
;
7953 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable5
) /*String::append*/;
7954 variable6
= variable2
/*cvar*/;
7955 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable6
) /*String::append*/;
7956 variable7
= NEW_string___String___with_native(BOX_NativeString("_"), TAG_Int(1)); /*new String*/
7957 variable8
= variable7
;
7958 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable8
) /*String::append*/;
7959 variable9
= variable1
/*i*/;
7960 variable9
= ((string___String___to_s_t
)CALL(variable9
,COLOR_string___Object___to_s
))(variable9
) /*String::to_s*/;
7961 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable9
) /*String::append*/;
7962 variable10
= NEW_string___String___with_native(BOX_NativeString("; static int once_bool_"), TAG_Int(23)); /*new String*/
7963 variable11
= variable10
;
7964 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable11
) /*String::append*/;
7965 variable12
= variable2
/*cvar*/;
7966 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable12
) /*String::append*/;
7967 variable13
= NEW_string___String___with_native(BOX_NativeString("_"), TAG_Int(1)); /*new String*/
7968 variable14
= variable13
;
7969 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable14
) /*String::append*/;
7970 variable15
= variable1
/*i*/;
7971 variable15
= ((string___String___to_s_t
)CALL(variable15
,COLOR_string___Object___to_s
))(variable15
) /*String::to_s*/;
7972 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable15
) /*String::append*/;
7973 variable16
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
7974 variable17
= variable16
;
7975 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable17
) /*String::append*/;
7976 ((compiling_base___CompilerVisitor___add_decl_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_decl
))( variable0
/*v*/, variable3
) /*CompilerVisitor::add_decl*/;
7977 variable3
= NEW_string___String___init(); /*new String*/
7978 variable4
= NEW_string___String___with_native(BOX_NativeString("if (once_bool_"), TAG_Int(14)); /*new String*/
7979 variable5
= variable4
;
7980 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable5
) /*String::append*/;
7981 variable6
= variable2
/*cvar*/;
7982 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable6
) /*String::append*/;
7983 variable7
= NEW_string___String___with_native(BOX_NativeString("_"), TAG_Int(1)); /*new String*/
7984 variable8
= variable7
;
7985 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable8
) /*String::append*/;
7986 variable9
= variable1
/*i*/;
7987 variable9
= ((string___String___to_s_t
)CALL(variable9
,COLOR_string___Object___to_s
))(variable9
) /*String::to_s*/;
7988 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable9
) /*String::append*/;
7989 variable10
= NEW_string___String___with_native(BOX_NativeString(") "), TAG_Int(2)); /*new String*/
7990 variable11
= variable10
;
7991 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable11
) /*String::append*/;
7992 variable12
= variable2
/*cvar*/;
7993 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable12
) /*String::append*/;
7994 variable13
= NEW_string___String___with_native(BOX_NativeString(" = once_value_"), TAG_Int(14)); /*new String*/
7995 variable14
= variable13
;
7996 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable14
) /*String::append*/;
7997 variable15
= variable2
/*cvar*/;
7998 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable15
) /*String::append*/;
7999 variable16
= NEW_string___String___with_native(BOX_NativeString("_"), TAG_Int(1)); /*new String*/
8000 variable17
= variable16
;
8001 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable17
) /*String::append*/;
8002 variable18
= variable1
/*i*/;
8003 variable18
= ((string___String___to_s_t
)CALL(variable18
,COLOR_string___Object___to_s
))(variable18
) /*String::to_s*/;
8004 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable18
) /*String::append*/;
8005 variable19
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
8006 variable20
= variable19
;
8007 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable20
) /*String::append*/;
8008 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::add_instr*/;
8009 variable3
= NEW_string___String___with_native(BOX_NativeString("else {"), TAG_Int(6)); /*new String*/
8010 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::add_instr*/;
8011 ((compiling_base___CompilerVisitor___indent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___indent
))( variable0
/*v*/) /*CompilerVisitor::indent*/;
8012 ((compiling_methods___CompilerVisitor___free_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___free_var
))( variable0
/*v*/, variable2
/*cvar*/) /*CompilerVisitor::free_var*/;
8013 variable4
= ((parser_nodes___AProxyExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AProxyExpr___n_expr
))( self
) /*AProxyExpr::n_expr*/;
8014 variable4
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable4
) /*CompilerVisitor::compile_expr*/;
8015 variable3
= variable4
;
8016 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable2
/*cvar*/, variable3
/*e*/) /*CompilerVisitor::add_assignment*/;
8017 variable4
= NEW_string___String___init(); /*new String*/
8018 variable5
= NEW_string___String___with_native(BOX_NativeString("once_value_"), TAG_Int(11)); /*new String*/
8019 variable6
= variable5
;
8020 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable6
) /*String::append*/;
8021 variable7
= variable2
/*cvar*/;
8022 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable7
) /*String::append*/;
8023 variable8
= NEW_string___String___with_native(BOX_NativeString("_"), TAG_Int(1)); /*new String*/
8024 variable9
= variable8
;
8025 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable9
) /*String::append*/;
8026 variable10
= variable1
/*i*/;
8027 variable10
= ((string___String___to_s_t
)CALL(variable10
,COLOR_string___Object___to_s
))(variable10
) /*String::to_s*/;
8028 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable10
) /*String::append*/;
8029 variable11
= NEW_string___String___with_native(BOX_NativeString(" = "), TAG_Int(3)); /*new String*/
8030 variable12
= variable11
;
8031 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable12
) /*String::append*/;
8032 variable13
= variable2
/*cvar*/;
8033 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable13
) /*String::append*/;
8034 variable14
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
8035 variable15
= variable14
;
8036 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable15
) /*String::append*/;
8037 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable4
) /*CompilerVisitor::add_instr*/;
8038 variable4
= NEW_string___String___init(); /*new String*/
8039 variable5
= NEW_string___String___with_native(BOX_NativeString("once_bool_"), TAG_Int(10)); /*new String*/
8040 variable6
= variable5
;
8041 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable6
) /*String::append*/;
8042 variable7
= variable2
/*cvar*/;
8043 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable7
) /*String::append*/;
8044 variable8
= NEW_string___String___with_native(BOX_NativeString("_"), TAG_Int(1)); /*new String*/
8045 variable9
= variable8
;
8046 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable9
) /*String::append*/;
8047 variable10
= variable1
/*i*/;
8048 variable10
= ((string___String___to_s_t
)CALL(variable10
,COLOR_string___Object___to_s
))(variable10
) /*String::to_s*/;
8049 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable10
) /*String::append*/;
8050 variable11
= NEW_string___String___with_native(BOX_NativeString(" = true;"), TAG_Int(8)); /*new String*/
8051 variable12
= variable11
;
8052 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable12
) /*String::append*/;
8053 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable4
) /*CompilerVisitor::add_instr*/;
8054 ((compiling_base___CompilerVisitor___unindent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___unindent
))( variable0
/*v*/) /*CompilerVisitor::unindent*/;
8055 variable4
= NEW_string___String___with_native(BOX_NativeString("}"), TAG_Int(1)); /*new String*/
8056 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable4
) /*CompilerVisitor::add_instr*/;
8057 variable1
= variable2
/*cvar*/;
8058 goto return_label333
;
8059 return_label333
: while(false);
8060 tracehead
= trace
.prev
;