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
, LOCATE_compiling_methods
, 24, LOCATE_compiling_methods___CompilerVisitor___compile_stmt
};
8 trace
.prev
= tracehead
; tracehead
= &trace
;
10 ((compiling_methods___PExpr___prepare_compile_stmt_t
)CALL( variable0
/*n*/,COLOR_compiling_methods___PExpr___prepare_compile_stmt
))( variable0
/*n*/, self
) /*PExpr::prepare_compile_stmt*/;
11 variable2
= ATTR_compiling_methods___CompilerVisitor____variable_index( self
) /*CompilerVisitor::_variable_index*/;
12 variable1
= variable2
;
13 ((compiling_methods___PExpr___compile_stmt_t
)CALL( variable0
/*n*/,COLOR_compiling_methods___PExpr___compile_stmt
))( variable0
/*n*/, self
) /*PExpr::compile_stmt*/;
14 ATTR_compiling_methods___CompilerVisitor____variable_index( self
) /*CompilerVisitor::_variable_index*/ = variable1
/*i*/;
15 tracehead
= trace
.prev
;
18 val_t
compiling_methods___CompilerVisitor___compile_expr(val_t self
, val_t param0
) {
19 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 33, LOCATE_compiling_methods___CompilerVisitor___compile_expr
};
25 trace
.prev
= tracehead
; tracehead
= &trace
;
27 variable2
= ATTR_compiling_methods___CompilerVisitor____variable_index( self
) /*CompilerVisitor::_variable_index*/;
28 variable1
= variable2
;
29 variable3
= ((compiling_methods___PExpr___compile_expr_t
)CALL( variable0
/*n*/,COLOR_compiling_methods___PExpr___compile_expr
))( variable0
/*n*/, self
) /*PExpr::compile_expr*/;
30 variable2
= variable3
;
31 ATTR_compiling_methods___CompilerVisitor____variable_index( self
) /*CompilerVisitor::_variable_index*/ = variable1
/*i*/;
32 variable3
= ((string___String_____bra_t
)CALL( variable2
/*s*/,COLOR_abstract_collection___Map_____bra
))( variable2
/*s*/, TAG_Int(0)) /*String::[]*/;
33 variable3
= TAG_Bool((variable3
)==( TAG_Char(' ')));
34 if (UNTAG_Bool(variable3
)) { /*if*/
35 variable1
= variable2
/*s*/;
38 variable3
= ATTR_compiling_methods___CompilerVisitor____variable_index( self
) /*CompilerVisitor::_variable_index*/;
39 variable3
= TAG_Int(UNTAG_Int(variable3
)-UNTAG_Int( TAG_Int(1)));
40 variable3
= ((compiling_methods___CompilerVisitor___variable_t
)CALL( self
,COLOR_compiling_methods___CompilerVisitor___variable
))( self
, variable3
) /*CompilerVisitor::variable*/;
41 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::==*/)));
42 if (UNTAG_Bool(variable3
)) { /*if*/
43 variable1
= variable2
/*s*/;
46 variable4
= ((compiling_methods___CompilerVisitor___get_var_t
)CALL( self
,COLOR_compiling_methods___CompilerVisitor___get_var
))( self
) /*CompilerVisitor::get_var*/;
47 variable3
= variable4
;
48 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( self
,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( self
, variable3
/*v*/, variable2
/*s*/) /*CompilerVisitor::add_assignment*/;
49 variable1
= variable3
/*v*/;
51 return_label1
: while(false);
52 tracehead
= trace
.prev
;
55 val_t
compiling_methods___CompilerVisitor___ensure_var(val_t self
, val_t param0
) {
56 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 50, LOCATE_compiling_methods___CompilerVisitor___ensure_var
};
60 trace
.prev
= tracehead
; tracehead
= &trace
;
62 variable1
= ((string___String___substring_t
)CALL( variable0
/*s*/,COLOR_string___String___substring
))( variable0
/*s*/, TAG_Int(0), TAG_Int(3)) /*String::substring*/;
63 variable2
= NEW_string___String___with_native(BOX_NativeString("variable"), TAG_Int(8)); /*new String*/
64 variable1
= TAG_Bool((variable1
== variable2
) || ((variable1
!= NIT_NULL
) && UNTAG_Bool(((string___String_____eqeq_t
)CALL(variable1
,COLOR_kernel___Object_____eqeq
))(variable1
, variable2
) /*String::==*/)));
65 if (UNTAG_Bool(variable1
)) { /*if*/
66 variable1
= variable0
/*s*/;
69 variable2
= ((compiling_methods___CompilerVisitor___get_var_t
)CALL( self
,COLOR_compiling_methods___CompilerVisitor___get_var
))( self
) /*CompilerVisitor::get_var*/;
70 variable1
= variable2
;
71 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( self
,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( self
, variable1
/*v*/, variable0
/*s*/) /*CompilerVisitor::add_assignment*/;
72 variable1
= variable1
/*v*/;
74 return_label2
: while(false);
75 tracehead
= trace
.prev
;
78 void compiling_methods___CompilerVisitor___add_assignment(val_t self
, val_t param0
, val_t param1
) {
79 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 61, LOCATE_compiling_methods___CompilerVisitor___add_assignment
};
91 trace
.prev
= tracehead
; tracehead
= &trace
;
94 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::==*/)))))));
95 if (UNTAG_Bool(variable2
)) { /*if*/
96 variable2
= NEW_string___String___init(); /*new String*/
97 variable3
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
98 variable4
= variable3
;
99 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable4
) /*String::append*/;
100 variable5
= variable0
/*v*/;
101 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable5
) /*String::append*/;
102 variable6
= NEW_string___String___with_native(BOX_NativeString(" = "), TAG_Int(3)); /*new String*/
103 variable7
= variable6
;
104 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable7
) /*String::append*/;
105 variable8
= variable1
/*s*/;
106 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable8
) /*String::append*/;
107 variable9
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
108 variable10
= variable9
;
109 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable10
) /*String::append*/;
110 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( self
,COLOR_compiling_base___CompilerVisitor___add_instr
))( self
, variable2
) /*CompilerVisitor::add_instr*/;
112 tracehead
= trace
.prev
;
115 val_t
compiling_methods___CompilerVisitor___variable(val_t self
, val_t param0
) {
116 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 69, LOCATE_compiling_methods___CompilerVisitor___variable
};
124 trace
.prev
= tracehead
; tracehead
= &trace
;
126 variable1
= NEW_string___String___init(); /*new String*/
127 variable2
= NEW_string___String___with_native(BOX_NativeString("variable"), TAG_Int(8)); /*new String*/
128 variable3
= variable2
;
129 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable3
) /*String::append*/;
130 variable4
= variable0
/*i*/;
131 variable4
= ((string___String___to_s_t
)CALL(variable4
,COLOR_string___Object___to_s
))(variable4
) /*String::to_s*/;
132 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable4
) /*String::append*/;
133 variable5
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
134 variable6
= variable5
;
135 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable6
) /*String::append*/;
137 return_label4
: while(false);
138 tracehead
= trace
.prev
;
141 val_t
compiling_methods___CompilerVisitor___get_var(val_t self
) {
142 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 81, LOCATE_compiling_methods___CompilerVisitor___get_var
};
150 trace
.prev
= tracehead
; tracehead
= &trace
;
151 variable1
= ATTR_compiling_methods___CompilerVisitor____variable_index( self
) /*CompilerVisitor::_variable_index*/;
152 variable1
= ((compiling_methods___CompilerVisitor___variable_t
)CALL( self
,COLOR_compiling_methods___CompilerVisitor___variable
))( self
, variable1
) /*CompilerVisitor::variable*/;
153 variable0
= variable1
;
154 variable1
= ATTR_compiling_methods___CompilerVisitor____variable_index( self
) /*CompilerVisitor::_variable_index*/;
155 variable1
= TAG_Int(UNTAG_Int(variable1
)+UNTAG_Int( TAG_Int(1)));
156 ATTR_compiling_methods___CompilerVisitor____variable_index( self
) /*CompilerVisitor::_variable_index*/ = variable1
;
157 variable1
= ATTR_compiling_methods___CompilerVisitor____variable_index( self
) /*CompilerVisitor::_variable_index*/;
158 variable2
= ATTR_compiling_methods___CompilerVisitor____variable_index_max( self
) /*CompilerVisitor::_variable_index_max*/;
159 variable1
= TAG_Bool(UNTAG_Int(variable1
)>UNTAG_Int(variable2
));
160 if (UNTAG_Bool(variable1
)) { /*if*/
161 variable1
= NEW_string___String___init(); /*new String*/
162 variable2
= NEW_string___String___with_native(BOX_NativeString("val_t "), TAG_Int(6)); /*new String*/
163 variable3
= variable2
;
164 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable3
) /*String::append*/;
165 variable4
= variable0
/*v*/;
166 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable4
) /*String::append*/;
167 variable5
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
168 variable6
= variable5
;
169 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable6
) /*String::append*/;
170 ((compiling_base___CompilerVisitor___add_decl_t
)CALL( self
,COLOR_compiling_base___CompilerVisitor___add_decl
))( self
, variable1
) /*CompilerVisitor::add_decl*/;
171 variable1
= ATTR_compiling_methods___CompilerVisitor____variable_index( self
) /*CompilerVisitor::_variable_index*/;
172 ATTR_compiling_methods___CompilerVisitor____variable_index_max( self
) /*CompilerVisitor::_variable_index_max*/ = variable1
;
174 variable0
= variable0
/*v*/;
176 return_label5
: while(false);
177 tracehead
= trace
.prev
;
180 void compiling_methods___CompilerVisitor___free_var(val_t self
, val_t param0
) {
181 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 93, LOCATE_compiling_methods___CompilerVisitor___free_var
};
184 trace
.prev
= tracehead
; tracehead
= &trace
;
186 variable1
= ATTR_compiling_methods___CompilerVisitor____variable_index( self
) /*CompilerVisitor::_variable_index*/;
187 variable1
= TAG_Int(UNTAG_Int(variable1
)-UNTAG_Int( TAG_Int(1)));
188 variable1
= ((compiling_methods___CompilerVisitor___variable_t
)CALL( self
,COLOR_compiling_methods___CompilerVisitor___variable
))( self
, variable1
) /*CompilerVisitor::variable*/;
189 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::==*/)));
190 if (UNTAG_Bool(variable1
)) { /*if*/
191 variable1
= ATTR_compiling_methods___CompilerVisitor____variable_index( self
) /*CompilerVisitor::_variable_index*/;
192 variable1
= TAG_Int(UNTAG_Int(variable1
)-UNTAG_Int( TAG_Int(1)));
193 ATTR_compiling_methods___CompilerVisitor____variable_index( self
) /*CompilerVisitor::_variable_index*/ = variable1
;
195 tracehead
= trace
.prev
;
198 void compiling_methods___CompilerVisitor___clear(val_t self
) {
199 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 102, LOCATE_compiling_methods___CompilerVisitor___clear
};
200 trace
.prev
= tracehead
; tracehead
= &trace
;
201 ATTR_compiling_methods___CompilerVisitor____has_return( self
) /*CompilerVisitor::_has_return*/ = TAG_Bool(false);
202 ((compiling_base___CompilerVisitor___indent_level__eq_t
)CALL( self
,COLOR_compiling_base___CompilerVisitor___indent_level__eq
))( self
, TAG_Int(0)) /*CompilerVisitor::indent_level=*/;
203 ATTR_compiling_methods___CompilerVisitor____variable_index( self
) /*CompilerVisitor::_variable_index*/ = TAG_Int(0);
204 ATTR_compiling_methods___CompilerVisitor____variable_index_max( self
) /*CompilerVisitor::_variable_index_max*/ = TAG_Int(0);
205 tracehead
= trace
.prev
;
208 val_t
compiling_methods___CompilerVisitor___varnames(val_t self
) {
209 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 111, LOCATE_compiling_methods___CompilerVisitor___varnames
};
210 trace
.prev
= tracehead
; tracehead
= &trace
;
211 tracehead
= trace
.prev
;
212 return ATTR_compiling_methods___CompilerVisitor____varnames( self
) /*CompilerVisitor::_varnames*/;
214 val_t
compiling_methods___CompilerVisitor___has_return(val_t self
) {
215 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 114, LOCATE_compiling_methods___CompilerVisitor___has_return
};
216 trace
.prev
= tracehead
; tracehead
= &trace
;
217 tracehead
= trace
.prev
;
218 return ATTR_compiling_methods___CompilerVisitor____has_return( self
) /*CompilerVisitor::_has_return*/;
220 void compiling_methods___CompilerVisitor___has_return__eq(val_t self
, val_t param0
) {
221 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 114, LOCATE_compiling_methods___CompilerVisitor___has_return__eq
};
222 trace
.prev
= tracehead
; tracehead
= &trace
;
223 ATTR_compiling_methods___CompilerVisitor____has_return( self
) /*CompilerVisitor::_has_return*/ = param0
;
224 tracehead
= trace
.prev
;
227 val_t
compiling_methods___CompilerVisitor___method_params(val_t self
) {
228 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 117, LOCATE_compiling_methods___CompilerVisitor___method_params
};
229 trace
.prev
= tracehead
; tracehead
= &trace
;
230 tracehead
= trace
.prev
;
231 return ATTR_compiling_methods___CompilerVisitor____method_params( self
) /*CompilerVisitor::_method_params*/;
233 void compiling_methods___CompilerVisitor___method_params__eq(val_t self
, val_t param0
) {
234 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 117, LOCATE_compiling_methods___CompilerVisitor___method_params__eq
};
235 trace
.prev
= tracehead
; tracehead
= &trace
;
236 ATTR_compiling_methods___CompilerVisitor____method_params( self
) /*CompilerVisitor::_method_params*/ = param0
;
237 tracehead
= trace
.prev
;
240 val_t
compiling_methods___CompilerVisitor___method(val_t self
) {
241 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 120, LOCATE_compiling_methods___CompilerVisitor___method
};
242 trace
.prev
= tracehead
; tracehead
= &trace
;
243 tracehead
= trace
.prev
;
244 return ATTR_compiling_methods___CompilerVisitor____method( self
) /*CompilerVisitor::_method*/;
246 void compiling_methods___CompilerVisitor___method__eq(val_t self
, val_t param0
) {
247 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 120, LOCATE_compiling_methods___CompilerVisitor___method__eq
};
248 trace
.prev
= tracehead
; tracehead
= &trace
;
249 ATTR_compiling_methods___CompilerVisitor____method( self
) /*CompilerVisitor::_method*/ = param0
;
250 tracehead
= trace
.prev
;
253 val_t
compiling_methods___CompilerVisitor___return_label(val_t self
) {
254 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 123, LOCATE_compiling_methods___CompilerVisitor___return_label
};
255 trace
.prev
= tracehead
; tracehead
= &trace
;
256 tracehead
= trace
.prev
;
257 return ATTR_compiling_methods___CompilerVisitor____return_label( self
) /*CompilerVisitor::_return_label*/;
259 void compiling_methods___CompilerVisitor___return_label__eq(val_t self
, val_t param0
) {
260 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 123, LOCATE_compiling_methods___CompilerVisitor___return_label__eq
};
261 trace
.prev
= tracehead
; tracehead
= &trace
;
262 ATTR_compiling_methods___CompilerVisitor____return_label( self
) /*CompilerVisitor::_return_label*/ = param0
;
263 tracehead
= trace
.prev
;
266 val_t
compiling_methods___CompilerVisitor___break_label(val_t self
) {
267 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 126, LOCATE_compiling_methods___CompilerVisitor___break_label
};
268 trace
.prev
= tracehead
; tracehead
= &trace
;
269 tracehead
= trace
.prev
;
270 return ATTR_compiling_methods___CompilerVisitor____break_label( self
) /*CompilerVisitor::_break_label*/;
272 void compiling_methods___CompilerVisitor___break_label__eq(val_t self
, val_t param0
) {
273 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 126, LOCATE_compiling_methods___CompilerVisitor___break_label__eq
};
274 trace
.prev
= tracehead
; tracehead
= &trace
;
275 ATTR_compiling_methods___CompilerVisitor____break_label( self
) /*CompilerVisitor::_break_label*/ = param0
;
276 tracehead
= trace
.prev
;
279 val_t
compiling_methods___CompilerVisitor___continue_label(val_t self
) {
280 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 129, LOCATE_compiling_methods___CompilerVisitor___continue_label
};
281 trace
.prev
= tracehead
; tracehead
= &trace
;
282 tracehead
= trace
.prev
;
283 return ATTR_compiling_methods___CompilerVisitor____continue_label( self
) /*CompilerVisitor::_continue_label*/;
285 void compiling_methods___CompilerVisitor___continue_label__eq(val_t self
, val_t param0
) {
286 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 129, LOCATE_compiling_methods___CompilerVisitor___continue_label__eq
};
287 trace
.prev
= tracehead
; tracehead
= &trace
;
288 ATTR_compiling_methods___CompilerVisitor____continue_label( self
) /*CompilerVisitor::_continue_label*/ = param0
;
289 tracehead
= trace
.prev
;
292 val_t
compiling_methods___CompilerVisitor___return_value(val_t self
) {
293 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 132, LOCATE_compiling_methods___CompilerVisitor___return_value
};
294 trace
.prev
= tracehead
; tracehead
= &trace
;
295 tracehead
= trace
.prev
;
296 return ATTR_compiling_methods___CompilerVisitor____return_value( self
) /*CompilerVisitor::_return_value*/;
298 void compiling_methods___CompilerVisitor___return_value__eq(val_t self
, val_t param0
) {
299 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 132, LOCATE_compiling_methods___CompilerVisitor___return_value__eq
};
300 trace
.prev
= tracehead
; tracehead
= &trace
;
301 ATTR_compiling_methods___CompilerVisitor____return_value( self
) /*CompilerVisitor::_return_value*/ = param0
;
302 tracehead
= trace
.prev
;
305 val_t
compiling_methods___CompilerVisitor___printf_locate_error(val_t self
, val_t param0
) {
306 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 135, LOCATE_compiling_methods___CompilerVisitor___printf_locate_error
};
320 trace
.prev
= tracehead
; tracehead
= &trace
;
322 variable2
= NEW_string___String___with_native(BOX_NativeString("fprintf(stderr, \""), TAG_Int(17)); /*new String*/
323 variable1
= variable2
;
324 variable2
= ((compiling_methods___CompilerVisitor___method_t
)CALL( self
,COLOR_compiling_methods___CompilerVisitor___method
))( self
) /*CompilerVisitor::method*/;
325 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::==*/)))))));
326 if (UNTAG_Bool(variable2
)) { /*if*/
327 variable2
= NEW_string___String___with_native(BOX_NativeString(" in %s"), TAG_Int(6)); /*new String*/
328 ((string___String___append_t
)CALL( variable1
/*s*/,COLOR_abstract_collection___IndexedCollection___append
))( variable1
/*s*/, variable2
) /*String::append*/;
330 variable2
= NEW_string___String___with_native(BOX_NativeString(" (%s:%d)\\n\", "), TAG_Int(13)); /*new String*/
331 ((string___String___append_t
)CALL( variable1
/*s*/,COLOR_abstract_collection___IndexedCollection___append
))( variable1
/*s*/, variable2
) /*String::append*/;
332 variable2
= ((compiling_methods___CompilerVisitor___method_t
)CALL( self
,COLOR_compiling_methods___CompilerVisitor___method
))( self
) /*CompilerVisitor::method*/;
333 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::==*/)))))));
334 if (UNTAG_Bool(variable2
)) { /*if*/
335 variable2
= NEW_string___String___init(); /*new String*/
336 variable3
= NEW_string___String___with_native(BOX_NativeString("LOCATE_"), TAG_Int(7)); /*new String*/
337 variable4
= variable3
;
338 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable4
) /*String::append*/;
339 variable5
= ((compiling_methods___CompilerVisitor___method_t
)CALL( self
,COLOR_compiling_methods___CompilerVisitor___method
))( self
) /*CompilerVisitor::method*/;
340 variable5
= ((compiling_base___MMLocalProperty___cname_t
)CALL(variable5
,COLOR_compiling_base___MMLocalProperty___cname
))(variable5
) /*MMLocalProperty::cname*/;
341 variable6
= variable5
;
342 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable6
) /*String::append*/;
343 variable7
= NEW_string___String___with_native(BOX_NativeString(", "), TAG_Int(2)); /*new String*/
344 variable8
= variable7
;
345 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable8
) /*String::append*/;
346 ((string___String___append_t
)CALL( variable1
/*s*/,COLOR_abstract_collection___IndexedCollection___append
))( variable1
/*s*/, variable2
) /*String::append*/;
348 variable2
= NEW_string___String___init(); /*new String*/
349 variable3
= NEW_string___String___with_native(BOX_NativeString("LOCATE_"), TAG_Int(7)); /*new String*/
350 variable4
= variable3
;
351 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable4
) /*String::append*/;
352 variable5
= ((compiling_base___CompilerVisitor___module_t
)CALL( self
,COLOR_compiling_base___CompilerVisitor___module
))( self
) /*CompilerVisitor::module*/;
353 variable5
= ((abstractmetamodel___MMModule___name_t
)CALL(variable5
,COLOR_abstractmetamodel___MMModule___name
))(variable5
) /*MMModule::name*/;
354 variable6
= variable5
;
355 variable6
= ((string___String___to_s_t
)CALL(variable6
,COLOR_string___Object___to_s
))(variable6
) /*String::to_s*/;
356 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable6
) /*String::append*/;
357 variable7
= NEW_string___String___with_native(BOX_NativeString(", "), TAG_Int(2)); /*new String*/
358 variable8
= variable7
;
359 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable8
) /*String::append*/;
360 variable9
= ((parser_prod___PNode___line_number_t
)CALL( variable0
/*node*/,COLOR_parser_prod___PNode___line_number
))( variable0
/*node*/) /*PNode::line_number*/;
361 variable10
= variable9
;
362 variable10
= ((string___String___to_s_t
)CALL(variable10
,COLOR_string___Object___to_s
))(variable10
) /*String::to_s*/;
363 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable10
) /*String::append*/;
364 variable11
= NEW_string___String___with_native(BOX_NativeString(");"), TAG_Int(2)); /*new String*/
365 variable12
= variable11
;
366 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable12
) /*String::append*/;
367 ((string___String___append_t
)CALL( variable1
/*s*/,COLOR_abstract_collection___IndexedCollection___append
))( variable1
/*s*/, variable2
) /*String::append*/;
368 variable1
= variable1
/*s*/;
370 return_label8
: while(false);
371 tracehead
= trace
.prev
;
374 void compiling_methods___CompilerVisitor___init(val_t self
, val_t param0
, int* init_table
) {
375 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 146, LOCATE_compiling_methods___CompilerVisitor___init
};
377 trace
.prev
= tracehead
; tracehead
= &trace
;
379 if (init_table
[VAL2OBJ( self
)->vft
[INIT_TABLE_POS_CompilerVisitor
].i
]) return;
380 ((compiling_methods___CompilerVisitor___init_t
)CALL( self
,COLOR_SUPER_compiling_methods___CompilerVisitor___init
))( self
, param0
, init_table
) /*super CompilerVisitor::init*/;
381 ((compiling_methods___CompilerVisitor___clear_t
)CALL( self
,COLOR_compiling_methods___CompilerVisitor___clear
))( self
) /*CompilerVisitor::clear*/;
382 init_table
[VAL2OBJ( self
)->vft
[INIT_TABLE_POS_CompilerVisitor
].i
] = 1;
383 tracehead
= trace
.prev
;
386 void compiling_methods___CompilerVisitor___invoke_super_init_calls_after(val_t self
, val_t param0
) {
387 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 152, LOCATE_compiling_methods___CompilerVisitor___invoke_super_init_calls_after
};
401 trace
.prev
= tracehead
; tracehead
= &trace
;
403 variable2
= ((compiling_methods___CompilerVisitor___method_t
)CALL( self
,COLOR_compiling_methods___CompilerVisitor___method
))( self
) /*CompilerVisitor::method*/;
404 variable2
= ((syntax_base___MMLocalProperty___node_t
)CALL(variable2
,COLOR_syntax_base___MMLocalProperty___node
))(variable2
) /*MMLocalProperty::node*/;
405 variable1
= variable2
;
406 variable2
= TAG_Bool(( variable1
/*n*/==NIT_NULL
) || VAL_ISA( variable1
/*n*/, COLOR_AConcreteInitPropdef
, ID_AConcreteInitPropdef
)) /*cast AConcreteInitPropdef*/;
407 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);}
408 variable2
= ((typing___AConcreteInitPropdef___super_init_calls_t
)CALL( variable1
/*n*/,COLOR_typing___AConcreteInitPropdef___super_init_calls
))( variable1
/*n*/) /*AConcreteInitPropdef::super_init_calls*/;
409 variable2
= ((array___AbstractArray___is_empty_t
)CALL(variable2
,COLOR_abstract_collection___Collection___is_empty
))(variable2
) /*AbstractArray::is_empty*/;
410 if (UNTAG_Bool(variable2
)) { /*if*/
413 variable2
= TAG_Int(0);
414 variable3
= TAG_Int(0);
415 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::==*/)))))));
416 if (UNTAG_Bool(variable4
)) { /*if*/
417 while (true) { /*while*/
418 variable4
= ((typing___AConcreteInitPropdef___super_init_calls_t
)CALL( variable1
/*n*/,COLOR_typing___AConcreteInitPropdef___super_init_calls
))( variable1
/*n*/) /*AConcreteInitPropdef::super_init_calls*/;
419 variable5
= variable2
/*i*/;
420 variable6
= TAG_Bool(UNTAG_Int( variable5
/*index*/)>=UNTAG_Int( TAG_Int(0)));
421 variable7
= variable6
;
422 if (UNTAG_Bool(variable7
)) { /* and */
423 variable7
= variable4
;
424 variable7
= ATTR_array___AbstractArray____length(variable7
) /*AbstractArray::_length*/;
425 variable7
= TAG_Bool(UNTAG_Int( variable5
/*index*/)<UNTAG_Int(variable7
));
427 variable6
= variable7
;
428 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);}
429 variable6
= variable4
;
430 variable6
= ATTR_array___Array____items(variable6
) /*Array::_items*/;
431 variable6
= UNBOX_NativeArray(variable6
)[UNTAG_Int( variable5
/*index*/)];
433 return_label12
: while(false);
434 variable4
= variable6
;
435 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::==*/)))))));
436 if (!UNTAG_Bool(variable4
)) break; /* while*/
437 variable2
= TAG_Int(UNTAG_Int(variable2
)+UNTAG_Int( TAG_Int(1))) /*i*/;
438 continue_11
: while(0);
441 variable2
= TAG_Int(UNTAG_Int(variable2
)+UNTAG_Int( TAG_Int(1))) /*i*/;
442 while (true) { /*while*/
443 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*/;
444 variable5
= variable3
/*j*/;
445 variable6
= TAG_Bool(UNTAG_Int( variable5
/*index*/)>=UNTAG_Int( TAG_Int(0)));
446 variable7
= variable6
;
447 if (UNTAG_Bool(variable7
)) { /* and */
448 variable7
= variable4
;
449 variable7
= ATTR_array___AbstractArray____length(variable7
) /*AbstractArray::_length*/;
450 variable7
= TAG_Bool(UNTAG_Int( variable5
/*index*/)<UNTAG_Int(variable7
));
452 variable6
= variable7
;
453 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);}
454 variable6
= variable4
;
455 variable6
= ATTR_array___Array____items(variable6
) /*Array::_items*/;
456 variable6
= UNBOX_NativeArray(variable6
)[UNTAG_Int( variable5
/*index*/)];
458 return_label14
: while(false);
459 variable4
= variable6
;
460 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::==*/)))))));
461 if (!UNTAG_Bool(variable4
)) break; /* while*/
462 variable3
= TAG_Int(UNTAG_Int(variable3
)+UNTAG_Int( TAG_Int(1))) /*j*/;
463 continue_13
: while(0);
466 variable3
= TAG_Int(UNTAG_Int(variable3
)+UNTAG_Int( TAG_Int(1))) /*j*/;
468 variable4
= NIT_NULL
/*null*/;
469 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*/;
470 variable5
= ((array___AbstractArray___length_t
)CALL(variable5
,COLOR_abstract_collection___Collection___length
))(variable5
) /*AbstractArray::length*/;
471 variable5
= TAG_Bool(UNTAG_Int( variable3
/*j*/)<UNTAG_Int(variable5
));
472 if (UNTAG_Bool(variable5
)) { /*if*/
473 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*/;
474 variable6
= variable3
/*j*/;
475 variable7
= TAG_Bool(UNTAG_Int( variable6
/*index*/)>=UNTAG_Int( TAG_Int(0)));
476 variable8
= variable7
;
477 if (UNTAG_Bool(variable8
)) { /* and */
478 variable8
= variable5
;
479 variable8
= ATTR_array___AbstractArray____length(variable8
) /*AbstractArray::_length*/;
480 variable8
= TAG_Bool(UNTAG_Int( variable6
/*index*/)<UNTAG_Int(variable8
));
482 variable7
= variable8
;
483 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);}
484 variable7
= variable5
;
485 variable7
= ATTR_array___Array____items(variable7
) /*Array::_items*/;
486 variable7
= UNBOX_NativeArray(variable7
)[UNTAG_Int( variable6
/*index*/)];
488 return_label15
: while(false);
489 variable5
= variable7
;
490 variable4
= variable5
/*stop_prop=*/;
492 variable6
= ((typing___AConcreteInitPropdef___super_init_calls_t
)CALL( variable1
/*n*/,COLOR_typing___AConcreteInitPropdef___super_init_calls
))( variable1
/*n*/) /*AConcreteInitPropdef::super_init_calls*/;
493 variable6
= ((array___AbstractArray___length_t
)CALL(variable6
,COLOR_abstract_collection___Collection___length
))(variable6
) /*AbstractArray::length*/;
494 variable5
= variable6
;
495 while (true) { /*while*/
496 variable6
= TAG_Bool(UNTAG_Int( variable2
/*i*/)<UNTAG_Int( variable5
/*l*/));
497 if (!UNTAG_Bool(variable6
)) break; /* while*/
498 variable7
= ((typing___AConcreteInitPropdef___super_init_calls_t
)CALL( variable1
/*n*/,COLOR_typing___AConcreteInitPropdef___super_init_calls
))( variable1
/*n*/) /*AConcreteInitPropdef::super_init_calls*/;
499 variable8
= variable2
/*i*/;
500 variable9
= TAG_Bool(UNTAG_Int( variable8
/*index*/)>=UNTAG_Int( TAG_Int(0)));
501 variable10
= variable9
;
502 if (UNTAG_Bool(variable10
)) { /* and */
503 variable10
= variable7
;
504 variable10
= ATTR_array___AbstractArray____length(variable10
) /*AbstractArray::_length*/;
505 variable10
= TAG_Bool(UNTAG_Int( variable8
/*index*/)<UNTAG_Int(variable10
));
507 variable9
= variable10
;
508 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);}
509 variable9
= variable7
;
510 variable9
= ATTR_array___Array____items(variable9
) /*Array::_items*/;
511 variable9
= UNBOX_NativeArray(variable9
)[UNTAG_Int( variable8
/*index*/)];
513 return_label17
: while(false);
514 variable7
= variable9
;
515 variable6
= variable7
;
516 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::==*/)))));
517 if (UNTAG_Bool(variable7
)) { /*if*/
520 variable8
= ((compiling_methods___CompilerVisitor___method_params_t
)CALL( self
,COLOR_compiling_methods___CompilerVisitor___method_params
))( self
) /*CompilerVisitor::method_params*/;
521 variable7
= variable8
;
522 variable8
= ((static_type___MMLocalProperty___signature_t
)CALL( variable6
/*p*/,COLOR_static_type___MMLocalProperty___signature
))( variable6
/*p*/) /*MMLocalProperty::signature*/;
523 variable8
= ((static_type___MMSignature___arity_t
)CALL(variable8
,COLOR_static_type___MMSignature___arity
))(variable8
) /*MMSignature::arity*/;
524 variable8
= TAG_Bool((variable8
)==( TAG_Int(0)));
525 if (UNTAG_Bool(variable8
)) { /*if*/
526 variable8
= NEW_array___Array___with_capacity(TAG_Int(1)); /*new Array[E]*/
527 variable9
= ((compiling_methods___CompilerVisitor___method_params_t
)CALL( self
,COLOR_compiling_methods___CompilerVisitor___method_params
))( self
) /*CompilerVisitor::method_params*/;
528 variable10
= TAG_Int(0);
529 variable11
= TAG_Bool(UNTAG_Int( variable10
/*index*/)>=UNTAG_Int( TAG_Int(0)));
530 variable12
= variable11
;
531 if (UNTAG_Bool(variable12
)) { /* and */
532 variable12
= variable9
;
533 variable12
= ATTR_array___AbstractArray____length(variable12
) /*AbstractArray::_length*/;
534 variable12
= TAG_Bool(UNTAG_Int( variable10
/*index*/)<UNTAG_Int(variable12
));
536 variable11
= variable12
;
537 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);}
538 variable11
= variable9
;
539 variable11
= ATTR_array___Array____items(variable11
) /*Array::_items*/;
540 variable11
= UNBOX_NativeArray(variable11
)[UNTAG_Int( variable10
/*index*/)];
542 return_label18
: while(false);
543 variable9
= variable11
;
544 ((array___AbstractArray___add_t
)CALL(variable8
,COLOR_abstract_collection___SimpleCollection___add
))(variable8
, variable9
) /*AbstractArray::add*/;
545 variable7
= variable8
/*cargs=*/;
547 ((compiling_methods___MMMethod___compile_call_t
)CALL( variable6
/*p*/,COLOR_compiling_methods___MMMethod___compile_call
))( variable6
/*p*/, self
, variable7
/*cargs*/) /*MMMethod::compile_call*/;
548 variable2
= TAG_Int(UNTAG_Int(variable2
)+UNTAG_Int( TAG_Int(1))) /*i*/;
549 continue_16
: while(0);
552 return_label10
: while(false);
553 tracehead
= trace
.prev
;
556 val_t
compiling_methods___MMMethod___compile_call(val_t self
, val_t param0
, val_t param1
) {
557 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 204, LOCATE_compiling_methods___MMMethod___compile_call
};
564 static val_t once_value_variable5_20
; static int once_bool_variable5_20
;
566 static val_t once_value_variable6_21
; static int once_bool_variable6_21
;
567 static val_t once_value_variable4_22
; static int once_bool_variable4_22
;
568 static val_t once_value_variable5_23
; static int once_bool_variable5_23
;
587 static val_t once_value_variable8_25
; static int once_bool_variable8_25
;
592 trace
.prev
= tracehead
; tracehead
= &trace
;
596 variable3
= TAG_Bool(( variable2
/*i*/==NIT_NULL
) || VAL_ISA( variable2
/*i*/, COLOR_MMSrcMethod
, ID_MMSrcMethod
)) /*cast MMSrcMethod*/;
597 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);}
598 variable3
= ((syntax_base___MMLocalProperty___node_t
)CALL( variable2
/*i*/,COLOR_syntax_base___MMLocalProperty___node
))( variable2
/*i*/) /*MMLocalProperty::node*/;
599 variable3
= TAG_Bool((variable3
==NIT_NULL
) || VAL_ISA(variable3
, COLOR_AInternMethPropdef
, ID_AInternMethPropdef
)) /*cast AInternMethPropdef*/;
600 variable4
= variable3
;
601 if (!UNTAG_Bool(variable4
)) { /* or */
602 variable4
= ((abstractmetamodel___MMLocalProperty___local_class_t
)CALL( variable2
/*i*/,COLOR_abstractmetamodel___MMLocalProperty___local_class
))( variable2
/*i*/) /*MMLocalProperty::local_class*/;
603 variable4
= ((abstractmetamodel___MMLocalClass___name_t
)CALL(variable4
,COLOR_abstractmetamodel___MMLocalClass___name
))(variable4
) /*MMLocalClass::name*/;
604 if (once_bool_variable5_20
) variable5
= once_value_variable5_20
;
606 variable5
= NEW_string___String___with_native(BOX_NativeString("Array"), TAG_Int(5)); /*new String*/
607 variable5
= ((symbol___String___to_symbol_t
)CALL(variable5
,COLOR_symbol___String___to_symbol
))(variable5
) /*String::to_symbol*/;
608 once_value_variable5_20
= variable5
;
609 once_bool_variable5_20
= true;
611 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::==*/)))));
612 variable5
= variable4
;
613 if (UNTAG_Bool(variable5
)) { /* and */
614 variable5
= ((abstractmetamodel___MMLocalProperty___name_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___name
))( self
) /*MMLocalProperty::name*/;
615 if (once_bool_variable6_21
) variable6
= once_value_variable6_21
;
617 variable6
= NEW_string___String___with_native(BOX_NativeString("[]"), TAG_Int(2)); /*new String*/
618 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
619 once_value_variable6_21
= variable6
;
620 once_bool_variable6_21
= true;
622 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::==*/)))));
624 variable4
= variable5
;
626 variable3
= variable4
;
627 if (UNTAG_Bool(variable3
)) { /*if*/
628 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*/;
629 variable3
= variable4
;
630 variable2
= variable3
/*e*/;
633 if (once_bool_variable4_22
) variable4
= once_value_variable4_22
;
635 variable4
= NEW_string___String___with_native(BOX_NativeString("=="), TAG_Int(2)); /*new String*/
636 variable4
= ((symbol___String___to_symbol_t
)CALL(variable4
,COLOR_symbol___String___to_symbol
))(variable4
) /*String::to_symbol*/;
637 once_value_variable4_22
= variable4
;
638 once_bool_variable4_22
= true;
640 variable3
= variable4
;
641 if (once_bool_variable5_23
) variable5
= once_value_variable5_23
;
643 variable5
= NEW_string___String___with_native(BOX_NativeString("!="), TAG_Int(2)); /*new String*/
644 variable5
= ((symbol___String___to_symbol_t
)CALL(variable5
,COLOR_symbol___String___to_symbol
))(variable5
) /*String::to_symbol*/;
645 once_value_variable5_23
= variable5
;
646 once_bool_variable5_23
= true;
648 variable4
= variable5
;
649 variable5
= ((abstractmetamodel___MMLocalProperty___name_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___name
))( self
) /*MMLocalProperty::name*/;
650 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::==*/)))));
651 if (UNTAG_Bool(variable5
)) { /*if*/
652 variable6
= ((static_type___MMLocalProperty___signature_t
)CALL( self
,COLOR_static_type___MMLocalProperty___signature
))( self
) /*MMLocalProperty::signature*/;
653 variable6
= ((static_type___MMSignature___recv_t
)CALL(variable6
,COLOR_static_type___MMSignature___recv
))(variable6
) /*MMSignature::recv*/;
654 variable6
= ((static_type___MMType___local_class_t
)CALL(variable6
,COLOR_static_type___MMType___local_class
))(variable6
) /*MMType::local_class*/;
655 variable6
= ((abstractmetamodel___MMLocalClass___select_method_t
)CALL(variable6
,COLOR_abstractmetamodel___MMLocalClass___select_method
))(variable6
, variable3
/*ee*/) /*MMLocalClass::select_method*/;
656 variable5
= variable6
;
657 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*/;
658 variable6
= variable7
;
659 variable7
= NEW_string___String___init(); /*new String*/
660 variable8
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(!UNTAG_Bool("), TAG_Int(21)); /*new String*/
661 variable9
= variable8
;
662 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable9
) /*String::append*/;
663 variable10
= variable6
/*eqcall*/;
664 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable10
) /*String::append*/;
665 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
666 variable12
= variable11
;
667 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable12
) /*String::append*/;
668 variable2
= variable7
;
671 variable5
= ((abstractmetamodel___MMLocalProperty___global_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___global
))( self
) /*MMLocalProperty::global*/;
672 variable5
= ((abstractmetamodel___MMGlobalProperty___is_init_t
)CALL(variable5
,COLOR_abstractmetamodel___MMGlobalProperty___is_init
))(variable5
) /*MMGlobalProperty::is_init*/;
673 if (UNTAG_Bool(variable5
)) { /*if*/
674 variable5
= ((array___Collection___to_a_t
)CALL( variable1
/*cargs*/,COLOR_array___Collection___to_a
))( variable1
/*cargs*/) /*Collection::to_a*/;
675 variable1
= variable5
/*cargs=*/;
676 variable5
= NEW_string___String___with_native(BOX_NativeString("init_table /*YYY*/"), TAG_Int(18)); /*new String*/
677 ((array___AbstractArray___add_t
)CALL( variable1
/*cargs*/,COLOR_abstract_collection___SimpleCollection___add
))( variable1
/*cargs*/, variable5
) /*AbstractArray::add*/;
679 variable6
= NEW_string___String___init(); /*new String*/
680 variable7
= NEW_string___String___with_native(BOX_NativeString("(("), TAG_Int(2)); /*new String*/
681 variable8
= variable7
;
682 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
683 variable9
= ((compiling_base___MMLocalProperty___cname_t
)CALL( self
,COLOR_compiling_base___MMLocalProperty___cname
))( self
) /*MMLocalProperty::cname*/;
684 variable10
= variable9
;
685 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
686 variable11
= NEW_string___String___with_native(BOX_NativeString("_t)CALL("), TAG_Int(8)); /*new String*/
687 variable12
= variable11
;
688 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
689 variable13
= TAG_Int(0);
690 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
691 variable15
= variable14
;
692 if (UNTAG_Bool(variable15
)) { /* and */
693 variable15
= ATTR_array___AbstractArray____length( variable1
/*cargs*/) /*AbstractArray::_length*/;
694 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
696 variable14
= variable15
;
697 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);}
698 variable14
= ATTR_array___Array____items( variable1
/*cargs*/) /*Array::_items*/;
699 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
701 return_label24
: while(false);
702 variable13
= variable14
;
703 variable14
= variable13
;
704 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
705 variable15
= NEW_string___String___with_native(BOX_NativeString(","), TAG_Int(1)); /*new String*/
706 variable16
= variable15
;
707 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
708 variable17
= ((abstractmetamodel___MMLocalProperty___global_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___global
))( self
) /*MMLocalProperty::global*/;
709 variable17
= ((compiling_base___MMGlobalProperty___color_id_t
)CALL(variable17
,COLOR_compiling_base___MMGlobalProperty___color_id
))(variable17
) /*MMGlobalProperty::color_id*/;
710 variable18
= variable17
;
711 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable18
) /*String::append*/;
712 variable19
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
713 variable20
= variable19
;
714 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable20
) /*String::append*/;
715 variable5
= variable6
;
716 variable7
= NEW_string___String___init(); /*new String*/
717 variable8
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
718 variable9
= variable8
;
719 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable9
) /*String::append*/;
720 variable10
= variable5
/*m*/;
721 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable10
) /*String::append*/;
722 variable11
= NEW_string___String___with_native(BOX_NativeString("("), TAG_Int(1)); /*new String*/
723 variable12
= variable11
;
724 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable12
) /*String::append*/;
725 variable13
= NEW_string___String___with_native(BOX_NativeString(", "), TAG_Int(2)); /*new String*/
726 variable13
= ((string___Collection___join_t
)CALL( variable1
/*cargs*/,COLOR_string___Collection___join
))( variable1
/*cargs*/, variable13
) /*Collection::join*/;
727 variable14
= variable13
;
728 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable14
) /*String::append*/;
729 variable15
= NEW_string___String___with_native(BOX_NativeString(") /*"), TAG_Int(4)); /*new String*/
730 variable16
= variable15
;
731 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable16
) /*String::append*/;
732 variable17
= ((abstractmetamodel___MMLocalProperty___local_class_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___local_class
))( self
) /*MMLocalProperty::local_class*/;
733 variable18
= variable17
;
734 variable18
= ((string___String___to_s_t
)CALL(variable18
,COLOR_string___Object___to_s
))(variable18
) /*String::to_s*/;
735 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable18
) /*String::append*/;
736 variable19
= NEW_string___String___with_native(BOX_NativeString("::"), TAG_Int(2)); /*new String*/
737 variable20
= variable19
;
738 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable20
) /*String::append*/;
739 variable21
= ((abstractmetamodel___MMLocalProperty___name_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___name
))( self
) /*MMLocalProperty::name*/;
740 variable22
= variable21
;
741 variable22
= ((string___String___to_s_t
)CALL(variable22
,COLOR_string___Object___to_s
))(variable22
) /*String::to_s*/;
742 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable22
) /*String::append*/;
743 variable23
= NEW_string___String___with_native(BOX_NativeString("*/"), TAG_Int(2)); /*new String*/
744 variable24
= variable23
;
745 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable24
) /*String::append*/;
746 variable6
= variable7
;
747 variable7
= ((abstractmetamodel___MMLocalProperty___name_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___name
))( self
) /*MMLocalProperty::name*/;
748 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::==*/)))));
749 if (UNTAG_Bool(variable7
)) { /*if*/
750 variable7
= NEW_string___String___init(); /*new String*/
751 variable8
= NEW_string___String___with_native(BOX_NativeString("UNTAG_Bool("), TAG_Int(11)); /*new String*/
752 variable9
= variable8
;
753 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable9
) /*String::append*/;
754 variable10
= variable6
/*vcall*/;
755 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable10
) /*String::append*/;
756 variable11
= NEW_string___String___with_native(BOX_NativeString(")"), TAG_Int(1)); /*new String*/
757 variable12
= variable11
;
758 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable12
) /*String::append*/;
759 variable6
= variable7
/*vcall=*/;
760 if (once_bool_variable8_25
) variable8
= once_value_variable8_25
;
762 variable8
= NEW_string___String___with_native(BOX_NativeString("Object"), TAG_Int(6)); /*new String*/
763 variable8
= ((symbol___String___to_symbol_t
)CALL(variable8
,COLOR_symbol___String___to_symbol
))(variable8
) /*String::to_symbol*/;
764 once_value_variable8_25
= variable8
;
765 once_bool_variable8_25
= true;
767 variable7
= variable8
;
768 variable8
= ((abstractmetamodel___MMLocalProperty___local_class_t
)CALL( variable2
/*i*/,COLOR_abstractmetamodel___MMLocalProperty___local_class
))( variable2
/*i*/) /*MMLocalProperty::local_class*/;
769 variable8
= ((abstractmetamodel___MMLocalClass___name_t
)CALL(variable8
,COLOR_abstractmetamodel___MMLocalClass___name
))(variable8
) /*MMLocalClass::name*/;
770 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::==*/)))));
771 if (UNTAG_Bool(variable8
)) { /*if*/
772 variable8
= NEW_string___String___init(); /*new String*/
773 variable9
= NEW_string___String___with_native(BOX_NativeString("(("), TAG_Int(2)); /*new String*/
774 variable10
= variable9
;
775 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable10
) /*String::append*/;
776 variable11
= variable5
/*m*/;
777 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable11
) /*String::append*/;
778 variable12
= NEW_string___String___with_native(BOX_NativeString("=="), TAG_Int(2)); /*new String*/
779 variable13
= variable12
;
780 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable13
) /*String::append*/;
781 variable14
= ((compiling_base___MMLocalProperty___cname_t
)CALL( variable2
/*i*/,COLOR_compiling_base___MMLocalProperty___cname
))( variable2
/*i*/) /*MMLocalProperty::cname*/;
782 variable15
= variable14
;
783 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable15
) /*String::append*/;
784 variable16
= NEW_string___String___with_native(BOX_NativeString(")?(IS_EQUAL_NN("), TAG_Int(15)); /*new String*/
785 variable17
= variable16
;
786 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable17
) /*String::append*/;
787 variable18
= TAG_Int(0);
788 variable19
= TAG_Bool(UNTAG_Int( variable18
/*index*/)>=UNTAG_Int( TAG_Int(0)));
789 variable20
= variable19
;
790 if (UNTAG_Bool(variable20
)) { /* and */
791 variable20
= ATTR_array___AbstractArray____length( variable1
/*cargs*/) /*AbstractArray::_length*/;
792 variable20
= TAG_Bool(UNTAG_Int( variable18
/*index*/)<UNTAG_Int(variable20
));
794 variable19
= variable20
;
795 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);}
796 variable19
= ATTR_array___Array____items( variable1
/*cargs*/) /*Array::_items*/;
797 variable19
= UNBOX_NativeArray(variable19
)[UNTAG_Int( variable18
/*index*/)];
799 return_label26
: while(false);
800 variable18
= variable19
;
801 variable19
= variable18
;
802 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable19
) /*String::append*/;
803 variable20
= NEW_string___String___with_native(BOX_NativeString(","), TAG_Int(1)); /*new String*/
804 variable21
= variable20
;
805 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable21
) /*String::append*/;
806 variable22
= TAG_Int(1);
807 variable23
= TAG_Bool(UNTAG_Int( variable22
/*index*/)>=UNTAG_Int( TAG_Int(0)));
808 variable24
= variable23
;
809 if (UNTAG_Bool(variable24
)) { /* and */
810 variable24
= ATTR_array___AbstractArray____length( variable1
/*cargs*/) /*AbstractArray::_length*/;
811 variable24
= TAG_Bool(UNTAG_Int( variable22
/*index*/)<UNTAG_Int(variable24
));
813 variable23
= variable24
;
814 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);}
815 variable23
= ATTR_array___Array____items( variable1
/*cargs*/) /*Array::_items*/;
816 variable23
= UNBOX_NativeArray(variable23
)[UNTAG_Int( variable22
/*index*/)];
818 return_label27
: while(false);
819 variable22
= variable23
;
820 variable23
= variable22
;
821 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable23
) /*String::append*/;
822 variable24
= NEW_string___String___with_native(BOX_NativeString(")):("), TAG_Int(4)); /*new String*/
823 variable25
= variable24
;
824 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable25
) /*String::append*/;
825 variable26
= variable6
/*vcall*/;
826 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable26
) /*String::append*/;
827 variable27
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
828 variable28
= variable27
;
829 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable28
) /*String::append*/;
830 variable6
= variable8
/*vcall=*/;
832 variable8
= NEW_string___String___init(); /*new String*/
833 variable9
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(("), TAG_Int(10)); /*new String*/
834 variable10
= variable9
;
835 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable10
) /*String::append*/;
836 variable11
= ((abstract_collection___IndexedCollection___first_t
)CALL( variable1
/*cargs*/,COLOR_abstract_collection___Collection___first
))( variable1
/*cargs*/) /*IndexedCollection::first*/;
837 variable12
= variable11
;
838 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable12
) /*String::append*/;
839 variable13
= NEW_string___String___with_native(BOX_NativeString(" == "), TAG_Int(4)); /*new String*/
840 variable14
= variable13
;
841 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable14
) /*String::append*/;
842 variable15
= TAG_Int(1);
843 variable16
= TAG_Bool(UNTAG_Int( variable15
/*index*/)>=UNTAG_Int( TAG_Int(0)));
844 variable17
= variable16
;
845 if (UNTAG_Bool(variable17
)) { /* and */
846 variable17
= ATTR_array___AbstractArray____length( variable1
/*cargs*/) /*AbstractArray::_length*/;
847 variable17
= TAG_Bool(UNTAG_Int( variable15
/*index*/)<UNTAG_Int(variable17
));
849 variable16
= variable17
;
850 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);}
851 variable16
= ATTR_array___Array____items( variable1
/*cargs*/) /*Array::_items*/;
852 variable16
= UNBOX_NativeArray(variable16
)[UNTAG_Int( variable15
/*index*/)];
854 return_label28
: while(false);
855 variable15
= variable16
;
856 variable16
= variable15
;
857 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable16
) /*String::append*/;
858 variable17
= NEW_string___String___with_native(BOX_NativeString(") || (("), TAG_Int(7)); /*new String*/
859 variable18
= variable17
;
860 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable18
) /*String::append*/;
861 variable19
= ((abstract_collection___IndexedCollection___first_t
)CALL( variable1
/*cargs*/,COLOR_abstract_collection___Collection___first
))( variable1
/*cargs*/) /*IndexedCollection::first*/;
862 variable20
= variable19
;
863 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable20
) /*String::append*/;
864 variable21
= NEW_string___String___with_native(BOX_NativeString(" != NIT_NULL) && "), TAG_Int(17)); /*new String*/
865 variable22
= variable21
;
866 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable22
) /*String::append*/;
867 variable23
= variable6
/*vcall*/;
868 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable23
) /*String::append*/;
869 variable24
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
870 variable25
= variable24
;
871 ((string___String___append_t
)CALL(variable8
,COLOR_abstract_collection___IndexedCollection___append
))(variable8
, variable25
) /*String::append*/;
872 variable6
= variable8
/*vcall=*/;
874 variable7
= ((static_type___MMLocalProperty___signature_t
)CALL( self
,COLOR_static_type___MMLocalProperty___signature
))( self
) /*MMLocalProperty::signature*/;
875 variable7
= ((static_type___MMSignature___return_type_t
)CALL(variable7
,COLOR_static_type___MMSignature___return_type
))(variable7
) /*MMSignature::return_type*/;
876 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::==*/)))))));
877 if (UNTAG_Bool(variable7
)) { /*if*/
878 variable2
= variable6
/*vcall*/;
881 variable7
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
882 variable7
= ((string___String_____plus_t
)CALL( variable6
/*vcall*/,COLOR_string___String_____plus
))( variable6
/*vcall*/, variable7
) /*String::+*/;
883 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable7
) /*CompilerVisitor::add_instr*/;
884 variable2
= NIT_NULL
/*null*/;
887 return_label19
: while(false);
888 tracehead
= trace
.prev
;
891 val_t
compiling_methods___MMMethod___compile_constructor_call(val_t self
, val_t param0
, val_t param1
) {
892 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 248, LOCATE_compiling_methods___MMMethod___compile_constructor_call
};
914 trace
.prev
= tracehead
; tracehead
= &trace
;
917 variable3
= ((compiling_methods___CompilerVisitor___get_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___get_var
))( variable0
/*v*/) /*CompilerVisitor::get_var*/;
918 variable2
= variable3
;
919 variable4
= ((static_type___MMLocalProperty___signature_t
)CALL( self
,COLOR_static_type___MMLocalProperty___signature
))( self
) /*MMLocalProperty::signature*/;
920 variable4
= ((static_type___MMSignature___recv_t
)CALL(variable4
,COLOR_static_type___MMSignature___recv
))(variable4
) /*MMSignature::recv*/;
921 variable3
= variable4
;
922 variable4
= NEW_string___String___init(); /*new String*/
923 variable5
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
924 variable6
= variable5
;
925 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable6
) /*String::append*/;
926 variable7
= variable2
/*recv*/;
927 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable7
) /*String::append*/;
928 variable8
= NEW_string___String___with_native(BOX_NativeString(" = NEW_"), TAG_Int(7)); /*new String*/
929 variable9
= variable8
;
930 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable9
) /*String::append*/;
931 variable10
= ((abstractmetamodel___MMLocalProperty___global_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___global
))( self
) /*MMLocalProperty::global*/;
932 variable10
= ((abstractmetamodel___MMGlobalProperty___intro_t
)CALL(variable10
,COLOR_abstractmetamodel___MMGlobalProperty___intro
))(variable10
) /*MMGlobalProperty::intro*/;
933 variable10
= ((compiling_base___MMLocalProperty___cname_t
)CALL(variable10
,COLOR_compiling_base___MMLocalProperty___cname
))(variable10
) /*MMLocalProperty::cname*/;
934 variable11
= variable10
;
935 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable11
) /*String::append*/;
936 variable12
= NEW_string___String___with_native(BOX_NativeString("("), TAG_Int(1)); /*new String*/
937 variable13
= variable12
;
938 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable13
) /*String::append*/;
939 variable14
= NEW_string___String___with_native(BOX_NativeString(", "), TAG_Int(2)); /*new String*/
940 variable14
= ((string___Collection___join_t
)CALL( variable1
/*cargs*/,COLOR_string___Collection___join
))( variable1
/*cargs*/, variable14
) /*Collection::join*/;
941 variable15
= variable14
;
942 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable15
) /*String::append*/;
943 variable16
= NEW_string___String___with_native(BOX_NativeString("); /*new "), TAG_Int(9)); /*new String*/
944 variable17
= variable16
;
945 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable17
) /*String::append*/;
946 variable18
= variable3
/*stype*/;
947 variable18
= ((string___String___to_s_t
)CALL(variable18
,COLOR_string___Object___to_s
))(variable18
) /*String::to_s*/;
948 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable18
) /*String::append*/;
949 variable19
= NEW_string___String___with_native(BOX_NativeString("*/"), TAG_Int(2)); /*new String*/
950 variable20
= variable19
;
951 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable20
) /*String::append*/;
952 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable4
) /*CompilerVisitor::add_instr*/;
953 variable2
= variable2
/*recv*/;
955 return_label29
: while(false);
956 tracehead
= trace
.prev
;
959 val_t
compiling_methods___MMMethod___compile_super_call(val_t self
, val_t param0
, val_t param1
) {
960 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 257, LOCATE_compiling_methods___MMMethod___compile_super_call
};
983 trace
.prev
= tracehead
; tracehead
= &trace
;
986 variable3
= NEW_string___String___init(); /*new String*/
987 variable4
= NEW_string___String___with_native(BOX_NativeString("(("), TAG_Int(2)); /*new String*/
988 variable5
= variable4
;
989 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable5
) /*String::append*/;
990 variable6
= ((compiling_base___MMLocalProperty___cname_t
)CALL( self
,COLOR_compiling_base___MMLocalProperty___cname
))( self
) /*MMLocalProperty::cname*/;
991 variable7
= variable6
;
992 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable7
) /*String::append*/;
993 variable8
= NEW_string___String___with_native(BOX_NativeString("_t)CALL("), TAG_Int(8)); /*new String*/
994 variable9
= variable8
;
995 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable9
) /*String::append*/;
996 variable10
= TAG_Int(0);
997 variable11
= TAG_Bool(UNTAG_Int( variable10
/*index*/)>=UNTAG_Int( TAG_Int(0)));
998 variable12
= variable11
;
999 if (UNTAG_Bool(variable12
)) { /* and */
1000 variable12
= ATTR_array___AbstractArray____length( variable1
/*cargs*/) /*AbstractArray::_length*/;
1001 variable12
= TAG_Bool(UNTAG_Int( variable10
/*index*/)<UNTAG_Int(variable12
));
1003 variable11
= variable12
;
1004 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);}
1005 variable11
= ATTR_array___Array____items( variable1
/*cargs*/) /*Array::_items*/;
1006 variable11
= UNBOX_NativeArray(variable11
)[UNTAG_Int( variable10
/*index*/)];
1007 goto return_label31
;
1008 return_label31
: while(false);
1009 variable10
= variable11
;
1010 variable11
= variable10
;
1011 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable11
) /*String::append*/;
1012 variable12
= NEW_string___String___with_native(BOX_NativeString(","), TAG_Int(1)); /*new String*/
1013 variable13
= variable12
;
1014 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable13
) /*String::append*/;
1015 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*/;
1016 variable15
= variable14
;
1017 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable15
) /*String::append*/;
1018 variable16
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
1019 variable17
= variable16
;
1020 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable17
) /*String::append*/;
1021 variable2
= variable3
;
1022 variable4
= NEW_string___String___init(); /*new String*/
1023 variable5
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
1024 variable6
= variable5
;
1025 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable6
) /*String::append*/;
1026 variable7
= variable2
/*m*/;
1027 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable7
) /*String::append*/;
1028 variable8
= NEW_string___String___with_native(BOX_NativeString("("), TAG_Int(1)); /*new String*/
1029 variable9
= variable8
;
1030 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable9
) /*String::append*/;
1031 variable10
= NEW_string___String___with_native(BOX_NativeString(", "), TAG_Int(2)); /*new String*/
1032 variable10
= ((string___Collection___join_t
)CALL( variable1
/*cargs*/,COLOR_string___Collection___join
))( variable1
/*cargs*/, variable10
) /*Collection::join*/;
1033 variable11
= variable10
;
1034 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable11
) /*String::append*/;
1035 variable12
= NEW_string___String___with_native(BOX_NativeString(") /*super "), TAG_Int(10)); /*new String*/
1036 variable13
= variable12
;
1037 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable13
) /*String::append*/;
1038 variable14
= ((abstractmetamodel___MMLocalProperty___local_class_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___local_class
))( self
) /*MMLocalProperty::local_class*/;
1039 variable15
= variable14
;
1040 variable15
= ((string___String___to_s_t
)CALL(variable15
,COLOR_string___Object___to_s
))(variable15
) /*String::to_s*/;
1041 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable15
) /*String::append*/;
1042 variable16
= NEW_string___String___with_native(BOX_NativeString("::"), TAG_Int(2)); /*new String*/
1043 variable17
= variable16
;
1044 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable17
) /*String::append*/;
1045 variable18
= ((abstractmetamodel___MMLocalProperty___name_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___name
))( self
) /*MMLocalProperty::name*/;
1046 variable19
= variable18
;
1047 variable19
= ((string___String___to_s_t
)CALL(variable19
,COLOR_string___Object___to_s
))(variable19
) /*String::to_s*/;
1048 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable19
) /*String::append*/;
1049 variable20
= NEW_string___String___with_native(BOX_NativeString("*/"), TAG_Int(2)); /*new String*/
1050 variable21
= variable20
;
1051 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable21
) /*String::append*/;
1052 variable3
= variable4
;
1053 variable2
= variable3
/*vcall*/;
1054 goto return_label30
;
1055 return_label30
: while(false);
1056 tracehead
= trace
.prev
;
1059 val_t
compiling_methods___MMAttribute___compile_access(val_t self
, val_t param0
, val_t param1
) {
1060 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 267, LOCATE_compiling_methods___MMAttribute___compile_access
};
1081 trace
.prev
= tracehead
; tracehead
= &trace
;
1084 variable2
= NEW_string___String___init(); /*new String*/
1085 variable3
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
1086 variable4
= variable3
;
1087 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable4
) /*String::append*/;
1088 variable5
= ((abstractmetamodel___MMLocalProperty___global_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___global
))( self
) /*MMLocalProperty::global*/;
1089 variable5
= ((compiling_base___MMGlobalProperty___attr_access_t
)CALL(variable5
,COLOR_compiling_base___MMGlobalProperty___attr_access
))(variable5
) /*MMGlobalProperty::attr_access*/;
1090 variable6
= variable5
;
1091 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable6
) /*String::append*/;
1092 variable7
= NEW_string___String___with_native(BOX_NativeString("("), TAG_Int(1)); /*new String*/
1093 variable8
= variable7
;
1094 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable8
) /*String::append*/;
1095 variable9
= variable1
/*recv*/;
1096 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable9
) /*String::append*/;
1097 variable10
= NEW_string___String___with_native(BOX_NativeString(") /*"), TAG_Int(4)); /*new String*/
1098 variable11
= variable10
;
1099 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable11
) /*String::append*/;
1100 variable12
= ((abstractmetamodel___MMLocalProperty___local_class_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___local_class
))( self
) /*MMLocalProperty::local_class*/;
1101 variable13
= variable12
;
1102 variable13
= ((string___String___to_s_t
)CALL(variable13
,COLOR_string___Object___to_s
))(variable13
) /*String::to_s*/;
1103 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable13
) /*String::append*/;
1104 variable14
= NEW_string___String___with_native(BOX_NativeString("::"), TAG_Int(2)); /*new String*/
1105 variable15
= variable14
;
1106 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable15
) /*String::append*/;
1107 variable16
= ((abstractmetamodel___MMLocalProperty___name_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___name
))( self
) /*MMLocalProperty::name*/;
1108 variable17
= variable16
;
1109 variable17
= ((string___String___to_s_t
)CALL(variable17
,COLOR_string___Object___to_s
))(variable17
) /*String::to_s*/;
1110 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable17
) /*String::append*/;
1111 variable18
= NEW_string___String___with_native(BOX_NativeString("*/"), TAG_Int(2)); /*new String*/
1112 variable19
= variable18
;
1113 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable19
) /*String::append*/;
1114 goto return_label32
;
1115 return_label32
: while(false);
1116 tracehead
= trace
.prev
;
1119 void compiling_methods___MMLocalProperty___compile_property_to_c(val_t self
, val_t param0
) {
1120 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 276, LOCATE_compiling_methods___MMLocalProperty___compile_property_to_c
};
1122 trace
.prev
= tracehead
; tracehead
= &trace
;
1124 tracehead
= trace
.prev
;
1127 val_t
compiling_methods___MMSrcMethod___decl_csignature(val_t self
, val_t param0
, val_t param1
) {
1128 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 281, LOCATE_compiling_methods___MMSrcMethod___decl_csignature
};
1149 trace
.prev
= tracehead
; tracehead
= &trace
;
1152 variable3
= NEW_array___Array___init(); /*new Array[E]*/
1153 variable2
= variable3
;
1154 variable3
= NIT_NULL
/*null*/;
1155 variable4
= ((abstractmetamodel___MMLocalProperty___global_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___global
))( self
) /*MMLocalProperty::global*/;
1156 variable4
= ((abstractmetamodel___MMGlobalProperty___is_init_t
)CALL(variable4
,COLOR_abstractmetamodel___MMGlobalProperty___is_init
))(variable4
) /*MMGlobalProperty::is_init*/;
1157 if (UNTAG_Bool(variable4
)) { /*if*/
1158 variable4
= NEW_array___Array___init(); /*new Array[E]*/
1159 variable3
= variable4
/*params_new=*/;
1161 variable4
= NEW_string___String___init(); /*new String*/
1162 variable5
= NEW_string___String___with_native(BOX_NativeString("val_t "), TAG_Int(6)); /*new String*/
1163 variable6
= variable5
;
1164 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable6
) /*String::append*/;
1165 variable7
= TAG_Int(0);
1166 variable8
= TAG_Bool(UNTAG_Int( variable7
/*index*/)>=UNTAG_Int( TAG_Int(0)));
1167 variable9
= variable8
;
1168 if (UNTAG_Bool(variable9
)) { /* and */
1169 variable9
= ATTR_array___AbstractArray____length( variable1
/*args*/) /*AbstractArray::_length*/;
1170 variable9
= TAG_Bool(UNTAG_Int( variable7
/*index*/)<UNTAG_Int(variable9
));
1172 variable8
= variable9
;
1173 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);}
1174 variable8
= ATTR_array___Array____items( variable1
/*args*/) /*Array::_items*/;
1175 variable8
= UNBOX_NativeArray(variable8
)[UNTAG_Int( variable7
/*index*/)];
1176 goto return_label35
;
1177 return_label35
: while(false);
1178 variable7
= variable8
;
1179 variable8
= variable7
;
1180 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable8
) /*String::append*/;
1181 variable9
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
1182 variable10
= variable9
;
1183 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable10
) /*String::append*/;
1184 ((array___AbstractArray___add_t
)CALL( variable2
/*params*/,COLOR_abstract_collection___SimpleCollection___add
))( variable2
/*params*/, variable4
) /*AbstractArray::add*/;
1185 variable4
= ((static_type___MMLocalProperty___signature_t
)CALL( self
,COLOR_static_type___MMLocalProperty___signature
))( self
) /*MMLocalProperty::signature*/;
1186 variable4
= ((static_type___MMSignature___arity_t
)CALL(variable4
,COLOR_static_type___MMSignature___arity
))(variable4
) /*MMSignature::arity*/;
1187 variable5
= NEW_range___Range___without_last( TAG_Int(0), variable4
); /*new Range[E]*/
1188 variable4
= variable5
;
1189 variable4
= ((range___Range___iterator_t
)CALL(variable4
,COLOR_abstract_collection___Collection___iterator
))(variable4
) /*Range::iterator*/;
1190 while (true) { /*for*/
1191 variable5
= ((abstract_collection___Iterator___is_ok_t
)CALL(variable4
,COLOR_abstract_collection___Iterator___is_ok
))(variable4
) /*Iterator::is_ok*/;
1192 if (!UNTAG_Bool(variable5
)) break; /*for*/
1193 variable5
= ((abstract_collection___Iterator___item_t
)CALL(variable4
,COLOR_abstract_collection___Iterator___item
))(variable4
) /*Iterator::item*/;
1194 variable7
= NEW_string___String___init(); /*new String*/
1195 variable8
= NEW_string___String___with_native(BOX_NativeString("val_t "), TAG_Int(6)); /*new String*/
1196 variable9
= variable8
;
1197 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable9
) /*String::append*/;
1198 variable10
= TAG_Int(UNTAG_Int( variable5
/*i*/)+UNTAG_Int( TAG_Int(1)));
1199 variable11
= variable10
;
1200 variable12
= TAG_Bool(UNTAG_Int( variable11
/*index*/)>=UNTAG_Int( TAG_Int(0)));
1201 variable13
= variable12
;
1202 if (UNTAG_Bool(variable13
)) { /* and */
1203 variable13
= ATTR_array___AbstractArray____length( variable1
/*args*/) /*AbstractArray::_length*/;
1204 variable13
= TAG_Bool(UNTAG_Int( variable11
/*index*/)<UNTAG_Int(variable13
));
1206 variable12
= variable13
;
1207 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);}
1208 variable12
= ATTR_array___Array____items( variable1
/*args*/) /*Array::_items*/;
1209 variable12
= UNBOX_NativeArray(variable12
)[UNTAG_Int( variable11
/*index*/)];
1210 goto return_label37
;
1211 return_label37
: while(false);
1212 variable10
= variable12
;
1213 variable11
= variable10
;
1214 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable11
) /*String::append*/;
1215 variable12
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
1216 variable13
= variable12
;
1217 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable13
) /*String::append*/;
1218 variable6
= variable7
;
1219 ((array___AbstractArray___add_t
)CALL( variable2
/*params*/,COLOR_abstract_collection___SimpleCollection___add
))( variable2
/*params*/, variable6
/*p*/) /*AbstractArray::add*/;
1220 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::==*/)))))));
1221 if (UNTAG_Bool(variable7
)) { /*if*/
1222 ((array___AbstractArray___add_t
)CALL( variable3
/*params_new*/,COLOR_abstract_collection___SimpleCollection___add
))( variable3
/*params_new*/, variable6
/*p*/) /*AbstractArray::add*/;
1224 continue_36
: while(0);
1225 ((abstract_collection___Iterator___next_t
)CALL(variable4
,COLOR_abstract_collection___Iterator___next
))(variable4
) /*Iterator::next*/;
1228 variable4
= ((abstractmetamodel___MMLocalProperty___global_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___global
))( self
) /*MMLocalProperty::global*/;
1229 variable4
= ((abstractmetamodel___MMGlobalProperty___is_init_t
)CALL(variable4
,COLOR_abstractmetamodel___MMGlobalProperty___is_init
))(variable4
) /*MMGlobalProperty::is_init*/;
1230 if (UNTAG_Bool(variable4
)) { /*if*/
1231 variable4
= NEW_string___String___with_native(BOX_NativeString("int* init_table"), TAG_Int(15)); /*new String*/
1232 ((array___AbstractArray___add_t
)CALL( variable2
/*params*/,COLOR_abstract_collection___SimpleCollection___add
))( variable2
/*params*/, variable4
) /*AbstractArray::add*/;
1234 variable4
= NIT_NULL
/*decl variable ret*/;
1235 variable5
= ((static_type___MMLocalProperty___signature_t
)CALL( self
,COLOR_static_type___MMLocalProperty___signature
))( self
) /*MMLocalProperty::signature*/;
1236 variable5
= ((static_type___MMSignature___return_type_t
)CALL(variable5
,COLOR_static_type___MMSignature___return_type
))(variable5
) /*MMSignature::return_type*/;
1237 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::==*/)))))));
1238 if (UNTAG_Bool(variable5
)) { /*if*/
1239 variable5
= NEW_string___String___with_native(BOX_NativeString("val_t"), TAG_Int(5)); /*new String*/
1240 variable4
= variable5
/*ret=*/;
1242 variable5
= NEW_string___String___with_native(BOX_NativeString("void"), TAG_Int(4)); /*new String*/
1243 variable4
= variable5
/*ret=*/;
1245 variable6
= NEW_string___String___with_native(BOX_NativeString(", "), TAG_Int(2)); /*new String*/
1246 variable6
= ((string___Collection___join_t
)CALL( variable2
/*params*/,COLOR_string___Collection___join
))( variable2
/*params*/, variable6
) /*Collection::join*/;
1247 variable5
= variable6
;
1248 variable7
= NEW_string___String___init(); /*new String*/
1249 variable8
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
1250 variable9
= variable8
;
1251 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable9
) /*String::append*/;
1252 variable10
= variable4
/*ret*/;
1253 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable10
) /*String::append*/;
1254 variable11
= NEW_string___String___with_native(BOX_NativeString(" "), TAG_Int(1)); /*new String*/
1255 variable12
= variable11
;
1256 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable12
) /*String::append*/;
1257 variable13
= ((compiling_base___MMLocalProperty___cname_t
)CALL( self
,COLOR_compiling_base___MMLocalProperty___cname
))( self
) /*MMLocalProperty::cname*/;
1258 variable14
= variable13
;
1259 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable14
) /*String::append*/;
1260 variable15
= NEW_string___String___with_native(BOX_NativeString("("), TAG_Int(1)); /*new String*/
1261 variable16
= variable15
;
1262 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable16
) /*String::append*/;
1263 variable17
= variable5
/*p*/;
1264 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable17
) /*String::append*/;
1265 variable18
= NEW_string___String___with_native(BOX_NativeString(")"), TAG_Int(1)); /*new String*/
1266 variable19
= variable18
;
1267 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable19
) /*String::append*/;
1268 variable6
= variable7
;
1269 variable7
= NEW_string___String___init(); /*new String*/
1270 variable8
= NEW_string___String___with_native(BOX_NativeString("typedef "), TAG_Int(8)); /*new String*/
1271 variable9
= variable8
;
1272 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable9
) /*String::append*/;
1273 variable10
= variable4
/*ret*/;
1274 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable10
) /*String::append*/;
1275 variable11
= NEW_string___String___with_native(BOX_NativeString(" (* "), TAG_Int(4)); /*new String*/
1276 variable12
= variable11
;
1277 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable12
) /*String::append*/;
1278 variable13
= ((compiling_base___MMLocalProperty___cname_t
)CALL( self
,COLOR_compiling_base___MMLocalProperty___cname
))( self
) /*MMLocalProperty::cname*/;
1279 variable14
= variable13
;
1280 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable14
) /*String::append*/;
1281 variable15
= NEW_string___String___with_native(BOX_NativeString("_t)("), TAG_Int(4)); /*new String*/
1282 variable16
= variable15
;
1283 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable16
) /*String::append*/;
1284 variable17
= variable5
/*p*/;
1285 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable17
) /*String::append*/;
1286 variable18
= NEW_string___String___with_native(BOX_NativeString(");"), TAG_Int(2)); /*new String*/
1287 variable19
= variable18
;
1288 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable19
) /*String::append*/;
1289 ((compiling_base___CompilerVisitor___add_decl_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_decl
))( variable0
/*v*/, variable7
) /*CompilerVisitor::add_decl*/;
1290 variable7
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
1291 variable7
= ((string___String_____plus_t
)CALL( variable6
/*s*/,COLOR_string___String_____plus
))( variable6
/*s*/, variable7
) /*String::+*/;
1292 ((compiling_base___CompilerVisitor___add_decl_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_decl
))( variable0
/*v*/, variable7
) /*CompilerVisitor::add_decl*/;
1293 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::==*/)))))));
1294 if (UNTAG_Bool(variable7
)) { /*if*/
1295 variable7
= NEW_string___String___init(); /*new String*/
1296 variable8
= NEW_string___String___with_native(BOX_NativeString("val_t NEW_"), TAG_Int(10)); /*new String*/
1297 variable9
= variable8
;
1298 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable9
) /*String::append*/;
1299 variable10
= ((compiling_base___MMLocalProperty___cname_t
)CALL( self
,COLOR_compiling_base___MMLocalProperty___cname
))( self
) /*MMLocalProperty::cname*/;
1300 variable11
= variable10
;
1301 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable11
) /*String::append*/;
1302 variable12
= NEW_string___String___with_native(BOX_NativeString("("), TAG_Int(1)); /*new String*/
1303 variable13
= variable12
;
1304 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable13
) /*String::append*/;
1305 variable14
= NEW_string___String___with_native(BOX_NativeString(", "), TAG_Int(2)); /*new String*/
1306 variable14
= ((string___Collection___join_t
)CALL( variable3
/*params_new*/,COLOR_string___Collection___join
))( variable3
/*params_new*/, variable14
) /*Collection::join*/;
1307 variable15
= variable14
;
1308 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable15
) /*String::append*/;
1309 variable16
= NEW_string___String___with_native(BOX_NativeString(");"), TAG_Int(2)); /*new String*/
1310 variable17
= variable16
;
1311 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable17
) /*String::append*/;
1312 ((compiling_base___CompilerVisitor___add_decl_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_decl
))( variable0
/*v*/, variable7
) /*CompilerVisitor::add_decl*/;
1314 variable2
= variable6
/*s*/;
1315 goto return_label34
;
1316 return_label34
: while(false);
1317 tracehead
= trace
.prev
;
1320 void compiling_methods___MMSrcMethod___compile_property_to_c(val_t self
, val_t param0
) {
1321 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 314, LOCATE_compiling_methods___MMSrcMethod___compile_property_to_c
};
1341 trace
.prev
= tracehead
; tracehead
= &trace
;
1343 ((compiling_methods___CompilerVisitor___clear_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___clear
))( variable0
/*v*/) /*CompilerVisitor::clear*/;
1344 variable2
= NEW_array___Array___init(); /*new Array[E]*/
1345 variable1
= variable2
;
1346 variable2
= NEW_string___String___with_native(BOX_NativeString(" self"), TAG_Int(5)); /*new String*/
1347 ((array___AbstractArray___add_t
)CALL( variable1
/*args*/,COLOR_abstract_collection___SimpleCollection___add
))( variable1
/*args*/, variable2
) /*AbstractArray::add*/;
1348 variable2
= ((static_type___MMLocalProperty___signature_t
)CALL( self
,COLOR_static_type___MMLocalProperty___signature
))( self
) /*MMLocalProperty::signature*/;
1349 variable2
= ((static_type___MMSignature___arity_t
)CALL(variable2
,COLOR_static_type___MMSignature___arity
))(variable2
) /*MMSignature::arity*/;
1350 variable3
= NEW_range___Range___without_last( TAG_Int(0), variable2
); /*new Range[E]*/
1351 variable2
= variable3
;
1352 variable2
= ((range___Range___iterator_t
)CALL(variable2
,COLOR_abstract_collection___Collection___iterator
))(variable2
) /*Range::iterator*/;
1353 while (true) { /*for*/
1354 variable3
= ((abstract_collection___Iterator___is_ok_t
)CALL(variable2
,COLOR_abstract_collection___Iterator___is_ok
))(variable2
) /*Iterator::is_ok*/;
1355 if (!UNTAG_Bool(variable3
)) break; /*for*/
1356 variable3
= ((abstract_collection___Iterator___item_t
)CALL(variable2
,COLOR_abstract_collection___Iterator___item
))(variable2
) /*Iterator::item*/;
1357 variable4
= NEW_string___String___init(); /*new String*/
1358 variable5
= NEW_string___String___with_native(BOX_NativeString(" param"), TAG_Int(6)); /*new String*/
1359 variable6
= variable5
;
1360 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable6
) /*String::append*/;
1361 variable7
= variable3
/*i*/;
1362 variable7
= ((string___String___to_s_t
)CALL(variable7
,COLOR_string___Object___to_s
))(variable7
) /*String::to_s*/;
1363 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable7
) /*String::append*/;
1364 variable8
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
1365 variable9
= variable8
;
1366 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable9
) /*String::append*/;
1367 ((array___AbstractArray___add_t
)CALL( variable1
/*args*/,COLOR_abstract_collection___SimpleCollection___add
))( variable1
/*args*/, variable4
) /*AbstractArray::add*/;
1368 continue_39
: while(0);
1369 ((abstract_collection___Iterator___next_t
)CALL(variable2
,COLOR_abstract_collection___Iterator___next
))(variable2
) /*Iterator::next*/;
1372 variable3
= ((compiling_methods___MMSrcMethod___decl_csignature_t
)CALL( self
,COLOR_compiling_methods___MMSrcMethod___decl_csignature
))( self
, variable0
/*v*/, variable1
/*args*/) /*MMSrcMethod::decl_csignature*/;
1373 variable2
= variable3
;
1374 variable3
= NEW_string___String___init(); /*new String*/
1375 variable4
= NEW_string___String___with_native(BOX_NativeString("#define LOCATE_"), TAG_Int(15)); /*new String*/
1376 variable5
= variable4
;
1377 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable5
) /*String::append*/;
1378 variable6
= ((compiling_base___MMLocalProperty___cname_t
)CALL( self
,COLOR_compiling_base___MMLocalProperty___cname
))( self
) /*MMLocalProperty::cname*/;
1379 variable7
= variable6
;
1380 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable7
) /*String::append*/;
1381 variable8
= NEW_string___String___with_native(BOX_NativeString(" \""), TAG_Int(2)); /*new String*/
1382 variable9
= variable8
;
1383 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable9
) /*String::append*/;
1384 variable10
= ((abstractmetamodel___MMLocalProperty___full_name_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___full_name
))( self
) /*MMLocalProperty::full_name*/;
1385 variable11
= variable10
;
1386 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable11
) /*String::append*/;
1387 variable12
= NEW_string___String___with_native(BOX_NativeString("\""), TAG_Int(1)); /*new String*/
1388 variable13
= variable12
;
1389 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable13
) /*String::append*/;
1390 ((compiling_base___CompilerVisitor___add_decl_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_decl
))( variable0
/*v*/, variable3
) /*CompilerVisitor::add_decl*/;
1391 variable3
= NEW_string___String___init(); /*new String*/
1392 variable4
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
1393 variable5
= variable4
;
1394 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable5
) /*String::append*/;
1395 variable6
= variable2
/*cs*/;
1396 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable6
) /*String::append*/;
1397 variable7
= NEW_string___String___with_native(BOX_NativeString(" {"), TAG_Int(2)); /*new String*/
1398 variable8
= variable7
;
1399 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable8
) /*String::append*/;
1400 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::add_instr*/;
1401 ((compiling_base___CompilerVisitor___indent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___indent
))( variable0
/*v*/) /*CompilerVisitor::indent*/;
1402 variable4
= ((compiling_base___CompilerVisitor___ctx_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___ctx
))( variable0
/*v*/) /*CompilerVisitor::ctx*/;
1403 variable3
= variable4
;
1404 variable4
= NEW_compiling_base___CContext___init(); /*new CContext*/
1405 ((compiling_base___CompilerVisitor___ctx__eq_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___ctx__eq
))( variable0
/*v*/, variable4
) /*CompilerVisitor::ctx=*/;
1406 variable4
= NEW_string___String___init(); /*new String*/
1407 variable5
= NEW_string___String___with_native(BOX_NativeString("struct trace_t trace = {NULL, LOCATE_"), TAG_Int(37)); /*new String*/
1408 variable6
= variable5
;
1409 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable6
) /*String::append*/;
1410 variable7
= ((abstractmetamodel___MMLocalProperty___module_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___module
))( self
) /*MMLocalProperty::module*/;
1411 variable7
= ((abstractmetamodel___MMModule___name_t
)CALL(variable7
,COLOR_abstractmetamodel___MMModule___name
))(variable7
) /*MMModule::name*/;
1412 variable8
= variable7
;
1413 variable8
= ((string___String___to_s_t
)CALL(variable8
,COLOR_string___Object___to_s
))(variable8
) /*String::to_s*/;
1414 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable8
) /*String::append*/;
1415 variable9
= NEW_string___String___with_native(BOX_NativeString(", "), TAG_Int(2)); /*new String*/
1416 variable10
= variable9
;
1417 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable10
) /*String::append*/;
1418 variable11
= ((syntax_base___MMLocalProperty___node_t
)CALL( self
,COLOR_syntax_base___MMLocalProperty___node
))( self
) /*MMLocalProperty::node*/;
1419 variable11
= ((parser_prod___PNode___line_number_t
)CALL(variable11
,COLOR_parser_prod___PNode___line_number
))(variable11
) /*PNode::line_number*/;
1420 variable12
= variable11
;
1421 variable12
= ((string___String___to_s_t
)CALL(variable12
,COLOR_string___Object___to_s
))(variable12
) /*String::to_s*/;
1422 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable12
) /*String::append*/;
1423 variable13
= NEW_string___String___with_native(BOX_NativeString(", LOCATE_"), TAG_Int(9)); /*new String*/
1424 variable14
= variable13
;
1425 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable14
) /*String::append*/;
1426 variable15
= ((compiling_base___MMLocalProperty___cname_t
)CALL( self
,COLOR_compiling_base___MMLocalProperty___cname
))( self
) /*MMLocalProperty::cname*/;
1427 variable16
= variable15
;
1428 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable16
) /*String::append*/;
1429 variable17
= NEW_string___String___with_native(BOX_NativeString("};"), TAG_Int(2)); /*new String*/
1430 variable18
= variable17
;
1431 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable18
) /*String::append*/;
1432 ((compiling_base___CompilerVisitor___add_decl_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_decl
))( variable0
/*v*/, variable4
) /*CompilerVisitor::add_decl*/;
1433 variable4
= NEW_string___String___with_native(BOX_NativeString("trace.prev = tracehead; tracehead = &trace;"), TAG_Int(43)); /*new String*/
1434 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable4
) /*CompilerVisitor::add_instr*/;
1435 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*/;
1436 variable4
= variable5
;
1437 variable5
= NEW_string___String___with_native(BOX_NativeString("tracehead = trace.prev;"), TAG_Int(23)); /*new String*/
1438 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable5
) /*CompilerVisitor::add_instr*/;
1439 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::==*/)));
1440 if (UNTAG_Bool(variable5
)) { /*if*/
1441 variable5
= NEW_string___String___with_native(BOX_NativeString("return;"), TAG_Int(7)); /*new String*/
1442 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable5
) /*CompilerVisitor::add_instr*/;
1444 variable5
= NEW_string___String___init(); /*new String*/
1445 variable6
= NEW_string___String___with_native(BOX_NativeString("return "), TAG_Int(7)); /*new String*/
1446 variable7
= variable6
;
1447 ((string___String___append_t
)CALL(variable5
,COLOR_abstract_collection___IndexedCollection___append
))(variable5
, variable7
) /*String::append*/;
1448 variable8
= variable4
/*s*/;
1449 ((string___String___append_t
)CALL(variable5
,COLOR_abstract_collection___IndexedCollection___append
))(variable5
, variable8
) /*String::append*/;
1450 variable9
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
1451 variable10
= variable9
;
1452 ((string___String___append_t
)CALL(variable5
,COLOR_abstract_collection___IndexedCollection___append
))(variable5
, variable10
) /*String::append*/;
1453 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable5
) /*CompilerVisitor::add_instr*/;
1455 variable5
= ((compiling_base___CompilerVisitor___ctx_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___ctx
))( variable0
/*v*/) /*CompilerVisitor::ctx*/;
1456 ((compiling_base___CContext___append_t
)CALL( variable3
/*ctx_old*/,COLOR_compiling_base___CContext___append
))( variable3
/*ctx_old*/, variable5
) /*CContext::append*/;
1457 ((compiling_base___CompilerVisitor___ctx__eq_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___ctx__eq
))( variable0
/*v*/, variable3
/*ctx_old*/) /*CompilerVisitor::ctx=*/;
1458 ((compiling_base___CompilerVisitor___unindent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___unindent
))( variable0
/*v*/) /*CompilerVisitor::unindent*/;
1459 variable5
= NEW_string___String___with_native(BOX_NativeString("}"), TAG_Int(1)); /*new String*/
1460 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable5
) /*CompilerVisitor::add_instr*/;
1461 tracehead
= trace
.prev
;
1464 val_t
compiling_methods___MMSrcMethod___do_compile_inside(val_t self
, val_t param0
, val_t param1
) {
1465 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 346, LOCATE_compiling_methods___MMSrcMethod___do_compile_inside
};
1466 trace
.prev
= tracehead
; tracehead
= &trace
;
1467 fprintf(stderr
, "Deferred method %s called");
1468 fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_compiling_methods___MMSrcMethod___compile_property_to_c
, LOCATE_compiling_methods
, 346);
1470 tracehead
= trace
.prev
;
1473 val_t
compiling_methods___MMReadImplementationMethod___do_compile_inside(val_t self
, val_t param0
, val_t param1
) {
1474 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 351, LOCATE_compiling_methods___MMReadImplementationMethod___do_compile_inside
};
1481 trace
.prev
= tracehead
; tracehead
= &trace
;
1484 variable2
= ((syntax_base___MMAttrImplementationMethod___node_t
)CALL( self
,COLOR_syntax_base___MMLocalProperty___node
))( self
) /*MMAttrImplementationMethod::node*/;
1485 variable2
= ((mmbuilder___AAttrPropdef___prop_t
)CALL(variable2
,COLOR_syntax_base___AAttrPropdef___prop
))(variable2
) /*AAttrPropdef::prop*/;
1486 variable3
= TAG_Int(0);
1487 variable4
= TAG_Bool(UNTAG_Int( variable3
/*index*/)>=UNTAG_Int( TAG_Int(0)));
1488 variable5
= variable4
;
1489 if (UNTAG_Bool(variable5
)) { /* and */
1490 variable5
= ATTR_array___AbstractArray____length( variable1
/*params*/) /*AbstractArray::_length*/;
1491 variable5
= TAG_Bool(UNTAG_Int( variable3
/*index*/)<UNTAG_Int(variable5
));
1493 variable4
= variable5
;
1494 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);}
1495 variable4
= ATTR_array___Array____items( variable1
/*params*/) /*Array::_items*/;
1496 variable4
= UNBOX_NativeArray(variable4
)[UNTAG_Int( variable3
/*index*/)];
1497 goto return_label41
;
1498 return_label41
: while(false);
1499 variable3
= variable4
;
1500 variable2
= ((compiling_methods___MMAttribute___compile_access_t
)CALL(variable2
,COLOR_compiling_methods___MMAttribute___compile_access
))(variable2
, variable0
/*v*/, variable3
) /*MMAttribute::compile_access*/;
1501 goto return_label40
;
1502 return_label40
: while(false);
1503 tracehead
= trace
.prev
;
1506 val_t
compiling_methods___MMWriteImplementationMethod___do_compile_inside(val_t self
, val_t param0
, val_t param1
) {
1507 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 358, LOCATE_compiling_methods___MMWriteImplementationMethod___do_compile_inside
};
1514 trace
.prev
= tracehead
; tracehead
= &trace
;
1517 variable2
= ((syntax_base___MMAttrImplementationMethod___node_t
)CALL( self
,COLOR_syntax_base___MMLocalProperty___node
))( self
) /*MMAttrImplementationMethod::node*/;
1518 variable2
= ((mmbuilder___AAttrPropdef___prop_t
)CALL(variable2
,COLOR_syntax_base___AAttrPropdef___prop
))(variable2
) /*AAttrPropdef::prop*/;
1519 variable3
= TAG_Int(0);
1520 variable4
= TAG_Bool(UNTAG_Int( variable3
/*index*/)>=UNTAG_Int( TAG_Int(0)));
1521 variable5
= variable4
;
1522 if (UNTAG_Bool(variable5
)) { /* and */
1523 variable5
= ATTR_array___AbstractArray____length( variable1
/*params*/) /*AbstractArray::_length*/;
1524 variable5
= TAG_Bool(UNTAG_Int( variable3
/*index*/)<UNTAG_Int(variable5
));
1526 variable4
= variable5
;
1527 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);}
1528 variable4
= ATTR_array___Array____items( variable1
/*params*/) /*Array::_items*/;
1529 variable4
= UNBOX_NativeArray(variable4
)[UNTAG_Int( variable3
/*index*/)];
1530 goto return_label43
;
1531 return_label43
: while(false);
1532 variable3
= variable4
;
1533 variable2
= ((compiling_methods___MMAttribute___compile_access_t
)CALL(variable2
,COLOR_compiling_methods___MMAttribute___compile_access
))(variable2
, variable0
/*v*/, variable3
) /*MMAttribute::compile_access*/;
1534 variable3
= TAG_Int(1);
1535 variable4
= TAG_Bool(UNTAG_Int( variable3
/*index*/)>=UNTAG_Int( TAG_Int(0)));
1536 variable5
= variable4
;
1537 if (UNTAG_Bool(variable5
)) { /* and */
1538 variable5
= ATTR_array___AbstractArray____length( variable1
/*params*/) /*AbstractArray::_length*/;
1539 variable5
= TAG_Bool(UNTAG_Int( variable3
/*index*/)<UNTAG_Int(variable5
));
1541 variable4
= variable5
;
1542 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);}
1543 variable4
= ATTR_array___Array____items( variable1
/*params*/) /*Array::_items*/;
1544 variable4
= UNBOX_NativeArray(variable4
)[UNTAG_Int( variable3
/*index*/)];
1545 goto return_label44
;
1546 return_label44
: while(false);
1547 variable3
= variable4
;
1548 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable2
, variable3
) /*CompilerVisitor::add_assignment*/;
1549 variable2
= NIT_NULL
/*null*/;
1550 goto return_label42
;
1551 return_label42
: while(false);
1552 tracehead
= trace
.prev
;
1555 val_t
compiling_methods___MMMethSrcMethod___do_compile_inside(val_t self
, val_t param0
, val_t param1
) {
1556 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 366, LOCATE_compiling_methods___MMMethSrcMethod___do_compile_inside
};
1560 trace
.prev
= tracehead
; tracehead
= &trace
;
1563 variable2
= ((syntax_base___MMMethSrcMethod___node_t
)CALL( self
,COLOR_syntax_base___MMLocalProperty___node
))( self
) /*MMMethSrcMethod::node*/;
1564 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*/;
1565 goto return_label45
;
1566 return_label45
: while(false);
1567 tracehead
= trace
.prev
;
1570 val_t
compiling_methods___MMType___compile_cast(val_t self
, val_t param0
, val_t param1
) {
1571 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 373, LOCATE_compiling_methods___MMType___compile_cast
};
1595 trace
.prev
= tracehead
; tracehead
= &trace
;
1598 variable3
= ((static_type___MMType___local_class_t
)CALL( self
,COLOR_static_type___MMType___local_class
))( self
) /*MMType::local_class*/;
1599 variable3
= ((abstractmetamodel___MMLocalClass___global_t
)CALL(variable3
,COLOR_abstractmetamodel___MMLocalClass___global
))(variable3
) /*MMLocalClass::global*/;
1600 variable2
= variable3
;
1601 variable3
= NEW_string___String___init(); /*new String*/
1602 variable4
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(("), TAG_Int(10)); /*new String*/
1603 variable5
= variable4
;
1604 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable5
) /*String::append*/;
1605 variable6
= variable1
/*recv*/;
1606 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable6
) /*String::append*/;
1607 variable7
= NEW_string___String___with_native(BOX_NativeString("==NIT_NULL) || VAL_ISA("), TAG_Int(23)); /*new String*/
1608 variable8
= variable7
;
1609 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable8
) /*String::append*/;
1610 variable9
= variable1
/*recv*/;
1611 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable9
) /*String::append*/;
1612 variable10
= NEW_string___String___with_native(BOX_NativeString(", "), TAG_Int(2)); /*new String*/
1613 variable11
= variable10
;
1614 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable11
) /*String::append*/;
1615 variable12
= ((compiling_base___MMGlobalClass___color_id_t
)CALL( variable2
/*g*/,COLOR_compiling_base___MMGlobalClass___color_id
))( variable2
/*g*/) /*MMGlobalClass::color_id*/;
1616 variable13
= variable12
;
1617 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable13
) /*String::append*/;
1618 variable14
= NEW_string___String___with_native(BOX_NativeString(", "), TAG_Int(2)); /*new String*/
1619 variable15
= variable14
;
1620 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable15
) /*String::append*/;
1621 variable16
= ((compiling_base___MMGlobalClass___id_id_t
)CALL( variable2
/*g*/,COLOR_compiling_base___MMGlobalClass___id_id
))( variable2
/*g*/) /*MMGlobalClass::id_id*/;
1622 variable17
= variable16
;
1623 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable17
) /*String::append*/;
1624 variable18
= NEW_string___String___with_native(BOX_NativeString(")) /*cast "), TAG_Int(10)); /*new String*/
1625 variable19
= variable18
;
1626 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable19
) /*String::append*/;
1628 variable20
= ((string___String___to_s_t
)CALL(variable20
,COLOR_string___Object___to_s
))(variable20
) /*String::to_s*/;
1629 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable20
) /*String::append*/;
1630 variable21
= NEW_string___String___with_native(BOX_NativeString("*/"), TAG_Int(2)); /*new String*/
1631 variable22
= variable21
;
1632 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable22
) /*String::append*/;
1633 variable2
= variable3
;
1634 goto return_label46
;
1635 return_label46
: while(false);
1636 tracehead
= trace
.prev
;
1639 void compiling_methods___MMType___compile_type_check(val_t self
, val_t param0
, val_t param1
, val_t param2
) {
1640 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 382, LOCATE_compiling_methods___MMType___compile_type_check
};
1669 trace
.prev
= tracehead
; tracehead
= &trace
;
1673 variable4
= ((static_type___MMType___local_class_t
)CALL( self
,COLOR_static_type___MMType___local_class
))( self
) /*MMType::local_class*/;
1674 variable4
= ((abstractmetamodel___MMLocalClass___global_t
)CALL(variable4
,COLOR_abstractmetamodel___MMLocalClass___global
))(variable4
) /*MMLocalClass::global*/;
1675 variable3
= variable4
;
1676 variable4
= NEW_string___String___init(); /*new String*/
1677 variable5
= NEW_string___String___with_native(BOX_NativeString("if (("), TAG_Int(5)); /*new String*/
1678 variable6
= variable5
;
1679 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable6
) /*String::append*/;
1680 variable7
= variable1
/*recv*/;
1681 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable7
) /*String::append*/;
1682 variable8
= NEW_string___String___with_native(BOX_NativeString("!=NIT_NULL) && !VAL_ISA("), TAG_Int(24)); /*new String*/
1683 variable9
= variable8
;
1684 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable9
) /*String::append*/;
1685 variable10
= variable1
/*recv*/;
1686 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable10
) /*String::append*/;
1687 variable11
= NEW_string___String___with_native(BOX_NativeString(", "), TAG_Int(2)); /*new String*/
1688 variable12
= variable11
;
1689 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable12
) /*String::append*/;
1690 variable13
= ((compiling_base___MMGlobalClass___color_id_t
)CALL( variable3
/*g*/,COLOR_compiling_base___MMGlobalClass___color_id
))( variable3
/*g*/) /*MMGlobalClass::color_id*/;
1691 variable14
= variable13
;
1692 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable14
) /*String::append*/;
1693 variable15
= NEW_string___String___with_native(BOX_NativeString(", "), TAG_Int(2)); /*new String*/
1694 variable16
= variable15
;
1695 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable16
) /*String::append*/;
1696 variable17
= ((compiling_base___MMGlobalClass___id_id_t
)CALL( variable3
/*g*/,COLOR_compiling_base___MMGlobalClass___id_id
))( variable3
/*g*/) /*MMGlobalClass::id_id*/;
1697 variable18
= variable17
;
1698 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable18
) /*String::append*/;
1699 variable19
= NEW_string___String___with_native(BOX_NativeString(")) { fprintf(stderr, \"Cast failled\"); "), TAG_Int(38)); /*new String*/
1700 variable20
= variable19
;
1701 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable20
) /*String::append*/;
1702 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*/;
1703 variable22
= variable21
;
1704 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable22
) /*String::append*/;
1705 variable23
= NEW_string___String___with_native(BOX_NativeString(" nit_exit(1); } /*cast "), TAG_Int(23)); /*new String*/
1706 variable24
= variable23
;
1707 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable24
) /*String::append*/;
1709 variable25
= ((string___String___to_s_t
)CALL(variable25
,COLOR_string___Object___to_s
))(variable25
) /*String::to_s*/;
1710 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable25
) /*String::append*/;
1711 variable26
= NEW_string___String___with_native(BOX_NativeString("*/;"), TAG_Int(3)); /*new String*/
1712 variable27
= variable26
;
1713 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable27
) /*String::append*/;
1714 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable4
) /*CompilerVisitor::add_instr*/;
1715 tracehead
= trace
.prev
;
1718 val_t
compiling_methods___AMethPropdef___do_compile_inside(val_t self
, val_t param0
, val_t param1
, val_t param2
) {
1719 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 394, LOCATE_compiling_methods___AMethPropdef___do_compile_inside
};
1720 trace
.prev
= tracehead
; tracehead
= &trace
;
1721 fprintf(stderr
, "Deferred method %s called");
1722 fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_compiling_methods___MMType___compile_type_check
, LOCATE_compiling_methods
, 394);
1724 tracehead
= trace
.prev
;
1727 val_t
compiling_methods___AConcreteMethPropdef___do_compile_inside(val_t self
, val_t param0
, val_t param1
, val_t param2
) {
1728 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 399, LOCATE_compiling_methods___AConcreteMethPropdef___do_compile_inside
};
1750 trace
.prev
= tracehead
; tracehead
= &trace
;
1754 variable4
= ((abstractmetamodel___MMLocalProperty___global_t
)CALL( variable1
/*method*/,COLOR_abstractmetamodel___MMLocalProperty___global
))( variable1
/*method*/) /*MMLocalProperty::global*/;
1755 variable4
= ((abstractmetamodel___MMGlobalProperty___intro_t
)CALL(variable4
,COLOR_abstractmetamodel___MMGlobalProperty___intro
))(variable4
) /*MMGlobalProperty::intro*/;
1756 variable3
= variable4
;
1757 variable5
= ((static_type___MMLocalProperty___signature_t
)CALL( variable1
/*method*/,COLOR_static_type___MMLocalProperty___signature
))( variable1
/*method*/) /*MMLocalProperty::signature*/;
1758 variable5
= ((static_type___MMSignature___recv_t
)CALL(variable5
,COLOR_static_type___MMSignature___recv
))(variable5
) /*MMSignature::recv*/;
1759 variable5
= ((static_type___MMLocalProperty___signature_for_t
)CALL( variable3
/*orig_meth*/,COLOR_static_type___MMLocalProperty___signature_for
))( variable3
/*orig_meth*/, variable5
) /*MMLocalProperty::signature_for*/;
1760 variable4
= variable5
;
1761 variable5
= ((parser_nodes___AMethPropdef___n_signature_t
)CALL( self
,COLOR_parser_nodes___AMethPropdef___n_signature
))( self
) /*AMethPropdef::n_signature*/;
1762 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::==*/)))))));
1763 if (UNTAG_Bool(variable5
)) { /*if*/
1764 variable6
= ((parser_nodes___AMethPropdef___n_signature_t
)CALL( self
,COLOR_parser_nodes___AMethPropdef___n_signature
))( self
) /*AMethPropdef::n_signature*/;
1765 variable5
= variable6
;
1766 variable6
= TAG_Bool(( variable5
/*sig*/==NIT_NULL
) || VAL_ISA( variable5
/*sig*/, COLOR_ASignature
, ID_ASignature
)) /*cast ASignature*/;
1767 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
, 405); nit_exit(1);}
1768 variable6
= ((parser_nodes___ASignature___n_params_t
)CALL( variable5
/*sig*/,COLOR_parser_nodes___ASignature___n_params
))( variable5
/*sig*/) /*ASignature::n_params*/;
1769 variable6
= ((list___List___iterator_t
)CALL(variable6
,COLOR_abstract_collection___Collection___iterator
))(variable6
) /*List::iterator*/;
1770 while (true) { /*for*/
1771 variable7
= ((list___ListIterator___is_ok_t
)CALL(variable6
,COLOR_abstract_collection___Iterator___is_ok
))(variable6
) /*ListIterator::is_ok*/;
1772 if (!UNTAG_Bool(variable7
)) break; /*for*/
1773 variable7
= ((list___ListIterator___item_t
)CALL(variable6
,COLOR_abstract_collection___Iterator___item
))(variable6
) /*ListIterator::item*/;
1774 variable9
= ((compiling_methods___CompilerVisitor___get_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___get_var
))( variable0
/*v*/) /*CompilerVisitor::get_var*/;
1775 variable8
= variable9
;
1776 variable9
= ((compiling_methods___CompilerVisitor___varnames_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___varnames
))( variable0
/*v*/) /*CompilerVisitor::varnames*/;
1777 variable10
= ((mmbuilder___PParam___variable_t
)CALL( variable7
/*ap*/,COLOR_syntax_base___PParam___variable
))( variable7
/*ap*/) /*PParam::variable*/;
1778 ((abstract_collection___Map_____braeq_t
)CALL(variable9
,COLOR_abstract_collection___Map_____braeq
))(variable9
, variable10
, variable8
/*cname*/) /*Map::[]=*/;
1779 variable10
= ((mmbuilder___PParam___position_t
)CALL( variable7
/*ap*/,COLOR_syntax_base___PParam___position
))( variable7
/*ap*/) /*PParam::position*/;
1780 variable10
= ((static_type___MMSignature_____bra_t
)CALL( variable4
/*orig_sig*/,COLOR_static_type___MMSignature_____bra
))( variable4
/*orig_sig*/, variable10
) /*MMSignature::[]*/;
1781 variable9
= variable10
;
1782 variable10
= ((mmbuilder___PParam___variable_t
)CALL( variable7
/*ap*/,COLOR_syntax_base___PParam___variable
))( variable7
/*ap*/) /*PParam::variable*/;
1783 variable10
= ((syntax_base___Variable___stype_t
)CALL(variable10
,COLOR_syntax_base___Variable___stype
))(variable10
) /*Variable::stype*/;
1784 variable10
= ((static_type___MMType_____l_t
)CALL( variable9
/*orig_type*/,COLOR_static_type___MMType_____l
))( variable9
/*orig_type*/, variable10
) /*MMType::<*/;
1785 if (UNTAG_Bool( TAG_Bool(!UNTAG_Bool(variable10
)))) { /*if*/
1786 variable10
= NEW_string___String___init(); /*new String*/
1787 variable11
= NEW_string___String___with_native(BOX_NativeString("/* check if p<"), TAG_Int(14)); /*new String*/
1788 variable12
= variable11
;
1789 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable12
) /*String::append*/;
1790 variable13
= ((mmbuilder___PParam___variable_t
)CALL( variable7
/*ap*/,COLOR_syntax_base___PParam___variable
))( variable7
/*ap*/) /*PParam::variable*/;
1791 variable13
= ((syntax_base___Variable___stype_t
)CALL(variable13
,COLOR_syntax_base___Variable___stype
))(variable13
) /*Variable::stype*/;
1792 variable14
= variable13
;
1793 variable14
= ((string___String___to_s_t
)CALL(variable14
,COLOR_string___Object___to_s
))(variable14
) /*String::to_s*/;
1794 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable14
) /*String::append*/;
1795 variable15
= NEW_string___String___with_native(BOX_NativeString(" with p:"), TAG_Int(8)); /*new String*/
1796 variable16
= variable15
;
1797 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable16
) /*String::append*/;
1798 variable17
= variable9
/*orig_type*/;
1799 variable17
= ((string___String___to_s_t
)CALL(variable17
,COLOR_string___Object___to_s
))(variable17
) /*String::to_s*/;
1800 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable17
) /*String::append*/;
1801 variable18
= NEW_string___String___with_native(BOX_NativeString(" */"), TAG_Int(3)); /*new String*/
1802 variable19
= variable18
;
1803 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable19
) /*String::append*/;
1804 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable10
) /*CompilerVisitor::add_instr*/;
1805 variable10
= ((mmbuilder___PParam___variable_t
)CALL( variable7
/*ap*/,COLOR_syntax_base___PParam___variable
))( variable7
/*ap*/) /*PParam::variable*/;
1806 variable10
= ((syntax_base___Variable___stype_t
)CALL(variable10
,COLOR_syntax_base___Variable___stype
))(variable10
) /*Variable::stype*/;
1807 variable11
= ((mmbuilder___PParam___position_t
)CALL( variable7
/*ap*/,COLOR_syntax_base___PParam___position
))( variable7
/*ap*/) /*PParam::position*/;
1808 variable11
= TAG_Int(UNTAG_Int(variable11
)+UNTAG_Int( TAG_Int(1)));
1809 variable12
= variable11
;
1810 variable13
= TAG_Bool(UNTAG_Int( variable12
/*index*/)>=UNTAG_Int( TAG_Int(0)));
1811 variable14
= variable13
;
1812 if (UNTAG_Bool(variable14
)) { /* and */
1813 variable14
= ATTR_array___AbstractArray____length( variable2
/*params*/) /*AbstractArray::_length*/;
1814 variable14
= TAG_Bool(UNTAG_Int( variable12
/*index*/)<UNTAG_Int(variable14
));
1816 variable13
= variable14
;
1817 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);}
1818 variable13
= ATTR_array___Array____items( variable2
/*params*/) /*Array::_items*/;
1819 variable13
= UNBOX_NativeArray(variable13
)[UNTAG_Int( variable12
/*index*/)];
1820 goto return_label50
;
1821 return_label50
: while(false);
1822 variable11
= variable13
;
1823 ((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*/;
1825 variable10
= ((mmbuilder___PParam___position_t
)CALL( variable7
/*ap*/,COLOR_syntax_base___PParam___position
))( variable7
/*ap*/) /*PParam::position*/;
1826 variable10
= TAG_Int(UNTAG_Int(variable10
)+UNTAG_Int( TAG_Int(1)));
1827 variable11
= variable10
;
1828 variable12
= TAG_Bool(UNTAG_Int( variable11
/*index*/)>=UNTAG_Int( TAG_Int(0)));
1829 variable13
= variable12
;
1830 if (UNTAG_Bool(variable13
)) { /* and */
1831 variable13
= ATTR_array___AbstractArray____length( variable2
/*params*/) /*AbstractArray::_length*/;
1832 variable13
= TAG_Bool(UNTAG_Int( variable11
/*index*/)<UNTAG_Int(variable13
));
1834 variable12
= variable13
;
1835 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);}
1836 variable12
= ATTR_array___Array____items( variable2
/*params*/) /*Array::_items*/;
1837 variable12
= UNBOX_NativeArray(variable12
)[UNTAG_Int( variable11
/*index*/)];
1838 goto return_label51
;
1839 return_label51
: while(false);
1840 variable10
= variable12
;
1841 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable8
/*cname*/, variable10
) /*CompilerVisitor::add_assignment*/;
1842 continue_49
: while(0);
1843 ((list___ListIterator___next_t
)CALL(variable6
,COLOR_abstract_collection___Iterator___next
))(variable6
) /*ListIterator::next*/;
1847 variable6
= ((compiling_methods___CompilerVisitor___method_params_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___method_params
))( variable0
/*v*/) /*CompilerVisitor::method_params*/;
1848 variable5
= variable6
;
1849 variable7
= ((compiling_methods___CompilerVisitor___return_label_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___return_label
))( variable0
/*v*/) /*CompilerVisitor::return_label*/;
1850 variable6
= variable7
;
1851 variable8
= ((compiling_methods___CompilerVisitor___return_value_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___return_value
))( variable0
/*v*/) /*CompilerVisitor::return_value*/;
1852 variable7
= variable8
;
1853 variable9
= ((compiling_methods___CompilerVisitor___has_return_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___has_return
))( variable0
/*v*/) /*CompilerVisitor::has_return*/;
1854 variable8
= variable9
;
1855 variable9
= NIT_NULL
/*null*/;
1856 variable10
= TAG_Bool(( self
==NIT_NULL
) || VAL_ISA( self
, COLOR_AConcreteInitPropdef
, ID_AConcreteInitPropdef
)) /*cast AConcreteInitPropdef*/;
1857 if (UNTAG_Bool(variable10
)) { /*if*/
1858 variable10
= NEW_string___String___init(); /*new String*/
1859 variable11
= NEW_string___String___with_native(BOX_NativeString("VAL2OBJ("), TAG_Int(8)); /*new String*/
1860 variable12
= variable11
;
1861 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable12
) /*String::append*/;
1862 variable13
= TAG_Int(0);
1863 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
1864 variable15
= variable14
;
1865 if (UNTAG_Bool(variable15
)) { /* and */
1866 variable15
= ATTR_array___AbstractArray____length( variable2
/*params*/) /*AbstractArray::_length*/;
1867 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
1869 variable14
= variable15
;
1870 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);}
1871 variable14
= ATTR_array___Array____items( variable2
/*params*/) /*Array::_items*/;
1872 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
1873 goto return_label52
;
1874 return_label52
: while(false);
1875 variable13
= variable14
;
1876 variable14
= variable13
;
1877 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable14
) /*String::append*/;
1878 variable15
= NEW_string___String___with_native(BOX_NativeString(")->vft["), TAG_Int(7)); /*new String*/
1879 variable16
= variable15
;
1880 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable16
) /*String::append*/;
1881 variable17
= ((abstractmetamodel___MMLocalProperty___local_class_t
)CALL( variable1
/*method*/,COLOR_abstractmetamodel___MMLocalProperty___local_class
))( variable1
/*method*/) /*MMLocalProperty::local_class*/;
1882 variable17
= ((abstractmetamodel___MMLocalClass___global_t
)CALL(variable17
,COLOR_abstractmetamodel___MMLocalClass___global
))(variable17
) /*MMLocalClass::global*/;
1883 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*/;
1884 variable18
= variable17
;
1885 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable18
) /*String::append*/;
1886 variable19
= NEW_string___String___with_native(BOX_NativeString("].i"), TAG_Int(3)); /*new String*/
1887 variable20
= variable19
;
1888 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable20
) /*String::append*/;
1889 variable9
= variable10
/*itpos=*/;
1890 variable10
= NEW_string___String___init(); /*new String*/
1891 variable11
= NEW_string___String___with_native(BOX_NativeString("if (init_table["), TAG_Int(15)); /*new String*/
1892 variable12
= variable11
;
1893 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable12
) /*String::append*/;
1894 variable13
= variable9
/*itpos*/;
1895 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable13
) /*String::append*/;
1896 variable14
= NEW_string___String___with_native(BOX_NativeString("]) return;"), TAG_Int(10)); /*new String*/
1897 variable15
= variable14
;
1898 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable15
) /*String::append*/;
1899 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable10
) /*CompilerVisitor::add_instr*/;
1901 ((compiling_methods___CompilerVisitor___method_params__eq_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___method_params__eq
))( variable0
/*v*/, variable2
/*params*/) /*CompilerVisitor::method_params=*/;
1902 ((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=*/;
1903 variable10
= NEW_string___String___init(); /*new String*/
1904 variable11
= NEW_string___String___with_native(BOX_NativeString("return_label"), TAG_Int(12)); /*new String*/
1905 variable12
= variable11
;
1906 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable12
) /*String::append*/;
1907 variable13
= ((compiling_base___CompilerVisitor___new_number_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___new_number
))( variable0
/*v*/) /*CompilerVisitor::new_number*/;
1908 variable14
= variable13
;
1909 variable14
= ((string___String___to_s_t
)CALL(variable14
,COLOR_string___Object___to_s
))(variable14
) /*String::to_s*/;
1910 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable14
) /*String::append*/;
1911 variable15
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
1912 variable16
= variable15
;
1913 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable16
) /*String::append*/;
1914 ((compiling_methods___CompilerVisitor___return_label__eq_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___return_label__eq
))( variable0
/*v*/, variable10
) /*CompilerVisitor::return_label=*/;
1915 variable10
= ((static_type___MMLocalProperty___signature_t
)CALL( variable1
/*method*/,COLOR_static_type___MMLocalProperty___signature
))( variable1
/*method*/) /*MMLocalProperty::signature*/;
1916 variable10
= ((static_type___MMSignature___return_type_t
)CALL(variable10
,COLOR_static_type___MMSignature___return_type
))(variable10
) /*MMSignature::return_type*/;
1917 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::==*/)))))));
1918 if (UNTAG_Bool(variable10
)) { /*if*/
1919 variable10
= ((compiling_methods___CompilerVisitor___get_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___get_var
))( variable0
/*v*/) /*CompilerVisitor::get_var*/;
1920 ((compiling_methods___CompilerVisitor___return_value__eq_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___return_value__eq
))( variable0
/*v*/, variable10
) /*CompilerVisitor::return_value=*/;
1921 variable10
= ((compiling_methods___CompilerVisitor___return_value_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___return_value
))( variable0
/*v*/) /*CompilerVisitor::return_value*/;
1922 ((compiling_methods___CompilerVisitor___free_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___free_var
))( variable0
/*v*/, variable10
) /*CompilerVisitor::free_var*/;
1924 ((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=*/;
1926 ((compiling_methods___CompilerVisitor___method__eq_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___method__eq
))( variable0
/*v*/, variable1
/*method*/) /*CompilerVisitor::method=*/;
1927 variable10
= TAG_Bool(( self
==NIT_NULL
) || VAL_ISA( self
, COLOR_AConcreteInitPropdef
, ID_AConcreteInitPropdef
)) /*cast AConcreteInitPropdef*/;
1928 if (UNTAG_Bool(variable10
)) { /*if*/
1929 ((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*/;
1931 variable10
= ((parser_nodes___AConcreteMethPropdef___n_block_t
)CALL( self
,COLOR_parser_nodes___AConcreteMethPropdef___n_block
))( self
) /*AConcreteMethPropdef::n_block*/;
1932 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::==*/)))))));
1933 if (UNTAG_Bool(variable10
)) { /*if*/
1934 variable10
= ((parser_nodes___AConcreteMethPropdef___n_block_t
)CALL( self
,COLOR_parser_nodes___AConcreteMethPropdef___n_block
))( self
) /*AConcreteMethPropdef::n_block*/;
1935 ((compiling_methods___CompilerVisitor___compile_stmt_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_stmt
))( variable0
/*v*/, variable10
) /*CompilerVisitor::compile_stmt*/;
1937 variable10
= ((compiling_methods___CompilerVisitor___has_return_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___has_return
))( variable0
/*v*/) /*CompilerVisitor::has_return*/;
1938 if (UNTAG_Bool(variable10
)) { /*if*/
1939 variable10
= NEW_string___String___init(); /*new String*/
1940 variable11
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
1941 variable12
= variable11
;
1942 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable12
) /*String::append*/;
1943 variable13
= ((compiling_methods___CompilerVisitor___return_label_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___return_label
))( variable0
/*v*/) /*CompilerVisitor::return_label*/;
1944 variable14
= variable13
;
1945 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable14
) /*String::append*/;
1946 variable15
= NEW_string___String___with_native(BOX_NativeString(": while(false);"), TAG_Int(15)); /*new String*/
1947 variable16
= variable15
;
1948 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable16
) /*String::append*/;
1949 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable10
) /*CompilerVisitor::add_instr*/;
1951 variable10
= TAG_Bool(( self
==NIT_NULL
) || VAL_ISA( self
, COLOR_AConcreteInitPropdef
, ID_AConcreteInitPropdef
)) /*cast AConcreteInitPropdef*/;
1952 if (UNTAG_Bool(variable10
)) { /*if*/
1953 variable10
= NEW_string___String___init(); /*new String*/
1954 variable11
= NEW_string___String___with_native(BOX_NativeString("init_table["), TAG_Int(11)); /*new String*/
1955 variable12
= variable11
;
1956 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable12
) /*String::append*/;
1957 variable13
= variable9
/*itpos*/;
1958 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable13
) /*String::append*/;
1959 variable14
= NEW_string___String___with_native(BOX_NativeString("] = 1;"), TAG_Int(6)); /*new String*/
1960 variable15
= variable14
;
1961 ((string___String___append_t
)CALL(variable10
,COLOR_abstract_collection___IndexedCollection___append
))(variable10
, variable15
) /*String::append*/;
1962 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable10
) /*CompilerVisitor::add_instr*/;
1964 variable11
= ((compiling_methods___CompilerVisitor___return_value_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___return_value
))( variable0
/*v*/) /*CompilerVisitor::return_value*/;
1965 variable10
= variable11
;
1966 ((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=*/;
1967 ((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=*/;
1968 ((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=*/;
1969 ((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=*/;
1970 variable3
= variable10
/*ret*/;
1971 goto return_label48
;
1972 return_label48
: while(false);
1973 tracehead
= trace
.prev
;
1976 val_t
compiling_methods___ADeferredMethPropdef___do_compile_inside(val_t self
, val_t param0
, val_t param1
, val_t param2
) {
1977 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 463, LOCATE_compiling_methods___ADeferredMethPropdef___do_compile_inside
};
1982 trace
.prev
= tracehead
; tracehead
= &trace
;
1986 variable3
= NEW_string___String___with_native(BOX_NativeString("fprintf(stderr, \"Deferred method %s called\");"), TAG_Int(45)); /*new String*/
1987 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::add_instr*/;
1988 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*/;
1989 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::add_instr*/;
1990 variable3
= NEW_string___String___with_native(BOX_NativeString("nit_exit(1);"), TAG_Int(12)); /*new String*/
1991 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::add_instr*/;
1992 variable3
= ((static_type___MMLocalProperty___signature_t
)CALL( variable1
/*method*/,COLOR_static_type___MMLocalProperty___signature
))( variable1
/*method*/) /*MMLocalProperty::signature*/;
1993 variable3
= ((static_type___MMSignature___return_type_t
)CALL(variable3
,COLOR_static_type___MMSignature___return_type
))(variable3
) /*MMSignature::return_type*/;
1994 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::==*/)))))));
1995 if (UNTAG_Bool(variable3
)) { /*if*/
1996 variable3
= NEW_string___String___with_native(BOX_NativeString("NIT_NULL"), TAG_Int(8)); /*new String*/
1997 goto return_label53
;
1999 variable3
= NIT_NULL
/*null*/;
2000 goto return_label53
;
2002 return_label53
: while(false);
2003 tracehead
= trace
.prev
;
2006 val_t
compiling_methods___AExternMethPropdef___do_compile_inside(val_t self
, val_t param0
, val_t param1
, val_t param2
) {
2007 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 477, LOCATE_compiling_methods___AExternMethPropdef___do_compile_inside
};
2035 trace
.prev
= tracehead
; tracehead
= &trace
;
2039 variable4
= NEW_string___String___init(); /*new String*/
2040 variable5
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
2041 variable6
= variable5
;
2042 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable6
) /*String::append*/;
2043 variable7
= ((abstractmetamodel___MMLocalProperty___module_t
)CALL( variable1
/*method*/,COLOR_abstractmetamodel___MMLocalProperty___module
))( variable1
/*method*/) /*MMLocalProperty::module*/;
2044 variable7
= ((abstractmetamodel___MMModule___name_t
)CALL(variable7
,COLOR_abstractmetamodel___MMModule___name
))(variable7
) /*MMModule::name*/;
2045 variable8
= variable7
;
2046 variable8
= ((string___String___to_s_t
)CALL(variable8
,COLOR_string___Object___to_s
))(variable8
) /*String::to_s*/;
2047 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable8
) /*String::append*/;
2048 variable9
= NEW_string___String___with_native(BOX_NativeString("_"), TAG_Int(1)); /*new String*/
2049 variable10
= variable9
;
2050 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable10
) /*String::append*/;
2051 variable11
= ((abstractmetamodel___MMLocalProperty___local_class_t
)CALL( variable1
/*method*/,COLOR_abstractmetamodel___MMLocalProperty___local_class
))( variable1
/*method*/) /*MMLocalProperty::local_class*/;
2052 variable11
= ((abstractmetamodel___MMLocalClass___name_t
)CALL(variable11
,COLOR_abstractmetamodel___MMLocalClass___name
))(variable11
) /*MMLocalClass::name*/;
2053 variable12
= variable11
;
2054 variable12
= ((string___String___to_s_t
)CALL(variable12
,COLOR_string___Object___to_s
))(variable12
) /*String::to_s*/;
2055 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable12
) /*String::append*/;
2056 variable13
= NEW_string___String___with_native(BOX_NativeString("_"), TAG_Int(1)); /*new String*/
2057 variable14
= variable13
;
2058 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable14
) /*String::append*/;
2059 variable15
= ((abstractmetamodel___MMLocalProperty___local_class_t
)CALL( variable1
/*method*/,COLOR_abstractmetamodel___MMLocalProperty___local_class
))( variable1
/*method*/) /*MMLocalProperty::local_class*/;
2060 variable15
= ((abstractmetamodel___MMLocalClass___name_t
)CALL(variable15
,COLOR_abstractmetamodel___MMLocalClass___name
))(variable15
) /*MMLocalClass::name*/;
2061 variable16
= variable15
;
2062 variable16
= ((string___String___to_s_t
)CALL(variable16
,COLOR_string___Object___to_s
))(variable16
) /*String::to_s*/;
2063 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable16
) /*String::append*/;
2064 variable17
= NEW_string___String___with_native(BOX_NativeString("_"), TAG_Int(1)); /*new String*/
2065 variable18
= variable17
;
2066 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable18
) /*String::append*/;
2067 variable19
= ((abstractmetamodel___MMLocalProperty___name_t
)CALL( variable1
/*method*/,COLOR_abstractmetamodel___MMLocalProperty___name
))( variable1
/*method*/) /*MMLocalProperty::name*/;
2068 variable20
= variable19
;
2069 variable20
= ((string___String___to_s_t
)CALL(variable20
,COLOR_string___Object___to_s
))(variable20
) /*String::to_s*/;
2070 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable20
) /*String::append*/;
2071 variable21
= NEW_string___String___with_native(BOX_NativeString("_"), TAG_Int(1)); /*new String*/
2072 variable22
= variable21
;
2073 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable22
) /*String::append*/;
2074 variable23
= ((static_type___MMLocalProperty___signature_t
)CALL( variable1
/*method*/,COLOR_static_type___MMLocalProperty___signature
))( variable1
/*method*/) /*MMLocalProperty::signature*/;
2075 variable23
= ((static_type___MMSignature___arity_t
)CALL(variable23
,COLOR_static_type___MMSignature___arity
))(variable23
) /*MMSignature::arity*/;
2076 variable24
= variable23
;
2077 variable24
= ((string___String___to_s_t
)CALL(variable24
,COLOR_string___Object___to_s
))(variable24
) /*String::to_s*/;
2078 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable24
) /*String::append*/;
2079 variable25
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
2080 variable26
= variable25
;
2081 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable26
) /*String::append*/;
2082 variable3
= variable4
;
2083 variable4
= ((parser_nodes___AExternMethPropdef___n_extern_t
)CALL( self
,COLOR_parser_nodes___AExternMethPropdef___n_extern
))( self
) /*AExternMethPropdef::n_extern*/;
2084 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::==*/)))))));
2085 if (UNTAG_Bool(variable4
)) { /*if*/
2086 variable4
= ((parser_nodes___AExternMethPropdef___n_extern_t
)CALL( self
,COLOR_parser_nodes___AExternMethPropdef___n_extern
))( self
) /*AExternMethPropdef::n_extern*/;
2087 variable4
= ((lexer___Token___text_t
)CALL(variable4
,COLOR_lexer___Token___text
))(variable4
) /*Token::text*/;
2088 variable3
= variable4
/*ename=*/;
2089 variable4
= ((array___AbstractArray___length_t
)CALL( variable3
/*ename*/,COLOR_abstract_collection___Collection___length
))( variable3
/*ename*/) /*AbstractArray::length*/;
2090 variable4
= TAG_Int(UNTAG_Int(variable4
)-UNTAG_Int( TAG_Int(2)));
2091 variable4
= ((string___String___substring_t
)CALL( variable3
/*ename*/,COLOR_string___String___substring
))( variable3
/*ename*/, TAG_Int(1), variable4
) /*String::substring*/;
2092 variable3
= variable4
/*ename=*/;
2094 variable5
= ((static_type___MMLocalProperty___signature_t
)CALL( variable1
/*method*/,COLOR_static_type___MMLocalProperty___signature
))( variable1
/*method*/) /*MMLocalProperty::signature*/;
2095 variable4
= variable5
;
2096 variable5
= ((array___AbstractArray___length_t
)CALL( variable2
/*params*/,COLOR_abstract_collection___Collection___length
))( variable2
/*params*/) /*AbstractArray::length*/;
2097 variable6
= ((static_type___MMSignature___arity_t
)CALL( variable4
/*sig*/,COLOR_static_type___MMSignature___arity
))( variable4
/*sig*/) /*MMSignature::arity*/;
2098 variable6
= TAG_Int(UNTAG_Int(variable6
)+UNTAG_Int( TAG_Int(1)));
2099 variable5
= TAG_Bool((variable5
)!=(variable6
));
2100 if (UNTAG_Bool(variable5
)) { /*if*/
2101 variable5
= NEW_string___String___init(); /*new String*/
2102 variable6
= NEW_string___String___with_native(BOX_NativeString("par:"), TAG_Int(4)); /*new String*/
2103 variable7
= variable6
;
2104 ((string___String___append_t
)CALL(variable5
,COLOR_abstract_collection___IndexedCollection___append
))(variable5
, variable7
) /*String::append*/;
2105 variable8
= ((array___AbstractArray___length_t
)CALL( variable2
/*params*/,COLOR_abstract_collection___Collection___length
))( variable2
/*params*/) /*AbstractArray::length*/;
2106 variable9
= variable8
;
2107 variable9
= ((string___String___to_s_t
)CALL(variable9
,COLOR_string___Object___to_s
))(variable9
) /*String::to_s*/;
2108 ((string___String___append_t
)CALL(variable5
,COLOR_abstract_collection___IndexedCollection___append
))(variable5
, variable9
) /*String::append*/;
2109 variable10
= NEW_string___String___with_native(BOX_NativeString(" sig:"), TAG_Int(5)); /*new String*/
2110 variable11
= variable10
;
2111 ((string___String___append_t
)CALL(variable5
,COLOR_abstract_collection___IndexedCollection___append
))(variable5
, variable11
) /*String::append*/;
2112 variable12
= ((static_type___MMSignature___arity_t
)CALL( variable4
/*sig*/,COLOR_static_type___MMSignature___arity
))( variable4
/*sig*/) /*MMSignature::arity*/;
2113 variable13
= variable12
;
2114 variable13
= ((string___String___to_s_t
)CALL(variable13
,COLOR_string___Object___to_s
))(variable13
) /*String::to_s*/;
2115 ((string___String___append_t
)CALL(variable5
,COLOR_abstract_collection___IndexedCollection___append
))(variable5
, variable13
) /*String::append*/;
2116 variable14
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
2117 variable15
= variable14
;
2118 ((string___String___append_t
)CALL(variable5
,COLOR_abstract_collection___IndexedCollection___append
))(variable5
, variable15
) /*String::append*/;
2119 ((parser_prod___PNode___printl_t
)CALL( self
,COLOR_parser_prod___PNode___printl
))( self
, variable5
) /*PNode::printl*/;
2121 variable6
= NEW_array___Array___init(); /*new Array[E]*/
2122 variable5
= variable6
;
2123 variable6
= ((static_type___MMSignature___recv_t
)CALL( variable4
/*sig*/,COLOR_static_type___MMSignature___recv
))( variable4
/*sig*/) /*MMSignature::recv*/;
2124 variable7
= TAG_Int(0);
2125 variable8
= TAG_Bool(UNTAG_Int( variable7
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2126 variable9
= variable8
;
2127 if (UNTAG_Bool(variable9
)) { /* and */
2128 variable9
= ATTR_array___AbstractArray____length( variable2
/*params*/) /*AbstractArray::_length*/;
2129 variable9
= TAG_Bool(UNTAG_Int( variable7
/*index*/)<UNTAG_Int(variable9
));
2131 variable8
= variable9
;
2132 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);}
2133 variable8
= ATTR_array___Array____items( variable2
/*params*/) /*Array::_items*/;
2134 variable8
= UNBOX_NativeArray(variable8
)[UNTAG_Int( variable7
/*index*/)];
2135 goto return_label55
;
2136 return_label55
: while(false);
2137 variable7
= variable8
;
2138 variable6
= ((compiling_base___MMType___unboxtype_t
)CALL(variable6
,COLOR_compiling_base___MMType___unboxtype
))(variable6
, variable7
) /*MMType::unboxtype*/;
2139 ((array___AbstractArray___add_t
)CALL( variable5
/*args*/,COLOR_abstract_collection___SimpleCollection___add
))( variable5
/*args*/, variable6
) /*AbstractArray::add*/;
2140 variable6
= ((static_type___MMSignature___arity_t
)CALL( variable4
/*sig*/,COLOR_static_type___MMSignature___arity
))( variable4
/*sig*/) /*MMSignature::arity*/;
2141 variable7
= NEW_range___Range___without_last( TAG_Int(0), variable6
); /*new Range[E]*/
2142 variable6
= variable7
;
2143 variable6
= ((range___Range___iterator_t
)CALL(variable6
,COLOR_abstract_collection___Collection___iterator
))(variable6
) /*Range::iterator*/;
2144 while (true) { /*for*/
2145 variable7
= ((abstract_collection___Iterator___is_ok_t
)CALL(variable6
,COLOR_abstract_collection___Iterator___is_ok
))(variable6
) /*Iterator::is_ok*/;
2146 if (!UNTAG_Bool(variable7
)) break; /*for*/
2147 variable7
= ((abstract_collection___Iterator___item_t
)CALL(variable6
,COLOR_abstract_collection___Iterator___item
))(variable6
) /*Iterator::item*/;
2148 variable8
= ((static_type___MMSignature_____bra_t
)CALL( variable4
/*sig*/,COLOR_static_type___MMSignature_____bra
))( variable4
/*sig*/, variable7
/*i*/) /*MMSignature::[]*/;
2149 variable9
= TAG_Int(UNTAG_Int( variable7
/*i*/)+UNTAG_Int( TAG_Int(1)));
2150 variable10
= variable9
;
2151 variable11
= TAG_Bool(UNTAG_Int( variable10
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2152 variable12
= variable11
;
2153 if (UNTAG_Bool(variable12
)) { /* and */
2154 variable12
= ATTR_array___AbstractArray____length( variable2
/*params*/) /*AbstractArray::_length*/;
2155 variable12
= TAG_Bool(UNTAG_Int( variable10
/*index*/)<UNTAG_Int(variable12
));
2157 variable11
= variable12
;
2158 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);}
2159 variable11
= ATTR_array___Array____items( variable2
/*params*/) /*Array::_items*/;
2160 variable11
= UNBOX_NativeArray(variable11
)[UNTAG_Int( variable10
/*index*/)];
2161 goto return_label57
;
2162 return_label57
: while(false);
2163 variable9
= variable11
;
2164 variable8
= ((compiling_base___MMType___unboxtype_t
)CALL(variable8
,COLOR_compiling_base___MMType___unboxtype
))(variable8
, variable9
) /*MMType::unboxtype*/;
2165 ((array___AbstractArray___add_t
)CALL( variable5
/*args*/,COLOR_abstract_collection___SimpleCollection___add
))( variable5
/*args*/, variable8
) /*AbstractArray::add*/;
2166 continue_56
: while(0);
2167 ((abstract_collection___Iterator___next_t
)CALL(variable6
,COLOR_abstract_collection___Iterator___next
))(variable6
) /*Iterator::next*/;
2170 variable7
= NEW_string___String___init(); /*new String*/
2171 variable8
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
2172 variable9
= variable8
;
2173 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable9
) /*String::append*/;
2174 variable10
= variable3
/*ename*/;
2175 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable10
) /*String::append*/;
2176 variable11
= NEW_string___String___with_native(BOX_NativeString("("), TAG_Int(1)); /*new String*/
2177 variable12
= variable11
;
2178 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable12
) /*String::append*/;
2179 variable13
= NEW_string___String___with_native(BOX_NativeString(", "), TAG_Int(2)); /*new String*/
2180 variable13
= ((string___Collection___join_t
)CALL( variable5
/*args*/,COLOR_string___Collection___join
))( variable5
/*args*/, variable13
) /*Collection::join*/;
2181 variable14
= variable13
;
2182 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable14
) /*String::append*/;
2183 variable15
= NEW_string___String___with_native(BOX_NativeString(")"), TAG_Int(1)); /*new String*/
2184 variable16
= variable15
;
2185 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable16
) /*String::append*/;
2186 variable6
= variable7
;
2187 variable7
= ((static_type___MMSignature___return_type_t
)CALL( variable4
/*sig*/,COLOR_static_type___MMSignature___return_type
))( variable4
/*sig*/) /*MMSignature::return_type*/;
2188 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::==*/)))))));
2189 if (UNTAG_Bool(variable7
)) { /*if*/
2190 variable7
= ((static_type___MMSignature___return_type_t
)CALL( variable4
/*sig*/,COLOR_static_type___MMSignature___return_type
))( variable4
/*sig*/) /*MMSignature::return_type*/;
2191 variable7
= ((compiling_base___MMType___boxtype_t
)CALL(variable7
,COLOR_compiling_base___MMType___boxtype
))(variable7
, variable6
/*s*/) /*MMType::boxtype*/;
2192 variable3
= variable7
;
2193 goto return_label54
;
2195 variable7
= NEW_string___String___init(); /*new String*/
2196 variable8
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
2197 variable9
= variable8
;
2198 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable9
) /*String::append*/;
2199 variable10
= variable6
/*s*/;
2200 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable10
) /*String::append*/;
2201 variable11
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
2202 variable12
= variable11
;
2203 ((string___String___append_t
)CALL(variable7
,COLOR_abstract_collection___IndexedCollection___append
))(variable7
, variable12
) /*String::append*/;
2204 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable7
) /*CompilerVisitor::add_instr*/;
2205 variable3
= NIT_NULL
/*null*/;
2206 goto return_label54
;
2208 return_label54
: while(false);
2209 tracehead
= trace
.prev
;
2212 val_t
compiling_methods___AInternMethPropdef___do_compile_inside(val_t self
, val_t param0
, val_t param1
, val_t param2
) {
2213 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 504, LOCATE_compiling_methods___AInternMethPropdef___do_compile_inside
};
2221 static val_t once_value_variable6_59
; static int once_bool_variable6_59
;
2222 static val_t once_value_variable6_60
; static int once_bool_variable6_60
;
2229 static val_t once_value_variable6_62
; static int once_bool_variable6_62
;
2230 static val_t once_value_variable6_64
; static int once_bool_variable6_64
;
2231 static val_t once_value_variable6_66
; static int once_bool_variable6_66
;
2232 static val_t once_value_variable6_68
; static int once_bool_variable6_68
;
2233 static val_t once_value_variable6_70
; static int once_bool_variable6_70
;
2234 static val_t once_value_variable6_72
; static int once_bool_variable6_72
;
2235 static val_t once_value_variable6_74
; static int once_bool_variable6_74
;
2240 static val_t once_value_variable6_77
; static int once_bool_variable6_77
;
2241 static val_t once_value_variable6_80
; static int once_bool_variable6_80
;
2242 static val_t once_value_variable6_83
; static int once_bool_variable6_83
;
2243 static val_t once_value_variable6_86
; static int once_bool_variable6_86
;
2244 static val_t once_value_variable6_89
; static int once_bool_variable6_89
;
2245 static val_t once_value_variable6_92
; static int once_bool_variable6_92
;
2246 static val_t once_value_variable6_95
; static int once_bool_variable6_95
;
2247 static val_t once_value_variable6_98
; static int once_bool_variable6_98
;
2248 static val_t once_value_variable6_101
; static int once_bool_variable6_101
;
2249 static val_t once_value_variable6_104
; static int once_bool_variable6_104
;
2250 static val_t once_value_variable6_107
; static int once_bool_variable6_107
;
2251 static val_t once_value_variable6_110
; static int once_bool_variable6_110
;
2252 static val_t once_value_variable6_113
; static int once_bool_variable6_113
;
2253 static val_t once_value_variable6_114
; static int once_bool_variable6_114
;
2254 static val_t once_value_variable6_116
; static int once_bool_variable6_116
;
2255 static val_t once_value_variable6_118
; static int once_bool_variable6_118
;
2256 static val_t once_value_variable6_120
; static int once_bool_variable6_120
;
2257 static val_t once_value_variable6_122
; static int once_bool_variable6_122
;
2258 static val_t once_value_variable6_125
; static int once_bool_variable6_125
;
2259 static val_t once_value_variable6_128
; static int once_bool_variable6_128
;
2260 static val_t once_value_variable6_131
; static int once_bool_variable6_131
;
2261 static val_t once_value_variable6_134
; static int once_bool_variable6_134
;
2262 static val_t once_value_variable6_137
; static int once_bool_variable6_137
;
2263 static val_t once_value_variable6_140
; static int once_bool_variable6_140
;
2264 static val_t once_value_variable6_143
; static int once_bool_variable6_143
;
2265 static val_t once_value_variable6_146
; static int once_bool_variable6_146
;
2266 static val_t once_value_variable6_147
; static int once_bool_variable6_147
;
2267 static val_t once_value_variable6_149
; static int once_bool_variable6_149
;
2268 static val_t once_value_variable6_151
; static int once_bool_variable6_151
;
2269 static val_t once_value_variable6_153
; static int once_bool_variable6_153
;
2270 static val_t once_value_variable6_155
; static int once_bool_variable6_155
;
2271 static val_t once_value_variable6_157
; static int once_bool_variable6_157
;
2272 static val_t once_value_variable6_159
; static int once_bool_variable6_159
;
2273 static val_t once_value_variable6_161
; static int once_bool_variable6_161
;
2274 static val_t once_value_variable6_164
; static int once_bool_variable6_164
;
2275 static val_t once_value_variable6_167
; static int once_bool_variable6_167
;
2276 static val_t once_value_variable6_170
; static int once_bool_variable6_170
;
2277 static val_t once_value_variable6_173
; static int once_bool_variable6_173
;
2278 static val_t once_value_variable6_176
; static int once_bool_variable6_176
;
2279 static val_t once_value_variable6_179
; static int once_bool_variable6_179
;
2280 static val_t once_value_variable6_182
; static int once_bool_variable6_182
;
2281 static val_t once_value_variable6_185
; static int once_bool_variable6_185
;
2282 static val_t once_value_variable6_188
; static int once_bool_variable6_188
;
2283 static val_t once_value_variable6_191
; static int once_bool_variable6_191
;
2284 static val_t once_value_variable6_194
; static int once_bool_variable6_194
;
2285 static val_t once_value_variable6_195
; static int once_bool_variable6_195
;
2286 static val_t once_value_variable6_197
; static int once_bool_variable6_197
;
2287 static val_t once_value_variable6_199
; static int once_bool_variable6_199
;
2288 static val_t once_value_variable6_201
; static int once_bool_variable6_201
;
2289 static val_t once_value_variable6_203
; static int once_bool_variable6_203
;
2290 static val_t once_value_variable6_205
; static int once_bool_variable6_205
;
2291 static val_t once_value_variable6_208
; static int once_bool_variable6_208
;
2292 static val_t once_value_variable6_211
; static int once_bool_variable6_211
;
2293 static val_t once_value_variable6_212
; static int once_bool_variable6_212
;
2294 static val_t once_value_variable6_214
; static int once_bool_variable6_214
;
2295 static val_t once_value_variable6_217
; static int once_bool_variable6_217
;
2300 static val_t once_value_variable6_221
; static int once_bool_variable6_221
;
2301 static val_t once_value_variable6_225
; static int once_bool_variable6_225
;
2302 static val_t once_value_variable6_226
; static int once_bool_variable6_226
;
2303 static val_t once_value_variable6_228
; static int once_bool_variable6_228
;
2304 static val_t once_value_variable6_230
; static int once_bool_variable6_230
;
2305 static val_t once_value_variable6_233
; static int once_bool_variable6_233
;
2306 static val_t once_value_variable6_237
; static int once_bool_variable6_237
;
2315 static val_t once_value_variable6_243
; static int once_bool_variable6_243
;
2316 static val_t once_value_variable6_245
; static int once_bool_variable6_245
;
2317 static val_t once_value_variable6_246
; static int once_bool_variable6_246
;
2318 static val_t once_value_variable6_249
; static int once_bool_variable6_249
;
2319 static val_t once_value_variable6_251
; static int once_bool_variable6_251
;
2320 static val_t once_value_variable6_253
; static int once_bool_variable6_253
;
2321 trace
.prev
= tracehead
; tracehead
= &trace
;
2325 variable4
= ((abstractmetamodel___MMLocalProperty___local_class_t
)CALL( variable1
/*method*/,COLOR_abstractmetamodel___MMLocalProperty___local_class
))( variable1
/*method*/) /*MMLocalProperty::local_class*/;
2326 variable4
= ((abstractmetamodel___MMLocalClass___name_t
)CALL(variable4
,COLOR_abstractmetamodel___MMLocalClass___name
))(variable4
) /*MMLocalClass::name*/;
2327 variable3
= variable4
;
2328 variable5
= ((abstractmetamodel___MMLocalProperty___name_t
)CALL( variable1
/*method*/,COLOR_abstractmetamodel___MMLocalProperty___name
))( variable1
/*method*/) /*MMLocalProperty::name*/;
2329 variable4
= variable5
;
2330 variable5
= NIT_NULL
/*null*/;
2331 if (once_bool_variable6_59
) variable6
= once_value_variable6_59
;
2333 variable6
= NEW_string___String___with_native(BOX_NativeString("Int"), TAG_Int(3)); /*new String*/
2334 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2335 once_value_variable6_59
= variable6
;
2336 once_bool_variable6_59
= true;
2338 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::==*/)))));
2339 if (UNTAG_Bool(variable6
)) { /*if*/
2340 if (once_bool_variable6_60
) variable6
= once_value_variable6_60
;
2342 variable6
= NEW_string___String___with_native(BOX_NativeString("object_id"), TAG_Int(9)); /*new String*/
2343 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2344 once_value_variable6_60
= variable6
;
2345 once_bool_variable6_60
= true;
2347 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::==*/)))));
2348 if (UNTAG_Bool(variable6
)) { /*if*/
2349 variable6
= NEW_string___String___init(); /*new String*/
2350 variable7
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
2351 variable8
= variable7
;
2352 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
2353 variable9
= TAG_Int(0);
2354 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2355 variable11
= variable10
;
2356 if (UNTAG_Bool(variable11
)) { /* and */
2357 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2358 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
2360 variable10
= variable11
;
2361 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);}
2362 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2363 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
2364 goto return_label61
;
2365 return_label61
: while(false);
2366 variable9
= variable10
;
2367 variable10
= variable9
;
2368 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
2369 variable11
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
2370 variable12
= variable11
;
2371 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
2372 variable5
= variable6
/*s=*/;
2374 if (once_bool_variable6_62
) variable6
= once_value_variable6_62
;
2376 variable6
= NEW_string___String___with_native(BOX_NativeString("unary -"), TAG_Int(7)); /*new String*/
2377 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2378 once_value_variable6_62
= variable6
;
2379 once_bool_variable6_62
= true;
2381 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::==*/)))));
2382 if (UNTAG_Bool(variable6
)) { /*if*/
2383 variable6
= NEW_string___String___init(); /*new String*/
2384 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(-UNTAG_Int("), TAG_Int(19)); /*new String*/
2385 variable8
= variable7
;
2386 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
2387 variable9
= TAG_Int(0);
2388 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2389 variable11
= variable10
;
2390 if (UNTAG_Bool(variable11
)) { /* and */
2391 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2392 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
2394 variable10
= variable11
;
2395 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);}
2396 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2397 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
2398 goto return_label63
;
2399 return_label63
: while(false);
2400 variable9
= variable10
;
2401 variable10
= variable9
;
2402 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
2403 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
2404 variable12
= variable11
;
2405 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
2406 variable5
= variable6
/*s=*/;
2408 if (once_bool_variable6_64
) variable6
= once_value_variable6_64
;
2410 variable6
= NEW_string___String___with_native(BOX_NativeString("output"), TAG_Int(6)); /*new String*/
2411 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2412 once_value_variable6_64
= variable6
;
2413 once_bool_variable6_64
= true;
2415 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::==*/)))));
2416 if (UNTAG_Bool(variable6
)) { /*if*/
2417 variable6
= NEW_string___String___init(); /*new String*/
2418 variable7
= NEW_string___String___with_native(BOX_NativeString("printf(\"%d\\n\", UNTAG_Int("), TAG_Int(25)); /*new String*/
2419 variable8
= variable7
;
2420 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
2421 variable9
= TAG_Int(0);
2422 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2423 variable11
= variable10
;
2424 if (UNTAG_Bool(variable11
)) { /* and */
2425 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2426 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
2428 variable10
= variable11
;
2429 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);}
2430 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2431 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
2432 goto return_label65
;
2433 return_label65
: while(false);
2434 variable9
= variable10
;
2435 variable10
= variable9
;
2436 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
2437 variable11
= NEW_string___String___with_native(BOX_NativeString("));"), TAG_Int(3)); /*new String*/
2438 variable12
= variable11
;
2439 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
2440 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable6
) /*CompilerVisitor::add_instr*/;
2442 if (once_bool_variable6_66
) variable6
= once_value_variable6_66
;
2444 variable6
= NEW_string___String___with_native(BOX_NativeString("ascii"), TAG_Int(5)); /*new String*/
2445 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2446 once_value_variable6_66
= variable6
;
2447 once_bool_variable6_66
= true;
2449 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::==*/)))));
2450 if (UNTAG_Bool(variable6
)) { /*if*/
2451 variable6
= NEW_string___String___init(); /*new String*/
2452 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Char(UNTAG_Int("), TAG_Int(19)); /*new String*/
2453 variable8
= variable7
;
2454 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
2455 variable9
= TAG_Int(0);
2456 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2457 variable11
= variable10
;
2458 if (UNTAG_Bool(variable11
)) { /* and */
2459 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2460 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
2462 variable10
= variable11
;
2463 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);}
2464 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2465 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
2466 goto return_label67
;
2467 return_label67
: while(false);
2468 variable9
= variable10
;
2469 variable10
= variable9
;
2470 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
2471 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
2472 variable12
= variable11
;
2473 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
2474 variable5
= variable6
/*s=*/;
2476 if (once_bool_variable6_68
) variable6
= once_value_variable6_68
;
2478 variable6
= NEW_string___String___with_native(BOX_NativeString("succ"), TAG_Int(4)); /*new String*/
2479 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2480 once_value_variable6_68
= variable6
;
2481 once_bool_variable6_68
= true;
2483 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::==*/)))));
2484 if (UNTAG_Bool(variable6
)) { /*if*/
2485 variable6
= NEW_string___String___init(); /*new String*/
2486 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNTAG_Int("), TAG_Int(18)); /*new String*/
2487 variable8
= variable7
;
2488 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
2489 variable9
= TAG_Int(0);
2490 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2491 variable11
= variable10
;
2492 if (UNTAG_Bool(variable11
)) { /* and */
2493 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2494 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
2496 variable10
= variable11
;
2497 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);}
2498 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2499 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
2500 goto return_label69
;
2501 return_label69
: while(false);
2502 variable9
= variable10
;
2503 variable10
= variable9
;
2504 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
2505 variable11
= NEW_string___String___with_native(BOX_NativeString(")+1)"), TAG_Int(4)); /*new String*/
2506 variable12
= variable11
;
2507 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
2508 variable5
= variable6
/*s=*/;
2510 if (once_bool_variable6_70
) variable6
= once_value_variable6_70
;
2512 variable6
= NEW_string___String___with_native(BOX_NativeString("prec"), TAG_Int(4)); /*new String*/
2513 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2514 once_value_variable6_70
= variable6
;
2515 once_bool_variable6_70
= true;
2517 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::==*/)))));
2518 if (UNTAG_Bool(variable6
)) { /*if*/
2519 variable6
= NEW_string___String___init(); /*new String*/
2520 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNTAG_Int("), TAG_Int(18)); /*new String*/
2521 variable8
= variable7
;
2522 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
2523 variable9
= TAG_Int(0);
2524 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2525 variable11
= variable10
;
2526 if (UNTAG_Bool(variable11
)) { /* and */
2527 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2528 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
2530 variable10
= variable11
;
2531 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);}
2532 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2533 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
2534 goto return_label71
;
2535 return_label71
: while(false);
2536 variable9
= variable10
;
2537 variable10
= variable9
;
2538 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
2539 variable11
= NEW_string___String___with_native(BOX_NativeString(")-1)"), TAG_Int(4)); /*new String*/
2540 variable12
= variable11
;
2541 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
2542 variable5
= variable6
/*s=*/;
2544 if (once_bool_variable6_72
) variable6
= once_value_variable6_72
;
2546 variable6
= NEW_string___String___with_native(BOX_NativeString("to_f"), TAG_Int(4)); /*new String*/
2547 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2548 once_value_variable6_72
= variable6
;
2549 once_bool_variable6_72
= true;
2551 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::==*/)))));
2552 if (UNTAG_Bool(variable6
)) { /*if*/
2553 variable6
= NEW_string___String___init(); /*new String*/
2554 variable7
= NEW_string___String___with_native(BOX_NativeString("BOX_Float((float)UNTAG_Int("), TAG_Int(27)); /*new String*/
2555 variable8
= variable7
;
2556 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
2557 variable9
= TAG_Int(0);
2558 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2559 variable11
= variable10
;
2560 if (UNTAG_Bool(variable11
)) { /* and */
2561 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2562 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
2564 variable10
= variable11
;
2565 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);}
2566 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2567 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
2568 goto return_label73
;
2569 return_label73
: while(false);
2570 variable9
= variable10
;
2571 variable10
= variable9
;
2572 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
2573 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
2574 variable12
= variable11
;
2575 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
2576 variable5
= variable6
/*s=*/;
2578 if (once_bool_variable6_74
) variable6
= once_value_variable6_74
;
2580 variable6
= NEW_string___String___with_native(BOX_NativeString("+"), TAG_Int(1)); /*new String*/
2581 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2582 once_value_variable6_74
= variable6
;
2583 once_bool_variable6_74
= true;
2585 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::==*/)))));
2586 if (UNTAG_Bool(variable6
)) { /*if*/
2587 variable6
= NEW_string___String___init(); /*new String*/
2588 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNTAG_Int("), TAG_Int(18)); /*new String*/
2589 variable8
= variable7
;
2590 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
2591 variable9
= TAG_Int(0);
2592 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2593 variable11
= variable10
;
2594 if (UNTAG_Bool(variable11
)) { /* and */
2595 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2596 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
2598 variable10
= variable11
;
2599 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);}
2600 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2601 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
2602 goto return_label75
;
2603 return_label75
: while(false);
2604 variable9
= variable10
;
2605 variable10
= variable9
;
2606 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
2607 variable11
= NEW_string___String___with_native(BOX_NativeString(")+UNTAG_Int("), TAG_Int(12)); /*new String*/
2608 variable12
= variable11
;
2609 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
2610 variable13
= TAG_Int(1);
2611 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2612 variable15
= variable14
;
2613 if (UNTAG_Bool(variable15
)) { /* and */
2614 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2615 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
2617 variable14
= variable15
;
2618 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);}
2619 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2620 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
2621 goto return_label76
;
2622 return_label76
: while(false);
2623 variable13
= variable14
;
2624 variable14
= variable13
;
2625 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
2626 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
2627 variable16
= variable15
;
2628 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
2629 variable5
= variable6
/*s=*/;
2631 if (once_bool_variable6_77
) variable6
= once_value_variable6_77
;
2633 variable6
= NEW_string___String___with_native(BOX_NativeString("-"), TAG_Int(1)); /*new String*/
2634 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2635 once_value_variable6_77
= variable6
;
2636 once_bool_variable6_77
= true;
2638 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::==*/)))));
2639 if (UNTAG_Bool(variable6
)) { /*if*/
2640 variable6
= NEW_string___String___init(); /*new String*/
2641 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNTAG_Int("), TAG_Int(18)); /*new String*/
2642 variable8
= variable7
;
2643 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
2644 variable9
= TAG_Int(0);
2645 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2646 variable11
= variable10
;
2647 if (UNTAG_Bool(variable11
)) { /* and */
2648 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2649 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
2651 variable10
= variable11
;
2652 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);}
2653 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2654 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
2655 goto return_label78
;
2656 return_label78
: while(false);
2657 variable9
= variable10
;
2658 variable10
= variable9
;
2659 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
2660 variable11
= NEW_string___String___with_native(BOX_NativeString(")-UNTAG_Int("), TAG_Int(12)); /*new String*/
2661 variable12
= variable11
;
2662 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
2663 variable13
= TAG_Int(1);
2664 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2665 variable15
= variable14
;
2666 if (UNTAG_Bool(variable15
)) { /* and */
2667 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2668 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
2670 variable14
= variable15
;
2671 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);}
2672 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2673 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
2674 goto return_label79
;
2675 return_label79
: while(false);
2676 variable13
= variable14
;
2677 variable14
= variable13
;
2678 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
2679 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
2680 variable16
= variable15
;
2681 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
2682 variable5
= variable6
/*s=*/;
2684 if (once_bool_variable6_80
) variable6
= once_value_variable6_80
;
2686 variable6
= NEW_string___String___with_native(BOX_NativeString("*"), TAG_Int(1)); /*new String*/
2687 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2688 once_value_variable6_80
= variable6
;
2689 once_bool_variable6_80
= true;
2691 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::==*/)))));
2692 if (UNTAG_Bool(variable6
)) { /*if*/
2693 variable6
= NEW_string___String___init(); /*new String*/
2694 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNTAG_Int("), TAG_Int(18)); /*new String*/
2695 variable8
= variable7
;
2696 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
2697 variable9
= TAG_Int(0);
2698 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2699 variable11
= variable10
;
2700 if (UNTAG_Bool(variable11
)) { /* and */
2701 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2702 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
2704 variable10
= variable11
;
2705 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);}
2706 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2707 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
2708 goto return_label81
;
2709 return_label81
: while(false);
2710 variable9
= variable10
;
2711 variable10
= variable9
;
2712 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
2713 variable11
= NEW_string___String___with_native(BOX_NativeString(")*UNTAG_Int("), TAG_Int(12)); /*new String*/
2714 variable12
= variable11
;
2715 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
2716 variable13
= TAG_Int(1);
2717 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2718 variable15
= variable14
;
2719 if (UNTAG_Bool(variable15
)) { /* and */
2720 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2721 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
2723 variable14
= variable15
;
2724 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);}
2725 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2726 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
2727 goto return_label82
;
2728 return_label82
: while(false);
2729 variable13
= variable14
;
2730 variable14
= variable13
;
2731 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
2732 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
2733 variable16
= variable15
;
2734 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
2735 variable5
= variable6
/*s=*/;
2737 if (once_bool_variable6_83
) variable6
= once_value_variable6_83
;
2739 variable6
= NEW_string___String___with_native(BOX_NativeString("/"), TAG_Int(1)); /*new String*/
2740 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2741 once_value_variable6_83
= variable6
;
2742 once_bool_variable6_83
= true;
2744 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::==*/)))));
2745 if (UNTAG_Bool(variable6
)) { /*if*/
2746 variable6
= NEW_string___String___init(); /*new String*/
2747 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNTAG_Int("), TAG_Int(18)); /*new String*/
2748 variable8
= variable7
;
2749 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
2750 variable9
= TAG_Int(0);
2751 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2752 variable11
= variable10
;
2753 if (UNTAG_Bool(variable11
)) { /* and */
2754 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2755 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
2757 variable10
= variable11
;
2758 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);}
2759 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2760 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
2761 goto return_label84
;
2762 return_label84
: while(false);
2763 variable9
= variable10
;
2764 variable10
= variable9
;
2765 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
2766 variable11
= NEW_string___String___with_native(BOX_NativeString(")/UNTAG_Int("), TAG_Int(12)); /*new String*/
2767 variable12
= variable11
;
2768 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
2769 variable13
= TAG_Int(1);
2770 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2771 variable15
= variable14
;
2772 if (UNTAG_Bool(variable15
)) { /* and */
2773 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2774 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
2776 variable14
= variable15
;
2777 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);}
2778 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2779 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
2780 goto return_label85
;
2781 return_label85
: while(false);
2782 variable13
= variable14
;
2783 variable14
= variable13
;
2784 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
2785 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
2786 variable16
= variable15
;
2787 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
2788 variable5
= variable6
/*s=*/;
2790 if (once_bool_variable6_86
) variable6
= once_value_variable6_86
;
2792 variable6
= NEW_string___String___with_native(BOX_NativeString("%"), TAG_Int(1)); /*new String*/
2793 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2794 once_value_variable6_86
= variable6
;
2795 once_bool_variable6_86
= true;
2797 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::==*/)))));
2798 if (UNTAG_Bool(variable6
)) { /*if*/
2799 variable6
= NEW_string___String___init(); /*new String*/
2800 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNTAG_Int("), TAG_Int(18)); /*new String*/
2801 variable8
= variable7
;
2802 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
2803 variable9
= TAG_Int(0);
2804 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2805 variable11
= variable10
;
2806 if (UNTAG_Bool(variable11
)) { /* and */
2807 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2808 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
2810 variable10
= variable11
;
2811 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);}
2812 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2813 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
2814 goto return_label87
;
2815 return_label87
: while(false);
2816 variable9
= variable10
;
2817 variable10
= variable9
;
2818 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
2819 variable11
= NEW_string___String___with_native(BOX_NativeString(")%UNTAG_Int("), TAG_Int(12)); /*new String*/
2820 variable12
= variable11
;
2821 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
2822 variable13
= TAG_Int(1);
2823 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2824 variable15
= variable14
;
2825 if (UNTAG_Bool(variable15
)) { /* and */
2826 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2827 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
2829 variable14
= variable15
;
2830 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);}
2831 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2832 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
2833 goto return_label88
;
2834 return_label88
: while(false);
2835 variable13
= variable14
;
2836 variable14
= variable13
;
2837 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
2838 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
2839 variable16
= variable15
;
2840 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
2841 variable5
= variable6
/*s=*/;
2843 if (once_bool_variable6_89
) variable6
= once_value_variable6_89
;
2845 variable6
= NEW_string___String___with_native(BOX_NativeString("<"), TAG_Int(1)); /*new String*/
2846 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2847 once_value_variable6_89
= variable6
;
2848 once_bool_variable6_89
= true;
2850 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::==*/)))));
2851 if (UNTAG_Bool(variable6
)) { /*if*/
2852 variable6
= NEW_string___String___init(); /*new String*/
2853 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(UNTAG_Int("), TAG_Int(19)); /*new String*/
2854 variable8
= variable7
;
2855 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
2856 variable9
= TAG_Int(0);
2857 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2858 variable11
= variable10
;
2859 if (UNTAG_Bool(variable11
)) { /* and */
2860 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2861 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
2863 variable10
= variable11
;
2864 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);}
2865 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2866 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
2867 goto return_label90
;
2868 return_label90
: while(false);
2869 variable9
= variable10
;
2870 variable10
= variable9
;
2871 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
2872 variable11
= NEW_string___String___with_native(BOX_NativeString(")<UNTAG_Int("), TAG_Int(12)); /*new String*/
2873 variable12
= variable11
;
2874 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
2875 variable13
= TAG_Int(1);
2876 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2877 variable15
= variable14
;
2878 if (UNTAG_Bool(variable15
)) { /* and */
2879 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2880 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
2882 variable14
= variable15
;
2883 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);}
2884 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2885 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
2886 goto return_label91
;
2887 return_label91
: while(false);
2888 variable13
= variable14
;
2889 variable14
= variable13
;
2890 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
2891 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
2892 variable16
= variable15
;
2893 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
2894 variable5
= variable6
/*s=*/;
2896 if (once_bool_variable6_92
) variable6
= once_value_variable6_92
;
2898 variable6
= NEW_string___String___with_native(BOX_NativeString(">"), TAG_Int(1)); /*new String*/
2899 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2900 once_value_variable6_92
= variable6
;
2901 once_bool_variable6_92
= true;
2903 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::==*/)))));
2904 if (UNTAG_Bool(variable6
)) { /*if*/
2905 variable6
= NEW_string___String___init(); /*new String*/
2906 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(UNTAG_Int("), TAG_Int(19)); /*new String*/
2907 variable8
= variable7
;
2908 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
2909 variable9
= TAG_Int(0);
2910 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2911 variable11
= variable10
;
2912 if (UNTAG_Bool(variable11
)) { /* and */
2913 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2914 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
2916 variable10
= variable11
;
2917 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);}
2918 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2919 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
2920 goto return_label93
;
2921 return_label93
: while(false);
2922 variable9
= variable10
;
2923 variable10
= variable9
;
2924 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
2925 variable11
= NEW_string___String___with_native(BOX_NativeString(")>UNTAG_Int("), TAG_Int(12)); /*new String*/
2926 variable12
= variable11
;
2927 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
2928 variable13
= TAG_Int(1);
2929 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2930 variable15
= variable14
;
2931 if (UNTAG_Bool(variable15
)) { /* and */
2932 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2933 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
2935 variable14
= variable15
;
2936 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);}
2937 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2938 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
2939 goto return_label94
;
2940 return_label94
: while(false);
2941 variable13
= variable14
;
2942 variable14
= variable13
;
2943 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
2944 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
2945 variable16
= variable15
;
2946 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
2947 variable5
= variable6
/*s=*/;
2949 if (once_bool_variable6_95
) variable6
= once_value_variable6_95
;
2951 variable6
= NEW_string___String___with_native(BOX_NativeString("<="), TAG_Int(2)); /*new String*/
2952 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
2953 once_value_variable6_95
= variable6
;
2954 once_bool_variable6_95
= true;
2956 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::==*/)))));
2957 if (UNTAG_Bool(variable6
)) { /*if*/
2958 variable6
= NEW_string___String___init(); /*new String*/
2959 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(UNTAG_Int("), TAG_Int(19)); /*new String*/
2960 variable8
= variable7
;
2961 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
2962 variable9
= TAG_Int(0);
2963 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2964 variable11
= variable10
;
2965 if (UNTAG_Bool(variable11
)) { /* and */
2966 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2967 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
2969 variable10
= variable11
;
2970 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);}
2971 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2972 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
2973 goto return_label96
;
2974 return_label96
: while(false);
2975 variable9
= variable10
;
2976 variable10
= variable9
;
2977 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
2978 variable11
= NEW_string___String___with_native(BOX_NativeString(")<=UNTAG_Int("), TAG_Int(13)); /*new String*/
2979 variable12
= variable11
;
2980 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
2981 variable13
= TAG_Int(1);
2982 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
2983 variable15
= variable14
;
2984 if (UNTAG_Bool(variable15
)) { /* and */
2985 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
2986 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
2988 variable14
= variable15
;
2989 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);}
2990 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
2991 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
2992 goto return_label97
;
2993 return_label97
: while(false);
2994 variable13
= variable14
;
2995 variable14
= variable13
;
2996 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
2997 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
2998 variable16
= variable15
;
2999 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
3000 variable5
= variable6
/*s=*/;
3002 if (once_bool_variable6_98
) variable6
= once_value_variable6_98
;
3004 variable6
= NEW_string___String___with_native(BOX_NativeString(">="), TAG_Int(2)); /*new String*/
3005 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3006 once_value_variable6_98
= variable6
;
3007 once_bool_variable6_98
= true;
3009 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::==*/)))));
3010 if (UNTAG_Bool(variable6
)) { /*if*/
3011 variable6
= NEW_string___String___init(); /*new String*/
3012 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(UNTAG_Int("), TAG_Int(19)); /*new String*/
3013 variable8
= variable7
;
3014 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3015 variable9
= TAG_Int(0);
3016 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3017 variable11
= variable10
;
3018 if (UNTAG_Bool(variable11
)) { /* and */
3019 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3020 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3022 variable10
= variable11
;
3023 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);}
3024 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3025 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3026 goto return_label99
;
3027 return_label99
: while(false);
3028 variable9
= variable10
;
3029 variable10
= variable9
;
3030 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3031 variable11
= NEW_string___String___with_native(BOX_NativeString(")>=UNTAG_Int("), TAG_Int(13)); /*new String*/
3032 variable12
= variable11
;
3033 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3034 variable13
= TAG_Int(1);
3035 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3036 variable15
= variable14
;
3037 if (UNTAG_Bool(variable15
)) { /* and */
3038 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3039 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
3041 variable14
= variable15
;
3042 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);}
3043 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3044 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
3045 goto return_label100
;
3046 return_label100
: while(false);
3047 variable13
= variable14
;
3048 variable14
= variable13
;
3049 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
3050 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3051 variable16
= variable15
;
3052 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
3053 variable5
= variable6
/*s=*/;
3055 if (once_bool_variable6_101
) variable6
= once_value_variable6_101
;
3057 variable6
= NEW_string___String___with_native(BOX_NativeString("lshift"), TAG_Int(6)); /*new String*/
3058 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3059 once_value_variable6_101
= variable6
;
3060 once_bool_variable6_101
= true;
3062 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::==*/)))));
3063 if (UNTAG_Bool(variable6
)) { /*if*/
3064 variable6
= NEW_string___String___init(); /*new String*/
3065 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNTAG_Int("), TAG_Int(18)); /*new String*/
3066 variable8
= variable7
;
3067 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3068 variable9
= TAG_Int(0);
3069 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3070 variable11
= variable10
;
3071 if (UNTAG_Bool(variable11
)) { /* and */
3072 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3073 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3075 variable10
= variable11
;
3076 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);}
3077 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3078 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3079 goto return_label102
;
3080 return_label102
: while(false);
3081 variable9
= variable10
;
3082 variable10
= variable9
;
3083 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3084 variable11
= NEW_string___String___with_native(BOX_NativeString(")<<UNTAG_Int("), TAG_Int(13)); /*new String*/
3085 variable12
= variable11
;
3086 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3087 variable13
= TAG_Int(1);
3088 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3089 variable15
= variable14
;
3090 if (UNTAG_Bool(variable15
)) { /* and */
3091 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3092 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
3094 variable14
= variable15
;
3095 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);}
3096 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3097 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
3098 goto return_label103
;
3099 return_label103
: while(false);
3100 variable13
= variable14
;
3101 variable14
= variable13
;
3102 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
3103 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3104 variable16
= variable15
;
3105 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
3106 variable5
= variable6
/*s=*/;
3108 if (once_bool_variable6_104
) variable6
= once_value_variable6_104
;
3110 variable6
= NEW_string___String___with_native(BOX_NativeString("rshift"), TAG_Int(6)); /*new String*/
3111 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3112 once_value_variable6_104
= variable6
;
3113 once_bool_variable6_104
= true;
3115 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::==*/)))));
3116 if (UNTAG_Bool(variable6
)) { /*if*/
3117 variable6
= NEW_string___String___init(); /*new String*/
3118 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNTAG_Int("), TAG_Int(18)); /*new String*/
3119 variable8
= variable7
;
3120 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3121 variable9
= TAG_Int(0);
3122 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3123 variable11
= variable10
;
3124 if (UNTAG_Bool(variable11
)) { /* and */
3125 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3126 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3128 variable10
= variable11
;
3129 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);}
3130 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3131 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3132 goto return_label105
;
3133 return_label105
: while(false);
3134 variable9
= variable10
;
3135 variable10
= variable9
;
3136 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3137 variable11
= NEW_string___String___with_native(BOX_NativeString(")>>UNTAG_Int("), TAG_Int(13)); /*new String*/
3138 variable12
= variable11
;
3139 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3140 variable13
= TAG_Int(1);
3141 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3142 variable15
= variable14
;
3143 if (UNTAG_Bool(variable15
)) { /* and */
3144 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3145 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
3147 variable14
= variable15
;
3148 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);}
3149 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3150 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
3151 goto return_label106
;
3152 return_label106
: while(false);
3153 variable13
= variable14
;
3154 variable14
= variable13
;
3155 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
3156 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3157 variable16
= variable15
;
3158 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
3159 variable5
= variable6
/*s=*/;
3161 if (once_bool_variable6_107
) variable6
= once_value_variable6_107
;
3163 variable6
= NEW_string___String___with_native(BOX_NativeString("=="), TAG_Int(2)); /*new String*/
3164 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3165 once_value_variable6_107
= variable6
;
3166 once_bool_variable6_107
= true;
3168 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::==*/)))));
3169 if (UNTAG_Bool(variable6
)) { /*if*/
3170 variable6
= NEW_string___String___init(); /*new String*/
3171 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(("), TAG_Int(10)); /*new String*/
3172 variable8
= variable7
;
3173 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3174 variable9
= TAG_Int(0);
3175 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3176 variable11
= variable10
;
3177 if (UNTAG_Bool(variable11
)) { /* and */
3178 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3179 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3181 variable10
= variable11
;
3182 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);}
3183 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3184 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3185 goto return_label108
;
3186 return_label108
: while(false);
3187 variable9
= variable10
;
3188 variable10
= variable9
;
3189 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3190 variable11
= NEW_string___String___with_native(BOX_NativeString(")==("), TAG_Int(4)); /*new String*/
3191 variable12
= variable11
;
3192 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3193 variable13
= TAG_Int(1);
3194 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3195 variable15
= variable14
;
3196 if (UNTAG_Bool(variable15
)) { /* and */
3197 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3198 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
3200 variable14
= variable15
;
3201 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);}
3202 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3203 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
3204 goto return_label109
;
3205 return_label109
: while(false);
3206 variable13
= variable14
;
3207 variable14
= variable13
;
3208 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
3209 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3210 variable16
= variable15
;
3211 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
3212 variable5
= variable6
/*s=*/;
3214 if (once_bool_variable6_110
) variable6
= once_value_variable6_110
;
3216 variable6
= NEW_string___String___with_native(BOX_NativeString("!="), TAG_Int(2)); /*new String*/
3217 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3218 once_value_variable6_110
= variable6
;
3219 once_bool_variable6_110
= true;
3221 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::==*/)))));
3222 if (UNTAG_Bool(variable6
)) { /*if*/
3223 variable6
= NEW_string___String___init(); /*new String*/
3224 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(("), TAG_Int(10)); /*new String*/
3225 variable8
= variable7
;
3226 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3227 variable9
= TAG_Int(0);
3228 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3229 variable11
= variable10
;
3230 if (UNTAG_Bool(variable11
)) { /* and */
3231 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3232 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3234 variable10
= variable11
;
3235 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);}
3236 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3237 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3238 goto return_label111
;
3239 return_label111
: while(false);
3240 variable9
= variable10
;
3241 variable10
= variable9
;
3242 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3243 variable11
= NEW_string___String___with_native(BOX_NativeString(")!=("), TAG_Int(4)); /*new String*/
3244 variable12
= variable11
;
3245 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3246 variable13
= TAG_Int(1);
3247 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3248 variable15
= variable14
;
3249 if (UNTAG_Bool(variable15
)) { /* and */
3250 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3251 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
3253 variable14
= variable15
;
3254 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);}
3255 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3256 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
3257 goto return_label112
;
3258 return_label112
: while(false);
3259 variable13
= variable14
;
3260 variable14
= variable13
;
3261 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
3262 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3263 variable16
= variable15
;
3264 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
3265 variable5
= variable6
/*s=*/;
3287 if (once_bool_variable6_113
) variable6
= once_value_variable6_113
;
3289 variable6
= NEW_string___String___with_native(BOX_NativeString("Float"), TAG_Int(5)); /*new String*/
3290 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3291 once_value_variable6_113
= variable6
;
3292 once_bool_variable6_113
= true;
3294 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::==*/)))));
3295 if (UNTAG_Bool(variable6
)) { /*if*/
3296 if (once_bool_variable6_114
) variable6
= once_value_variable6_114
;
3298 variable6
= NEW_string___String___with_native(BOX_NativeString("object_id"), TAG_Int(9)); /*new String*/
3299 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3300 once_value_variable6_114
= variable6
;
3301 once_bool_variable6_114
= true;
3303 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::==*/)))));
3304 if (UNTAG_Bool(variable6
)) { /*if*/
3305 variable6
= NEW_string___String___init(); /*new String*/
3306 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int((bigint)UNBOX_Float("), TAG_Int(28)); /*new String*/
3307 variable8
= variable7
;
3308 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3309 variable9
= TAG_Int(0);
3310 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3311 variable11
= variable10
;
3312 if (UNTAG_Bool(variable11
)) { /* and */
3313 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3314 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3316 variable10
= variable11
;
3317 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);}
3318 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3319 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3320 goto return_label115
;
3321 return_label115
: while(false);
3322 variable9
= variable10
;
3323 variable10
= variable9
;
3324 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3325 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3326 variable12
= variable11
;
3327 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3328 variable5
= variable6
/*s=*/;
3330 if (once_bool_variable6_116
) variable6
= once_value_variable6_116
;
3332 variable6
= NEW_string___String___with_native(BOX_NativeString("unary -"), TAG_Int(7)); /*new String*/
3333 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3334 once_value_variable6_116
= variable6
;
3335 once_bool_variable6_116
= true;
3337 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::==*/)))));
3338 if (UNTAG_Bool(variable6
)) { /*if*/
3339 variable6
= NEW_string___String___init(); /*new String*/
3340 variable7
= NEW_string___String___with_native(BOX_NativeString("BOX_Float(-UNBOX_Float("), TAG_Int(23)); /*new String*/
3341 variable8
= variable7
;
3342 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3343 variable9
= TAG_Int(0);
3344 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3345 variable11
= variable10
;
3346 if (UNTAG_Bool(variable11
)) { /* and */
3347 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3348 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3350 variable10
= variable11
;
3351 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);}
3352 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3353 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3354 goto return_label117
;
3355 return_label117
: while(false);
3356 variable9
= variable10
;
3357 variable10
= variable9
;
3358 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3359 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3360 variable12
= variable11
;
3361 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3362 variable5
= variable6
/*s=*/;
3364 if (once_bool_variable6_118
) variable6
= once_value_variable6_118
;
3366 variable6
= NEW_string___String___with_native(BOX_NativeString("output"), TAG_Int(6)); /*new String*/
3367 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3368 once_value_variable6_118
= variable6
;
3369 once_bool_variable6_118
= true;
3371 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::==*/)))));
3372 if (UNTAG_Bool(variable6
)) { /*if*/
3373 variable6
= NEW_string___String___init(); /*new String*/
3374 variable7
= NEW_string___String___with_native(BOX_NativeString("printf(\"%f\\n\", UNBOX_Float("), TAG_Int(27)); /*new String*/
3375 variable8
= variable7
;
3376 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3377 variable9
= TAG_Int(0);
3378 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3379 variable11
= variable10
;
3380 if (UNTAG_Bool(variable11
)) { /* and */
3381 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3382 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3384 variable10
= variable11
;
3385 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);}
3386 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3387 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3388 goto return_label119
;
3389 return_label119
: while(false);
3390 variable9
= variable10
;
3391 variable10
= variable9
;
3392 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3393 variable11
= NEW_string___String___with_native(BOX_NativeString("));"), TAG_Int(3)); /*new String*/
3394 variable12
= variable11
;
3395 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3396 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable6
) /*CompilerVisitor::add_instr*/;
3398 if (once_bool_variable6_120
) variable6
= once_value_variable6_120
;
3400 variable6
= NEW_string___String___with_native(BOX_NativeString("to_i"), TAG_Int(4)); /*new String*/
3401 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3402 once_value_variable6_120
= variable6
;
3403 once_bool_variable6_120
= true;
3405 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::==*/)))));
3406 if (UNTAG_Bool(variable6
)) { /*if*/
3407 variable6
= NEW_string___String___init(); /*new String*/
3408 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int((bigint)UNBOX_Float("), TAG_Int(28)); /*new String*/
3409 variable8
= variable7
;
3410 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3411 variable9
= TAG_Int(0);
3412 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3413 variable11
= variable10
;
3414 if (UNTAG_Bool(variable11
)) { /* and */
3415 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3416 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3418 variable10
= variable11
;
3419 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);}
3420 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3421 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3422 goto return_label121
;
3423 return_label121
: while(false);
3424 variable9
= variable10
;
3425 variable10
= variable9
;
3426 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3427 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3428 variable12
= variable11
;
3429 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3430 variable5
= variable6
/*s=*/;
3432 if (once_bool_variable6_122
) variable6
= once_value_variable6_122
;
3434 variable6
= NEW_string___String___with_native(BOX_NativeString("+"), TAG_Int(1)); /*new String*/
3435 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3436 once_value_variable6_122
= variable6
;
3437 once_bool_variable6_122
= true;
3439 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::==*/)))));
3440 if (UNTAG_Bool(variable6
)) { /*if*/
3441 variable6
= NEW_string___String___init(); /*new String*/
3442 variable7
= NEW_string___String___with_native(BOX_NativeString("BOX_Float(UNBOX_Float("), TAG_Int(22)); /*new String*/
3443 variable8
= variable7
;
3444 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3445 variable9
= TAG_Int(0);
3446 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3447 variable11
= variable10
;
3448 if (UNTAG_Bool(variable11
)) { /* and */
3449 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3450 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3452 variable10
= variable11
;
3453 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);}
3454 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3455 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3456 goto return_label123
;
3457 return_label123
: while(false);
3458 variable9
= variable10
;
3459 variable10
= variable9
;
3460 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3461 variable11
= NEW_string___String___with_native(BOX_NativeString(")+UNBOX_Float("), TAG_Int(14)); /*new String*/
3462 variable12
= variable11
;
3463 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3464 variable13
= TAG_Int(1);
3465 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3466 variable15
= variable14
;
3467 if (UNTAG_Bool(variable15
)) { /* and */
3468 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3469 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
3471 variable14
= variable15
;
3472 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);}
3473 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3474 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
3475 goto return_label124
;
3476 return_label124
: while(false);
3477 variable13
= variable14
;
3478 variable14
= variable13
;
3479 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
3480 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3481 variable16
= variable15
;
3482 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
3483 variable5
= variable6
/*s=*/;
3485 if (once_bool_variable6_125
) variable6
= once_value_variable6_125
;
3487 variable6
= NEW_string___String___with_native(BOX_NativeString("-"), TAG_Int(1)); /*new String*/
3488 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3489 once_value_variable6_125
= variable6
;
3490 once_bool_variable6_125
= true;
3492 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::==*/)))));
3493 if (UNTAG_Bool(variable6
)) { /*if*/
3494 variable6
= NEW_string___String___init(); /*new String*/
3495 variable7
= NEW_string___String___with_native(BOX_NativeString("BOX_Float(UNBOX_Float("), TAG_Int(22)); /*new String*/
3496 variable8
= variable7
;
3497 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3498 variable9
= TAG_Int(0);
3499 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3500 variable11
= variable10
;
3501 if (UNTAG_Bool(variable11
)) { /* and */
3502 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3503 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3505 variable10
= variable11
;
3506 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);}
3507 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3508 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3509 goto return_label126
;
3510 return_label126
: while(false);
3511 variable9
= variable10
;
3512 variable10
= variable9
;
3513 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3514 variable11
= NEW_string___String___with_native(BOX_NativeString(")-UNBOX_Float("), TAG_Int(14)); /*new String*/
3515 variable12
= variable11
;
3516 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3517 variable13
= TAG_Int(1);
3518 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3519 variable15
= variable14
;
3520 if (UNTAG_Bool(variable15
)) { /* and */
3521 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3522 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
3524 variable14
= variable15
;
3525 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);}
3526 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3527 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
3528 goto return_label127
;
3529 return_label127
: while(false);
3530 variable13
= variable14
;
3531 variable14
= variable13
;
3532 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
3533 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3534 variable16
= variable15
;
3535 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
3536 variable5
= variable6
/*s=*/;
3538 if (once_bool_variable6_128
) variable6
= once_value_variable6_128
;
3540 variable6
= NEW_string___String___with_native(BOX_NativeString("*"), TAG_Int(1)); /*new String*/
3541 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3542 once_value_variable6_128
= variable6
;
3543 once_bool_variable6_128
= true;
3545 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::==*/)))));
3546 if (UNTAG_Bool(variable6
)) { /*if*/
3547 variable6
= NEW_string___String___init(); /*new String*/
3548 variable7
= NEW_string___String___with_native(BOX_NativeString("BOX_Float(UNBOX_Float("), TAG_Int(22)); /*new String*/
3549 variable8
= variable7
;
3550 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3551 variable9
= TAG_Int(0);
3552 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3553 variable11
= variable10
;
3554 if (UNTAG_Bool(variable11
)) { /* and */
3555 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3556 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3558 variable10
= variable11
;
3559 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);}
3560 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3561 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3562 goto return_label129
;
3563 return_label129
: while(false);
3564 variable9
= variable10
;
3565 variable10
= variable9
;
3566 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3567 variable11
= NEW_string___String___with_native(BOX_NativeString(")*UNBOX_Float("), TAG_Int(14)); /*new String*/
3568 variable12
= variable11
;
3569 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3570 variable13
= TAG_Int(1);
3571 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3572 variable15
= variable14
;
3573 if (UNTAG_Bool(variable15
)) { /* and */
3574 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3575 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
3577 variable14
= variable15
;
3578 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);}
3579 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3580 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
3581 goto return_label130
;
3582 return_label130
: while(false);
3583 variable13
= variable14
;
3584 variable14
= variable13
;
3585 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
3586 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3587 variable16
= variable15
;
3588 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
3589 variable5
= variable6
/*s=*/;
3591 if (once_bool_variable6_131
) variable6
= once_value_variable6_131
;
3593 variable6
= NEW_string___String___with_native(BOX_NativeString("/"), TAG_Int(1)); /*new String*/
3594 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3595 once_value_variable6_131
= variable6
;
3596 once_bool_variable6_131
= true;
3598 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::==*/)))));
3599 if (UNTAG_Bool(variable6
)) { /*if*/
3600 variable6
= NEW_string___String___init(); /*new String*/
3601 variable7
= NEW_string___String___with_native(BOX_NativeString("BOX_Float(UNBOX_Float("), TAG_Int(22)); /*new String*/
3602 variable8
= variable7
;
3603 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3604 variable9
= TAG_Int(0);
3605 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3606 variable11
= variable10
;
3607 if (UNTAG_Bool(variable11
)) { /* and */
3608 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3609 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3611 variable10
= variable11
;
3612 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);}
3613 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3614 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3615 goto return_label132
;
3616 return_label132
: while(false);
3617 variable9
= variable10
;
3618 variable10
= variable9
;
3619 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3620 variable11
= NEW_string___String___with_native(BOX_NativeString(")/UNBOX_Float("), TAG_Int(14)); /*new String*/
3621 variable12
= variable11
;
3622 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3623 variable13
= TAG_Int(1);
3624 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3625 variable15
= variable14
;
3626 if (UNTAG_Bool(variable15
)) { /* and */
3627 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3628 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
3630 variable14
= variable15
;
3631 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);}
3632 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3633 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
3634 goto return_label133
;
3635 return_label133
: while(false);
3636 variable13
= variable14
;
3637 variable14
= variable13
;
3638 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
3639 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3640 variable16
= variable15
;
3641 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
3642 variable5
= variable6
/*s=*/;
3644 if (once_bool_variable6_134
) variable6
= once_value_variable6_134
;
3646 variable6
= NEW_string___String___with_native(BOX_NativeString("<"), TAG_Int(1)); /*new String*/
3647 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3648 once_value_variable6_134
= variable6
;
3649 once_bool_variable6_134
= true;
3651 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::==*/)))));
3652 if (UNTAG_Bool(variable6
)) { /*if*/
3653 variable6
= NEW_string___String___init(); /*new String*/
3654 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(UNBOX_Float("), TAG_Int(21)); /*new String*/
3655 variable8
= variable7
;
3656 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3657 variable9
= TAG_Int(0);
3658 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3659 variable11
= variable10
;
3660 if (UNTAG_Bool(variable11
)) { /* and */
3661 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3662 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3664 variable10
= variable11
;
3665 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);}
3666 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3667 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3668 goto return_label135
;
3669 return_label135
: while(false);
3670 variable9
= variable10
;
3671 variable10
= variable9
;
3672 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3673 variable11
= NEW_string___String___with_native(BOX_NativeString(")<UNBOX_Float("), TAG_Int(14)); /*new String*/
3674 variable12
= variable11
;
3675 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3676 variable13
= TAG_Int(1);
3677 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3678 variable15
= variable14
;
3679 if (UNTAG_Bool(variable15
)) { /* and */
3680 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3681 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
3683 variable14
= variable15
;
3684 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);}
3685 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3686 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
3687 goto return_label136
;
3688 return_label136
: while(false);
3689 variable13
= variable14
;
3690 variable14
= variable13
;
3691 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
3692 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3693 variable16
= variable15
;
3694 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
3695 variable5
= variable6
/*s=*/;
3697 if (once_bool_variable6_137
) variable6
= once_value_variable6_137
;
3699 variable6
= NEW_string___String___with_native(BOX_NativeString(">"), TAG_Int(1)); /*new String*/
3700 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3701 once_value_variable6_137
= variable6
;
3702 once_bool_variable6_137
= true;
3704 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::==*/)))));
3705 if (UNTAG_Bool(variable6
)) { /*if*/
3706 variable6
= NEW_string___String___init(); /*new String*/
3707 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(UNBOX_Float("), TAG_Int(21)); /*new String*/
3708 variable8
= variable7
;
3709 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3710 variable9
= TAG_Int(0);
3711 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3712 variable11
= variable10
;
3713 if (UNTAG_Bool(variable11
)) { /* and */
3714 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3715 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3717 variable10
= variable11
;
3718 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);}
3719 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3720 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3721 goto return_label138
;
3722 return_label138
: while(false);
3723 variable9
= variable10
;
3724 variable10
= variable9
;
3725 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3726 variable11
= NEW_string___String___with_native(BOX_NativeString(")>UNBOX_Float("), TAG_Int(14)); /*new String*/
3727 variable12
= variable11
;
3728 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3729 variable13
= TAG_Int(1);
3730 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3731 variable15
= variable14
;
3732 if (UNTAG_Bool(variable15
)) { /* and */
3733 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3734 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
3736 variable14
= variable15
;
3737 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);}
3738 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3739 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
3740 goto return_label139
;
3741 return_label139
: while(false);
3742 variable13
= variable14
;
3743 variable14
= variable13
;
3744 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
3745 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3746 variable16
= variable15
;
3747 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
3748 variable5
= variable6
/*s=*/;
3750 if (once_bool_variable6_140
) variable6
= once_value_variable6_140
;
3752 variable6
= NEW_string___String___with_native(BOX_NativeString("<="), TAG_Int(2)); /*new String*/
3753 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3754 once_value_variable6_140
= variable6
;
3755 once_bool_variable6_140
= true;
3757 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::==*/)))));
3758 if (UNTAG_Bool(variable6
)) { /*if*/
3759 variable6
= NEW_string___String___init(); /*new String*/
3760 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(UNBOX_Float("), TAG_Int(21)); /*new String*/
3761 variable8
= variable7
;
3762 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3763 variable9
= TAG_Int(0);
3764 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3765 variable11
= variable10
;
3766 if (UNTAG_Bool(variable11
)) { /* and */
3767 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3768 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3770 variable10
= variable11
;
3771 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);}
3772 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3773 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3774 goto return_label141
;
3775 return_label141
: while(false);
3776 variable9
= variable10
;
3777 variable10
= variable9
;
3778 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3779 variable11
= NEW_string___String___with_native(BOX_NativeString(")<=UNBOX_Float("), TAG_Int(15)); /*new String*/
3780 variable12
= variable11
;
3781 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3782 variable13
= TAG_Int(1);
3783 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3784 variable15
= variable14
;
3785 if (UNTAG_Bool(variable15
)) { /* and */
3786 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3787 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
3789 variable14
= variable15
;
3790 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);}
3791 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3792 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
3793 goto return_label142
;
3794 return_label142
: while(false);
3795 variable13
= variable14
;
3796 variable14
= variable13
;
3797 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
3798 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3799 variable16
= variable15
;
3800 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
3801 variable5
= variable6
/*s=*/;
3803 if (once_bool_variable6_143
) variable6
= once_value_variable6_143
;
3805 variable6
= NEW_string___String___with_native(BOX_NativeString(">="), TAG_Int(2)); /*new String*/
3806 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3807 once_value_variable6_143
= variable6
;
3808 once_bool_variable6_143
= true;
3810 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::==*/)))));
3811 if (UNTAG_Bool(variable6
)) { /*if*/
3812 variable6
= NEW_string___String___init(); /*new String*/
3813 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(UNBOX_Float("), TAG_Int(21)); /*new String*/
3814 variable8
= variable7
;
3815 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3816 variable9
= TAG_Int(0);
3817 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3818 variable11
= variable10
;
3819 if (UNTAG_Bool(variable11
)) { /* and */
3820 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3821 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3823 variable10
= variable11
;
3824 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);}
3825 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3826 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3827 goto return_label144
;
3828 return_label144
: while(false);
3829 variable9
= variable10
;
3830 variable10
= variable9
;
3831 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3832 variable11
= NEW_string___String___with_native(BOX_NativeString(")>=UNBOX_Float("), TAG_Int(15)); /*new String*/
3833 variable12
= variable11
;
3834 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3835 variable13
= TAG_Int(1);
3836 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3837 variable15
= variable14
;
3838 if (UNTAG_Bool(variable15
)) { /* and */
3839 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3840 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
3842 variable14
= variable15
;
3843 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);}
3844 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3845 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
3846 goto return_label145
;
3847 return_label145
: while(false);
3848 variable13
= variable14
;
3849 variable14
= variable13
;
3850 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
3851 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3852 variable16
= variable15
;
3853 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
3854 variable5
= variable6
/*s=*/;
3868 if (once_bool_variable6_146
) variable6
= once_value_variable6_146
;
3870 variable6
= NEW_string___String___with_native(BOX_NativeString("Char"), TAG_Int(4)); /*new String*/
3871 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3872 once_value_variable6_146
= variable6
;
3873 once_bool_variable6_146
= true;
3875 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::==*/)))));
3876 if (UNTAG_Bool(variable6
)) { /*if*/
3877 if (once_bool_variable6_147
) variable6
= once_value_variable6_147
;
3879 variable6
= NEW_string___String___with_native(BOX_NativeString("object_id"), TAG_Int(9)); /*new String*/
3880 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3881 once_value_variable6_147
= variable6
;
3882 once_bool_variable6_147
= true;
3884 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::==*/)))));
3885 if (UNTAG_Bool(variable6
)) { /*if*/
3886 variable6
= NEW_string___String___init(); /*new String*/
3887 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNTAG_Char("), TAG_Int(19)); /*new String*/
3888 variable8
= variable7
;
3889 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3890 variable9
= TAG_Int(0);
3891 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3892 variable11
= variable10
;
3893 if (UNTAG_Bool(variable11
)) { /* and */
3894 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3895 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3897 variable10
= variable11
;
3898 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);}
3899 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3900 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3901 goto return_label148
;
3902 return_label148
: while(false);
3903 variable9
= variable10
;
3904 variable10
= variable9
;
3905 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3906 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3907 variable12
= variable11
;
3908 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3909 variable5
= variable6
/*s=*/;
3911 if (once_bool_variable6_149
) variable6
= once_value_variable6_149
;
3913 variable6
= NEW_string___String___with_native(BOX_NativeString("unary -"), TAG_Int(7)); /*new String*/
3914 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3915 once_value_variable6_149
= variable6
;
3916 once_bool_variable6_149
= true;
3918 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::==*/)))));
3919 if (UNTAG_Bool(variable6
)) { /*if*/
3920 variable6
= NEW_string___String___init(); /*new String*/
3921 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Char(-UNTAG_Char("), TAG_Int(21)); /*new String*/
3922 variable8
= variable7
;
3923 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3924 variable9
= TAG_Int(0);
3925 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3926 variable11
= variable10
;
3927 if (UNTAG_Bool(variable11
)) { /* and */
3928 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3929 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3931 variable10
= variable11
;
3932 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);}
3933 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3934 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3935 goto return_label150
;
3936 return_label150
: while(false);
3937 variable9
= variable10
;
3938 variable10
= variable9
;
3939 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3940 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
3941 variable12
= variable11
;
3942 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3943 variable5
= variable6
/*s=*/;
3945 if (once_bool_variable6_151
) variable6
= once_value_variable6_151
;
3947 variable6
= NEW_string___String___with_native(BOX_NativeString("output"), TAG_Int(6)); /*new String*/
3948 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3949 once_value_variable6_151
= variable6
;
3950 once_bool_variable6_151
= true;
3952 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::==*/)))));
3953 if (UNTAG_Bool(variable6
)) { /*if*/
3954 variable6
= NEW_string___String___init(); /*new String*/
3955 variable7
= NEW_string___String___with_native(BOX_NativeString("printf(\"%c\", (unsigned char)UNTAG_Char("), TAG_Int(39)); /*new String*/
3956 variable8
= variable7
;
3957 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3958 variable9
= TAG_Int(0);
3959 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3960 variable11
= variable10
;
3961 if (UNTAG_Bool(variable11
)) { /* and */
3962 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3963 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3965 variable10
= variable11
;
3966 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);}
3967 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
3968 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
3969 goto return_label152
;
3970 return_label152
: while(false);
3971 variable9
= variable10
;
3972 variable10
= variable9
;
3973 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
3974 variable11
= NEW_string___String___with_native(BOX_NativeString("));"), TAG_Int(3)); /*new String*/
3975 variable12
= variable11
;
3976 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
3977 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable6
) /*CompilerVisitor::add_instr*/;
3979 if (once_bool_variable6_153
) variable6
= once_value_variable6_153
;
3981 variable6
= NEW_string___String___with_native(BOX_NativeString("ascii"), TAG_Int(5)); /*new String*/
3982 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
3983 once_value_variable6_153
= variable6
;
3984 once_bool_variable6_153
= true;
3986 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::==*/)))));
3987 if (UNTAG_Bool(variable6
)) { /*if*/
3988 variable6
= NEW_string___String___init(); /*new String*/
3989 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int((unsigned char)UNTAG_Char("), TAG_Int(34)); /*new String*/
3990 variable8
= variable7
;
3991 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
3992 variable9
= TAG_Int(0);
3993 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
3994 variable11
= variable10
;
3995 if (UNTAG_Bool(variable11
)) { /* and */
3996 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
3997 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
3999 variable10
= variable11
;
4000 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);}
4001 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4002 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4003 goto return_label154
;
4004 return_label154
: while(false);
4005 variable9
= variable10
;
4006 variable10
= variable9
;
4007 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4008 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4009 variable12
= variable11
;
4010 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4011 variable5
= variable6
/*s=*/;
4013 if (once_bool_variable6_155
) variable6
= once_value_variable6_155
;
4015 variable6
= NEW_string___String___with_native(BOX_NativeString("succ"), TAG_Int(4)); /*new String*/
4016 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4017 once_value_variable6_155
= variable6
;
4018 once_bool_variable6_155
= true;
4020 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::==*/)))));
4021 if (UNTAG_Bool(variable6
)) { /*if*/
4022 variable6
= NEW_string___String___init(); /*new String*/
4023 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Char(UNTAG_Char("), TAG_Int(20)); /*new String*/
4024 variable8
= variable7
;
4025 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4026 variable9
= TAG_Int(0);
4027 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4028 variable11
= variable10
;
4029 if (UNTAG_Bool(variable11
)) { /* and */
4030 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4031 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4033 variable10
= variable11
;
4034 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);}
4035 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4036 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4037 goto return_label156
;
4038 return_label156
: while(false);
4039 variable9
= variable10
;
4040 variable10
= variable9
;
4041 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4042 variable11
= NEW_string___String___with_native(BOX_NativeString(")+1)"), TAG_Int(4)); /*new String*/
4043 variable12
= variable11
;
4044 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4045 variable5
= variable6
/*s=*/;
4047 if (once_bool_variable6_157
) variable6
= once_value_variable6_157
;
4049 variable6
= NEW_string___String___with_native(BOX_NativeString("prec"), TAG_Int(4)); /*new String*/
4050 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4051 once_value_variable6_157
= variable6
;
4052 once_bool_variable6_157
= true;
4054 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::==*/)))));
4055 if (UNTAG_Bool(variable6
)) { /*if*/
4056 variable6
= NEW_string___String___init(); /*new String*/
4057 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Char(UNTAG_Char("), TAG_Int(20)); /*new String*/
4058 variable8
= variable7
;
4059 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4060 variable9
= TAG_Int(0);
4061 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4062 variable11
= variable10
;
4063 if (UNTAG_Bool(variable11
)) { /* and */
4064 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4065 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4067 variable10
= variable11
;
4068 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);}
4069 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4070 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4071 goto return_label158
;
4072 return_label158
: while(false);
4073 variable9
= variable10
;
4074 variable10
= variable9
;
4075 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4076 variable11
= NEW_string___String___with_native(BOX_NativeString(")-1)"), TAG_Int(4)); /*new String*/
4077 variable12
= variable11
;
4078 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4079 variable5
= variable6
/*s=*/;
4081 if (once_bool_variable6_159
) variable6
= once_value_variable6_159
;
4083 variable6
= NEW_string___String___with_native(BOX_NativeString("to_i"), TAG_Int(4)); /*new String*/
4084 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4085 once_value_variable6_159
= variable6
;
4086 once_bool_variable6_159
= true;
4088 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::==*/)))));
4089 if (UNTAG_Bool(variable6
)) { /*if*/
4090 variable6
= NEW_string___String___init(); /*new String*/
4091 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNTAG_Char("), TAG_Int(19)); /*new String*/
4092 variable8
= variable7
;
4093 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4094 variable9
= TAG_Int(0);
4095 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4096 variable11
= variable10
;
4097 if (UNTAG_Bool(variable11
)) { /* and */
4098 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4099 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4101 variable10
= variable11
;
4102 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);}
4103 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4104 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4105 goto return_label160
;
4106 return_label160
: while(false);
4107 variable9
= variable10
;
4108 variable10
= variable9
;
4109 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4110 variable11
= NEW_string___String___with_native(BOX_NativeString(")-'0')"), TAG_Int(6)); /*new String*/
4111 variable12
= variable11
;
4112 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4113 variable5
= variable6
/*s=*/;
4115 if (once_bool_variable6_161
) variable6
= once_value_variable6_161
;
4117 variable6
= NEW_string___String___with_native(BOX_NativeString("+"), TAG_Int(1)); /*new String*/
4118 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4119 once_value_variable6_161
= variable6
;
4120 once_bool_variable6_161
= true;
4122 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::==*/)))));
4123 if (UNTAG_Bool(variable6
)) { /*if*/
4124 variable6
= NEW_string___String___init(); /*new String*/
4125 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Char(UNTAG_Char("), TAG_Int(20)); /*new String*/
4126 variable8
= variable7
;
4127 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4128 variable9
= TAG_Int(0);
4129 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4130 variable11
= variable10
;
4131 if (UNTAG_Bool(variable11
)) { /* and */
4132 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4133 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4135 variable10
= variable11
;
4136 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);}
4137 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4138 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4139 goto return_label162
;
4140 return_label162
: while(false);
4141 variable9
= variable10
;
4142 variable10
= variable9
;
4143 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4144 variable11
= NEW_string___String___with_native(BOX_NativeString(")+UNTAG_Char("), TAG_Int(13)); /*new String*/
4145 variable12
= variable11
;
4146 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4147 variable13
= TAG_Int(1);
4148 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4149 variable15
= variable14
;
4150 if (UNTAG_Bool(variable15
)) { /* and */
4151 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4152 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
4154 variable14
= variable15
;
4155 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);}
4156 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4157 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
4158 goto return_label163
;
4159 return_label163
: while(false);
4160 variable13
= variable14
;
4161 variable14
= variable13
;
4162 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
4163 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4164 variable16
= variable15
;
4165 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
4166 variable5
= variable6
/*s=*/;
4168 if (once_bool_variable6_164
) variable6
= once_value_variable6_164
;
4170 variable6
= NEW_string___String___with_native(BOX_NativeString("-"), TAG_Int(1)); /*new String*/
4171 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4172 once_value_variable6_164
= variable6
;
4173 once_bool_variable6_164
= true;
4175 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::==*/)))));
4176 if (UNTAG_Bool(variable6
)) { /*if*/
4177 variable6
= NEW_string___String___init(); /*new String*/
4178 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Char(UNTAG_Char("), TAG_Int(20)); /*new String*/
4179 variable8
= variable7
;
4180 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4181 variable9
= TAG_Int(0);
4182 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4183 variable11
= variable10
;
4184 if (UNTAG_Bool(variable11
)) { /* and */
4185 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4186 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4188 variable10
= variable11
;
4189 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);}
4190 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4191 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4192 goto return_label165
;
4193 return_label165
: while(false);
4194 variable9
= variable10
;
4195 variable10
= variable9
;
4196 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4197 variable11
= NEW_string___String___with_native(BOX_NativeString(")-UNTAG_Char("), TAG_Int(13)); /*new String*/
4198 variable12
= variable11
;
4199 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4200 variable13
= TAG_Int(1);
4201 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4202 variable15
= variable14
;
4203 if (UNTAG_Bool(variable15
)) { /* and */
4204 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4205 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
4207 variable14
= variable15
;
4208 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);}
4209 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4210 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
4211 goto return_label166
;
4212 return_label166
: while(false);
4213 variable13
= variable14
;
4214 variable14
= variable13
;
4215 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
4216 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4217 variable16
= variable15
;
4218 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
4219 variable5
= variable6
/*s=*/;
4221 if (once_bool_variable6_167
) variable6
= once_value_variable6_167
;
4223 variable6
= NEW_string___String___with_native(BOX_NativeString("*"), TAG_Int(1)); /*new String*/
4224 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4225 once_value_variable6_167
= variable6
;
4226 once_bool_variable6_167
= true;
4228 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::==*/)))));
4229 if (UNTAG_Bool(variable6
)) { /*if*/
4230 variable6
= NEW_string___String___init(); /*new String*/
4231 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Char(UNTAG_Char("), TAG_Int(20)); /*new String*/
4232 variable8
= variable7
;
4233 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4234 variable9
= TAG_Int(0);
4235 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4236 variable11
= variable10
;
4237 if (UNTAG_Bool(variable11
)) { /* and */
4238 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4239 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4241 variable10
= variable11
;
4242 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);}
4243 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4244 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4245 goto return_label168
;
4246 return_label168
: while(false);
4247 variable9
= variable10
;
4248 variable10
= variable9
;
4249 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4250 variable11
= NEW_string___String___with_native(BOX_NativeString(")*UNTAG_Char("), TAG_Int(13)); /*new String*/
4251 variable12
= variable11
;
4252 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4253 variable13
= TAG_Int(1);
4254 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4255 variable15
= variable14
;
4256 if (UNTAG_Bool(variable15
)) { /* and */
4257 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4258 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
4260 variable14
= variable15
;
4261 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);}
4262 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4263 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
4264 goto return_label169
;
4265 return_label169
: while(false);
4266 variable13
= variable14
;
4267 variable14
= variable13
;
4268 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
4269 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4270 variable16
= variable15
;
4271 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
4272 variable5
= variable6
/*s=*/;
4274 if (once_bool_variable6_170
) variable6
= once_value_variable6_170
;
4276 variable6
= NEW_string___String___with_native(BOX_NativeString("/"), TAG_Int(1)); /*new String*/
4277 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4278 once_value_variable6_170
= variable6
;
4279 once_bool_variable6_170
= true;
4281 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::==*/)))));
4282 if (UNTAG_Bool(variable6
)) { /*if*/
4283 variable6
= NEW_string___String___init(); /*new String*/
4284 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Char(UNTAG_Char("), TAG_Int(20)); /*new String*/
4285 variable8
= variable7
;
4286 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4287 variable9
= TAG_Int(0);
4288 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4289 variable11
= variable10
;
4290 if (UNTAG_Bool(variable11
)) { /* and */
4291 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4292 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4294 variable10
= variable11
;
4295 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);}
4296 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4297 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4298 goto return_label171
;
4299 return_label171
: while(false);
4300 variable9
= variable10
;
4301 variable10
= variable9
;
4302 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4303 variable11
= NEW_string___String___with_native(BOX_NativeString(")/UNTAG_Char("), TAG_Int(13)); /*new String*/
4304 variable12
= variable11
;
4305 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4306 variable13
= TAG_Int(1);
4307 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4308 variable15
= variable14
;
4309 if (UNTAG_Bool(variable15
)) { /* and */
4310 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4311 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
4313 variable14
= variable15
;
4314 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);}
4315 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4316 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
4317 goto return_label172
;
4318 return_label172
: while(false);
4319 variable13
= variable14
;
4320 variable14
= variable13
;
4321 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
4322 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4323 variable16
= variable15
;
4324 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
4325 variable5
= variable6
/*s=*/;
4327 if (once_bool_variable6_173
) variable6
= once_value_variable6_173
;
4329 variable6
= NEW_string___String___with_native(BOX_NativeString("%"), TAG_Int(1)); /*new String*/
4330 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4331 once_value_variable6_173
= variable6
;
4332 once_bool_variable6_173
= true;
4334 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::==*/)))));
4335 if (UNTAG_Bool(variable6
)) { /*if*/
4336 variable6
= NEW_string___String___init(); /*new String*/
4337 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Char(UNTAG_Char("), TAG_Int(20)); /*new String*/
4338 variable8
= variable7
;
4339 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4340 variable9
= TAG_Int(0);
4341 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4342 variable11
= variable10
;
4343 if (UNTAG_Bool(variable11
)) { /* and */
4344 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4345 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4347 variable10
= variable11
;
4348 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);}
4349 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4350 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4351 goto return_label174
;
4352 return_label174
: while(false);
4353 variable9
= variable10
;
4354 variable10
= variable9
;
4355 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4356 variable11
= NEW_string___String___with_native(BOX_NativeString(")%UNTAG_Char("), TAG_Int(13)); /*new String*/
4357 variable12
= variable11
;
4358 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4359 variable13
= TAG_Int(1);
4360 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4361 variable15
= variable14
;
4362 if (UNTAG_Bool(variable15
)) { /* and */
4363 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4364 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
4366 variable14
= variable15
;
4367 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);}
4368 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4369 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
4370 goto return_label175
;
4371 return_label175
: while(false);
4372 variable13
= variable14
;
4373 variable14
= variable13
;
4374 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
4375 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4376 variable16
= variable15
;
4377 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
4378 variable5
= variable6
/*s=*/;
4380 if (once_bool_variable6_176
) variable6
= once_value_variable6_176
;
4382 variable6
= NEW_string___String___with_native(BOX_NativeString("<"), TAG_Int(1)); /*new String*/
4383 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4384 once_value_variable6_176
= variable6
;
4385 once_bool_variable6_176
= true;
4387 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::==*/)))));
4388 if (UNTAG_Bool(variable6
)) { /*if*/
4389 variable6
= NEW_string___String___init(); /*new String*/
4390 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(UNTAG_Char("), TAG_Int(20)); /*new String*/
4391 variable8
= variable7
;
4392 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4393 variable9
= TAG_Int(0);
4394 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4395 variable11
= variable10
;
4396 if (UNTAG_Bool(variable11
)) { /* and */
4397 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4398 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4400 variable10
= variable11
;
4401 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);}
4402 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4403 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4404 goto return_label177
;
4405 return_label177
: while(false);
4406 variable9
= variable10
;
4407 variable10
= variable9
;
4408 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4409 variable11
= NEW_string___String___with_native(BOX_NativeString(")<UNTAG_Char("), TAG_Int(13)); /*new String*/
4410 variable12
= variable11
;
4411 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4412 variable13
= TAG_Int(1);
4413 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4414 variable15
= variable14
;
4415 if (UNTAG_Bool(variable15
)) { /* and */
4416 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4417 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
4419 variable14
= variable15
;
4420 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);}
4421 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4422 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
4423 goto return_label178
;
4424 return_label178
: while(false);
4425 variable13
= variable14
;
4426 variable14
= variable13
;
4427 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
4428 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4429 variable16
= variable15
;
4430 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
4431 variable5
= variable6
/*s=*/;
4433 if (once_bool_variable6_179
) variable6
= once_value_variable6_179
;
4435 variable6
= NEW_string___String___with_native(BOX_NativeString(">"), TAG_Int(1)); /*new String*/
4436 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4437 once_value_variable6_179
= variable6
;
4438 once_bool_variable6_179
= true;
4440 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::==*/)))));
4441 if (UNTAG_Bool(variable6
)) { /*if*/
4442 variable6
= NEW_string___String___init(); /*new String*/
4443 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(UNTAG_Char("), TAG_Int(20)); /*new String*/
4444 variable8
= variable7
;
4445 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4446 variable9
= TAG_Int(0);
4447 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4448 variable11
= variable10
;
4449 if (UNTAG_Bool(variable11
)) { /* and */
4450 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4451 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4453 variable10
= variable11
;
4454 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);}
4455 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4456 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4457 goto return_label180
;
4458 return_label180
: while(false);
4459 variable9
= variable10
;
4460 variable10
= variable9
;
4461 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4462 variable11
= NEW_string___String___with_native(BOX_NativeString(")>UNTAG_Char("), TAG_Int(13)); /*new String*/
4463 variable12
= variable11
;
4464 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4465 variable13
= TAG_Int(1);
4466 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4467 variable15
= variable14
;
4468 if (UNTAG_Bool(variable15
)) { /* and */
4469 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4470 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
4472 variable14
= variable15
;
4473 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);}
4474 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4475 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
4476 goto return_label181
;
4477 return_label181
: while(false);
4478 variable13
= variable14
;
4479 variable14
= variable13
;
4480 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
4481 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4482 variable16
= variable15
;
4483 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
4484 variable5
= variable6
/*s=*/;
4486 if (once_bool_variable6_182
) variable6
= once_value_variable6_182
;
4488 variable6
= NEW_string___String___with_native(BOX_NativeString("<="), TAG_Int(2)); /*new String*/
4489 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4490 once_value_variable6_182
= variable6
;
4491 once_bool_variable6_182
= true;
4493 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::==*/)))));
4494 if (UNTAG_Bool(variable6
)) { /*if*/
4495 variable6
= NEW_string___String___init(); /*new String*/
4496 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(UNTAG_Char("), TAG_Int(20)); /*new String*/
4497 variable8
= variable7
;
4498 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4499 variable9
= TAG_Int(0);
4500 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4501 variable11
= variable10
;
4502 if (UNTAG_Bool(variable11
)) { /* and */
4503 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4504 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4506 variable10
= variable11
;
4507 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);}
4508 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4509 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4510 goto return_label183
;
4511 return_label183
: while(false);
4512 variable9
= variable10
;
4513 variable10
= variable9
;
4514 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4515 variable11
= NEW_string___String___with_native(BOX_NativeString(")<=UNTAG_Char("), TAG_Int(14)); /*new String*/
4516 variable12
= variable11
;
4517 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4518 variable13
= TAG_Int(1);
4519 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4520 variable15
= variable14
;
4521 if (UNTAG_Bool(variable15
)) { /* and */
4522 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4523 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
4525 variable14
= variable15
;
4526 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);}
4527 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4528 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
4529 goto return_label184
;
4530 return_label184
: while(false);
4531 variable13
= variable14
;
4532 variable14
= variable13
;
4533 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
4534 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4535 variable16
= variable15
;
4536 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
4537 variable5
= variable6
/*s=*/;
4539 if (once_bool_variable6_185
) variable6
= once_value_variable6_185
;
4541 variable6
= NEW_string___String___with_native(BOX_NativeString(">="), TAG_Int(2)); /*new String*/
4542 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4543 once_value_variable6_185
= variable6
;
4544 once_bool_variable6_185
= true;
4546 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::==*/)))));
4547 if (UNTAG_Bool(variable6
)) { /*if*/
4548 variable6
= NEW_string___String___init(); /*new String*/
4549 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(UNTAG_Char("), TAG_Int(20)); /*new String*/
4550 variable8
= variable7
;
4551 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4552 variable9
= TAG_Int(0);
4553 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4554 variable11
= variable10
;
4555 if (UNTAG_Bool(variable11
)) { /* and */
4556 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4557 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4559 variable10
= variable11
;
4560 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);}
4561 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4562 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4563 goto return_label186
;
4564 return_label186
: while(false);
4565 variable9
= variable10
;
4566 variable10
= variable9
;
4567 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4568 variable11
= NEW_string___String___with_native(BOX_NativeString(")>=UNTAG_Char("), TAG_Int(14)); /*new String*/
4569 variable12
= variable11
;
4570 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4571 variable13
= TAG_Int(1);
4572 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4573 variable15
= variable14
;
4574 if (UNTAG_Bool(variable15
)) { /* and */
4575 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4576 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
4578 variable14
= variable15
;
4579 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);}
4580 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4581 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
4582 goto return_label187
;
4583 return_label187
: while(false);
4584 variable13
= variable14
;
4585 variable14
= variable13
;
4586 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
4587 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4588 variable16
= variable15
;
4589 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
4590 variable5
= variable6
/*s=*/;
4592 if (once_bool_variable6_188
) variable6
= once_value_variable6_188
;
4594 variable6
= NEW_string___String___with_native(BOX_NativeString("=="), TAG_Int(2)); /*new String*/
4595 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4596 once_value_variable6_188
= variable6
;
4597 once_bool_variable6_188
= true;
4599 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::==*/)))));
4600 if (UNTAG_Bool(variable6
)) { /*if*/
4601 variable6
= NEW_string___String___init(); /*new String*/
4602 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(("), TAG_Int(10)); /*new String*/
4603 variable8
= variable7
;
4604 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4605 variable9
= TAG_Int(0);
4606 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4607 variable11
= variable10
;
4608 if (UNTAG_Bool(variable11
)) { /* and */
4609 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4610 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4612 variable10
= variable11
;
4613 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);}
4614 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4615 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4616 goto return_label189
;
4617 return_label189
: while(false);
4618 variable9
= variable10
;
4619 variable10
= variable9
;
4620 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4621 variable11
= NEW_string___String___with_native(BOX_NativeString(")==("), TAG_Int(4)); /*new String*/
4622 variable12
= variable11
;
4623 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4624 variable13
= TAG_Int(1);
4625 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4626 variable15
= variable14
;
4627 if (UNTAG_Bool(variable15
)) { /* and */
4628 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4629 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
4631 variable14
= variable15
;
4632 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);}
4633 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4634 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
4635 goto return_label190
;
4636 return_label190
: while(false);
4637 variable13
= variable14
;
4638 variable14
= variable13
;
4639 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
4640 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4641 variable16
= variable15
;
4642 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
4643 variable5
= variable6
/*s=*/;
4645 if (once_bool_variable6_191
) variable6
= once_value_variable6_191
;
4647 variable6
= NEW_string___String___with_native(BOX_NativeString("!="), TAG_Int(2)); /*new String*/
4648 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4649 once_value_variable6_191
= variable6
;
4650 once_bool_variable6_191
= true;
4652 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::==*/)))));
4653 if (UNTAG_Bool(variable6
)) { /*if*/
4654 variable6
= NEW_string___String___init(); /*new String*/
4655 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(("), TAG_Int(10)); /*new String*/
4656 variable8
= variable7
;
4657 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4658 variable9
= TAG_Int(0);
4659 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4660 variable11
= variable10
;
4661 if (UNTAG_Bool(variable11
)) { /* and */
4662 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4663 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4665 variable10
= variable11
;
4666 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);}
4667 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4668 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4669 goto return_label192
;
4670 return_label192
: while(false);
4671 variable9
= variable10
;
4672 variable10
= variable9
;
4673 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4674 variable11
= NEW_string___String___with_native(BOX_NativeString(")!=("), TAG_Int(4)); /*new String*/
4675 variable12
= variable11
;
4676 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4677 variable13
= TAG_Int(1);
4678 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4679 variable15
= variable14
;
4680 if (UNTAG_Bool(variable15
)) { /* and */
4681 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4682 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
4684 variable14
= variable15
;
4685 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);}
4686 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4687 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
4688 goto return_label193
;
4689 return_label193
: while(false);
4690 variable13
= variable14
;
4691 variable14
= variable13
;
4692 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
4693 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4694 variable16
= variable15
;
4695 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
4696 variable5
= variable6
/*s=*/;
4716 if (once_bool_variable6_194
) variable6
= once_value_variable6_194
;
4718 variable6
= NEW_string___String___with_native(BOX_NativeString("Bool"), TAG_Int(4)); /*new String*/
4719 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4720 once_value_variable6_194
= variable6
;
4721 once_bool_variable6_194
= true;
4723 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::==*/)))));
4724 if (UNTAG_Bool(variable6
)) { /*if*/
4725 if (once_bool_variable6_195
) variable6
= once_value_variable6_195
;
4727 variable6
= NEW_string___String___with_native(BOX_NativeString("object_id"), TAG_Int(9)); /*new String*/
4728 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4729 once_value_variable6_195
= variable6
;
4730 once_bool_variable6_195
= true;
4732 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::==*/)))));
4733 if (UNTAG_Bool(variable6
)) { /*if*/
4734 variable6
= NEW_string___String___init(); /*new String*/
4735 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNTAG_Bool("), TAG_Int(19)); /*new String*/
4736 variable8
= variable7
;
4737 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4738 variable9
= TAG_Int(0);
4739 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4740 variable11
= variable10
;
4741 if (UNTAG_Bool(variable11
)) { /* and */
4742 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4743 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4745 variable10
= variable11
;
4746 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);}
4747 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4748 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4749 goto return_label196
;
4750 return_label196
: while(false);
4751 variable9
= variable10
;
4752 variable10
= variable9
;
4753 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4754 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4755 variable12
= variable11
;
4756 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4757 variable5
= variable6
/*s=*/;
4759 if (once_bool_variable6_197
) variable6
= once_value_variable6_197
;
4761 variable6
= NEW_string___String___with_native(BOX_NativeString("unary -"), TAG_Int(7)); /*new String*/
4762 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4763 once_value_variable6_197
= variable6
;
4764 once_bool_variable6_197
= true;
4766 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::==*/)))));
4767 if (UNTAG_Bool(variable6
)) { /*if*/
4768 variable6
= NEW_string___String___init(); /*new String*/
4769 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(-UNTAG_Bool("), TAG_Int(21)); /*new String*/
4770 variable8
= variable7
;
4771 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4772 variable9
= TAG_Int(0);
4773 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4774 variable11
= variable10
;
4775 if (UNTAG_Bool(variable11
)) { /* and */
4776 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4777 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4779 variable10
= variable11
;
4780 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);}
4781 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4782 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4783 goto return_label198
;
4784 return_label198
: while(false);
4785 variable9
= variable10
;
4786 variable10
= variable9
;
4787 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4788 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4789 variable12
= variable11
;
4790 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4791 variable5
= variable6
/*s=*/;
4793 if (once_bool_variable6_199
) variable6
= once_value_variable6_199
;
4795 variable6
= NEW_string___String___with_native(BOX_NativeString("output"), TAG_Int(6)); /*new String*/
4796 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4797 once_value_variable6_199
= variable6
;
4798 once_bool_variable6_199
= true;
4800 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::==*/)))));
4801 if (UNTAG_Bool(variable6
)) { /*if*/
4802 variable6
= NEW_string___String___init(); /*new String*/
4803 variable7
= NEW_string___String___with_native(BOX_NativeString("(void)printf(UNTAG_Bool("), TAG_Int(24)); /*new String*/
4804 variable8
= variable7
;
4805 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4806 variable9
= TAG_Int(0);
4807 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4808 variable11
= variable10
;
4809 if (UNTAG_Bool(variable11
)) { /* and */
4810 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4811 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4813 variable10
= variable11
;
4814 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);}
4815 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4816 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4817 goto return_label200
;
4818 return_label200
: while(false);
4819 variable9
= variable10
;
4820 variable10
= variable9
;
4821 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4822 variable11
= NEW_string___String___with_native(BOX_NativeString(")?\"true\\n\":\"false\\n\");"), TAG_Int(22)); /*new String*/
4823 variable12
= variable11
;
4824 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4825 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable6
) /*CompilerVisitor::add_instr*/;
4827 if (once_bool_variable6_201
) variable6
= once_value_variable6_201
;
4829 variable6
= NEW_string___String___with_native(BOX_NativeString("ascii"), TAG_Int(5)); /*new String*/
4830 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4831 once_value_variable6_201
= variable6
;
4832 once_bool_variable6_201
= true;
4834 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::==*/)))));
4835 if (UNTAG_Bool(variable6
)) { /*if*/
4836 variable6
= NEW_string___String___init(); /*new String*/
4837 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(UNTAG_Bool("), TAG_Int(20)); /*new String*/
4838 variable8
= variable7
;
4839 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4840 variable9
= TAG_Int(0);
4841 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4842 variable11
= variable10
;
4843 if (UNTAG_Bool(variable11
)) { /* and */
4844 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4845 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4847 variable10
= variable11
;
4848 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);}
4849 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4850 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4851 goto return_label202
;
4852 return_label202
: while(false);
4853 variable9
= variable10
;
4854 variable10
= variable9
;
4855 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4856 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4857 variable12
= variable11
;
4858 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4859 variable5
= variable6
/*s=*/;
4861 if (once_bool_variable6_203
) variable6
= once_value_variable6_203
;
4863 variable6
= NEW_string___String___with_native(BOX_NativeString("to_i"), TAG_Int(4)); /*new String*/
4864 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4865 once_value_variable6_203
= variable6
;
4866 once_bool_variable6_203
= true;
4868 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::==*/)))));
4869 if (UNTAG_Bool(variable6
)) { /*if*/
4870 variable6
= NEW_string___String___init(); /*new String*/
4871 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNTAG_Bool("), TAG_Int(19)); /*new String*/
4872 variable8
= variable7
;
4873 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4874 variable9
= TAG_Int(0);
4875 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4876 variable11
= variable10
;
4877 if (UNTAG_Bool(variable11
)) { /* and */
4878 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4879 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4881 variable10
= variable11
;
4882 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);}
4883 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4884 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4885 goto return_label204
;
4886 return_label204
: while(false);
4887 variable9
= variable10
;
4888 variable10
= variable9
;
4889 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4890 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4891 variable12
= variable11
;
4892 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4893 variable5
= variable6
/*s=*/;
4895 if (once_bool_variable6_205
) variable6
= once_value_variable6_205
;
4897 variable6
= NEW_string___String___with_native(BOX_NativeString("=="), TAG_Int(2)); /*new String*/
4898 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4899 once_value_variable6_205
= variable6
;
4900 once_bool_variable6_205
= true;
4902 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::==*/)))));
4903 if (UNTAG_Bool(variable6
)) { /*if*/
4904 variable6
= NEW_string___String___init(); /*new String*/
4905 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(("), TAG_Int(10)); /*new String*/
4906 variable8
= variable7
;
4907 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4908 variable9
= TAG_Int(0);
4909 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4910 variable11
= variable10
;
4911 if (UNTAG_Bool(variable11
)) { /* and */
4912 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4913 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4915 variable10
= variable11
;
4916 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);}
4917 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4918 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4919 goto return_label206
;
4920 return_label206
: while(false);
4921 variable9
= variable10
;
4922 variable10
= variable9
;
4923 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4924 variable11
= NEW_string___String___with_native(BOX_NativeString(")==("), TAG_Int(4)); /*new String*/
4925 variable12
= variable11
;
4926 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4927 variable13
= TAG_Int(1);
4928 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4929 variable15
= variable14
;
4930 if (UNTAG_Bool(variable15
)) { /* and */
4931 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4932 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
4934 variable14
= variable15
;
4935 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);}
4936 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4937 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
4938 goto return_label207
;
4939 return_label207
: while(false);
4940 variable13
= variable14
;
4941 variable14
= variable13
;
4942 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
4943 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4944 variable16
= variable15
;
4945 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
4946 variable5
= variable6
/*s=*/;
4948 if (once_bool_variable6_208
) variable6
= once_value_variable6_208
;
4950 variable6
= NEW_string___String___with_native(BOX_NativeString("!="), TAG_Int(2)); /*new String*/
4951 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
4952 once_value_variable6_208
= variable6
;
4953 once_bool_variable6_208
= true;
4955 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::==*/)))));
4956 if (UNTAG_Bool(variable6
)) { /*if*/
4957 variable6
= NEW_string___String___init(); /*new String*/
4958 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(("), TAG_Int(10)); /*new String*/
4959 variable8
= variable7
;
4960 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
4961 variable9
= TAG_Int(0);
4962 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4963 variable11
= variable10
;
4964 if (UNTAG_Bool(variable11
)) { /* and */
4965 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4966 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
4968 variable10
= variable11
;
4969 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);}
4970 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4971 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
4972 goto return_label209
;
4973 return_label209
: while(false);
4974 variable9
= variable10
;
4975 variable10
= variable9
;
4976 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
4977 variable11
= NEW_string___String___with_native(BOX_NativeString(")!=("), TAG_Int(4)); /*new String*/
4978 variable12
= variable11
;
4979 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
4980 variable13
= TAG_Int(1);
4981 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
4982 variable15
= variable14
;
4983 if (UNTAG_Bool(variable15
)) { /* and */
4984 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
4985 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
4987 variable14
= variable15
;
4988 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);}
4989 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
4990 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
4991 goto return_label210
;
4992 return_label210
: while(false);
4993 variable13
= variable14
;
4994 variable14
= variable13
;
4995 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
4996 variable15
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
4997 variable16
= variable15
;
4998 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
4999 variable5
= variable6
/*s=*/;
5008 if (once_bool_variable6_211
) variable6
= once_value_variable6_211
;
5010 variable6
= NEW_string___String___with_native(BOX_NativeString("NativeArray"), TAG_Int(11)); /*new String*/
5011 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5012 once_value_variable6_211
= variable6
;
5013 once_bool_variable6_211
= true;
5015 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::==*/)))));
5016 if (UNTAG_Bool(variable6
)) { /*if*/
5017 if (once_bool_variable6_212
) variable6
= once_value_variable6_212
;
5019 variable6
= NEW_string___String___with_native(BOX_NativeString("object_id"), TAG_Int(9)); /*new String*/
5020 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5021 once_value_variable6_212
= variable6
;
5022 once_bool_variable6_212
= true;
5024 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::==*/)))));
5025 if (UNTAG_Bool(variable6
)) { /*if*/
5026 variable6
= NEW_string___String___init(); /*new String*/
5027 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNBOX_NativeArray("), TAG_Int(26)); /*new String*/
5028 variable8
= variable7
;
5029 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5030 variable9
= TAG_Int(0);
5031 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5032 variable11
= variable10
;
5033 if (UNTAG_Bool(variable11
)) { /* and */
5034 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5035 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
5037 variable10
= variable11
;
5038 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);}
5039 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5040 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
5041 goto return_label213
;
5042 return_label213
: while(false);
5043 variable9
= variable10
;
5044 variable10
= variable9
;
5045 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
5046 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
5047 variable12
= variable11
;
5048 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
5049 variable5
= variable6
/*s=*/;
5051 if (once_bool_variable6_214
) variable6
= once_value_variable6_214
;
5053 variable6
= NEW_string___String___with_native(BOX_NativeString("[]"), TAG_Int(2)); /*new String*/
5054 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5055 once_value_variable6_214
= variable6
;
5056 once_bool_variable6_214
= true;
5058 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::==*/)))));
5059 if (UNTAG_Bool(variable6
)) { /*if*/
5060 variable6
= NEW_string___String___init(); /*new String*/
5061 variable7
= NEW_string___String___with_native(BOX_NativeString("UNBOX_NativeArray("), TAG_Int(18)); /*new String*/
5062 variable8
= variable7
;
5063 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5064 variable9
= TAG_Int(0);
5065 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5066 variable11
= variable10
;
5067 if (UNTAG_Bool(variable11
)) { /* and */
5068 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5069 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
5071 variable10
= variable11
;
5072 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);}
5073 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5074 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
5075 goto return_label215
;
5076 return_label215
: while(false);
5077 variable9
= variable10
;
5078 variable10
= variable9
;
5079 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
5080 variable11
= NEW_string___String___with_native(BOX_NativeString(")[UNTAG_Int("), TAG_Int(12)); /*new String*/
5081 variable12
= variable11
;
5082 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
5083 variable13
= TAG_Int(1);
5084 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5085 variable15
= variable14
;
5086 if (UNTAG_Bool(variable15
)) { /* and */
5087 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5088 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
5090 variable14
= variable15
;
5091 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);}
5092 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5093 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
5094 goto return_label216
;
5095 return_label216
: while(false);
5096 variable13
= variable14
;
5097 variable14
= variable13
;
5098 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
5099 variable15
= NEW_string___String___with_native(BOX_NativeString(")]"), TAG_Int(2)); /*new String*/
5100 variable16
= variable15
;
5101 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
5102 variable5
= variable6
/*s=*/;
5104 if (once_bool_variable6_217
) variable6
= once_value_variable6_217
;
5106 variable6
= NEW_string___String___with_native(BOX_NativeString("[]="), TAG_Int(3)); /*new String*/
5107 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5108 once_value_variable6_217
= variable6
;
5109 once_bool_variable6_217
= true;
5111 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::==*/)))));
5112 if (UNTAG_Bool(variable6
)) { /*if*/
5113 variable6
= NEW_string___String___init(); /*new String*/
5114 variable7
= NEW_string___String___with_native(BOX_NativeString("UNBOX_NativeArray("), TAG_Int(18)); /*new String*/
5115 variable8
= variable7
;
5116 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5117 variable9
= TAG_Int(0);
5118 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5119 variable11
= variable10
;
5120 if (UNTAG_Bool(variable11
)) { /* and */
5121 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5122 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
5124 variable10
= variable11
;
5125 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);}
5126 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5127 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
5128 goto return_label218
;
5129 return_label218
: while(false);
5130 variable9
= variable10
;
5131 variable10
= variable9
;
5132 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
5133 variable11
= NEW_string___String___with_native(BOX_NativeString(")[UNTAG_Int("), TAG_Int(12)); /*new String*/
5134 variable12
= variable11
;
5135 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
5136 variable13
= TAG_Int(1);
5137 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5138 variable15
= variable14
;
5139 if (UNTAG_Bool(variable15
)) { /* and */
5140 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5141 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
5143 variable14
= variable15
;
5144 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);}
5145 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5146 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
5147 goto return_label219
;
5148 return_label219
: while(false);
5149 variable13
= variable14
;
5150 variable14
= variable13
;
5151 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
5152 variable15
= NEW_string___String___with_native(BOX_NativeString(")]="), TAG_Int(3)); /*new String*/
5153 variable16
= variable15
;
5154 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
5155 variable17
= TAG_Int(2);
5156 variable18
= TAG_Bool(UNTAG_Int( variable17
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5157 variable19
= variable18
;
5158 if (UNTAG_Bool(variable19
)) { /* and */
5159 variable19
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5160 variable19
= TAG_Bool(UNTAG_Int( variable17
/*index*/)<UNTAG_Int(variable19
));
5162 variable18
= variable19
;
5163 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);}
5164 variable18
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5165 variable18
= UNBOX_NativeArray(variable18
)[UNTAG_Int( variable17
/*index*/)];
5166 goto return_label220
;
5167 return_label220
: while(false);
5168 variable17
= variable18
;
5169 variable18
= variable17
;
5170 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable18
) /*String::append*/;
5171 variable19
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
5172 variable20
= variable19
;
5173 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable20
) /*String::append*/;
5174 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable6
) /*CompilerVisitor::add_instr*/;
5176 if (once_bool_variable6_221
) variable6
= once_value_variable6_221
;
5178 variable6
= NEW_string___String___with_native(BOX_NativeString("copy_to"), TAG_Int(7)); /*new String*/
5179 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5180 once_value_variable6_221
= variable6
;
5181 once_bool_variable6_221
= true;
5183 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::==*/)))));
5184 if (UNTAG_Bool(variable6
)) { /*if*/
5185 variable6
= NEW_string___String___init(); /*new String*/
5186 variable7
= NEW_string___String___with_native(BOX_NativeString("(void)memcpy(UNBOX_NativeArray("), TAG_Int(31)); /*new String*/
5187 variable8
= variable7
;
5188 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5189 variable9
= TAG_Int(1);
5190 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5191 variable11
= variable10
;
5192 if (UNTAG_Bool(variable11
)) { /* and */
5193 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5194 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
5196 variable10
= variable11
;
5197 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);}
5198 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5199 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
5200 goto return_label222
;
5201 return_label222
: while(false);
5202 variable9
= variable10
;
5203 variable10
= variable9
;
5204 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
5205 variable11
= NEW_string___String___with_native(BOX_NativeString("), UNBOX_NativeArray("), TAG_Int(21)); /*new String*/
5206 variable12
= variable11
;
5207 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
5208 variable13
= TAG_Int(0);
5209 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5210 variable15
= variable14
;
5211 if (UNTAG_Bool(variable15
)) { /* and */
5212 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5213 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
5215 variable14
= variable15
;
5216 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);}
5217 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5218 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
5219 goto return_label223
;
5220 return_label223
: while(false);
5221 variable13
= variable14
;
5222 variable14
= variable13
;
5223 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
5224 variable15
= NEW_string___String___with_native(BOX_NativeString("), UNTAG_Int("), TAG_Int(13)); /*new String*/
5225 variable16
= variable15
;
5226 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
5227 variable17
= TAG_Int(2);
5228 variable18
= TAG_Bool(UNTAG_Int( variable17
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5229 variable19
= variable18
;
5230 if (UNTAG_Bool(variable19
)) { /* and */
5231 variable19
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5232 variable19
= TAG_Bool(UNTAG_Int( variable17
/*index*/)<UNTAG_Int(variable19
));
5234 variable18
= variable19
;
5235 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);}
5236 variable18
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5237 variable18
= UNBOX_NativeArray(variable18
)[UNTAG_Int( variable17
/*index*/)];
5238 goto return_label224
;
5239 return_label224
: while(false);
5240 variable17
= variable18
;
5241 variable18
= variable17
;
5242 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable18
) /*String::append*/;
5243 variable19
= NEW_string___String___with_native(BOX_NativeString(")*sizeof(val_t));"), TAG_Int(17)); /*new String*/
5244 variable20
= variable19
;
5245 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable20
) /*String::append*/;
5246 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable6
) /*CompilerVisitor::add_instr*/;
5252 if (once_bool_variable6_225
) variable6
= once_value_variable6_225
;
5254 variable6
= NEW_string___String___with_native(BOX_NativeString("NativeString"), TAG_Int(12)); /*new String*/
5255 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5256 once_value_variable6_225
= variable6
;
5257 once_bool_variable6_225
= true;
5259 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::==*/)))));
5260 if (UNTAG_Bool(variable6
)) { /*if*/
5261 if (once_bool_variable6_226
) variable6
= once_value_variable6_226
;
5263 variable6
= NEW_string___String___with_native(BOX_NativeString("object_id"), TAG_Int(9)); /*new String*/
5264 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5265 once_value_variable6_226
= variable6
;
5266 once_bool_variable6_226
= true;
5268 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::==*/)))));
5269 if (UNTAG_Bool(variable6
)) { /*if*/
5270 variable6
= NEW_string___String___init(); /*new String*/
5271 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(UNBOX_NativeString("), TAG_Int(27)); /*new String*/
5272 variable8
= variable7
;
5273 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5274 variable9
= TAG_Int(0);
5275 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5276 variable11
= variable10
;
5277 if (UNTAG_Bool(variable11
)) { /* and */
5278 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5279 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
5281 variable10
= variable11
;
5282 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);}
5283 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5284 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
5285 goto return_label227
;
5286 return_label227
: while(false);
5287 variable9
= variable10
;
5288 variable10
= variable9
;
5289 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
5290 variable11
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
5291 variable12
= variable11
;
5292 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
5293 variable5
= variable6
/*s=*/;
5295 if (once_bool_variable6_228
) variable6
= once_value_variable6_228
;
5297 variable6
= NEW_string___String___with_native(BOX_NativeString("atoi"), TAG_Int(4)); /*new String*/
5298 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5299 once_value_variable6_228
= variable6
;
5300 once_bool_variable6_228
= true;
5302 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::==*/)))));
5303 if (UNTAG_Bool(variable6
)) { /*if*/
5304 variable6
= NEW_string___String___init(); /*new String*/
5305 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int(atoi(UNBOX_NativeString("), TAG_Int(32)); /*new String*/
5306 variable8
= variable7
;
5307 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5308 variable9
= TAG_Int(0);
5309 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5310 variable11
= variable10
;
5311 if (UNTAG_Bool(variable11
)) { /* and */
5312 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5313 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
5315 variable10
= variable11
;
5316 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);}
5317 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5318 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
5319 goto return_label229
;
5320 return_label229
: while(false);
5321 variable9
= variable10
;
5322 variable10
= variable9
;
5323 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
5324 variable11
= NEW_string___String___with_native(BOX_NativeString(")))"), TAG_Int(3)); /*new String*/
5325 variable12
= variable11
;
5326 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
5327 variable5
= variable6
/*s=*/;
5329 if (once_bool_variable6_230
) variable6
= once_value_variable6_230
;
5331 variable6
= NEW_string___String___with_native(BOX_NativeString("[]"), TAG_Int(2)); /*new String*/
5332 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5333 once_value_variable6_230
= variable6
;
5334 once_bool_variable6_230
= true;
5336 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::==*/)))));
5337 if (UNTAG_Bool(variable6
)) { /*if*/
5338 variable6
= NEW_string___String___init(); /*new String*/
5339 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Char(UNBOX_NativeString("), TAG_Int(28)); /*new String*/
5340 variable8
= variable7
;
5341 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5342 variable9
= TAG_Int(0);
5343 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5344 variable11
= variable10
;
5345 if (UNTAG_Bool(variable11
)) { /* and */
5346 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5347 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
5349 variable10
= variable11
;
5350 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);}
5351 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5352 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
5353 goto return_label231
;
5354 return_label231
: while(false);
5355 variable9
= variable10
;
5356 variable10
= variable9
;
5357 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
5358 variable11
= NEW_string___String___with_native(BOX_NativeString(")[UNTAG_Int("), TAG_Int(12)); /*new String*/
5359 variable12
= variable11
;
5360 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
5361 variable13
= TAG_Int(1);
5362 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5363 variable15
= variable14
;
5364 if (UNTAG_Bool(variable15
)) { /* and */
5365 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5366 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
5368 variable14
= variable15
;
5369 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);}
5370 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5371 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
5372 goto return_label232
;
5373 return_label232
: while(false);
5374 variable13
= variable14
;
5375 variable14
= variable13
;
5376 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
5377 variable15
= NEW_string___String___with_native(BOX_NativeString(")])"), TAG_Int(3)); /*new String*/
5378 variable16
= variable15
;
5379 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
5380 variable5
= variable6
/*s=*/;
5382 if (once_bool_variable6_233
) variable6
= once_value_variable6_233
;
5384 variable6
= NEW_string___String___with_native(BOX_NativeString("[]="), TAG_Int(3)); /*new String*/
5385 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5386 once_value_variable6_233
= variable6
;
5387 once_bool_variable6_233
= true;
5389 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::==*/)))));
5390 if (UNTAG_Bool(variable6
)) { /*if*/
5391 variable6
= NEW_string___String___init(); /*new String*/
5392 variable7
= NEW_string___String___with_native(BOX_NativeString("UNBOX_NativeString("), TAG_Int(19)); /*new String*/
5393 variable8
= variable7
;
5394 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5395 variable9
= TAG_Int(0);
5396 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5397 variable11
= variable10
;
5398 if (UNTAG_Bool(variable11
)) { /* and */
5399 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5400 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
5402 variable10
= variable11
;
5403 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);}
5404 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5405 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
5406 goto return_label234
;
5407 return_label234
: while(false);
5408 variable9
= variable10
;
5409 variable10
= variable9
;
5410 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
5411 variable11
= NEW_string___String___with_native(BOX_NativeString(")[UNTAG_Int("), TAG_Int(12)); /*new String*/
5412 variable12
= variable11
;
5413 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
5414 variable13
= TAG_Int(1);
5415 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5416 variable15
= variable14
;
5417 if (UNTAG_Bool(variable15
)) { /* and */
5418 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5419 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
5421 variable14
= variable15
;
5422 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);}
5423 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5424 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
5425 goto return_label235
;
5426 return_label235
: while(false);
5427 variable13
= variable14
;
5428 variable14
= variable13
;
5429 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
5430 variable15
= NEW_string___String___with_native(BOX_NativeString(")]=UNTAG_Char("), TAG_Int(14)); /*new String*/
5431 variable16
= variable15
;
5432 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
5433 variable17
= TAG_Int(2);
5434 variable18
= TAG_Bool(UNTAG_Int( variable17
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5435 variable19
= variable18
;
5436 if (UNTAG_Bool(variable19
)) { /* and */
5437 variable19
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5438 variable19
= TAG_Bool(UNTAG_Int( variable17
/*index*/)<UNTAG_Int(variable19
));
5440 variable18
= variable19
;
5441 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);}
5442 variable18
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5443 variable18
= UNBOX_NativeArray(variable18
)[UNTAG_Int( variable17
/*index*/)];
5444 goto return_label236
;
5445 return_label236
: while(false);
5446 variable17
= variable18
;
5447 variable18
= variable17
;
5448 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable18
) /*String::append*/;
5449 variable19
= NEW_string___String___with_native(BOX_NativeString(");"), TAG_Int(2)); /*new String*/
5450 variable20
= variable19
;
5451 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable20
) /*String::append*/;
5452 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable6
) /*CompilerVisitor::add_instr*/;
5454 if (once_bool_variable6_237
) variable6
= once_value_variable6_237
;
5456 variable6
= NEW_string___String___with_native(BOX_NativeString("copy_to"), TAG_Int(7)); /*new String*/
5457 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5458 once_value_variable6_237
= variable6
;
5459 once_bool_variable6_237
= true;
5461 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::==*/)))));
5462 if (UNTAG_Bool(variable6
)) { /*if*/
5463 variable6
= NEW_string___String___init(); /*new String*/
5464 variable7
= NEW_string___String___with_native(BOX_NativeString("(void)memcpy(UNBOX_NativeString("), TAG_Int(32)); /*new String*/
5465 variable8
= variable7
;
5466 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5467 variable9
= TAG_Int(1);
5468 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5469 variable11
= variable10
;
5470 if (UNTAG_Bool(variable11
)) { /* and */
5471 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5472 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
5474 variable10
= variable11
;
5475 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);}
5476 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5477 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
5478 goto return_label238
;
5479 return_label238
: while(false);
5480 variable9
= variable10
;
5481 variable10
= variable9
;
5482 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
5483 variable11
= NEW_string___String___with_native(BOX_NativeString(")+UNTAG_Int("), TAG_Int(12)); /*new String*/
5484 variable12
= variable11
;
5485 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
5486 variable13
= TAG_Int(4);
5487 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5488 variable15
= variable14
;
5489 if (UNTAG_Bool(variable15
)) { /* and */
5490 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5491 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
5493 variable14
= variable15
;
5494 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);}
5495 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5496 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
5497 goto return_label239
;
5498 return_label239
: while(false);
5499 variable13
= variable14
;
5500 variable14
= variable13
;
5501 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
5502 variable15
= NEW_string___String___with_native(BOX_NativeString("), UNBOX_NativeString("), TAG_Int(22)); /*new String*/
5503 variable16
= variable15
;
5504 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
5505 variable17
= TAG_Int(0);
5506 variable18
= TAG_Bool(UNTAG_Int( variable17
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5507 variable19
= variable18
;
5508 if (UNTAG_Bool(variable19
)) { /* and */
5509 variable19
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5510 variable19
= TAG_Bool(UNTAG_Int( variable17
/*index*/)<UNTAG_Int(variable19
));
5512 variable18
= variable19
;
5513 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);}
5514 variable18
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5515 variable18
= UNBOX_NativeArray(variable18
)[UNTAG_Int( variable17
/*index*/)];
5516 goto return_label240
;
5517 return_label240
: while(false);
5518 variable17
= variable18
;
5519 variable18
= variable17
;
5520 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable18
) /*String::append*/;
5521 variable19
= NEW_string___String___with_native(BOX_NativeString(")+UNTAG_Int("), TAG_Int(12)); /*new String*/
5522 variable20
= variable19
;
5523 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable20
) /*String::append*/;
5524 variable21
= TAG_Int(3);
5525 variable22
= TAG_Bool(UNTAG_Int( variable21
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5526 variable23
= variable22
;
5527 if (UNTAG_Bool(variable23
)) { /* and */
5528 variable23
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5529 variable23
= TAG_Bool(UNTAG_Int( variable21
/*index*/)<UNTAG_Int(variable23
));
5531 variable22
= variable23
;
5532 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);}
5533 variable22
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5534 variable22
= UNBOX_NativeArray(variable22
)[UNTAG_Int( variable21
/*index*/)];
5535 goto return_label241
;
5536 return_label241
: while(false);
5537 variable21
= variable22
;
5538 variable22
= variable21
;
5539 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable22
) /*String::append*/;
5540 variable23
= NEW_string___String___with_native(BOX_NativeString("), UNTAG_Int("), TAG_Int(13)); /*new String*/
5541 variable24
= variable23
;
5542 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable24
) /*String::append*/;
5543 variable25
= TAG_Int(2);
5544 variable26
= TAG_Bool(UNTAG_Int( variable25
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5545 variable27
= variable26
;
5546 if (UNTAG_Bool(variable27
)) { /* and */
5547 variable27
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5548 variable27
= TAG_Bool(UNTAG_Int( variable25
/*index*/)<UNTAG_Int(variable27
));
5550 variable26
= variable27
;
5551 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);}
5552 variable26
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5553 variable26
= UNBOX_NativeArray(variable26
)[UNTAG_Int( variable25
/*index*/)];
5554 goto return_label242
;
5555 return_label242
: while(false);
5556 variable25
= variable26
;
5557 variable26
= variable25
;
5558 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable26
) /*String::append*/;
5559 variable27
= NEW_string___String___with_native(BOX_NativeString("));"), TAG_Int(3)); /*new String*/
5560 variable28
= variable27
;
5561 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable28
) /*String::append*/;
5562 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable6
) /*CompilerVisitor::add_instr*/;
5569 if (once_bool_variable6_243
) variable6
= once_value_variable6_243
;
5571 variable6
= NEW_string___String___with_native(BOX_NativeString("object_id"), TAG_Int(9)); /*new String*/
5572 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5573 once_value_variable6_243
= variable6
;
5574 once_bool_variable6_243
= true;
5576 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::==*/)))));
5577 if (UNTAG_Bool(variable6
)) { /*if*/
5578 variable6
= NEW_string___String___init(); /*new String*/
5579 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Int((bigint)"), TAG_Int(16)); /*new String*/
5580 variable8
= variable7
;
5581 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5582 variable9
= TAG_Int(0);
5583 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5584 variable11
= variable10
;
5585 if (UNTAG_Bool(variable11
)) { /* and */
5586 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5587 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
5589 variable10
= variable11
;
5590 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);}
5591 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5592 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
5593 goto return_label244
;
5594 return_label244
: while(false);
5595 variable9
= variable10
;
5596 variable10
= variable9
;
5597 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
5598 variable11
= NEW_string___String___with_native(BOX_NativeString(")"), TAG_Int(1)); /*new String*/
5599 variable12
= variable11
;
5600 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
5601 variable5
= variable6
/*s=*/;
5603 if (once_bool_variable6_245
) variable6
= once_value_variable6_245
;
5605 variable6
= NEW_string___String___with_native(BOX_NativeString("sys"), TAG_Int(3)); /*new String*/
5606 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5607 once_value_variable6_245
= variable6
;
5608 once_bool_variable6_245
= true;
5610 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::==*/)))));
5611 if (UNTAG_Bool(variable6
)) { /*if*/
5612 variable6
= NEW_string___String___with_native(BOX_NativeString("(G_sys)"), TAG_Int(7)); /*new String*/
5613 variable5
= variable6
/*s=*/;
5615 if (once_bool_variable6_246
) variable6
= once_value_variable6_246
;
5617 variable6
= NEW_string___String___with_native(BOX_NativeString("is_same_type"), TAG_Int(12)); /*new String*/
5618 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5619 once_value_variable6_246
= variable6
;
5620 once_bool_variable6_246
= true;
5622 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::==*/)))));
5623 if (UNTAG_Bool(variable6
)) { /*if*/
5624 variable6
= NEW_string___String___init(); /*new String*/
5625 variable7
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool((VAL2VFT("), TAG_Int(18)); /*new String*/
5626 variable8
= variable7
;
5627 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5628 variable9
= TAG_Int(0);
5629 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5630 variable11
= variable10
;
5631 if (UNTAG_Bool(variable11
)) { /* and */
5632 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5633 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
5635 variable10
= variable11
;
5636 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);}
5637 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5638 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
5639 goto return_label247
;
5640 return_label247
: while(false);
5641 variable9
= variable10
;
5642 variable10
= variable9
;
5643 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
5644 variable11
= NEW_string___String___with_native(BOX_NativeString(")==VAL2VFT("), TAG_Int(11)); /*new String*/
5645 variable12
= variable11
;
5646 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
5647 variable13
= TAG_Int(1);
5648 variable14
= TAG_Bool(UNTAG_Int( variable13
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5649 variable15
= variable14
;
5650 if (UNTAG_Bool(variable15
)) { /* and */
5651 variable15
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5652 variable15
= TAG_Bool(UNTAG_Int( variable13
/*index*/)<UNTAG_Int(variable15
));
5654 variable14
= variable15
;
5655 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);}
5656 variable14
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5657 variable14
= UNBOX_NativeArray(variable14
)[UNTAG_Int( variable13
/*index*/)];
5658 goto return_label248
;
5659 return_label248
: while(false);
5660 variable13
= variable14
;
5661 variable14
= variable13
;
5662 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable14
) /*String::append*/;
5663 variable15
= NEW_string___String___with_native(BOX_NativeString(")))"), TAG_Int(3)); /*new String*/
5664 variable16
= variable15
;
5665 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable16
) /*String::append*/;
5666 variable5
= variable6
/*s=*/;
5668 if (once_bool_variable6_249
) variable6
= once_value_variable6_249
;
5670 variable6
= NEW_string___String___with_native(BOX_NativeString("exit"), TAG_Int(4)); /*new String*/
5671 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5672 once_value_variable6_249
= variable6
;
5673 once_bool_variable6_249
= true;
5675 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::==*/)))));
5676 if (UNTAG_Bool(variable6
)) { /*if*/
5677 variable6
= NEW_string___String___init(); /*new String*/
5678 variable7
= NEW_string___String___with_native(BOX_NativeString("exit(UNTAG_Int("), TAG_Int(15)); /*new String*/
5679 variable8
= variable7
;
5680 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5681 variable9
= TAG_Int(1);
5682 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5683 variable11
= variable10
;
5684 if (UNTAG_Bool(variable11
)) { /* and */
5685 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5686 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
5688 variable10
= variable11
;
5689 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);}
5690 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5691 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
5692 goto return_label250
;
5693 return_label250
: while(false);
5694 variable9
= variable10
;
5695 variable10
= variable9
;
5696 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
5697 variable11
= NEW_string___String___with_native(BOX_NativeString("));"), TAG_Int(3)); /*new String*/
5698 variable12
= variable11
;
5699 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
5700 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable6
) /*CompilerVisitor::add_instr*/;
5702 if (once_bool_variable6_251
) variable6
= once_value_variable6_251
;
5704 variable6
= NEW_string___String___with_native(BOX_NativeString("calloc_array"), TAG_Int(12)); /*new String*/
5705 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5706 once_value_variable6_251
= variable6
;
5707 once_bool_variable6_251
= true;
5709 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::==*/)))));
5710 if (UNTAG_Bool(variable6
)) { /*if*/
5711 variable6
= NEW_string___String___init(); /*new String*/
5712 variable7
= NEW_string___String___with_native(BOX_NativeString("BOX_NativeArray((val_t*)malloc((UNTAG_Int("), TAG_Int(42)); /*new String*/
5713 variable8
= variable7
;
5714 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5715 variable9
= TAG_Int(1);
5716 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5717 variable11
= variable10
;
5718 if (UNTAG_Bool(variable11
)) { /* and */
5719 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5720 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
5722 variable10
= variable11
;
5723 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);}
5724 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5725 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
5726 goto return_label252
;
5727 return_label252
: while(false);
5728 variable9
= variable10
;
5729 variable10
= variable9
;
5730 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
5731 variable11
= NEW_string___String___with_native(BOX_NativeString(") * sizeof(val_t))))"), TAG_Int(20)); /*new String*/
5732 variable12
= variable11
;
5733 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
5734 variable5
= variable6
/*s=*/;
5736 if (once_bool_variable6_253
) variable6
= once_value_variable6_253
;
5738 variable6
= NEW_string___String___with_native(BOX_NativeString("calloc_string"), TAG_Int(13)); /*new String*/
5739 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
5740 once_value_variable6_253
= variable6
;
5741 once_bool_variable6_253
= true;
5743 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::==*/)))));
5744 if (UNTAG_Bool(variable6
)) { /*if*/
5745 variable6
= NEW_string___String___init(); /*new String*/
5746 variable7
= NEW_string___String___with_native(BOX_NativeString("BOX_NativeString((char*)malloc((UNTAG_Int("), TAG_Int(42)); /*new String*/
5747 variable8
= variable7
;
5748 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5749 variable9
= TAG_Int(1);
5750 variable10
= TAG_Bool(UNTAG_Int( variable9
/*index*/)>=UNTAG_Int( TAG_Int(0)));
5751 variable11
= variable10
;
5752 if (UNTAG_Bool(variable11
)) { /* and */
5753 variable11
= ATTR_array___AbstractArray____length( variable2
/*p*/) /*AbstractArray::_length*/;
5754 variable11
= TAG_Bool(UNTAG_Int( variable9
/*index*/)<UNTAG_Int(variable11
));
5756 variable10
= variable11
;
5757 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);}
5758 variable10
= ATTR_array___Array____items( variable2
/*p*/) /*Array::_items*/;
5759 variable10
= UNBOX_NativeArray(variable10
)[UNTAG_Int( variable9
/*index*/)];
5760 goto return_label254
;
5761 return_label254
: while(false);
5762 variable9
= variable10
;
5763 variable10
= variable9
;
5764 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable10
) /*String::append*/;
5765 variable11
= NEW_string___String___with_native(BOX_NativeString(") * sizeof(char))))"), TAG_Int(19)); /*new String*/
5766 variable12
= variable11
;
5767 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable12
) /*String::append*/;
5768 variable5
= variable6
/*s=*/;
5770 variable6
= NEW_string___String___init(); /*new String*/
5771 variable7
= NEW_string___String___with_native(BOX_NativeString("fprintf(stderr, \"Intern "), TAG_Int(24)); /*new String*/
5772 variable8
= variable7
;
5773 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable8
) /*String::append*/;
5774 variable9
= variable4
/*n*/;
5775 variable9
= ((string___String___to_s_t
)CALL(variable9
,COLOR_string___Object___to_s
))(variable9
) /*String::to_s*/;
5776 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable9
) /*String::append*/;
5777 variable10
= NEW_string___String___with_native(BOX_NativeString("\\n\"); nit_exit(1);"), TAG_Int(18)); /*new String*/
5778 variable11
= variable10
;
5779 ((string___String___append_t
)CALL(variable6
,COLOR_abstract_collection___IndexedCollection___append
))(variable6
, variable11
) /*String::append*/;
5780 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable6
) /*CompilerVisitor::add_instr*/;
5793 variable6
= ((static_type___MMLocalProperty___signature_t
)CALL( variable1
/*method*/,COLOR_static_type___MMLocalProperty___signature
))( variable1
/*method*/) /*MMLocalProperty::signature*/;
5794 variable6
= ((static_type___MMSignature___return_type_t
)CALL(variable6
,COLOR_static_type___MMSignature___return_type
))(variable6
) /*MMSignature::return_type*/;
5795 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::==*/)))))));
5796 variable7
= variable6
;
5797 if (UNTAG_Bool(variable7
)) { /* and */
5798 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::==*/)));
5800 variable6
= variable7
;
5801 if (UNTAG_Bool(variable6
)) { /*if*/
5802 variable6
= NEW_string___String___with_native(BOX_NativeString("NIT_NULL /*stub*/"), TAG_Int(17)); /*new String*/
5803 variable5
= variable6
/*s=*/;
5805 variable3
= variable5
/*s*/;
5806 goto return_label58
;
5807 return_label58
: while(false);
5808 tracehead
= trace
.prev
;
5811 val_t
compiling_methods___PExpr___compile_expr(val_t self
, val_t param0
) {
5812 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 679, LOCATE_compiling_methods___PExpr___compile_expr
};
5813 trace
.prev
= tracehead
; tracehead
= &trace
;
5814 fprintf(stderr
, "Deferred method %s called");
5815 fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_array___Array_____bra
, LOCATE_compiling_methods
, 679);
5817 tracehead
= trace
.prev
;
5820 void compiling_methods___PExpr___prepare_compile_stmt(val_t self
, val_t param0
) {
5821 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 683, LOCATE_compiling_methods___PExpr___prepare_compile_stmt
};
5823 trace
.prev
= tracehead
; tracehead
= &trace
;
5825 tracehead
= trace
.prev
;
5828 void compiling_methods___PExpr___compile_stmt(val_t self
, val_t param0
) {
5829 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 688, LOCATE_compiling_methods___PExpr___compile_stmt
};
5832 trace
.prev
= tracehead
; tracehead
= &trace
;
5834 variable1
= NEW_string___String___with_native(BOX_NativeString("Error!"), TAG_Int(6)); /*new String*/
5835 ((parser_prod___PNode___printl_t
)CALL( self
,COLOR_parser_prod___PNode___printl
))( self
, variable1
) /*PNode::printl*/;
5836 tracehead
= trace
.prev
;
5839 void compiling_methods___ABlockExpr___compile_stmt(val_t self
, val_t param0
) {
5840 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 694, LOCATE_compiling_methods___ABlockExpr___compile_stmt
};
5844 trace
.prev
= tracehead
; tracehead
= &trace
;
5846 variable1
= ((parser_nodes___ABlockExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___ABlockExpr___n_expr
))( self
) /*ABlockExpr::n_expr*/;
5847 variable1
= ((list___List___iterator_t
)CALL(variable1
,COLOR_abstract_collection___Collection___iterator
))(variable1
) /*List::iterator*/;
5848 while (true) { /*for*/
5849 variable2
= ((list___ListIterator___is_ok_t
)CALL(variable1
,COLOR_abstract_collection___Iterator___is_ok
))(variable1
) /*ListIterator::is_ok*/;
5850 if (!UNTAG_Bool(variable2
)) break; /*for*/
5851 variable2
= ((list___ListIterator___item_t
)CALL(variable1
,COLOR_abstract_collection___Iterator___item
))(variable1
) /*ListIterator::item*/;
5852 ((compiling_methods___CompilerVisitor___compile_stmt_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_stmt
))( variable0
/*v*/, variable2
/*n*/) /*CompilerVisitor::compile_stmt*/;
5853 continue_258
: while(0);
5854 ((list___ListIterator___next_t
)CALL(variable1
,COLOR_abstract_collection___Iterator___next
))(variable1
) /*ListIterator::next*/;
5856 break_258
: while(0);
5857 tracehead
= trace
.prev
;
5860 void compiling_methods___AVardeclExpr___prepare_compile_stmt(val_t self
, val_t param0
) {
5861 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 703, LOCATE_compiling_methods___AVardeclExpr___prepare_compile_stmt
};
5866 trace
.prev
= tracehead
; tracehead
= &trace
;
5868 variable2
= ((compiling_methods___CompilerVisitor___get_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___get_var
))( variable0
/*v*/) /*CompilerVisitor::get_var*/;
5869 variable1
= variable2
;
5870 variable2
= ((compiling_methods___CompilerVisitor___varnames_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___varnames
))( variable0
/*v*/) /*CompilerVisitor::varnames*/;
5871 variable3
= ((syntax_base___AVardeclExpr___variable_t
)CALL( self
,COLOR_syntax_base___AVardeclExpr___variable
))( self
) /*AVardeclExpr::variable*/;
5872 ((abstract_collection___Map_____braeq_t
)CALL(variable2
,COLOR_abstract_collection___Map_____braeq
))(variable2
, variable3
, variable1
/*cname*/) /*Map::[]=*/;
5873 tracehead
= trace
.prev
;
5876 void compiling_methods___AVardeclExpr___compile_stmt(val_t self
, val_t param0
) {
5877 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 709, LOCATE_compiling_methods___AVardeclExpr___compile_stmt
};
5892 trace
.prev
= tracehead
; tracehead
= &trace
;
5894 variable2
= ((compiling_methods___CompilerVisitor___varnames_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___varnames
))( variable0
/*v*/) /*CompilerVisitor::varnames*/;
5895 variable3
= ((syntax_base___AVardeclExpr___variable_t
)CALL( self
,COLOR_syntax_base___AVardeclExpr___variable
))( self
) /*AVardeclExpr::variable*/;
5896 variable2
= ((abstract_collection___Map_____bra_t
)CALL(variable2
,COLOR_abstract_collection___Map_____bra
))(variable2
, variable3
) /*Map::[]*/;
5897 variable1
= variable2
;
5898 variable2
= ((parser_nodes___AVardeclExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AVardeclExpr___n_expr
))( self
) /*AVardeclExpr::n_expr*/;
5899 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::==*/)))));
5900 if (UNTAG_Bool(variable2
)) { /*if*/
5901 variable3
= ((syntax_base___AVardeclExpr___variable_t
)CALL( self
,COLOR_syntax_base___AVardeclExpr___variable
))( self
) /*AVardeclExpr::variable*/;
5902 variable3
= ((syntax_base___Variable___stype_t
)CALL(variable3
,COLOR_syntax_base___Variable___stype
))(variable3
) /*Variable::stype*/;
5903 variable2
= variable3
;
5904 variable3
= NEW_string___String___init(); /*new String*/
5905 variable4
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
5906 variable5
= variable4
;
5907 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable5
) /*String::append*/;
5908 variable6
= ((compiling_base___MMType___default_cvalue_t
)CALL( variable2
/*t*/,COLOR_compiling_base___MMType___default_cvalue
))( variable2
/*t*/) /*MMType::default_cvalue*/;
5909 variable7
= variable6
;
5910 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable7
) /*String::append*/;
5911 variable8
= NEW_string___String___with_native(BOX_NativeString(" /*decl variable "), TAG_Int(17)); /*new String*/
5912 variable9
= variable8
;
5913 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable9
) /*String::append*/;
5914 variable10
= ((syntax_base___AVardeclExpr___variable_t
)CALL( self
,COLOR_syntax_base___AVardeclExpr___variable
))( self
) /*AVardeclExpr::variable*/;
5915 variable10
= ((syntax_base___Variable___name_t
)CALL(variable10
,COLOR_syntax_base___Variable___name
))(variable10
) /*Variable::name*/;
5916 variable11
= variable10
;
5917 variable11
= ((string___String___to_s_t
)CALL(variable11
,COLOR_string___Object___to_s
))(variable11
) /*String::to_s*/;
5918 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable11
) /*String::append*/;
5919 variable12
= NEW_string___String___with_native(BOX_NativeString("*/"), TAG_Int(2)); /*new String*/
5920 variable13
= variable12
;
5921 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable13
) /*String::append*/;
5922 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable1
/*cname*/, variable3
) /*CompilerVisitor::add_assignment*/;
5924 variable3
= ((parser_nodes___AVardeclExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AVardeclExpr___n_expr
))( self
) /*AVardeclExpr::n_expr*/;
5925 variable3
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::compile_expr*/;
5926 variable2
= variable3
;
5927 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable1
/*cname*/, variable2
/*e*/) /*CompilerVisitor::add_assignment*/;
5929 tracehead
= trace
.prev
;
5932 void compiling_methods___AReturnExpr___compile_stmt(val_t self
, val_t param0
) {
5933 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 723, LOCATE_compiling_methods___AReturnExpr___compile_stmt
};
5942 trace
.prev
= tracehead
; tracehead
= &trace
;
5944 ((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=*/;
5945 variable1
= ((parser_nodes___AReturnExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AReturnExpr___n_expr
))( self
) /*AReturnExpr::n_expr*/;
5946 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::==*/)))))));
5947 if (UNTAG_Bool(variable1
)) { /*if*/
5948 variable2
= ((parser_nodes___AReturnExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AReturnExpr___n_expr
))( self
) /*AReturnExpr::n_expr*/;
5949 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
5950 variable1
= variable2
;
5951 variable2
= ((compiling_methods___CompilerVisitor___return_value_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___return_value
))( variable0
/*v*/) /*CompilerVisitor::return_value*/;
5952 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable2
, variable1
/*e*/) /*CompilerVisitor::add_assignment*/;
5954 variable1
= NEW_string___String___init(); /*new String*/
5955 variable2
= NEW_string___String___with_native(BOX_NativeString("goto "), TAG_Int(5)); /*new String*/
5956 variable3
= variable2
;
5957 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable3
) /*String::append*/;
5958 variable4
= ((compiling_methods___CompilerVisitor___return_label_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___return_label
))( variable0
/*v*/) /*CompilerVisitor::return_label*/;
5959 variable5
= variable4
;
5960 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable5
) /*String::append*/;
5961 variable6
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
5962 variable7
= variable6
;
5963 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable7
) /*String::append*/;
5964 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable1
) /*CompilerVisitor::add_instr*/;
5965 tracehead
= trace
.prev
;
5968 void compiling_methods___ABreakExpr___compile_stmt(val_t self
, val_t param0
) {
5969 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 735, LOCATE_compiling_methods___ABreakExpr___compile_stmt
};
5978 trace
.prev
= tracehead
; tracehead
= &trace
;
5980 variable1
= NEW_string___String___init(); /*new String*/
5981 variable2
= NEW_string___String___with_native(BOX_NativeString("goto "), TAG_Int(5)); /*new String*/
5982 variable3
= variable2
;
5983 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable3
) /*String::append*/;
5984 variable4
= ((compiling_methods___CompilerVisitor___break_label_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___break_label
))( variable0
/*v*/) /*CompilerVisitor::break_label*/;
5985 variable5
= variable4
;
5986 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable5
) /*String::append*/;
5987 variable6
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
5988 variable7
= variable6
;
5989 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable7
) /*String::append*/;
5990 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable1
) /*CompilerVisitor::add_instr*/;
5991 tracehead
= trace
.prev
;
5994 void compiling_methods___AContinueExpr___compile_stmt(val_t self
, val_t param0
) {
5995 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 742, LOCATE_compiling_methods___AContinueExpr___compile_stmt
};
6004 trace
.prev
= tracehead
; tracehead
= &trace
;
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___continue_label_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___continue_label
))( variable0
/*v*/) /*CompilerVisitor::continue_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___AAbortExpr___compile_stmt(val_t self
, val_t param0
) {
6021 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 749, LOCATE_compiling_methods___AAbortExpr___compile_stmt
};
6030 trace
.prev
= tracehead
; tracehead
= &trace
;
6032 variable1
= NEW_string___String___init(); /*new String*/
6033 variable2
= NEW_string___String___with_native(BOX_NativeString("fprintf(stderr, \"Aborted\"); "), TAG_Int(28)); /*new String*/
6034 variable3
= variable2
;
6035 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable3
) /*String::append*/;
6036 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*/;
6037 variable5
= variable4
;
6038 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable5
) /*String::append*/;
6039 variable6
= NEW_string___String___with_native(BOX_NativeString(" nit_exit(1);"), TAG_Int(13)); /*new String*/
6040 variable7
= variable6
;
6041 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable7
) /*String::append*/;
6042 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable1
) /*CompilerVisitor::add_instr*/;
6043 tracehead
= trace
.prev
;
6046 void compiling_methods___ADoExpr___compile_stmt(val_t self
, val_t param0
) {
6047 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 756, LOCATE_compiling_methods___ADoExpr___compile_stmt
};
6050 trace
.prev
= tracehead
; tracehead
= &trace
;
6052 variable1
= ((parser_nodes___ADoExpr___n_block_t
)CALL( self
,COLOR_parser_nodes___ADoExpr___n_block
))( self
) /*ADoExpr::n_block*/;
6053 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::==*/)))))));
6054 if (UNTAG_Bool(variable1
)) { /*if*/
6055 variable1
= ((parser_nodes___ADoExpr___n_block_t
)CALL( self
,COLOR_parser_nodes___ADoExpr___n_block
))( self
) /*ADoExpr::n_block*/;
6056 ((compiling_methods___CompilerVisitor___compile_stmt_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_stmt
))( variable0
/*v*/, variable1
) /*CompilerVisitor::compile_stmt*/;
6058 tracehead
= trace
.prev
;
6061 void compiling_methods___AIfExpr___compile_stmt(val_t self
, val_t param0
) {
6062 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 765, LOCATE_compiling_methods___AIfExpr___compile_stmt
};
6071 trace
.prev
= tracehead
; tracehead
= &trace
;
6073 variable2
= ((parser_nodes___AIfExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AIfExpr___n_expr
))( self
) /*AIfExpr::n_expr*/;
6074 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
6075 variable1
= variable2
;
6076 variable2
= NEW_string___String___init(); /*new String*/
6077 variable3
= NEW_string___String___with_native(BOX_NativeString("if (UNTAG_Bool("), TAG_Int(15)); /*new String*/
6078 variable4
= variable3
;
6079 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable4
) /*String::append*/;
6080 variable5
= variable1
/*e*/;
6081 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable5
) /*String::append*/;
6082 variable6
= NEW_string___String___with_native(BOX_NativeString(")) { /*if*/"), TAG_Int(11)); /*new String*/
6083 variable7
= variable6
;
6084 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable7
) /*String::append*/;
6085 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::add_instr*/;
6086 ((compiling_methods___CompilerVisitor___free_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___free_var
))( variable0
/*v*/, variable1
/*e*/) /*CompilerVisitor::free_var*/;
6087 variable2
= ((parser_nodes___AIfExpr___n_then_t
)CALL( self
,COLOR_parser_nodes___AIfExpr___n_then
))( self
) /*AIfExpr::n_then*/;
6088 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::==*/)))))));
6089 if (UNTAG_Bool(variable2
)) { /*if*/
6090 ((compiling_base___CompilerVisitor___indent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___indent
))( variable0
/*v*/) /*CompilerVisitor::indent*/;
6091 variable2
= ((parser_nodes___AIfExpr___n_then_t
)CALL( self
,COLOR_parser_nodes___AIfExpr___n_then
))( self
) /*AIfExpr::n_then*/;
6092 ((compiling_methods___CompilerVisitor___compile_stmt_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_stmt
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_stmt*/;
6093 ((compiling_base___CompilerVisitor___unindent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___unindent
))( variable0
/*v*/) /*CompilerVisitor::unindent*/;
6095 variable2
= ((parser_nodes___AIfExpr___n_else_t
)CALL( self
,COLOR_parser_nodes___AIfExpr___n_else
))( self
) /*AIfExpr::n_else*/;
6096 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::==*/)))))));
6097 if (UNTAG_Bool(variable2
)) { /*if*/
6098 variable2
= NEW_string___String___with_native(BOX_NativeString("} else { /*if*/"), TAG_Int(15)); /*new String*/
6099 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::add_instr*/;
6100 ((compiling_base___CompilerVisitor___indent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___indent
))( variable0
/*v*/) /*CompilerVisitor::indent*/;
6101 variable2
= ((parser_nodes___AIfExpr___n_else_t
)CALL( self
,COLOR_parser_nodes___AIfExpr___n_else
))( self
) /*AIfExpr::n_else*/;
6102 ((compiling_methods___CompilerVisitor___compile_stmt_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_stmt
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_stmt*/;
6103 ((compiling_base___CompilerVisitor___unindent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___unindent
))( variable0
/*v*/) /*CompilerVisitor::unindent*/;
6105 variable2
= NEW_string___String___with_native(BOX_NativeString("}"), TAG_Int(1)); /*new String*/
6106 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::add_instr*/;
6107 tracehead
= trace
.prev
;
6110 val_t
compiling_methods___AIfexprExpr___compile_expr(val_t self
, val_t param0
) {
6111 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 786, LOCATE_compiling_methods___AIfexprExpr___compile_expr
};
6120 trace
.prev
= tracehead
; tracehead
= &trace
;
6122 variable2
= ((parser_nodes___AIfexprExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AIfexprExpr___n_expr
))( self
) /*AIfexprExpr::n_expr*/;
6123 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
6124 variable1
= variable2
;
6125 variable2
= NEW_string___String___init(); /*new String*/
6126 variable3
= NEW_string___String___with_native(BOX_NativeString("if (UNTAG_Bool("), TAG_Int(15)); /*new String*/
6127 variable4
= variable3
;
6128 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable4
) /*String::append*/;
6129 variable5
= variable1
/*e*/;
6130 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable5
) /*String::append*/;
6131 variable6
= NEW_string___String___with_native(BOX_NativeString(")) { /*if*/"), TAG_Int(11)); /*new String*/
6132 variable7
= variable6
;
6133 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable7
) /*String::append*/;
6134 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::add_instr*/;
6135 ((compiling_methods___CompilerVisitor___free_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___free_var
))( variable0
/*v*/, variable1
/*e*/) /*CompilerVisitor::free_var*/;
6136 ((compiling_base___CompilerVisitor___indent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___indent
))( variable0
/*v*/) /*CompilerVisitor::indent*/;
6137 variable3
= ((parser_nodes___AIfexprExpr___n_then_t
)CALL( self
,COLOR_parser_nodes___AIfexprExpr___n_then
))( self
) /*AIfexprExpr::n_then*/;
6138 variable3
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::compile_expr*/;
6139 variable3
= ((compiling_methods___CompilerVisitor___ensure_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___ensure_var
))( variable0
/*v*/, variable3
) /*CompilerVisitor::ensure_var*/;
6140 variable2
= variable3
;
6141 ((compiling_base___CompilerVisitor___unindent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___unindent
))( variable0
/*v*/) /*CompilerVisitor::unindent*/;
6142 variable3
= NEW_string___String___with_native(BOX_NativeString("} else { /*if*/"), TAG_Int(15)); /*new String*/
6143 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::add_instr*/;
6144 ((compiling_methods___CompilerVisitor___free_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___free_var
))( variable0
/*v*/, variable2
/*e*/) /*CompilerVisitor::free_var*/;
6145 ((compiling_base___CompilerVisitor___indent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___indent
))( variable0
/*v*/) /*CompilerVisitor::indent*/;
6146 variable4
= ((parser_nodes___AIfexprExpr___n_else_t
)CALL( self
,COLOR_parser_nodes___AIfexprExpr___n_else
))( self
) /*AIfexprExpr::n_else*/;
6147 variable4
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable4
) /*CompilerVisitor::compile_expr*/;
6148 variable4
= ((compiling_methods___CompilerVisitor___ensure_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___ensure_var
))( variable0
/*v*/, variable4
) /*CompilerVisitor::ensure_var*/;
6149 variable3
= variable4
;
6150 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable2
/*e*/, variable3
/*e2*/) /*CompilerVisitor::add_assignment*/;
6151 ((compiling_base___CompilerVisitor___unindent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___unindent
))( variable0
/*v*/) /*CompilerVisitor::unindent*/;
6152 variable4
= NEW_string___String___with_native(BOX_NativeString("}"), TAG_Int(1)); /*new String*/
6153 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable4
) /*CompilerVisitor::add_instr*/;
6154 variable1
= variable2
/*e*/;
6155 goto return_label267
;
6156 return_label267
: while(false);
6157 tracehead
= trace
.prev
;
6160 void compiling_methods___AControlableBlock___compile_inside_block(val_t self
, val_t param0
) {
6161 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 806, LOCATE_compiling_methods___AControlableBlock___compile_inside_block
};
6162 trace
.prev
= tracehead
; tracehead
= &trace
;
6163 fprintf(stderr
, "Deferred method %s called");
6164 fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_compiling_methods___AIfexprExpr___compile_expr
, LOCATE_compiling_methods
, 806);
6166 tracehead
= trace
.prev
;
6169 void compiling_methods___AControlableBlock___compile_stmt(val_t self
, val_t param0
) {
6170 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 807, LOCATE_compiling_methods___AControlableBlock___compile_stmt
};
6181 trace
.prev
= tracehead
; tracehead
= &trace
;
6183 variable2
= ((compiling_methods___CompilerVisitor___break_label_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___break_label
))( variable0
/*v*/) /*CompilerVisitor::break_label*/;
6184 variable1
= variable2
;
6185 variable3
= ((compiling_methods___CompilerVisitor___continue_label_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___continue_label
))( variable0
/*v*/) /*CompilerVisitor::continue_label*/;
6186 variable2
= variable3
;
6187 variable4
= ((compiling_base___CompilerVisitor___new_number_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___new_number
))( variable0
/*v*/) /*CompilerVisitor::new_number*/;
6188 variable3
= variable4
;
6189 variable4
= NEW_string___String___init(); /*new String*/
6190 variable5
= NEW_string___String___with_native(BOX_NativeString("break_"), TAG_Int(6)); /*new String*/
6191 variable6
= variable5
;
6192 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable6
) /*String::append*/;
6193 variable7
= variable3
/*id*/;
6194 variable7
= ((string___String___to_s_t
)CALL(variable7
,COLOR_string___Object___to_s
))(variable7
) /*String::to_s*/;
6195 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable7
) /*String::append*/;
6196 variable8
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
6197 variable9
= variable8
;
6198 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable9
) /*String::append*/;
6199 ((compiling_methods___CompilerVisitor___break_label__eq_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___break_label__eq
))( variable0
/*v*/, variable4
) /*CompilerVisitor::break_label=*/;
6200 variable4
= NEW_string___String___init(); /*new String*/
6201 variable5
= NEW_string___String___with_native(BOX_NativeString("continue_"), TAG_Int(9)); /*new String*/
6202 variable6
= variable5
;
6203 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable6
) /*String::append*/;
6204 variable7
= variable3
/*id*/;
6205 variable7
= ((string___String___to_s_t
)CALL(variable7
,COLOR_string___Object___to_s
))(variable7
) /*String::to_s*/;
6206 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable7
) /*String::append*/;
6207 variable8
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
6208 variable9
= variable8
;
6209 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable9
) /*String::append*/;
6210 ((compiling_methods___CompilerVisitor___continue_label__eq_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___continue_label__eq
))( variable0
/*v*/, variable4
) /*CompilerVisitor::continue_label=*/;
6211 ((compiling_methods___AControlableBlock___compile_inside_block_t
)CALL( self
,COLOR_compiling_methods___AControlableBlock___compile_inside_block
))( self
, variable0
/*v*/) /*AControlableBlock::compile_inside_block*/;
6212 ((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=*/;
6213 ((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=*/;
6214 tracehead
= trace
.prev
;
6217 void compiling_methods___AWhileExpr___compile_inside_block(val_t self
, val_t param0
) {
6218 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 824, LOCATE_compiling_methods___AWhileExpr___compile_inside_block
};
6228 trace
.prev
= tracehead
; tracehead
= &trace
;
6230 variable1
= NEW_string___String___with_native(BOX_NativeString("while (true) { /*while*/"), TAG_Int(24)); /*new String*/
6231 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable1
) /*CompilerVisitor::add_instr*/;
6232 ((compiling_base___CompilerVisitor___indent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___indent
))( variable0
/*v*/) /*CompilerVisitor::indent*/;
6233 variable2
= ((parser_nodes___AWhileExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AWhileExpr___n_expr
))( self
) /*AWhileExpr::n_expr*/;
6234 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
6235 variable1
= variable2
;
6236 variable2
= NEW_string___String___init(); /*new String*/
6237 variable3
= NEW_string___String___with_native(BOX_NativeString("if (!UNTAG_Bool("), TAG_Int(16)); /*new String*/
6238 variable4
= variable3
;
6239 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable4
) /*String::append*/;
6240 variable5
= variable1
/*e*/;
6241 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable5
) /*String::append*/;
6242 variable6
= NEW_string___String___with_native(BOX_NativeString(")) break; /* while*/"), TAG_Int(20)); /*new String*/
6243 variable7
= variable6
;
6244 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable7
) /*String::append*/;
6245 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::add_instr*/;
6246 ((compiling_methods___CompilerVisitor___free_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___free_var
))( variable0
/*v*/, variable1
/*e*/) /*CompilerVisitor::free_var*/;
6247 variable2
= ((parser_nodes___AWhileExpr___n_block_t
)CALL( self
,COLOR_parser_nodes___AWhileExpr___n_block
))( self
) /*AWhileExpr::n_block*/;
6248 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::==*/)))))));
6249 if (UNTAG_Bool(variable2
)) { /*if*/
6250 variable2
= ((parser_nodes___AWhileExpr___n_block_t
)CALL( self
,COLOR_parser_nodes___AWhileExpr___n_block
))( self
) /*AWhileExpr::n_block*/;
6251 ((compiling_methods___CompilerVisitor___compile_stmt_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_stmt
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_stmt*/;
6253 variable2
= NEW_string___String___init(); /*new String*/
6254 variable3
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
6255 variable4
= variable3
;
6256 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable4
) /*String::append*/;
6257 variable5
= ((compiling_methods___CompilerVisitor___continue_label_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___continue_label
))( variable0
/*v*/) /*CompilerVisitor::continue_label*/;
6258 variable6
= variable5
;
6259 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable6
) /*String::append*/;
6260 variable7
= NEW_string___String___with_native(BOX_NativeString(": while(0);"), TAG_Int(11)); /*new String*/
6261 variable8
= variable7
;
6262 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable8
) /*String::append*/;
6263 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::add_instr*/;
6264 ((compiling_base___CompilerVisitor___unindent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___unindent
))( variable0
/*v*/) /*CompilerVisitor::unindent*/;
6265 variable2
= NEW_string___String___with_native(BOX_NativeString("}"), TAG_Int(1)); /*new String*/
6266 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::add_instr*/;
6267 variable2
= NEW_string___String___init(); /*new String*/
6268 variable3
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
6269 variable4
= variable3
;
6270 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable4
) /*String::append*/;
6271 variable5
= ((compiling_methods___CompilerVisitor___break_label_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___break_label
))( variable0
/*v*/) /*CompilerVisitor::break_label*/;
6272 variable6
= variable5
;
6273 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable6
) /*String::append*/;
6274 variable7
= NEW_string___String___with_native(BOX_NativeString(": while(0);"), TAG_Int(11)); /*new String*/
6275 variable8
= variable7
;
6276 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable8
) /*String::append*/;
6277 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::add_instr*/;
6278 tracehead
= trace
.prev
;
6281 void compiling_methods___AForExpr___compile_inside_block(val_t self
, val_t param0
) {
6282 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 842, LOCATE_compiling_methods___AForExpr___compile_inside_block
};
6285 trace
.prev
= tracehead
; tracehead
= &trace
;
6287 variable1
= ((parser_nodes___AForExpr___n_vardecl_t
)CALL( self
,COLOR_parser_nodes___AForExpr___n_vardecl
))( self
) /*AForExpr::n_vardecl*/;
6288 ((compiling_methods___CompilerVisitor___compile_stmt_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_stmt
))( variable0
/*v*/, variable1
) /*CompilerVisitor::compile_stmt*/;
6289 tracehead
= trace
.prev
;
6292 void compiling_methods___AForVardeclExpr___compile_stmt(val_t self
, val_t param0
) {
6293 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 849, LOCATE_compiling_methods___AForVardeclExpr___compile_stmt
};
6299 static val_t once_value_variable4_272
; static int once_bool_variable4_272
;
6303 static val_t once_value_variable7_273
; static int once_bool_variable7_273
;
6305 static val_t once_value_variable8_274
; static int once_bool_variable8_274
;
6307 static val_t once_value_variable9_275
; static int once_bool_variable9_275
;
6317 trace
.prev
= tracehead
; tracehead
= &trace
;
6319 variable2
= ((parser_nodes___AForVardeclExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AForVardeclExpr___n_expr
))( self
) /*AForVardeclExpr::n_expr*/;
6320 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
6321 variable1
= variable2
;
6322 variable3
= ((parser_nodes___AForVardeclExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AForVardeclExpr___n_expr
))( self
) /*AForVardeclExpr::n_expr*/;
6323 variable3
= ((typing___PExpr___stype_t
)CALL(variable3
,COLOR_syntax_base___PExpr___stype
))(variable3
) /*PExpr::stype*/;
6324 variable3
= ((static_type___MMType___local_class_t
)CALL(variable3
,COLOR_static_type___MMType___local_class
))(variable3
) /*MMType::local_class*/;
6325 if (once_bool_variable4_272
) variable4
= once_value_variable4_272
;
6327 variable4
= NEW_string___String___with_native(BOX_NativeString("iterator"), TAG_Int(8)); /*new String*/
6328 variable4
= ((symbol___String___to_symbol_t
)CALL(variable4
,COLOR_symbol___String___to_symbol
))(variable4
) /*String::to_symbol*/;
6329 once_value_variable4_272
= variable4
;
6330 once_bool_variable4_272
= true;
6332 variable3
= ((abstractmetamodel___MMLocalClass___select_method_t
)CALL(variable3
,COLOR_abstractmetamodel___MMLocalClass___select_method
))(variable3
, variable4
) /*MMLocalClass::select_method*/;
6333 variable2
= variable3
;
6334 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::==*/)))));
6335 if (UNTAG_Bool(variable3
)) { /*if*/
6336 variable3
= NEW_string___String___with_native(BOX_NativeString("No iterator"), TAG_Int(11)); /*new String*/
6337 ((parser_prod___PNode___printl_t
)CALL( self
,COLOR_parser_prod___PNode___printl
))( self
, variable3
) /*PNode::printl*/;
6338 goto return_label271
;
6340 variable4
= ((static_type___MMLocalProperty___signature_t
)CALL( variable2
/*prop*/,COLOR_static_type___MMLocalProperty___signature
))( variable2
/*prop*/) /*MMLocalProperty::signature*/;
6341 variable4
= ((static_type___MMSignature___return_type_t
)CALL(variable4
,COLOR_static_type___MMSignature___return_type
))(variable4
) /*MMSignature::return_type*/;
6342 variable3
= variable4
;
6343 ((compiling_methods___CompilerVisitor___free_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___free_var
))( variable0
/*v*/, variable1
/*e*/) /*CompilerVisitor::free_var*/;
6344 variable5
= ((compiling_methods___CompilerVisitor___get_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___get_var
))( variable0
/*v*/) /*CompilerVisitor::get_var*/;
6345 variable4
= variable5
;
6346 variable5
= NEW_array___Array___with_capacity(TAG_Int(1)); /*new Array[E]*/
6347 ((array___AbstractArray___add_t
)CALL(variable5
,COLOR_abstract_collection___SimpleCollection___add
))(variable5
, variable1
/*e*/) /*AbstractArray::add*/;
6348 variable5
= ((compiling_methods___MMMethod___compile_call_t
)CALL( variable2
/*prop*/,COLOR_compiling_methods___MMMethod___compile_call
))( variable2
/*prop*/, variable0
/*v*/, variable5
) /*MMMethod::compile_call*/;
6349 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable4
/*iter*/, variable5
) /*CompilerVisitor::add_assignment*/;
6350 variable6
= ((static_type___MMType___local_class_t
)CALL( variable3
/*ittype*/,COLOR_static_type___MMType___local_class
))( variable3
/*ittype*/) /*MMType::local_class*/;
6351 if (once_bool_variable7_273
) variable7
= once_value_variable7_273
;
6353 variable7
= NEW_string___String___with_native(BOX_NativeString("is_ok"), TAG_Int(5)); /*new String*/
6354 variable7
= ((symbol___String___to_symbol_t
)CALL(variable7
,COLOR_symbol___String___to_symbol
))(variable7
) /*String::to_symbol*/;
6355 once_value_variable7_273
= variable7
;
6356 once_bool_variable7_273
= true;
6358 variable6
= ((abstractmetamodel___MMLocalClass___select_method_t
)CALL(variable6
,COLOR_abstractmetamodel___MMLocalClass___select_method
))(variable6
, variable7
) /*MMLocalClass::select_method*/;
6359 variable5
= variable6
;
6360 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::==*/)))));
6361 if (UNTAG_Bool(variable6
)) { /*if*/
6362 variable6
= NEW_string___String___with_native(BOX_NativeString("No is_ok"), TAG_Int(8)); /*new String*/
6363 ((parser_prod___PNode___printl_t
)CALL( self
,COLOR_parser_prod___PNode___printl
))( self
, variable6
) /*PNode::printl*/;
6364 goto return_label271
;
6366 variable7
= ((static_type___MMType___local_class_t
)CALL( variable3
/*ittype*/,COLOR_static_type___MMType___local_class
))( variable3
/*ittype*/) /*MMType::local_class*/;
6367 if (once_bool_variable8_274
) variable8
= once_value_variable8_274
;
6369 variable8
= NEW_string___String___with_native(BOX_NativeString("item"), TAG_Int(4)); /*new String*/
6370 variable8
= ((symbol___String___to_symbol_t
)CALL(variable8
,COLOR_symbol___String___to_symbol
))(variable8
) /*String::to_symbol*/;
6371 once_value_variable8_274
= variable8
;
6372 once_bool_variable8_274
= true;
6374 variable7
= ((abstractmetamodel___MMLocalClass___select_method_t
)CALL(variable7
,COLOR_abstractmetamodel___MMLocalClass___select_method
))(variable7
, variable8
) /*MMLocalClass::select_method*/;
6375 variable6
= variable7
;
6376 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::==*/)))));
6377 if (UNTAG_Bool(variable7
)) { /*if*/
6378 variable7
= NEW_string___String___with_native(BOX_NativeString("No item"), TAG_Int(7)); /*new String*/
6379 ((parser_prod___PNode___printl_t
)CALL( self
,COLOR_parser_prod___PNode___printl
))( self
, variable7
) /*PNode::printl*/;
6380 goto return_label271
;
6382 variable8
= ((static_type___MMType___local_class_t
)CALL( variable3
/*ittype*/,COLOR_static_type___MMType___local_class
))( variable3
/*ittype*/) /*MMType::local_class*/;
6383 if (once_bool_variable9_275
) variable9
= once_value_variable9_275
;
6385 variable9
= NEW_string___String___with_native(BOX_NativeString("next"), TAG_Int(4)); /*new String*/
6386 variable9
= ((symbol___String___to_symbol_t
)CALL(variable9
,COLOR_symbol___String___to_symbol
))(variable9
) /*String::to_symbol*/;
6387 once_value_variable9_275
= variable9
;
6388 once_bool_variable9_275
= true;
6390 variable8
= ((abstractmetamodel___MMLocalClass___select_method_t
)CALL(variable8
,COLOR_abstractmetamodel___MMLocalClass___select_method
))(variable8
, variable9
) /*MMLocalClass::select_method*/;
6391 variable7
= variable8
;
6392 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::==*/)))));
6393 if (UNTAG_Bool(variable8
)) { /*if*/
6394 variable8
= NEW_string___String___with_native(BOX_NativeString("No next"), TAG_Int(7)); /*new String*/
6395 ((parser_prod___PNode___printl_t
)CALL( self
,COLOR_parser_prod___PNode___printl
))( self
, variable8
) /*PNode::printl*/;
6396 goto return_label271
;
6398 variable8
= NEW_string___String___with_native(BOX_NativeString("while (true) { /*for*/"), TAG_Int(22)); /*new String*/
6399 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable8
) /*CompilerVisitor::add_instr*/;
6400 ((compiling_base___CompilerVisitor___indent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___indent
))( variable0
/*v*/) /*CompilerVisitor::indent*/;
6401 variable9
= ((compiling_methods___CompilerVisitor___get_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___get_var
))( variable0
/*v*/) /*CompilerVisitor::get_var*/;
6402 variable8
= variable9
;
6403 variable9
= NEW_array___Array___with_capacity(TAG_Int(1)); /*new Array[E]*/
6404 ((array___AbstractArray___add_t
)CALL(variable9
,COLOR_abstract_collection___SimpleCollection___add
))(variable9
, variable4
/*iter*/) /*AbstractArray::add*/;
6405 variable9
= ((compiling_methods___MMMethod___compile_call_t
)CALL( variable5
/*prop2*/,COLOR_compiling_methods___MMMethod___compile_call
))( variable5
/*prop2*/, variable0
/*v*/, variable9
) /*MMMethod::compile_call*/;
6406 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable8
/*ok*/, variable9
) /*CompilerVisitor::add_assignment*/;
6407 variable9
= NEW_string___String___init(); /*new String*/
6408 variable10
= NEW_string___String___with_native(BOX_NativeString("if (!UNTAG_Bool("), TAG_Int(16)); /*new String*/
6409 variable11
= variable10
;
6410 ((string___String___append_t
)CALL(variable9
,COLOR_abstract_collection___IndexedCollection___append
))(variable9
, variable11
) /*String::append*/;
6411 variable12
= variable8
/*ok*/;
6412 ((string___String___append_t
)CALL(variable9
,COLOR_abstract_collection___IndexedCollection___append
))(variable9
, variable12
) /*String::append*/;
6413 variable13
= NEW_string___String___with_native(BOX_NativeString(")) break; /*for*/"), TAG_Int(17)); /*new String*/
6414 variable14
= variable13
;
6415 ((string___String___append_t
)CALL(variable9
,COLOR_abstract_collection___IndexedCollection___append
))(variable9
, variable14
) /*String::append*/;
6416 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable9
) /*CompilerVisitor::add_instr*/;
6417 ((compiling_methods___CompilerVisitor___free_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___free_var
))( variable0
/*v*/, variable8
/*ok*/) /*CompilerVisitor::free_var*/;
6418 variable10
= NEW_array___Array___with_capacity(TAG_Int(1)); /*new Array[E]*/
6419 ((array___AbstractArray___add_t
)CALL(variable10
,COLOR_abstract_collection___SimpleCollection___add
))(variable10
, variable4
/*iter*/) /*AbstractArray::add*/;
6420 variable10
= ((compiling_methods___MMMethod___compile_call_t
)CALL( variable6
/*prop3*/,COLOR_compiling_methods___MMMethod___compile_call
))( variable6
/*prop3*/, variable0
/*v*/, variable10
) /*MMMethod::compile_call*/;
6421 variable9
= variable10
;
6422 variable10
= ((compiling_methods___CompilerVisitor___ensure_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___ensure_var
))( variable0
/*v*/, variable9
/*e*/) /*CompilerVisitor::ensure_var*/;
6423 variable9
= variable10
/*e=*/;
6424 variable10
= ((compiling_methods___CompilerVisitor___varnames_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___varnames
))( variable0
/*v*/) /*CompilerVisitor::varnames*/;
6425 variable11
= ((syntax_base___AForVardeclExpr___variable_t
)CALL( self
,COLOR_syntax_base___AForVardeclExpr___variable
))( self
) /*AForVardeclExpr::variable*/;
6426 ((abstract_collection___Map_____braeq_t
)CALL(variable10
,COLOR_abstract_collection___Map_____braeq
))(variable10
, variable11
, variable9
/*e*/) /*Map::[]=*/;
6427 variable11
= ((parser_prod___PNode___parent_t
)CALL( self
,COLOR_parser_prod___PNode___parent
))( self
) /*PNode::parent*/;
6428 variable10
= variable11
;
6429 variable11
= TAG_Bool(( variable10
/*par*/==NIT_NULL
) || VAL_ISA( variable10
/*par*/, COLOR_AForExpr
, ID_AForExpr
)) /*cast AForExpr*/;
6430 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
, 886); nit_exit(1);}
6431 variable12
= ((parser_nodes___AForExpr___n_block_t
)CALL( variable10
/*par*/,COLOR_parser_nodes___AForExpr___n_block
))( variable10
/*par*/) /*AForExpr::n_block*/;
6432 variable11
= variable12
;
6433 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::==*/)))))));
6434 if (UNTAG_Bool(variable12
)) { /*if*/
6435 ((compiling_methods___CompilerVisitor___compile_stmt_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_stmt
))( variable0
/*v*/, variable11
/*n_block*/) /*CompilerVisitor::compile_stmt*/;
6437 variable12
= NEW_string___String___init(); /*new String*/
6438 variable13
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
6439 variable14
= variable13
;
6440 ((string___String___append_t
)CALL(variable12
,COLOR_abstract_collection___IndexedCollection___append
))(variable12
, variable14
) /*String::append*/;
6441 variable15
= ((compiling_methods___CompilerVisitor___continue_label_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___continue_label
))( variable0
/*v*/) /*CompilerVisitor::continue_label*/;
6442 variable16
= variable15
;
6443 ((string___String___append_t
)CALL(variable12
,COLOR_abstract_collection___IndexedCollection___append
))(variable12
, variable16
) /*String::append*/;
6444 variable17
= NEW_string___String___with_native(BOX_NativeString(": while(0);"), TAG_Int(11)); /*new String*/
6445 variable18
= variable17
;
6446 ((string___String___append_t
)CALL(variable12
,COLOR_abstract_collection___IndexedCollection___append
))(variable12
, variable18
) /*String::append*/;
6447 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable12
) /*CompilerVisitor::add_instr*/;
6448 variable12
= NEW_array___Array___with_capacity(TAG_Int(1)); /*new Array[E]*/
6449 ((array___AbstractArray___add_t
)CALL(variable12
,COLOR_abstract_collection___SimpleCollection___add
))(variable12
, variable4
/*iter*/) /*AbstractArray::add*/;
6450 variable12
= ((compiling_methods___MMMethod___compile_call_t
)CALL( variable7
/*prop4*/,COLOR_compiling_methods___MMMethod___compile_call
))( variable7
/*prop4*/, variable0
/*v*/, variable12
) /*MMMethod::compile_call*/;
6451 variable9
= variable12
/*e=*/;
6452 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::==*/)));
6453 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
, 893); nit_exit(1);}
6454 ((compiling_base___CompilerVisitor___unindent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___unindent
))( variable0
/*v*/) /*CompilerVisitor::unindent*/;
6455 variable12
= NEW_string___String___with_native(BOX_NativeString("}"), TAG_Int(1)); /*new String*/
6456 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable12
) /*CompilerVisitor::add_instr*/;
6457 variable12
= NEW_string___String___init(); /*new String*/
6458 variable13
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
6459 variable14
= variable13
;
6460 ((string___String___append_t
)CALL(variable12
,COLOR_abstract_collection___IndexedCollection___append
))(variable12
, variable14
) /*String::append*/;
6461 variable15
= ((compiling_methods___CompilerVisitor___break_label_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___break_label
))( variable0
/*v*/) /*CompilerVisitor::break_label*/;
6462 variable16
= variable15
;
6463 ((string___String___append_t
)CALL(variable12
,COLOR_abstract_collection___IndexedCollection___append
))(variable12
, variable16
) /*String::append*/;
6464 variable17
= NEW_string___String___with_native(BOX_NativeString(": while(0);"), TAG_Int(11)); /*new String*/
6465 variable18
= variable17
;
6466 ((string___String___append_t
)CALL(variable12
,COLOR_abstract_collection___IndexedCollection___append
))(variable12
, variable18
) /*String::append*/;
6467 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable12
) /*CompilerVisitor::add_instr*/;
6468 return_label271
: while(false);
6469 tracehead
= trace
.prev
;
6472 void compiling_methods___AAssertExpr___compile_stmt(val_t self
, val_t param0
) {
6473 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 901, LOCATE_compiling_methods___AAssertExpr___compile_stmt
};
6490 trace
.prev
= tracehead
; tracehead
= &trace
;
6492 variable2
= ((parser_nodes___AAssertExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AAssertExpr___n_expr
))( self
) /*AAssertExpr::n_expr*/;
6493 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
6494 variable1
= variable2
;
6495 variable3
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
6496 variable2
= variable3
;
6497 variable3
= ((parser_nodes___AAssertExpr___n_id_t
)CALL( self
,COLOR_parser_nodes___AAssertExpr___n_id
))( self
) /*AAssertExpr::n_id*/;
6498 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::==*/)))))));
6499 if (UNTAG_Bool(variable3
)) { /*if*/
6500 variable3
= NEW_string___String___init(); /*new String*/
6501 variable4
= NEW_string___String___with_native(BOX_NativeString(" '"), TAG_Int(2)); /*new String*/
6502 variable5
= variable4
;
6503 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable5
) /*String::append*/;
6504 variable6
= ((parser_nodes___AAssertExpr___n_id_t
)CALL( self
,COLOR_parser_nodes___AAssertExpr___n_id
))( self
) /*AAssertExpr::n_id*/;
6505 variable6
= ((lexer___Token___text_t
)CALL(variable6
,COLOR_lexer___Token___text
))(variable6
) /*Token::text*/;
6506 variable7
= variable6
;
6507 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable7
) /*String::append*/;
6508 variable8
= NEW_string___String___with_native(BOX_NativeString("' "), TAG_Int(2)); /*new String*/
6509 variable9
= variable8
;
6510 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable9
) /*String::append*/;
6511 variable2
= variable3
/*s=*/;
6513 variable3
= NEW_string___String___init(); /*new String*/
6514 variable4
= NEW_string___String___with_native(BOX_NativeString("if (!UNTAG_Bool("), TAG_Int(16)); /*new String*/
6515 variable5
= variable4
;
6516 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable5
) /*String::append*/;
6517 variable6
= variable1
/*e*/;
6518 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable6
) /*String::append*/;
6519 variable7
= NEW_string___String___with_native(BOX_NativeString(")) { fprintf(stderr, \"Assert%s failed\", \""), TAG_Int(41)); /*new String*/
6520 variable8
= variable7
;
6521 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable8
) /*String::append*/;
6522 variable9
= variable2
/*s*/;
6523 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable9
) /*String::append*/;
6524 variable10
= NEW_string___String___with_native(BOX_NativeString("\"); "), TAG_Int(4)); /*new String*/
6525 variable11
= variable10
;
6526 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable11
) /*String::append*/;
6527 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*/;
6528 variable13
= variable12
;
6529 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable13
) /*String::append*/;
6530 variable14
= NEW_string___String___with_native(BOX_NativeString(" nit_exit(1);}"), TAG_Int(14)); /*new String*/
6531 variable15
= variable14
;
6532 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable15
) /*String::append*/;
6533 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::add_instr*/;
6534 tracehead
= trace
.prev
;
6537 val_t
compiling_methods___AVarExpr___compile_expr(val_t self
, val_t param0
) {
6538 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 913, LOCATE_compiling_methods___AVarExpr___compile_expr
};
6551 trace
.prev
= tracehead
; tracehead
= &trace
;
6553 variable1
= NEW_string___String___init(); /*new String*/
6554 variable2
= NEW_string___String___with_native(BOX_NativeString(" "), TAG_Int(1)); /*new String*/
6555 variable3
= variable2
;
6556 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable3
) /*String::append*/;
6557 variable4
= ((compiling_methods___CompilerVisitor___varnames_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___varnames
))( variable0
/*v*/) /*CompilerVisitor::varnames*/;
6558 variable5
= ((syntax_base___AVarFormExpr___variable_t
)CALL( self
,COLOR_syntax_base___AVarFormExpr___variable
))( self
) /*AVarFormExpr::variable*/;
6559 variable4
= ((abstract_collection___Map_____bra_t
)CALL(variable4
,COLOR_abstract_collection___Map_____bra
))(variable4
, variable5
) /*Map::[]*/;
6560 variable5
= variable4
;
6561 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable5
) /*String::append*/;
6562 variable6
= NEW_string___String___with_native(BOX_NativeString(" /*"), TAG_Int(3)); /*new String*/
6563 variable7
= variable6
;
6564 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable7
) /*String::append*/;
6565 variable8
= ((syntax_base___AVarFormExpr___variable_t
)CALL( self
,COLOR_syntax_base___AVarFormExpr___variable
))( self
) /*AVarFormExpr::variable*/;
6566 variable8
= ((syntax_base___Variable___name_t
)CALL(variable8
,COLOR_syntax_base___Variable___name
))(variable8
) /*Variable::name*/;
6567 variable9
= variable8
;
6568 variable9
= ((string___String___to_s_t
)CALL(variable9
,COLOR_string___Object___to_s
))(variable9
) /*String::to_s*/;
6569 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable9
) /*String::append*/;
6570 variable10
= NEW_string___String___with_native(BOX_NativeString("*/"), TAG_Int(2)); /*new String*/
6571 variable11
= variable10
;
6572 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable11
) /*String::append*/;
6573 goto return_label277
;
6574 return_label277
: while(false);
6575 tracehead
= trace
.prev
;
6578 void compiling_methods___AVarAssignExpr___compile_stmt(val_t self
, val_t param0
) {
6579 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 920, LOCATE_compiling_methods___AVarAssignExpr___compile_stmt
};
6593 trace
.prev
= tracehead
; tracehead
= &trace
;
6595 variable2
= ((parser_nodes___AAssignFormExpr___n_value_t
)CALL( self
,COLOR_parser_nodes___AAssignFormExpr___n_value
))( self
) /*AAssignFormExpr::n_value*/;
6596 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
6597 variable1
= variable2
;
6598 variable2
= ((compiling_methods___CompilerVisitor___varnames_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___varnames
))( variable0
/*v*/) /*CompilerVisitor::varnames*/;
6599 variable3
= ((syntax_base___AVarFormExpr___variable_t
)CALL( self
,COLOR_syntax_base___AVarFormExpr___variable
))( self
) /*AVarFormExpr::variable*/;
6600 variable2
= ((abstract_collection___Map_____bra_t
)CALL(variable2
,COLOR_abstract_collection___Map_____bra
))(variable2
, variable3
) /*Map::[]*/;
6601 variable3
= NEW_string___String___init(); /*new String*/
6602 variable4
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
6603 variable5
= variable4
;
6604 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable5
) /*String::append*/;
6605 variable6
= variable1
/*e*/;
6606 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable6
) /*String::append*/;
6607 variable7
= NEW_string___String___with_native(BOX_NativeString(" /*"), TAG_Int(3)); /*new String*/
6608 variable8
= variable7
;
6609 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable8
) /*String::append*/;
6610 variable9
= ((syntax_base___AVarFormExpr___variable_t
)CALL( self
,COLOR_syntax_base___AVarFormExpr___variable
))( self
) /*AVarFormExpr::variable*/;
6611 variable9
= ((syntax_base___Variable___name_t
)CALL(variable9
,COLOR_syntax_base___Variable___name
))(variable9
) /*Variable::name*/;
6612 variable10
= variable9
;
6613 variable10
= ((string___String___to_s_t
)CALL(variable10
,COLOR_string___Object___to_s
))(variable10
) /*String::to_s*/;
6614 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable10
) /*String::append*/;
6615 variable11
= NEW_string___String___with_native(BOX_NativeString("=*/"), TAG_Int(3)); /*new String*/
6616 variable12
= variable11
;
6617 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable12
) /*String::append*/;
6618 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable2
, variable3
) /*CompilerVisitor::add_assignment*/;
6619 tracehead
= trace
.prev
;
6622 void compiling_methods___AVarReassignExpr___compile_stmt(val_t self
, val_t param0
) {
6623 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 928, LOCATE_compiling_methods___AVarReassignExpr___compile_stmt
};
6639 trace
.prev
= tracehead
; tracehead
= &trace
;
6641 variable2
= ((compiling_methods___CompilerVisitor___varnames_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___varnames
))( variable0
/*v*/) /*CompilerVisitor::varnames*/;
6642 variable3
= ((syntax_base___AVarFormExpr___variable_t
)CALL( self
,COLOR_syntax_base___AVarFormExpr___variable
))( self
) /*AVarFormExpr::variable*/;
6643 variable2
= ((abstract_collection___Map_____bra_t
)CALL(variable2
,COLOR_abstract_collection___Map_____bra
))(variable2
, variable3
) /*Map::[]*/;
6644 variable1
= variable2
;
6645 variable3
= ((parser_nodes___AReassignFormExpr___n_value_t
)CALL( self
,COLOR_parser_nodes___AReassignFormExpr___n_value
))( self
) /*AReassignFormExpr::n_value*/;
6646 variable3
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::compile_expr*/;
6647 variable2
= variable3
;
6648 variable4
= ((typing___AReassignFormExpr___assign_method_t
)CALL( self
,COLOR_typing___AReassignFormExpr___assign_method
))( self
) /*AReassignFormExpr::assign_method*/;
6649 variable5
= NEW_array___Array___with_capacity(TAG_Int(2)); /*new Array[E]*/
6650 ((array___AbstractArray___add_t
)CALL(variable5
,COLOR_abstract_collection___SimpleCollection___add
))(variable5
, variable1
/*e1*/) /*AbstractArray::add*/;
6651 ((array___AbstractArray___add_t
)CALL(variable5
,COLOR_abstract_collection___SimpleCollection___add
))(variable5
, variable2
/*e2*/) /*AbstractArray::add*/;
6652 variable4
= ((compiling_methods___MMMethod___compile_call_t
)CALL(variable4
,COLOR_compiling_methods___MMMethod___compile_call
))(variable4
, variable0
/*v*/, variable5
) /*MMMethod::compile_call*/;
6653 variable3
= variable4
;
6654 variable4
= ((compiling_methods___CompilerVisitor___varnames_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___varnames
))( variable0
/*v*/) /*CompilerVisitor::varnames*/;
6655 variable5
= ((syntax_base___AVarFormExpr___variable_t
)CALL( self
,COLOR_syntax_base___AVarFormExpr___variable
))( self
) /*AVarFormExpr::variable*/;
6656 variable4
= ((abstract_collection___Map_____bra_t
)CALL(variable4
,COLOR_abstract_collection___Map_____bra
))(variable4
, variable5
) /*Map::[]*/;
6657 variable5
= NEW_string___String___init(); /*new String*/
6658 variable6
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
6659 variable7
= variable6
;
6660 ((string___String___append_t
)CALL(variable5
,COLOR_abstract_collection___IndexedCollection___append
))(variable5
, variable7
) /*String::append*/;
6661 variable8
= variable3
/*e3*/;
6662 ((string___String___append_t
)CALL(variable5
,COLOR_abstract_collection___IndexedCollection___append
))(variable5
, variable8
) /*String::append*/;
6663 variable9
= NEW_string___String___with_native(BOX_NativeString(" /*"), TAG_Int(3)); /*new String*/
6664 variable10
= variable9
;
6665 ((string___String___append_t
)CALL(variable5
,COLOR_abstract_collection___IndexedCollection___append
))(variable5
, variable10
) /*String::append*/;
6666 variable11
= ((syntax_base___AVarFormExpr___variable_t
)CALL( self
,COLOR_syntax_base___AVarFormExpr___variable
))( self
) /*AVarFormExpr::variable*/;
6667 variable11
= ((syntax_base___Variable___name_t
)CALL(variable11
,COLOR_syntax_base___Variable___name
))(variable11
) /*Variable::name*/;
6668 variable12
= variable11
;
6669 variable12
= ((string___String___to_s_t
)CALL(variable12
,COLOR_string___Object___to_s
))(variable12
) /*String::to_s*/;
6670 ((string___String___append_t
)CALL(variable5
,COLOR_abstract_collection___IndexedCollection___append
))(variable5
, variable12
) /*String::append*/;
6671 variable13
= NEW_string___String___with_native(BOX_NativeString("*/"), TAG_Int(2)); /*new String*/
6672 variable14
= variable13
;
6673 ((string___String___append_t
)CALL(variable5
,COLOR_abstract_collection___IndexedCollection___append
))(variable5
, variable14
) /*String::append*/;
6674 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable4
, variable5
) /*CompilerVisitor::add_assignment*/;
6675 tracehead
= trace
.prev
;
6678 val_t
compiling_methods___ASelfExpr___compile_expr(val_t self
, val_t param0
) {
6679 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 938, LOCATE_compiling_methods___ASelfExpr___compile_expr
};
6685 trace
.prev
= tracehead
; tracehead
= &trace
;
6687 variable1
= ((compiling_methods___CompilerVisitor___method_params_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___method_params
))( variable0
/*v*/) /*CompilerVisitor::method_params*/;
6688 variable2
= TAG_Int(0);
6689 variable3
= TAG_Bool(UNTAG_Int( variable2
/*index*/)>=UNTAG_Int( TAG_Int(0)));
6690 variable4
= variable3
;
6691 if (UNTAG_Bool(variable4
)) { /* and */
6692 variable4
= variable1
;
6693 variable4
= ATTR_array___AbstractArray____length(variable4
) /*AbstractArray::_length*/;
6694 variable4
= TAG_Bool(UNTAG_Int( variable2
/*index*/)<UNTAG_Int(variable4
));
6696 variable3
= variable4
;
6697 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);}
6698 variable3
= variable1
;
6699 variable3
= ATTR_array___Array____items(variable3
) /*Array::_items*/;
6700 variable3
= UNBOX_NativeArray(variable3
)[UNTAG_Int( variable2
/*index*/)];
6701 goto return_label281
;
6702 return_label281
: while(false);
6703 variable1
= variable3
;
6704 goto return_label280
;
6705 return_label280
: while(false);
6706 tracehead
= trace
.prev
;
6709 val_t
compiling_methods___AOrExpr___compile_expr(val_t self
, val_t param0
) {
6710 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 945, LOCATE_compiling_methods___AOrExpr___compile_expr
};
6719 trace
.prev
= tracehead
; tracehead
= &trace
;
6721 variable2
= ((parser_nodes___AOrExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AOrExpr___n_expr
))( self
) /*AOrExpr::n_expr*/;
6722 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
6723 variable2
= ((compiling_methods___CompilerVisitor___ensure_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___ensure_var
))( variable0
/*v*/, variable2
) /*CompilerVisitor::ensure_var*/;
6724 variable1
= variable2
;
6725 variable2
= NEW_string___String___init(); /*new String*/
6726 variable3
= NEW_string___String___with_native(BOX_NativeString("if (!UNTAG_Bool("), TAG_Int(16)); /*new String*/
6727 variable4
= variable3
;
6728 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable4
) /*String::append*/;
6729 variable5
= variable1
/*e*/;
6730 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable5
) /*String::append*/;
6731 variable6
= NEW_string___String___with_native(BOX_NativeString(")) { /* or */"), TAG_Int(13)); /*new String*/
6732 variable7
= variable6
;
6733 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable7
) /*String::append*/;
6734 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::add_instr*/;
6735 ((compiling_methods___CompilerVisitor___free_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___free_var
))( variable0
/*v*/, variable1
/*e*/) /*CompilerVisitor::free_var*/;
6736 ((compiling_base___CompilerVisitor___indent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___indent
))( variable0
/*v*/) /*CompilerVisitor::indent*/;
6737 variable3
= ((parser_nodes___AOrExpr___n_expr2_t
)CALL( self
,COLOR_parser_nodes___AOrExpr___n_expr2
))( self
) /*AOrExpr::n_expr2*/;
6738 variable3
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::compile_expr*/;
6739 variable2
= variable3
;
6740 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable1
/*e*/, variable2
/*e2*/) /*CompilerVisitor::add_assignment*/;
6741 ((compiling_base___CompilerVisitor___unindent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___unindent
))( variable0
/*v*/) /*CompilerVisitor::unindent*/;
6742 variable3
= NEW_string___String___with_native(BOX_NativeString("}"), TAG_Int(1)); /*new String*/
6743 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::add_instr*/;
6744 variable1
= variable1
/*e*/;
6745 goto return_label282
;
6746 return_label282
: while(false);
6747 tracehead
= trace
.prev
;
6750 val_t
compiling_methods___AAndExpr___compile_expr(val_t self
, val_t param0
) {
6751 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 960, LOCATE_compiling_methods___AAndExpr___compile_expr
};
6760 trace
.prev
= tracehead
; tracehead
= &trace
;
6762 variable2
= ((parser_nodes___AAndExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AAndExpr___n_expr
))( self
) /*AAndExpr::n_expr*/;
6763 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
6764 variable2
= ((compiling_methods___CompilerVisitor___ensure_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___ensure_var
))( variable0
/*v*/, variable2
) /*CompilerVisitor::ensure_var*/;
6765 variable1
= variable2
;
6766 variable2
= NEW_string___String___init(); /*new String*/
6767 variable3
= NEW_string___String___with_native(BOX_NativeString("if (UNTAG_Bool("), TAG_Int(15)); /*new String*/
6768 variable4
= variable3
;
6769 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable4
) /*String::append*/;
6770 variable5
= variable1
/*e*/;
6771 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable5
) /*String::append*/;
6772 variable6
= NEW_string___String___with_native(BOX_NativeString(")) { /* and */"), TAG_Int(14)); /*new String*/
6773 variable7
= variable6
;
6774 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable7
) /*String::append*/;
6775 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::add_instr*/;
6776 ((compiling_methods___CompilerVisitor___free_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___free_var
))( variable0
/*v*/, variable1
/*e*/) /*CompilerVisitor::free_var*/;
6777 ((compiling_base___CompilerVisitor___indent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___indent
))( variable0
/*v*/) /*CompilerVisitor::indent*/;
6778 variable3
= ((parser_nodes___AAndExpr___n_expr2_t
)CALL( self
,COLOR_parser_nodes___AAndExpr___n_expr2
))( self
) /*AAndExpr::n_expr2*/;
6779 variable3
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::compile_expr*/;
6780 variable2
= variable3
;
6781 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable1
/*e*/, variable2
/*e2*/) /*CompilerVisitor::add_assignment*/;
6782 ((compiling_base___CompilerVisitor___unindent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___unindent
))( variable0
/*v*/) /*CompilerVisitor::unindent*/;
6783 variable3
= NEW_string___String___with_native(BOX_NativeString("}"), TAG_Int(1)); /*new String*/
6784 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::add_instr*/;
6785 variable1
= variable1
/*e*/;
6786 goto return_label283
;
6787 return_label283
: while(false);
6788 tracehead
= trace
.prev
;
6791 val_t
compiling_methods___ANotExpr___compile_expr(val_t self
, val_t param0
) {
6792 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 975, LOCATE_compiling_methods___ANotExpr___compile_expr
};
6801 trace
.prev
= tracehead
; tracehead
= &trace
;
6803 variable1
= NEW_string___String___init(); /*new String*/
6804 variable2
= NEW_string___String___with_native(BOX_NativeString(" TAG_Bool(!UNTAG_Bool("), TAG_Int(22)); /*new String*/
6805 variable3
= variable2
;
6806 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable3
) /*String::append*/;
6807 variable4
= ((parser_nodes___ANotExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___ANotExpr___n_expr
))( self
) /*ANotExpr::n_expr*/;
6808 variable4
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable4
) /*CompilerVisitor::compile_expr*/;
6809 variable5
= variable4
;
6810 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable5
) /*String::append*/;
6811 variable6
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
6812 variable7
= variable6
;
6813 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable7
) /*String::append*/;
6814 goto return_label284
;
6815 return_label284
: while(false);
6816 tracehead
= trace
.prev
;
6819 val_t
compiling_methods___AEeExpr___compile_expr(val_t self
, val_t param0
) {
6820 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 982, LOCATE_compiling_methods___AEeExpr___compile_expr
};
6833 trace
.prev
= tracehead
; tracehead
= &trace
;
6835 variable2
= ((parser_nodes___AEeExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AEeExpr___n_expr
))( self
) /*AEeExpr::n_expr*/;
6836 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
6837 variable1
= variable2
;
6838 variable3
= ((parser_nodes___AEeExpr___n_expr2_t
)CALL( self
,COLOR_parser_nodes___AEeExpr___n_expr2
))( self
) /*AEeExpr::n_expr2*/;
6839 variable3
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::compile_expr*/;
6840 variable2
= variable3
;
6841 variable3
= NEW_string___String___init(); /*new String*/
6842 variable4
= NEW_string___String___with_native(BOX_NativeString("TAG_Bool(IS_EQUAL_NN("), TAG_Int(21)); /*new String*/
6843 variable5
= variable4
;
6844 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable5
) /*String::append*/;
6845 variable6
= variable1
/*e*/;
6846 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable6
) /*String::append*/;
6847 variable7
= NEW_string___String___with_native(BOX_NativeString(","), TAG_Int(1)); /*new String*/
6848 variable8
= variable7
;
6849 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable8
) /*String::append*/;
6850 variable9
= variable2
/*e2*/;
6851 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable9
) /*String::append*/;
6852 variable10
= NEW_string___String___with_native(BOX_NativeString("))"), TAG_Int(2)); /*new String*/
6853 variable11
= variable10
;
6854 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable11
) /*String::append*/;
6855 variable1
= variable3
;
6856 goto return_label285
;
6857 return_label285
: while(false);
6858 tracehead
= trace
.prev
;
6861 val_t
compiling_methods___AIsaExpr___compile_expr(val_t self
, val_t param0
) {
6862 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 991, LOCATE_compiling_methods___AIsaExpr___compile_expr
};
6866 trace
.prev
= tracehead
; tracehead
= &trace
;
6868 variable2
= ((parser_nodes___AIsaExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AIsaExpr___n_expr
))( self
) /*AIsaExpr::n_expr*/;
6869 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
6870 variable1
= variable2
;
6871 variable2
= ((parser_nodes___AIsaExpr___n_type_t
)CALL( self
,COLOR_parser_nodes___AIsaExpr___n_type
))( self
) /*AIsaExpr::n_type*/;
6872 variable2
= ((typing___PType___stype_t
)CALL(variable2
,COLOR_typing___PType___stype
))(variable2
) /*PType::stype*/;
6873 variable2
= ((compiling_methods___MMType___compile_cast_t
)CALL(variable2
,COLOR_compiling_methods___MMType___compile_cast
))(variable2
, variable0
/*v*/, variable1
/*e*/) /*MMType::compile_cast*/;
6874 variable1
= variable2
;
6875 goto return_label286
;
6876 return_label286
: while(false);
6877 tracehead
= trace
.prev
;
6880 val_t
compiling_methods___AAsCastExpr___compile_expr(val_t self
, val_t param0
) {
6881 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 999, LOCATE_compiling_methods___AAsCastExpr___compile_expr
};
6885 trace
.prev
= tracehead
; tracehead
= &trace
;
6887 variable2
= ((parser_nodes___AAsCastExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AAsCastExpr___n_expr
))( self
) /*AAsCastExpr::n_expr*/;
6888 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
6889 variable1
= variable2
;
6890 variable2
= ((parser_nodes___AAsCastExpr___n_type_t
)CALL( self
,COLOR_parser_nodes___AAsCastExpr___n_type
))( self
) /*AAsCastExpr::n_type*/;
6891 variable2
= ((typing___PType___stype_t
)CALL(variable2
,COLOR_typing___PType___stype
))(variable2
) /*PType::stype*/;
6892 ((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*/;
6893 variable1
= variable1
/*e*/;
6894 goto return_label287
;
6895 return_label287
: while(false);
6896 tracehead
= trace
.prev
;
6899 val_t
compiling_methods___ATrueExpr___compile_expr(val_t self
, val_t param0
) {
6900 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1008, LOCATE_compiling_methods___ATrueExpr___compile_expr
};
6903 trace
.prev
= tracehead
; tracehead
= &trace
;
6905 variable1
= NEW_string___String___with_native(BOX_NativeString(" TAG_Bool(true)"), TAG_Int(15)); /*new String*/
6906 goto return_label288
;
6907 return_label288
: while(false);
6908 tracehead
= trace
.prev
;
6911 val_t
compiling_methods___AFalseExpr___compile_expr(val_t self
, val_t param0
) {
6912 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1015, LOCATE_compiling_methods___AFalseExpr___compile_expr
};
6915 trace
.prev
= tracehead
; tracehead
= &trace
;
6917 variable1
= NEW_string___String___with_native(BOX_NativeString(" TAG_Bool(false)"), TAG_Int(16)); /*new String*/
6918 goto return_label289
;
6919 return_label289
: while(false);
6920 tracehead
= trace
.prev
;
6923 val_t
compiling_methods___AIntExpr___compile_expr(val_t self
, val_t param0
) {
6924 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1022, LOCATE_compiling_methods___AIntExpr___compile_expr
};
6933 trace
.prev
= tracehead
; tracehead
= &trace
;
6935 variable1
= NEW_string___String___init(); /*new String*/
6936 variable2
= NEW_string___String___with_native(BOX_NativeString(" TAG_Int("), TAG_Int(9)); /*new String*/
6937 variable3
= variable2
;
6938 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable3
) /*String::append*/;
6939 variable4
= ((parser_nodes___AIntExpr___n_number_t
)CALL( self
,COLOR_parser_nodes___AIntExpr___n_number
))( self
) /*AIntExpr::n_number*/;
6940 variable4
= ((lexer___Token___text_t
)CALL(variable4
,COLOR_lexer___Token___text
))(variable4
) /*Token::text*/;
6941 variable5
= variable4
;
6942 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable5
) /*String::append*/;
6943 variable6
= NEW_string___String___with_native(BOX_NativeString(")"), TAG_Int(1)); /*new String*/
6944 variable7
= variable6
;
6945 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable7
) /*String::append*/;
6946 goto return_label290
;
6947 return_label290
: while(false);
6948 tracehead
= trace
.prev
;
6951 val_t
compiling_methods___AFloatExpr___compile_expr(val_t self
, val_t param0
) {
6952 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1029, LOCATE_compiling_methods___AFloatExpr___compile_expr
};
6961 trace
.prev
= tracehead
; tracehead
= &trace
;
6963 variable1
= NEW_string___String___init(); /*new String*/
6964 variable2
= NEW_string___String___with_native(BOX_NativeString("BOX_Float("), TAG_Int(10)); /*new String*/
6965 variable3
= variable2
;
6966 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable3
) /*String::append*/;
6967 variable4
= ((parser_nodes___AFloatExpr___n_float_t
)CALL( self
,COLOR_parser_nodes___AFloatExpr___n_float
))( self
) /*AFloatExpr::n_float*/;
6968 variable4
= ((lexer___Token___text_t
)CALL(variable4
,COLOR_lexer___Token___text
))(variable4
) /*Token::text*/;
6969 variable5
= variable4
;
6970 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable5
) /*String::append*/;
6971 variable6
= NEW_string___String___with_native(BOX_NativeString(")"), TAG_Int(1)); /*new String*/
6972 variable7
= variable6
;
6973 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable7
) /*String::append*/;
6974 goto return_label291
;
6975 return_label291
: while(false);
6976 tracehead
= trace
.prev
;
6979 val_t
compiling_methods___ACharExpr___compile_expr(val_t self
, val_t param0
) {
6980 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1036, LOCATE_compiling_methods___ACharExpr___compile_expr
};
6989 trace
.prev
= tracehead
; tracehead
= &trace
;
6991 variable1
= NEW_string___String___init(); /*new String*/
6992 variable2
= NEW_string___String___with_native(BOX_NativeString(" TAG_Char("), TAG_Int(10)); /*new String*/
6993 variable3
= variable2
;
6994 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable3
) /*String::append*/;
6995 variable4
= ((parser_nodes___ACharExpr___n_char_t
)CALL( self
,COLOR_parser_nodes___ACharExpr___n_char
))( self
) /*ACharExpr::n_char*/;
6996 variable4
= ((lexer___Token___text_t
)CALL(variable4
,COLOR_lexer___Token___text
))(variable4
) /*Token::text*/;
6997 variable5
= variable4
;
6998 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable5
) /*String::append*/;
6999 variable6
= NEW_string___String___with_native(BOX_NativeString(")"), TAG_Int(1)); /*new String*/
7000 variable7
= variable6
;
7001 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable7
) /*String::append*/;
7002 goto return_label292
;
7003 return_label292
: while(false);
7004 tracehead
= trace
.prev
;
7007 val_t
compiling_methods___AStringFormExpr___compile_expr(val_t self
, val_t param0
) {
7008 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1043, LOCATE_compiling_methods___AStringFormExpr___compile_expr
};
7013 static val_t once_value_variable3_294
; static int once_bool_variable3_294
;
7021 trace
.prev
= tracehead
; tracehead
= &trace
;
7023 variable2
= ((typing___PExpr___stype_t
)CALL( self
,COLOR_syntax_base___PExpr___stype
))( self
) /*PExpr::stype*/;
7024 variable2
= ((static_type___MMType___local_class_t
)CALL(variable2
,COLOR_static_type___MMType___local_class
))(variable2
) /*MMType::local_class*/;
7025 if (once_bool_variable3_294
) variable3
= once_value_variable3_294
;
7027 variable3
= NEW_string___String___with_native(BOX_NativeString("with_native"), TAG_Int(11)); /*new String*/
7028 variable3
= ((symbol___String___to_symbol_t
)CALL(variable3
,COLOR_symbol___String___to_symbol
))(variable3
) /*String::to_symbol*/;
7029 once_value_variable3_294
= variable3
;
7030 once_bool_variable3_294
= true;
7032 variable2
= ((abstractmetamodel___MMLocalClass___select_method_t
)CALL(variable2
,COLOR_abstractmetamodel___MMLocalClass___select_method
))(variable2
, variable3
) /*MMLocalClass::select_method*/;
7033 variable1
= variable2
;
7034 ((compiling_methods___AStringFormExpr___compute_string_info_t
)CALL( self
,COLOR_compiling_methods___AStringFormExpr___compute_string_info
))( self
) /*AStringFormExpr::compute_string_info*/;
7035 variable2
= NEW_array___Array___with_capacity(TAG_Int(2)); /*new Array[E]*/
7036 variable3
= NEW_string___String___init(); /*new String*/
7037 variable4
= NEW_string___String___with_native(BOX_NativeString("BOX_NativeString(\""), TAG_Int(18)); /*new String*/
7038 variable5
= variable4
;
7039 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable5
) /*String::append*/;
7040 variable6
= ATTR_compiling_methods___AStringFormExpr____cstring( self
) /*AStringFormExpr::_cstring*/;
7041 variable7
= variable6
;
7042 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable7
) /*String::append*/;
7043 variable8
= NEW_string___String___with_native(BOX_NativeString("\")"), TAG_Int(2)); /*new String*/
7044 variable9
= variable8
;
7045 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable9
) /*String::append*/;
7046 ((array___AbstractArray___add_t
)CALL(variable2
,COLOR_abstract_collection___SimpleCollection___add
))(variable2
, variable3
) /*AbstractArray::add*/;
7047 variable4
= NEW_string___String___init(); /*new String*/
7048 variable5
= NEW_string___String___with_native(BOX_NativeString("TAG_Int("), TAG_Int(8)); /*new String*/
7049 variable6
= variable5
;
7050 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable6
) /*String::append*/;
7051 variable7
= ATTR_compiling_methods___AStringFormExpr____cstring_length( self
) /*AStringFormExpr::_cstring_length*/;
7052 variable8
= variable7
;
7053 variable8
= ((string___String___to_s_t
)CALL(variable8
,COLOR_string___Object___to_s
))(variable8
) /*String::to_s*/;
7054 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable8
) /*String::append*/;
7055 variable9
= NEW_string___String___with_native(BOX_NativeString(")"), TAG_Int(1)); /*new String*/
7056 variable10
= variable9
;
7057 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable10
) /*String::append*/;
7058 ((array___AbstractArray___add_t
)CALL(variable2
,COLOR_abstract_collection___SimpleCollection___add
))(variable2
, variable4
) /*AbstractArray::add*/;
7059 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*/;
7060 variable1
= variable2
;
7061 goto return_label293
;
7062 return_label293
: while(false);
7063 tracehead
= trace
.prev
;
7066 val_t
compiling_methods___AStringFormExpr___string_text(val_t self
) {
7067 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1050, LOCATE_compiling_methods___AStringFormExpr___string_text
};
7068 trace
.prev
= tracehead
; tracehead
= &trace
;
7069 fprintf(stderr
, "Deferred method %s called");
7070 fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_compiling_methods___AStringFormExpr___compile_expr
, LOCATE_compiling_methods
, 1050);
7072 tracehead
= trace
.prev
;
7075 void compiling_methods___AStringFormExpr___compute_string_info(val_t self
) {
7076 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1059, LOCATE_compiling_methods___AStringFormExpr___compute_string_info
};
7085 trace
.prev
= tracehead
; tracehead
= &trace
;
7086 variable0
= TAG_Int(0);
7087 variable2
= ((compiling_methods___AStringFormExpr___string_text_t
)CALL( self
,COLOR_compiling_methods___AStringFormExpr___string_text
))( self
) /*AStringFormExpr::string_text*/;
7088 variable1
= variable2
;
7089 variable3
= NEW_string___String___init(); /*new String*/
7090 variable2
= variable3
;
7091 variable3
= TAG_Int(0);
7092 while (true) { /*while*/
7093 variable4
= ((array___AbstractArray___length_t
)CALL( variable1
/*str*/,COLOR_abstract_collection___Collection___length
))( variable1
/*str*/) /*AbstractArray::length*/;
7094 variable4
= TAG_Bool(UNTAG_Int( variable3
/*i*/)<UNTAG_Int(variable4
));
7095 if (!UNTAG_Bool(variable4
)) break; /* while*/
7096 variable5
= ((string___String_____bra_t
)CALL( variable1
/*str*/,COLOR_abstract_collection___Map_____bra
))( variable1
/*str*/, variable3
/*i*/) /*String::[]*/;
7097 variable4
= variable5
;
7098 variable5
= TAG_Bool(( variable4
/*c*/)==( TAG_Char('\\')));
7099 if (UNTAG_Bool(variable5
)) { /*if*/
7100 variable5
= TAG_Int(UNTAG_Int( variable3
/*i*/)+UNTAG_Int( TAG_Int(1)));
7101 variable3
= variable5
/*i=*/;
7102 variable6
= ((string___String_____bra_t
)CALL( variable1
/*str*/,COLOR_abstract_collection___Map_____bra
))( variable1
/*str*/, variable3
/*i*/) /*String::[]*/;
7103 variable5
= variable6
;
7104 variable6
= TAG_Bool(( variable5
/*c2*/)!=( TAG_Char('{')));
7105 variable7
= variable6
;
7106 if (UNTAG_Bool(variable7
)) { /* and */
7107 variable7
= TAG_Bool(( variable5
/*c2*/)!=( TAG_Char('}')));
7109 variable6
= variable7
;
7110 if (UNTAG_Bool(variable6
)) { /*if*/
7111 ((string___String___add_t
)CALL( variable2
/*res*/,COLOR_abstract_collection___SimpleCollection___add
))( variable2
/*res*/, variable4
/*c*/) /*String::add*/;
7113 variable4
= variable5
/*c2*/ /*c=*/;
7115 variable5
= TAG_Int(UNTAG_Int( variable0
/*len*/)+UNTAG_Int( TAG_Int(1)));
7116 variable0
= variable5
/*len=*/;
7117 ((string___String___add_t
)CALL( variable2
/*res*/,COLOR_abstract_collection___SimpleCollection___add
))( variable2
/*res*/, variable4
/*c*/) /*String::add*/;
7118 variable5
= TAG_Int(UNTAG_Int( variable3
/*i*/)+UNTAG_Int( TAG_Int(1)));
7119 variable3
= variable5
/*i=*/;
7120 continue_296
: while(0);
7122 break_296
: while(0);
7123 ATTR_compiling_methods___AStringFormExpr____cstring( self
) /*AStringFormExpr::_cstring*/ = variable2
/*res*/;
7124 ATTR_compiling_methods___AStringFormExpr____cstring_length( self
) /*AStringFormExpr::_cstring_length*/ = variable0
/*len*/;
7125 tracehead
= trace
.prev
;
7128 val_t
compiling_methods___AStringExpr___string_text(val_t self
) {
7129 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1086, LOCATE_compiling_methods___AStringExpr___string_text
};
7132 trace
.prev
= tracehead
; tracehead
= &trace
;
7133 variable0
= ((parser_nodes___AStringExpr___n_string_t
)CALL( self
,COLOR_parser_nodes___AStringExpr___n_string
))( self
) /*AStringExpr::n_string*/;
7134 variable0
= ((lexer___Token___text_t
)CALL(variable0
,COLOR_lexer___Token___text
))(variable0
) /*Token::text*/;
7135 variable1
= ((parser_nodes___AStringExpr___n_string_t
)CALL( self
,COLOR_parser_nodes___AStringExpr___n_string
))( self
) /*AStringExpr::n_string*/;
7136 variable1
= ((lexer___Token___text_t
)CALL(variable1
,COLOR_lexer___Token___text
))(variable1
) /*Token::text*/;
7137 variable1
= ((array___AbstractArray___length_t
)CALL(variable1
,COLOR_abstract_collection___Collection___length
))(variable1
) /*AbstractArray::length*/;
7138 variable1
= TAG_Int(UNTAG_Int(variable1
)-UNTAG_Int( TAG_Int(2)));
7139 variable0
= ((string___String___substring_t
)CALL(variable0
,COLOR_string___String___substring
))(variable0
, TAG_Int(1), variable1
) /*String::substring*/;
7140 goto return_label297
;
7141 return_label297
: while(false);
7142 tracehead
= trace
.prev
;
7145 val_t
compiling_methods___AStartStringExpr___string_text(val_t self
) {
7146 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1089, LOCATE_compiling_methods___AStartStringExpr___string_text
};
7149 trace
.prev
= tracehead
; tracehead
= &trace
;
7150 variable0
= ((parser_nodes___AStartStringExpr___n_string_t
)CALL( self
,COLOR_parser_nodes___AStartStringExpr___n_string
))( self
) /*AStartStringExpr::n_string*/;
7151 variable0
= ((lexer___Token___text_t
)CALL(variable0
,COLOR_lexer___Token___text
))(variable0
) /*Token::text*/;
7152 variable1
= ((parser_nodes___AStartStringExpr___n_string_t
)CALL( self
,COLOR_parser_nodes___AStartStringExpr___n_string
))( self
) /*AStartStringExpr::n_string*/;
7153 variable1
= ((lexer___Token___text_t
)CALL(variable1
,COLOR_lexer___Token___text
))(variable1
) /*Token::text*/;
7154 variable1
= ((array___AbstractArray___length_t
)CALL(variable1
,COLOR_abstract_collection___Collection___length
))(variable1
) /*AbstractArray::length*/;
7155 variable1
= TAG_Int(UNTAG_Int(variable1
)-UNTAG_Int( TAG_Int(2)));
7156 variable0
= ((string___String___substring_t
)CALL(variable0
,COLOR_string___String___substring
))(variable0
, TAG_Int(1), variable1
) /*String::substring*/;
7157 goto return_label298
;
7158 return_label298
: while(false);
7159 tracehead
= trace
.prev
;
7162 val_t
compiling_methods___AMidStringExpr___string_text(val_t self
) {
7163 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1092, LOCATE_compiling_methods___AMidStringExpr___string_text
};
7166 trace
.prev
= tracehead
; tracehead
= &trace
;
7167 variable0
= ((parser_nodes___AMidStringExpr___n_string_t
)CALL( self
,COLOR_parser_nodes___AMidStringExpr___n_string
))( self
) /*AMidStringExpr::n_string*/;
7168 variable0
= ((lexer___Token___text_t
)CALL(variable0
,COLOR_lexer___Token___text
))(variable0
) /*Token::text*/;
7169 variable1
= ((parser_nodes___AMidStringExpr___n_string_t
)CALL( self
,COLOR_parser_nodes___AMidStringExpr___n_string
))( self
) /*AMidStringExpr::n_string*/;
7170 variable1
= ((lexer___Token___text_t
)CALL(variable1
,COLOR_lexer___Token___text
))(variable1
) /*Token::text*/;
7171 variable1
= ((array___AbstractArray___length_t
)CALL(variable1
,COLOR_abstract_collection___Collection___length
))(variable1
) /*AbstractArray::length*/;
7172 variable1
= TAG_Int(UNTAG_Int(variable1
)-UNTAG_Int( TAG_Int(2)));
7173 variable0
= ((string___String___substring_t
)CALL(variable0
,COLOR_string___String___substring
))(variable0
, TAG_Int(1), variable1
) /*String::substring*/;
7174 goto return_label299
;
7175 return_label299
: while(false);
7176 tracehead
= trace
.prev
;
7179 val_t
compiling_methods___AEndStringExpr___string_text(val_t self
) {
7180 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1095, LOCATE_compiling_methods___AEndStringExpr___string_text
};
7183 trace
.prev
= tracehead
; tracehead
= &trace
;
7184 variable0
= ((parser_nodes___AEndStringExpr___n_string_t
)CALL( self
,COLOR_parser_nodes___AEndStringExpr___n_string
))( self
) /*AEndStringExpr::n_string*/;
7185 variable0
= ((lexer___Token___text_t
)CALL(variable0
,COLOR_lexer___Token___text
))(variable0
) /*Token::text*/;
7186 variable1
= ((parser_nodes___AEndStringExpr___n_string_t
)CALL( self
,COLOR_parser_nodes___AEndStringExpr___n_string
))( self
) /*AEndStringExpr::n_string*/;
7187 variable1
= ((lexer___Token___text_t
)CALL(variable1
,COLOR_lexer___Token___text
))(variable1
) /*Token::text*/;
7188 variable1
= ((array___AbstractArray___length_t
)CALL(variable1
,COLOR_abstract_collection___Collection___length
))(variable1
) /*AbstractArray::length*/;
7189 variable1
= TAG_Int(UNTAG_Int(variable1
)-UNTAG_Int( TAG_Int(2)));
7190 variable0
= ((string___String___substring_t
)CALL(variable0
,COLOR_string___String___substring
))(variable0
, TAG_Int(1), variable1
) /*String::substring*/;
7191 goto return_label300
;
7192 return_label300
: while(false);
7193 tracehead
= trace
.prev
;
7196 val_t
compiling_methods___ASuperstringExpr___compile_expr(val_t self
, val_t param0
) {
7197 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1099, LOCATE_compiling_methods___ASuperstringExpr___compile_expr
};
7202 static val_t once_value_variable3_302
; static int once_bool_variable3_302
;
7205 static val_t once_value_variable5_303
; static int once_bool_variable5_303
;
7207 static val_t once_value_variable6_304
; static int once_bool_variable6_304
;
7211 trace
.prev
= tracehead
; tracehead
= &trace
;
7213 variable2
= ((typing___PExpr___stype_t
)CALL( self
,COLOR_syntax_base___PExpr___stype
))( self
) /*PExpr::stype*/;
7214 variable2
= ((static_type___MMType___local_class_t
)CALL(variable2
,COLOR_static_type___MMType___local_class
))(variable2
) /*MMType::local_class*/;
7215 if (once_bool_variable3_302
) variable3
= once_value_variable3_302
;
7217 variable3
= NEW_string___String___with_native(BOX_NativeString("init"), TAG_Int(4)); /*new String*/
7218 variable3
= ((symbol___String___to_symbol_t
)CALL(variable3
,COLOR_symbol___String___to_symbol
))(variable3
) /*String::to_symbol*/;
7219 once_value_variable3_302
= variable3
;
7220 once_bool_variable3_302
= true;
7222 variable2
= ((abstractmetamodel___MMLocalClass___select_method_t
)CALL(variable2
,COLOR_abstractmetamodel___MMLocalClass___select_method
))(variable2
, variable3
) /*MMLocalClass::select_method*/;
7223 variable1
= variable2
;
7224 variable3
= NEW_array___Array___init(); /*new Array[E]*/
7225 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*/;
7226 variable2
= variable3
;
7227 variable4
= ((typing___PExpr___stype_t
)CALL( self
,COLOR_syntax_base___PExpr___stype
))( self
) /*PExpr::stype*/;
7228 variable4
= ((static_type___MMType___local_class_t
)CALL(variable4
,COLOR_static_type___MMType___local_class
))(variable4
) /*MMType::local_class*/;
7229 if (once_bool_variable5_303
) variable5
= once_value_variable5_303
;
7231 variable5
= NEW_string___String___with_native(BOX_NativeString("append"), TAG_Int(6)); /*new String*/
7232 variable5
= ((symbol___String___to_symbol_t
)CALL(variable5
,COLOR_symbol___String___to_symbol
))(variable5
) /*String::to_symbol*/;
7233 once_value_variable5_303
= variable5
;
7234 once_bool_variable5_303
= true;
7236 variable4
= ((abstractmetamodel___MMLocalClass___select_method_t
)CALL(variable4
,COLOR_abstractmetamodel___MMLocalClass___select_method
))(variable4
, variable5
) /*MMLocalClass::select_method*/;
7237 variable3
= variable4
;
7238 variable5
= ((typing___PExpr___stype_t
)CALL( self
,COLOR_syntax_base___PExpr___stype
))( self
) /*PExpr::stype*/;
7239 variable5
= ((static_type___MMType___local_class_t
)CALL(variable5
,COLOR_static_type___MMType___local_class
))(variable5
) /*MMType::local_class*/;
7240 if (once_bool_variable6_304
) variable6
= once_value_variable6_304
;
7242 variable6
= NEW_string___String___with_native(BOX_NativeString("to_s"), TAG_Int(4)); /*new String*/
7243 variable6
= ((symbol___String___to_symbol_t
)CALL(variable6
,COLOR_symbol___String___to_symbol
))(variable6
) /*String::to_symbol*/;
7244 once_value_variable6_304
= variable6
;
7245 once_bool_variable6_304
= true;
7247 variable5
= ((abstractmetamodel___MMLocalClass___select_method_t
)CALL(variable5
,COLOR_abstractmetamodel___MMLocalClass___select_method
))(variable5
, variable6
) /*MMLocalClass::select_method*/;
7248 variable4
= variable5
;
7249 variable5
= ((parser_nodes___ASuperstringExpr___n_exprs_t
)CALL( self
,COLOR_parser_nodes___ASuperstringExpr___n_exprs
))( self
) /*ASuperstringExpr::n_exprs*/;
7250 variable5
= ((list___List___iterator_t
)CALL(variable5
,COLOR_abstract_collection___Collection___iterator
))(variable5
) /*List::iterator*/;
7251 while (true) { /*for*/
7252 variable6
= ((list___ListIterator___is_ok_t
)CALL(variable5
,COLOR_abstract_collection___Iterator___is_ok
))(variable5
) /*ListIterator::is_ok*/;
7253 if (!UNTAG_Bool(variable6
)) break; /*for*/
7254 variable6
= ((list___ListIterator___item_t
)CALL(variable5
,COLOR_abstract_collection___Iterator___item
))(variable5
) /*ListIterator::item*/;
7255 variable8
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable6
/*ne*/) /*CompilerVisitor::compile_expr*/;
7256 variable8
= ((compiling_methods___CompilerVisitor___ensure_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___ensure_var
))( variable0
/*v*/, variable8
) /*CompilerVisitor::ensure_var*/;
7257 variable7
= variable8
;
7258 variable8
= ((typing___PExpr___stype_t
)CALL( variable6
/*ne*/,COLOR_syntax_base___PExpr___stype
))( variable6
/*ne*/) /*PExpr::stype*/;
7259 variable9
= ((typing___PExpr___stype_t
)CALL( self
,COLOR_syntax_base___PExpr___stype
))( self
) /*PExpr::stype*/;
7260 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::==*/)))))));
7261 if (UNTAG_Bool(variable8
)) { /*if*/
7262 variable8
= NEW_array___Array___with_capacity(TAG_Int(1)); /*new Array[E]*/
7263 ((array___AbstractArray___add_t
)CALL(variable8
,COLOR_abstract_collection___SimpleCollection___add
))(variable8
, variable7
/*e*/) /*AbstractArray::add*/;
7264 variable8
= ((compiling_methods___MMMethod___compile_call_t
)CALL( variable4
/*prop3*/,COLOR_compiling_methods___MMMethod___compile_call
))( variable4
/*prop3*/, variable0
/*v*/, variable8
) /*MMMethod::compile_call*/;
7265 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable7
/*e*/, variable8
) /*CompilerVisitor::add_assignment*/;
7267 variable8
= NEW_array___Array___with_capacity(TAG_Int(2)); /*new Array[E]*/
7268 ((array___AbstractArray___add_t
)CALL(variable8
,COLOR_abstract_collection___SimpleCollection___add
))(variable8
, variable2
/*recv*/) /*AbstractArray::add*/;
7269 ((array___AbstractArray___add_t
)CALL(variable8
,COLOR_abstract_collection___SimpleCollection___add
))(variable8
, variable7
/*e*/) /*AbstractArray::add*/;
7270 ((compiling_methods___MMMethod___compile_call_t
)CALL( variable3
/*prop2*/,COLOR_compiling_methods___MMMethod___compile_call
))( variable3
/*prop2*/, variable0
/*v*/, variable8
) /*MMMethod::compile_call*/;
7271 continue_305
: while(0);
7272 ((list___ListIterator___next_t
)CALL(variable5
,COLOR_abstract_collection___Iterator___next
))(variable5
) /*ListIterator::next*/;
7274 break_305
: while(0);
7275 variable1
= variable2
/*recv*/;
7276 goto return_label301
;
7277 return_label301
: while(false);
7278 tracehead
= trace
.prev
;
7281 val_t
compiling_methods___ANullExpr___compile_expr(val_t self
, val_t param0
) {
7282 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1120, LOCATE_compiling_methods___ANullExpr___compile_expr
};
7285 trace
.prev
= tracehead
; tracehead
= &trace
;
7287 variable1
= NEW_string___String___with_native(BOX_NativeString(" NIT_NULL /*null*/"), TAG_Int(18)); /*new String*/
7288 goto return_label306
;
7289 return_label306
: while(false);
7290 tracehead
= trace
.prev
;
7293 val_t
compiling_methods___AArrayExpr___compile_expr(val_t self
, val_t param0
) {
7294 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1127, LOCATE_compiling_methods___AArrayExpr___compile_expr
};
7299 static val_t once_value_variable3_308
; static int once_bool_variable3_308
;
7307 static val_t once_value_variable5_309
; static int once_bool_variable5_309
;
7308 trace
.prev
= tracehead
; tracehead
= &trace
;
7310 variable2
= ((typing___PExpr___stype_t
)CALL( self
,COLOR_syntax_base___PExpr___stype
))( self
) /*PExpr::stype*/;
7311 variable2
= ((static_type___MMType___local_class_t
)CALL(variable2
,COLOR_static_type___MMType___local_class
))(variable2
) /*MMType::local_class*/;
7312 if (once_bool_variable3_308
) variable3
= once_value_variable3_308
;
7314 variable3
= NEW_string___String___with_native(BOX_NativeString("with_capacity"), TAG_Int(13)); /*new String*/
7315 variable3
= ((symbol___String___to_symbol_t
)CALL(variable3
,COLOR_symbol___String___to_symbol
))(variable3
) /*String::to_symbol*/;
7316 once_value_variable3_308
= variable3
;
7317 once_bool_variable3_308
= true;
7319 variable2
= ((abstractmetamodel___MMLocalClass___select_method_t
)CALL(variable2
,COLOR_abstractmetamodel___MMLocalClass___select_method
))(variable2
, variable3
) /*MMLocalClass::select_method*/;
7320 variable1
= variable2
;
7321 variable3
= NEW_array___Array___with_capacity(TAG_Int(1)); /*new Array[E]*/
7322 variable4
= NEW_string___String___init(); /*new String*/
7323 variable5
= NEW_string___String___with_native(BOX_NativeString("TAG_Int("), TAG_Int(8)); /*new String*/
7324 variable6
= variable5
;
7325 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable6
) /*String::append*/;
7326 variable7
= ((parser_nodes___AArrayExpr___n_exprs_t
)CALL( self
,COLOR_parser_nodes___AArrayExpr___n_exprs
))( self
) /*AArrayExpr::n_exprs*/;
7327 variable7
= ((list___List___length_t
)CALL(variable7
,COLOR_abstract_collection___Collection___length
))(variable7
) /*List::length*/;
7328 variable8
= variable7
;
7329 variable8
= ((string___String___to_s_t
)CALL(variable8
,COLOR_string___Object___to_s
))(variable8
) /*String::to_s*/;
7330 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable8
) /*String::append*/;
7331 variable9
= NEW_string___String___with_native(BOX_NativeString(")"), TAG_Int(1)); /*new String*/
7332 variable10
= variable9
;
7333 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable10
) /*String::append*/;
7334 ((array___AbstractArray___add_t
)CALL(variable3
,COLOR_abstract_collection___SimpleCollection___add
))(variable3
, variable4
) /*AbstractArray::add*/;
7335 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*/;
7336 variable2
= variable3
;
7337 variable4
= ((typing___PExpr___stype_t
)CALL( self
,COLOR_syntax_base___PExpr___stype
))( self
) /*PExpr::stype*/;
7338 variable4
= ((static_type___MMType___local_class_t
)CALL(variable4
,COLOR_static_type___MMType___local_class
))(variable4
) /*MMType::local_class*/;
7339 if (once_bool_variable5_309
) variable5
= once_value_variable5_309
;
7341 variable5
= NEW_string___String___with_native(BOX_NativeString("add"), TAG_Int(3)); /*new String*/
7342 variable5
= ((symbol___String___to_symbol_t
)CALL(variable5
,COLOR_symbol___String___to_symbol
))(variable5
) /*String::to_symbol*/;
7343 once_value_variable5_309
= variable5
;
7344 once_bool_variable5_309
= true;
7346 variable4
= ((abstractmetamodel___MMLocalClass___select_method_t
)CALL(variable4
,COLOR_abstractmetamodel___MMLocalClass___select_method
))(variable4
, variable5
) /*MMLocalClass::select_method*/;
7347 variable3
= variable4
;
7348 variable4
= ((parser_nodes___AArrayExpr___n_exprs_t
)CALL( self
,COLOR_parser_nodes___AArrayExpr___n_exprs
))( self
) /*AArrayExpr::n_exprs*/;
7349 variable4
= ((list___List___iterator_t
)CALL(variable4
,COLOR_abstract_collection___Collection___iterator
))(variable4
) /*List::iterator*/;
7350 while (true) { /*for*/
7351 variable5
= ((list___ListIterator___is_ok_t
)CALL(variable4
,COLOR_abstract_collection___Iterator___is_ok
))(variable4
) /*ListIterator::is_ok*/;
7352 if (!UNTAG_Bool(variable5
)) break; /*for*/
7353 variable5
= ((list___ListIterator___item_t
)CALL(variable4
,COLOR_abstract_collection___Iterator___item
))(variable4
) /*ListIterator::item*/;
7354 variable7
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable5
/*ne*/) /*CompilerVisitor::compile_expr*/;
7355 variable6
= variable7
;
7356 variable7
= NEW_array___Array___with_capacity(TAG_Int(2)); /*new Array[E]*/
7357 ((array___AbstractArray___add_t
)CALL(variable7
,COLOR_abstract_collection___SimpleCollection___add
))(variable7
, variable2
/*recv*/) /*AbstractArray::add*/;
7358 ((array___AbstractArray___add_t
)CALL(variable7
,COLOR_abstract_collection___SimpleCollection___add
))(variable7
, variable6
/*e*/) /*AbstractArray::add*/;
7359 ((compiling_methods___MMMethod___compile_call_t
)CALL( variable3
/*prop2*/,COLOR_compiling_methods___MMMethod___compile_call
))( variable3
/*prop2*/, variable0
/*v*/, variable7
) /*MMMethod::compile_call*/;
7360 continue_310
: while(0);
7361 ((list___ListIterator___next_t
)CALL(variable4
,COLOR_abstract_collection___Iterator___next
))(variable4
) /*ListIterator::next*/;
7363 break_310
: while(0);
7364 variable1
= variable2
/*recv*/;
7365 goto return_label307
;
7366 return_label307
: while(false);
7367 tracehead
= trace
.prev
;
7370 val_t
compiling_methods___ARangeExpr___compile_expr(val_t self
, val_t param0
) {
7371 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1142, LOCATE_compiling_methods___ARangeExpr___compile_expr
};
7377 trace
.prev
= tracehead
; tracehead
= &trace
;
7379 variable2
= ((typing___PExpr___stype_t
)CALL( self
,COLOR_syntax_base___PExpr___stype
))( self
) /*PExpr::stype*/;
7380 variable2
= ((static_type___MMType___local_class_t
)CALL(variable2
,COLOR_static_type___MMType___local_class
))(variable2
) /*MMType::local_class*/;
7381 variable3
= ((compiling_methods___ARangeExpr___propname_t
)CALL( self
,COLOR_compiling_methods___ARangeExpr___propname
))( self
) /*ARangeExpr::propname*/;
7382 variable2
= ((abstractmetamodel___MMLocalClass___select_method_t
)CALL(variable2
,COLOR_abstractmetamodel___MMLocalClass___select_method
))(variable2
, variable3
) /*MMLocalClass::select_method*/;
7383 variable1
= variable2
;
7384 variable3
= ((parser_nodes___ARangeExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___ARangeExpr___n_expr
))( self
) /*ARangeExpr::n_expr*/;
7385 variable3
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::compile_expr*/;
7386 variable2
= variable3
;
7387 variable4
= ((parser_nodes___ARangeExpr___n_expr2_t
)CALL( self
,COLOR_parser_nodes___ARangeExpr___n_expr2
))( self
) /*ARangeExpr::n_expr2*/;
7388 variable4
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable4
) /*CompilerVisitor::compile_expr*/;
7389 variable3
= variable4
;
7390 variable4
= NEW_array___Array___with_capacity(TAG_Int(2)); /*new Array[E]*/
7391 ((array___AbstractArray___add_t
)CALL(variable4
,COLOR_abstract_collection___SimpleCollection___add
))(variable4
, variable2
/*e*/) /*AbstractArray::add*/;
7392 ((array___AbstractArray___add_t
)CALL(variable4
,COLOR_abstract_collection___SimpleCollection___add
))(variable4
, variable3
/*e2*/) /*AbstractArray::add*/;
7393 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*/;
7394 variable1
= variable4
;
7395 goto return_label311
;
7396 return_label311
: while(false);
7397 tracehead
= trace
.prev
;
7400 val_t
compiling_methods___ARangeExpr___propname(val_t self
) {
7401 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1149, LOCATE_compiling_methods___ARangeExpr___propname
};
7402 trace
.prev
= tracehead
; tracehead
= &trace
;
7403 fprintf(stderr
, "Deferred method %s called");
7404 fprintf(stderr
, " in %s (%s:%d)\n", LOCATE_compiling_methods___ARangeExpr___compile_expr
, LOCATE_compiling_methods
, 1149);
7406 tracehead
= trace
.prev
;
7409 val_t
compiling_methods___ACrangeExpr___propname(val_t self
) {
7410 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1154, LOCATE_compiling_methods___ACrangeExpr___propname
};
7412 static val_t once_value_variable0_313
; static int once_bool_variable0_313
;
7413 trace
.prev
= tracehead
; tracehead
= &trace
;
7414 if (once_bool_variable0_313
) variable0
= once_value_variable0_313
;
7416 variable0
= NEW_string___String___with_native(BOX_NativeString("init"), TAG_Int(4)); /*new String*/
7417 variable0
= ((symbol___String___to_symbol_t
)CALL(variable0
,COLOR_symbol___String___to_symbol
))(variable0
) /*String::to_symbol*/;
7418 once_value_variable0_313
= variable0
;
7419 once_bool_variable0_313
= true;
7421 goto return_label312
;
7422 return_label312
: while(false);
7423 tracehead
= trace
.prev
;
7426 val_t
compiling_methods___AOrangeExpr___propname(val_t self
) {
7427 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1157, LOCATE_compiling_methods___AOrangeExpr___propname
};
7429 static val_t once_value_variable0_315
; static int once_bool_variable0_315
;
7430 trace
.prev
= tracehead
; tracehead
= &trace
;
7431 if (once_bool_variable0_315
) variable0
= once_value_variable0_315
;
7433 variable0
= NEW_string___String___with_native(BOX_NativeString("without_last"), TAG_Int(12)); /*new String*/
7434 variable0
= ((symbol___String___to_symbol_t
)CALL(variable0
,COLOR_symbol___String___to_symbol
))(variable0
) /*String::to_symbol*/;
7435 once_value_variable0_315
= variable0
;
7436 once_bool_variable0_315
= true;
7438 goto return_label314
;
7439 return_label314
: while(false);
7440 tracehead
= trace
.prev
;
7443 void compiling_methods___ASuperExpr___compile_stmt(val_t self
, val_t param0
) {
7444 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1161, LOCATE_compiling_methods___ASuperExpr___compile_stmt
};
7453 trace
.prev
= tracehead
; tracehead
= &trace
;
7455 variable2
= ((compiling_methods___ASuperExpr___compile_expr_t
)CALL( self
,COLOR_compiling_methods___PExpr___compile_expr
))( self
, variable0
/*v*/) /*ASuperExpr::compile_expr*/;
7456 variable1
= variable2
;
7457 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::==*/)))))));
7458 if (UNTAG_Bool(variable2
)) { /*if*/
7459 variable2
= NEW_string___String___init(); /*new String*/
7460 variable3
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
7461 variable4
= variable3
;
7462 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable4
) /*String::append*/;
7463 variable5
= variable1
/*e*/;
7464 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable5
) /*String::append*/;
7465 variable6
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
7466 variable7
= variable6
;
7467 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable7
) /*String::append*/;
7468 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::add_instr*/;
7470 tracehead
= trace
.prev
;
7473 val_t
compiling_methods___ASuperExpr___compile_expr(val_t self
, val_t param0
) {
7474 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1167, LOCATE_compiling_methods___ASuperExpr___compile_expr
};
7485 trace
.prev
= tracehead
; tracehead
= &trace
;
7487 variable2
= ((compiling_methods___CompilerVisitor___method_params_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___method_params
))( variable0
/*v*/) /*CompilerVisitor::method_params*/;
7488 variable2
= ((array___AbstractArray___length_t
)CALL(variable2
,COLOR_abstract_collection___Collection___length
))(variable2
) /*AbstractArray::length*/;
7489 variable2
= TAG_Int(UNTAG_Int(variable2
)-UNTAG_Int( TAG_Int(1)));
7490 variable1
= variable2
;
7491 variable2
= ((typing___ASuperExpr___init_in_superclass_t
)CALL( self
,COLOR_typing___ASuperExpr___init_in_superclass
))( self
) /*ASuperExpr::init_in_superclass*/;
7492 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::==*/)))))));
7493 if (UNTAG_Bool(variable2
)) { /*if*/
7494 variable2
= ((typing___ASuperExpr___init_in_superclass_t
)CALL( self
,COLOR_typing___ASuperExpr___init_in_superclass
))( self
) /*ASuperExpr::init_in_superclass*/;
7495 variable2
= ((static_type___MMLocalProperty___signature_t
)CALL(variable2
,COLOR_static_type___MMLocalProperty___signature
))(variable2
) /*MMLocalProperty::signature*/;
7496 variable2
= ((static_type___MMSignature___arity_t
)CALL(variable2
,COLOR_static_type___MMSignature___arity
))(variable2
) /*MMSignature::arity*/;
7497 variable1
= variable2
/*arity=*/;
7499 variable3
= TAG_Int(UNTAG_Int( variable1
/*arity*/)+UNTAG_Int( TAG_Int(1)));
7500 variable4
= NEW_array___Array___with_capacity(variable3
); /*new Array[E]*/
7501 variable3
= variable4
;
7502 variable2
= variable3
;
7503 variable3
= ((compiling_methods___CompilerVisitor___method_params_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___method_params
))( variable0
/*v*/) /*CompilerVisitor::method_params*/;
7504 variable4
= TAG_Int(0);
7505 variable5
= TAG_Bool(UNTAG_Int( variable4
/*index*/)>=UNTAG_Int( TAG_Int(0)));
7506 variable6
= variable5
;
7507 if (UNTAG_Bool(variable6
)) { /* and */
7508 variable6
= variable3
;
7509 variable6
= ATTR_array___AbstractArray____length(variable6
) /*AbstractArray::_length*/;
7510 variable6
= TAG_Bool(UNTAG_Int( variable4
/*index*/)<UNTAG_Int(variable6
));
7512 variable5
= variable6
;
7513 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);}
7514 variable5
= variable3
;
7515 variable5
= ATTR_array___Array____items(variable5
) /*Array::_items*/;
7516 variable5
= UNBOX_NativeArray(variable5
)[UNTAG_Int( variable4
/*index*/)];
7517 goto return_label318
;
7518 return_label318
: while(false);
7519 variable3
= variable5
;
7520 ((array___AbstractArray___add_t
)CALL( variable2
/*args*/,COLOR_abstract_collection___SimpleCollection___add
))( variable2
/*args*/, variable3
) /*AbstractArray::add*/;
7521 variable3
= ((parser_nodes___ASuperExpr___n_args_t
)CALL( self
,COLOR_parser_nodes___ASuperExpr___n_args
))( self
) /*ASuperExpr::n_args*/;
7522 variable3
= ((list___List___length_t
)CALL(variable3
,COLOR_abstract_collection___Collection___length
))(variable3
) /*List::length*/;
7523 variable3
= TAG_Bool((variable3
)!=( variable1
/*arity*/));
7524 if (UNTAG_Bool(variable3
)) { /*if*/
7525 variable3
= NEW_range___Range___without_last( TAG_Int(0), variable1
/*arity*/); /*new Range[E]*/
7526 variable3
= ((range___Range___iterator_t
)CALL(variable3
,COLOR_abstract_collection___Collection___iterator
))(variable3
) /*Range::iterator*/;
7527 while (true) { /*for*/
7528 variable4
= ((abstract_collection___Iterator___is_ok_t
)CALL(variable3
,COLOR_abstract_collection___Iterator___is_ok
))(variable3
) /*Iterator::is_ok*/;
7529 if (!UNTAG_Bool(variable4
)) break; /*for*/
7530 variable4
= ((abstract_collection___Iterator___item_t
)CALL(variable3
,COLOR_abstract_collection___Iterator___item
))(variable3
) /*Iterator::item*/;
7531 variable5
= ((compiling_methods___CompilerVisitor___method_params_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___method_params
))( variable0
/*v*/) /*CompilerVisitor::method_params*/;
7532 variable6
= TAG_Int(UNTAG_Int( variable4
/*i*/)+UNTAG_Int( TAG_Int(1)));
7533 variable7
= variable6
;
7534 variable8
= TAG_Bool(UNTAG_Int( variable7
/*index*/)>=UNTAG_Int( TAG_Int(0)));
7535 variable9
= variable8
;
7536 if (UNTAG_Bool(variable9
)) { /* and */
7537 variable9
= variable5
;
7538 variable9
= ATTR_array___AbstractArray____length(variable9
) /*AbstractArray::_length*/;
7539 variable9
= TAG_Bool(UNTAG_Int( variable7
/*index*/)<UNTAG_Int(variable9
));
7541 variable8
= variable9
;
7542 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);}
7543 variable8
= variable5
;
7544 variable8
= ATTR_array___Array____items(variable8
) /*Array::_items*/;
7545 variable8
= UNBOX_NativeArray(variable8
)[UNTAG_Int( variable7
/*index*/)];
7546 goto return_label320
;
7547 return_label320
: while(false);
7548 variable5
= variable8
;
7549 ((array___AbstractArray___add_t
)CALL( variable2
/*args*/,COLOR_abstract_collection___SimpleCollection___add
))( variable2
/*args*/, variable5
) /*AbstractArray::add*/;
7550 continue_319
: while(0);
7551 ((abstract_collection___Iterator___next_t
)CALL(variable3
,COLOR_abstract_collection___Iterator___next
))(variable3
) /*Iterator::next*/;
7553 break_319
: while(0);
7555 variable3
= ((parser_nodes___ASuperExpr___n_args_t
)CALL( self
,COLOR_parser_nodes___ASuperExpr___n_args
))( self
) /*ASuperExpr::n_args*/;
7556 variable3
= ((list___List___iterator_t
)CALL(variable3
,COLOR_abstract_collection___Collection___iterator
))(variable3
) /*List::iterator*/;
7557 while (true) { /*for*/
7558 variable4
= ((list___ListIterator___is_ok_t
)CALL(variable3
,COLOR_abstract_collection___Iterator___is_ok
))(variable3
) /*ListIterator::is_ok*/;
7559 if (!UNTAG_Bool(variable4
)) break; /*for*/
7560 variable4
= ((list___ListIterator___item_t
)CALL(variable3
,COLOR_abstract_collection___Iterator___item
))(variable3
) /*ListIterator::item*/;
7561 variable5
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable4
/*na*/) /*CompilerVisitor::compile_expr*/;
7562 ((array___AbstractArray___add_t
)CALL( variable2
/*args*/,COLOR_abstract_collection___SimpleCollection___add
))( variable2
/*args*/, variable5
) /*AbstractArray::add*/;
7563 continue_321
: while(0);
7564 ((list___ListIterator___next_t
)CALL(variable3
,COLOR_abstract_collection___Iterator___next
))(variable3
) /*ListIterator::next*/;
7566 break_321
: while(0);
7568 variable3
= ((typing___ASuperExpr___init_in_superclass_t
)CALL( self
,COLOR_typing___ASuperExpr___init_in_superclass
))( self
) /*ASuperExpr::init_in_superclass*/;
7569 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::==*/)))))));
7570 if (UNTAG_Bool(variable3
)) { /*if*/
7571 variable3
= ((typing___ASuperExpr___init_in_superclass_t
)CALL( self
,COLOR_typing___ASuperExpr___init_in_superclass
))( self
) /*ASuperExpr::init_in_superclass*/;
7572 variable3
= ((compiling_methods___MMMethod___compile_call_t
)CALL(variable3
,COLOR_compiling_methods___MMMethod___compile_call
))(variable3
, variable0
/*v*/, variable2
/*args*/) /*MMMethod::compile_call*/;
7573 variable1
= variable3
;
7574 goto return_label317
;
7576 variable3
= ((typing___AAbsSendExpr___prop_t
)CALL( self
,COLOR_typing___AAbsSendExpr___prop
))( self
) /*AAbsSendExpr::prop*/;
7577 variable3
= ((abstractmetamodel___MMLocalProperty___global_t
)CALL(variable3
,COLOR_abstractmetamodel___MMLocalProperty___global
))(variable3
) /*MMLocalProperty::global*/;
7578 variable3
= ((abstractmetamodel___MMGlobalProperty___is_init_t
)CALL(variable3
,COLOR_abstractmetamodel___MMGlobalProperty___is_init
))(variable3
) /*MMGlobalProperty::is_init*/;
7579 if (UNTAG_Bool(variable3
)) { /*if*/
7580 variable3
= NEW_string___String___with_native(BOX_NativeString("init_table"), TAG_Int(10)); /*new String*/
7581 ((array___AbstractArray___add_t
)CALL( variable2
/*args*/,COLOR_abstract_collection___SimpleCollection___add
))( variable2
/*args*/, variable3
) /*AbstractArray::add*/;
7583 variable3
= ((typing___AAbsSendExpr___prop_t
)CALL( self
,COLOR_typing___AAbsSendExpr___prop
))( self
) /*AAbsSendExpr::prop*/;
7584 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*/;
7585 variable1
= variable3
;
7586 goto return_label317
;
7588 return_label317
: while(false);
7589 tracehead
= trace
.prev
;
7592 val_t
compiling_methods___AAttrExpr___compile_expr(val_t self
, val_t param0
) {
7593 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1195, LOCATE_compiling_methods___AAttrExpr___compile_expr
};
7597 trace
.prev
= tracehead
; tracehead
= &trace
;
7599 variable2
= ((parser_nodes___AAttrFormExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AAttrFormExpr___n_expr
))( self
) /*AAttrFormExpr::n_expr*/;
7600 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
7601 variable1
= variable2
;
7602 variable2
= ((typing___AAttrFormExpr___prop_t
)CALL( self
,COLOR_typing___AAttrFormExpr___prop
))( self
) /*AAttrFormExpr::prop*/;
7603 variable2
= ((compiling_methods___MMAttribute___compile_access_t
)CALL(variable2
,COLOR_compiling_methods___MMAttribute___compile_access
))(variable2
, variable0
/*v*/, variable1
/*e*/) /*MMAttribute::compile_access*/;
7604 variable1
= variable2
;
7605 goto return_label322
;
7606 return_label322
: while(false);
7607 tracehead
= trace
.prev
;
7610 void compiling_methods___AAttrAssignExpr___compile_stmt(val_t self
, val_t param0
) {
7611 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1203, LOCATE_compiling_methods___AAttrAssignExpr___compile_stmt
};
7616 trace
.prev
= tracehead
; tracehead
= &trace
;
7618 variable2
= ((parser_nodes___AAttrFormExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AAttrFormExpr___n_expr
))( self
) /*AAttrFormExpr::n_expr*/;
7619 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
7620 variable1
= variable2
;
7621 variable3
= ((parser_nodes___AAssignFormExpr___n_value_t
)CALL( self
,COLOR_parser_nodes___AAssignFormExpr___n_value
))( self
) /*AAssignFormExpr::n_value*/;
7622 variable3
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::compile_expr*/;
7623 variable2
= variable3
;
7624 variable3
= ((typing___AAttrFormExpr___prop_t
)CALL( self
,COLOR_typing___AAttrFormExpr___prop
))( self
) /*AAttrFormExpr::prop*/;
7625 variable3
= ((compiling_methods___MMAttribute___compile_access_t
)CALL(variable3
,COLOR_compiling_methods___MMAttribute___compile_access
))(variable3
, variable0
/*v*/, variable1
/*e*/) /*MMAttribute::compile_access*/;
7626 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable3
, variable2
/*e2*/) /*CompilerVisitor::add_assignment*/;
7627 tracehead
= trace
.prev
;
7630 void compiling_methods___AAttrReassignExpr___compile_stmt(val_t self
, val_t param0
) {
7631 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1211, LOCATE_compiling_methods___AAttrReassignExpr___compile_stmt
};
7639 trace
.prev
= tracehead
; tracehead
= &trace
;
7641 variable2
= ((parser_nodes___AAttrFormExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AAttrFormExpr___n_expr
))( self
) /*AAttrFormExpr::n_expr*/;
7642 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
7643 variable1
= variable2
;
7644 variable3
= ((typing___AAttrFormExpr___prop_t
)CALL( self
,COLOR_typing___AAttrFormExpr___prop
))( self
) /*AAttrFormExpr::prop*/;
7645 variable3
= ((compiling_methods___MMAttribute___compile_access_t
)CALL(variable3
,COLOR_compiling_methods___MMAttribute___compile_access
))(variable3
, variable0
/*v*/, variable1
/*e1*/) /*MMAttribute::compile_access*/;
7646 variable2
= variable3
;
7647 variable4
= ((parser_nodes___AReassignFormExpr___n_value_t
)CALL( self
,COLOR_parser_nodes___AReassignFormExpr___n_value
))( self
) /*AReassignFormExpr::n_value*/;
7648 variable4
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable4
) /*CompilerVisitor::compile_expr*/;
7649 variable3
= variable4
;
7650 variable5
= ((typing___AReassignFormExpr___assign_method_t
)CALL( self
,COLOR_typing___AReassignFormExpr___assign_method
))( self
) /*AReassignFormExpr::assign_method*/;
7651 variable6
= NEW_array___Array___with_capacity(TAG_Int(2)); /*new Array[E]*/
7652 ((array___AbstractArray___add_t
)CALL(variable6
,COLOR_abstract_collection___SimpleCollection___add
))(variable6
, variable2
/*e2*/) /*AbstractArray::add*/;
7653 ((array___AbstractArray___add_t
)CALL(variable6
,COLOR_abstract_collection___SimpleCollection___add
))(variable6
, variable3
/*e3*/) /*AbstractArray::add*/;
7654 variable5
= ((compiling_methods___MMMethod___compile_call_t
)CALL(variable5
,COLOR_compiling_methods___MMMethod___compile_call
))(variable5
, variable0
/*v*/, variable6
) /*MMMethod::compile_call*/;
7655 variable4
= variable5
;
7656 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable2
/*e2*/, variable4
/*e4*/) /*CompilerVisitor::add_assignment*/;
7657 tracehead
= trace
.prev
;
7660 val_t
compiling_methods___ASendExpr___compile_expr(val_t self
, val_t param0
) {
7661 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1222, LOCATE_compiling_methods___ASendExpr___compile_expr
};
7668 trace
.prev
= tracehead
; tracehead
= &trace
;
7670 variable2
= ((parser_nodes___ASendExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___ASendExpr___n_expr
))( self
) /*ASendExpr::n_expr*/;
7671 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
7672 variable1
= variable2
;
7673 variable3
= NEW_array___Array___init(); /*new Array[E]*/
7674 variable2
= variable3
;
7675 ((array___AbstractArray___add_t
)CALL( variable2
/*cargs*/,COLOR_abstract_collection___SimpleCollection___add
))( variable2
/*cargs*/, variable1
/*recv*/) /*AbstractArray::add*/;
7676 variable3
= ((typing___AAbsSendExpr___arguments_t
)CALL( self
,COLOR_typing___AAbsSendExpr___arguments
))( self
) /*AAbsSendExpr::arguments*/;
7677 variable3
= ((array___AbstractArray___iterator_t
)CALL(variable3
,COLOR_abstract_collection___Collection___iterator
))(variable3
) /*AbstractArray::iterator*/;
7678 while (true) { /*for*/
7679 variable4
= ((array___ArrayIterator___is_ok_t
)CALL(variable3
,COLOR_abstract_collection___Iterator___is_ok
))(variable3
) /*ArrayIterator::is_ok*/;
7680 if (!UNTAG_Bool(variable4
)) break; /*for*/
7681 variable4
= ((array___ArrayIterator___item_t
)CALL(variable3
,COLOR_abstract_collection___Iterator___item
))(variable3
) /*ArrayIterator::item*/;
7682 variable5
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable4
/*a*/) /*CompilerVisitor::compile_expr*/;
7683 ((array___AbstractArray___add_t
)CALL( variable2
/*cargs*/,COLOR_abstract_collection___SimpleCollection___add
))( variable2
/*cargs*/, variable5
) /*AbstractArray::add*/;
7684 continue_326
: while(0);
7685 ((array___ArrayIterator___next_t
)CALL(variable3
,COLOR_abstract_collection___Iterator___next
))(variable3
) /*ArrayIterator::next*/;
7687 break_326
: while(0);
7688 variable4
= ((typing___AAbsSendExpr___prop_t
)CALL( self
,COLOR_typing___AAbsSendExpr___prop
))( self
) /*AAbsSendExpr::prop*/;
7689 variable4
= ((compiling_methods___MMMethod___compile_call_t
)CALL(variable4
,COLOR_compiling_methods___MMMethod___compile_call
))(variable4
, variable0
/*v*/, variable2
/*cargs*/) /*MMMethod::compile_call*/;
7690 variable3
= variable4
;
7691 variable4
= ((typing___AAbsSendExpr___prop_t
)CALL( self
,COLOR_typing___AAbsSendExpr___prop
))( self
) /*AAbsSendExpr::prop*/;
7692 variable4
= ((abstractmetamodel___MMLocalProperty___global_t
)CALL(variable4
,COLOR_abstractmetamodel___MMLocalProperty___global
))(variable4
) /*MMLocalProperty::global*/;
7693 variable4
= ((abstractmetamodel___MMGlobalProperty___is_init_t
)CALL(variable4
,COLOR_abstractmetamodel___MMGlobalProperty___is_init
))(variable4
) /*MMGlobalProperty::is_init*/;
7694 if (UNTAG_Bool(variable4
)) { /*if*/
7695 variable4
= ((typing___AAbsSendExpr___prop_t
)CALL( self
,COLOR_typing___AAbsSendExpr___prop
))( self
) /*AAbsSendExpr::prop*/;
7696 ((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*/;
7698 variable1
= variable3
/*e*/;
7699 goto return_label325
;
7700 return_label325
: while(false);
7701 tracehead
= trace
.prev
;
7704 void compiling_methods___ASendExpr___compile_stmt(val_t self
, val_t param0
) {
7705 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1238, LOCATE_compiling_methods___ASendExpr___compile_stmt
};
7709 trace
.prev
= tracehead
; tracehead
= &trace
;
7711 variable2
= ((compiling_methods___ASendExpr___compile_expr_t
)CALL( self
,COLOR_compiling_methods___PExpr___compile_expr
))( self
, variable0
/*v*/) /*ASendExpr::compile_expr*/;
7712 variable1
= variable2
;
7713 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::==*/)))))));
7714 if (UNTAG_Bool(variable2
)) { /*if*/
7715 variable2
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
7716 variable2
= ((string___String_____plus_t
)CALL( variable1
/*e*/,COLOR_string___String_____plus
))( variable1
/*e*/, variable2
) /*String::+*/;
7717 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::add_instr*/;
7719 tracehead
= trace
.prev
;
7722 val_t
compiling_methods___ASendReassignExpr___compile_expr(val_t self
, val_t param0
) {
7723 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1248, LOCATE_compiling_methods___ASendReassignExpr___compile_expr
};
7732 trace
.prev
= tracehead
; tracehead
= &trace
;
7734 variable2
= ((parser_nodes___ASendExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___ASendExpr___n_expr
))( self
) /*ASendExpr::n_expr*/;
7735 variable2
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable2
) /*CompilerVisitor::compile_expr*/;
7736 variable1
= variable2
;
7737 variable3
= NEW_array___Array___init(); /*new Array[E]*/
7738 variable2
= variable3
;
7739 ((array___AbstractArray___add_t
)CALL( variable2
/*cargs*/,COLOR_abstract_collection___SimpleCollection___add
))( variable2
/*cargs*/, variable1
/*recv*/) /*AbstractArray::add*/;
7740 variable3
= ((typing___AAbsSendExpr___arguments_t
)CALL( self
,COLOR_typing___AAbsSendExpr___arguments
))( self
) /*AAbsSendExpr::arguments*/;
7741 variable3
= ((array___AbstractArray___iterator_t
)CALL(variable3
,COLOR_abstract_collection___Collection___iterator
))(variable3
) /*AbstractArray::iterator*/;
7742 while (true) { /*for*/
7743 variable4
= ((array___ArrayIterator___is_ok_t
)CALL(variable3
,COLOR_abstract_collection___Iterator___is_ok
))(variable3
) /*ArrayIterator::is_ok*/;
7744 if (!UNTAG_Bool(variable4
)) break; /*for*/
7745 variable4
= ((array___ArrayIterator___item_t
)CALL(variable3
,COLOR_abstract_collection___Iterator___item
))(variable3
) /*ArrayIterator::item*/;
7746 variable5
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable4
/*a*/) /*CompilerVisitor::compile_expr*/;
7747 ((array___AbstractArray___add_t
)CALL( variable2
/*cargs*/,COLOR_abstract_collection___SimpleCollection___add
))( variable2
/*cargs*/, variable5
) /*AbstractArray::add*/;
7748 continue_329
: while(0);
7749 ((array___ArrayIterator___next_t
)CALL(variable3
,COLOR_abstract_collection___Iterator___next
))(variable3
) /*ArrayIterator::next*/;
7751 break_329
: while(0);
7752 variable4
= ((typing___ASendReassignExpr___read_prop_t
)CALL( self
,COLOR_typing___ASendReassignExpr___read_prop
))( self
) /*ASendReassignExpr::read_prop*/;
7753 variable4
= ((compiling_methods___MMMethod___compile_call_t
)CALL(variable4
,COLOR_compiling_methods___MMMethod___compile_call
))(variable4
, variable0
/*v*/, variable2
/*cargs*/) /*MMMethod::compile_call*/;
7754 variable3
= variable4
;
7755 variable5
= ((parser_nodes___AReassignFormExpr___n_value_t
)CALL( self
,COLOR_parser_nodes___AReassignFormExpr___n_value
))( self
) /*AReassignFormExpr::n_value*/;
7756 variable5
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable5
) /*CompilerVisitor::compile_expr*/;
7757 variable4
= variable5
;
7758 variable6
= ((typing___AReassignFormExpr___assign_method_t
)CALL( self
,COLOR_typing___AReassignFormExpr___assign_method
))( self
) /*AReassignFormExpr::assign_method*/;
7759 variable7
= NEW_array___Array___with_capacity(TAG_Int(2)); /*new Array[E]*/
7760 ((array___AbstractArray___add_t
)CALL(variable7
,COLOR_abstract_collection___SimpleCollection___add
))(variable7
, variable3
/*e2*/) /*AbstractArray::add*/;
7761 ((array___AbstractArray___add_t
)CALL(variable7
,COLOR_abstract_collection___SimpleCollection___add
))(variable7
, variable4
/*e3*/) /*AbstractArray::add*/;
7762 variable6
= ((compiling_methods___MMMethod___compile_call_t
)CALL(variable6
,COLOR_compiling_methods___MMMethod___compile_call
))(variable6
, variable0
/*v*/, variable7
) /*MMMethod::compile_call*/;
7763 variable5
= variable6
;
7764 ((array___AbstractArray___add_t
)CALL( variable2
/*cargs*/,COLOR_abstract_collection___SimpleCollection___add
))( variable2
/*cargs*/, variable5
/*e4*/) /*AbstractArray::add*/;
7765 variable6
= ((typing___AAbsSendExpr___prop_t
)CALL( self
,COLOR_typing___AAbsSendExpr___prop
))( self
) /*AAbsSendExpr::prop*/;
7766 variable6
= ((compiling_methods___MMMethod___compile_call_t
)CALL(variable6
,COLOR_compiling_methods___MMMethod___compile_call
))(variable6
, variable0
/*v*/, variable2
/*cargs*/) /*MMMethod::compile_call*/;
7767 variable1
= variable6
;
7768 goto return_label328
;
7769 return_label328
: while(false);
7770 tracehead
= trace
.prev
;
7773 val_t
compiling_methods___ANewExpr___compile_expr(val_t self
, val_t param0
) {
7774 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1266, LOCATE_compiling_methods___ANewExpr___compile_expr
};
7780 trace
.prev
= tracehead
; tracehead
= &trace
;
7782 variable2
= NEW_array___Array___init(); /*new Array[E]*/
7783 variable1
= variable2
;
7784 variable2
= ((typing___AAbsSendExpr___arguments_t
)CALL( self
,COLOR_typing___AAbsSendExpr___arguments
))( self
) /*AAbsSendExpr::arguments*/;
7785 variable2
= ((array___AbstractArray___iterator_t
)CALL(variable2
,COLOR_abstract_collection___Collection___iterator
))(variable2
) /*AbstractArray::iterator*/;
7786 while (true) { /*for*/
7787 variable3
= ((array___ArrayIterator___is_ok_t
)CALL(variable2
,COLOR_abstract_collection___Iterator___is_ok
))(variable2
) /*ArrayIterator::is_ok*/;
7788 if (!UNTAG_Bool(variable3
)) break; /*for*/
7789 variable3
= ((array___ArrayIterator___item_t
)CALL(variable2
,COLOR_abstract_collection___Iterator___item
))(variable2
) /*ArrayIterator::item*/;
7790 variable4
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable3
/*a*/) /*CompilerVisitor::compile_expr*/;
7791 ((array___AbstractArray___add_t
)CALL( variable1
/*cargs*/,COLOR_abstract_collection___SimpleCollection___add
))( variable1
/*cargs*/, variable4
) /*AbstractArray::add*/;
7792 continue_331
: while(0);
7793 ((array___ArrayIterator___next_t
)CALL(variable2
,COLOR_abstract_collection___Iterator___next
))(variable2
) /*ArrayIterator::next*/;
7795 break_331
: while(0);
7796 variable2
= ((typing___AAbsSendExpr___prop_t
)CALL( self
,COLOR_typing___AAbsSendExpr___prop
))( self
) /*AAbsSendExpr::prop*/;
7797 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*/;
7798 variable1
= variable2
;
7799 goto return_label330
;
7800 return_label330
: while(false);
7801 tracehead
= trace
.prev
;
7804 val_t
compiling_methods___AProxyExpr___compile_expr(val_t self
, val_t param0
) {
7805 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1277, LOCATE_compiling_methods___AProxyExpr___compile_expr
};
7808 trace
.prev
= tracehead
; tracehead
= &trace
;
7810 variable1
= ((parser_nodes___AProxyExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AProxyExpr___n_expr
))( self
) /*AProxyExpr::n_expr*/;
7811 variable1
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable1
) /*CompilerVisitor::compile_expr*/;
7812 goto return_label332
;
7813 return_label332
: while(false);
7814 tracehead
= trace
.prev
;
7817 val_t
compiling_methods___AOnceExpr___compile_expr(val_t self
, val_t param0
) {
7818 struct trace_t trace
= {NULL
, LOCATE_compiling_methods
, 1284, LOCATE_compiling_methods___AOnceExpr___compile_expr
};
7840 trace
.prev
= tracehead
; tracehead
= &trace
;
7842 variable2
= ((compiling_base___CompilerVisitor___new_number_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___new_number
))( variable0
/*v*/) /*CompilerVisitor::new_number*/;
7843 variable1
= variable2
;
7844 variable3
= ((compiling_methods___CompilerVisitor___get_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___get_var
))( variable0
/*v*/) /*CompilerVisitor::get_var*/;
7845 variable2
= variable3
;
7846 variable3
= NEW_string___String___init(); /*new String*/
7847 variable4
= NEW_string___String___with_native(BOX_NativeString("static val_t once_value_"), TAG_Int(24)); /*new String*/
7848 variable5
= variable4
;
7849 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable5
) /*String::append*/;
7850 variable6
= variable2
/*cvar*/;
7851 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable6
) /*String::append*/;
7852 variable7
= NEW_string___String___with_native(BOX_NativeString("_"), TAG_Int(1)); /*new String*/
7853 variable8
= variable7
;
7854 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable8
) /*String::append*/;
7855 variable9
= variable1
/*i*/;
7856 variable9
= ((string___String___to_s_t
)CALL(variable9
,COLOR_string___Object___to_s
))(variable9
) /*String::to_s*/;
7857 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable9
) /*String::append*/;
7858 variable10
= NEW_string___String___with_native(BOX_NativeString("; static int once_bool_"), TAG_Int(23)); /*new String*/
7859 variable11
= variable10
;
7860 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable11
) /*String::append*/;
7861 variable12
= variable2
/*cvar*/;
7862 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable12
) /*String::append*/;
7863 variable13
= NEW_string___String___with_native(BOX_NativeString("_"), TAG_Int(1)); /*new String*/
7864 variable14
= variable13
;
7865 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable14
) /*String::append*/;
7866 variable15
= variable1
/*i*/;
7867 variable15
= ((string___String___to_s_t
)CALL(variable15
,COLOR_string___Object___to_s
))(variable15
) /*String::to_s*/;
7868 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable15
) /*String::append*/;
7869 variable16
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
7870 variable17
= variable16
;
7871 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable17
) /*String::append*/;
7872 ((compiling_base___CompilerVisitor___add_decl_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_decl
))( variable0
/*v*/, variable3
) /*CompilerVisitor::add_decl*/;
7873 variable3
= NEW_string___String___init(); /*new String*/
7874 variable4
= NEW_string___String___with_native(BOX_NativeString("if (once_bool_"), TAG_Int(14)); /*new String*/
7875 variable5
= variable4
;
7876 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable5
) /*String::append*/;
7877 variable6
= variable2
/*cvar*/;
7878 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable6
) /*String::append*/;
7879 variable7
= NEW_string___String___with_native(BOX_NativeString("_"), TAG_Int(1)); /*new String*/
7880 variable8
= variable7
;
7881 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable8
) /*String::append*/;
7882 variable9
= variable1
/*i*/;
7883 variable9
= ((string___String___to_s_t
)CALL(variable9
,COLOR_string___Object___to_s
))(variable9
) /*String::to_s*/;
7884 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable9
) /*String::append*/;
7885 variable10
= NEW_string___String___with_native(BOX_NativeString(") "), TAG_Int(2)); /*new String*/
7886 variable11
= variable10
;
7887 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable11
) /*String::append*/;
7888 variable12
= variable2
/*cvar*/;
7889 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable12
) /*String::append*/;
7890 variable13
= NEW_string___String___with_native(BOX_NativeString(" = once_value_"), TAG_Int(14)); /*new String*/
7891 variable14
= variable13
;
7892 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable14
) /*String::append*/;
7893 variable15
= variable2
/*cvar*/;
7894 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable15
) /*String::append*/;
7895 variable16
= NEW_string___String___with_native(BOX_NativeString("_"), TAG_Int(1)); /*new String*/
7896 variable17
= variable16
;
7897 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable17
) /*String::append*/;
7898 variable18
= variable1
/*i*/;
7899 variable18
= ((string___String___to_s_t
)CALL(variable18
,COLOR_string___Object___to_s
))(variable18
) /*String::to_s*/;
7900 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable18
) /*String::append*/;
7901 variable19
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
7902 variable20
= variable19
;
7903 ((string___String___append_t
)CALL(variable3
,COLOR_abstract_collection___IndexedCollection___append
))(variable3
, variable20
) /*String::append*/;
7904 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::add_instr*/;
7905 variable3
= NEW_string___String___with_native(BOX_NativeString("else {"), TAG_Int(6)); /*new String*/
7906 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable3
) /*CompilerVisitor::add_instr*/;
7907 ((compiling_base___CompilerVisitor___indent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___indent
))( variable0
/*v*/) /*CompilerVisitor::indent*/;
7908 ((compiling_methods___CompilerVisitor___free_var_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___free_var
))( variable0
/*v*/, variable2
/*cvar*/) /*CompilerVisitor::free_var*/;
7909 variable4
= ((parser_nodes___AProxyExpr___n_expr_t
)CALL( self
,COLOR_parser_nodes___AProxyExpr___n_expr
))( self
) /*AProxyExpr::n_expr*/;
7910 variable4
= ((compiling_methods___CompilerVisitor___compile_expr_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___compile_expr
))( variable0
/*v*/, variable4
) /*CompilerVisitor::compile_expr*/;
7911 variable3
= variable4
;
7912 ((compiling_methods___CompilerVisitor___add_assignment_t
)CALL( variable0
/*v*/,COLOR_compiling_methods___CompilerVisitor___add_assignment
))( variable0
/*v*/, variable2
/*cvar*/, variable3
/*e*/) /*CompilerVisitor::add_assignment*/;
7913 variable4
= NEW_string___String___init(); /*new String*/
7914 variable5
= NEW_string___String___with_native(BOX_NativeString("once_value_"), TAG_Int(11)); /*new String*/
7915 variable6
= variable5
;
7916 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable6
) /*String::append*/;
7917 variable7
= variable2
/*cvar*/;
7918 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable7
) /*String::append*/;
7919 variable8
= NEW_string___String___with_native(BOX_NativeString("_"), TAG_Int(1)); /*new String*/
7920 variable9
= variable8
;
7921 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable9
) /*String::append*/;
7922 variable10
= variable1
/*i*/;
7923 variable10
= ((string___String___to_s_t
)CALL(variable10
,COLOR_string___Object___to_s
))(variable10
) /*String::to_s*/;
7924 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable10
) /*String::append*/;
7925 variable11
= NEW_string___String___with_native(BOX_NativeString(" = "), TAG_Int(3)); /*new String*/
7926 variable12
= variable11
;
7927 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable12
) /*String::append*/;
7928 variable13
= variable2
/*cvar*/;
7929 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable13
) /*String::append*/;
7930 variable14
= NEW_string___String___with_native(BOX_NativeString(";"), TAG_Int(1)); /*new String*/
7931 variable15
= variable14
;
7932 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable15
) /*String::append*/;
7933 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable4
) /*CompilerVisitor::add_instr*/;
7934 variable4
= NEW_string___String___init(); /*new String*/
7935 variable5
= NEW_string___String___with_native(BOX_NativeString("once_bool_"), TAG_Int(10)); /*new String*/
7936 variable6
= variable5
;
7937 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable6
) /*String::append*/;
7938 variable7
= variable2
/*cvar*/;
7939 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable7
) /*String::append*/;
7940 variable8
= NEW_string___String___with_native(BOX_NativeString("_"), TAG_Int(1)); /*new String*/
7941 variable9
= variable8
;
7942 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable9
) /*String::append*/;
7943 variable10
= variable1
/*i*/;
7944 variable10
= ((string___String___to_s_t
)CALL(variable10
,COLOR_string___Object___to_s
))(variable10
) /*String::to_s*/;
7945 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable10
) /*String::append*/;
7946 variable11
= NEW_string___String___with_native(BOX_NativeString(" = true;"), TAG_Int(8)); /*new String*/
7947 variable12
= variable11
;
7948 ((string___String___append_t
)CALL(variable4
,COLOR_abstract_collection___IndexedCollection___append
))(variable4
, variable12
) /*String::append*/;
7949 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable4
) /*CompilerVisitor::add_instr*/;
7950 ((compiling_base___CompilerVisitor___unindent_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___unindent
))( variable0
/*v*/) /*CompilerVisitor::unindent*/;
7951 variable4
= NEW_string___String___with_native(BOX_NativeString("}"), TAG_Int(1)); /*new String*/
7952 ((compiling_base___CompilerVisitor___add_instr_t
)CALL( variable0
/*v*/,COLOR_compiling_base___CompilerVisitor___add_instr
))( variable0
/*v*/, variable4
) /*CompilerVisitor::add_instr*/;
7953 variable1
= variable2
/*cvar*/;
7954 goto return_label333
;
7955 return_label333
: while(false);
7956 tracehead
= trace
.prev
;