1 #include "compiling_base._sep.h"
2 val_t
compiling_base___ToolContext___global(val_t self
) {
3 struct trace_t trace
= {NULL
, "compiling_base::ToolContext::global (src/compiling//compiling_base.nit:24,2--37)"};
4 trace
.prev
= tracehead
; tracehead
= &trace
;
5 tracehead
= trace
.prev
;
6 return ATTR_compiling_base___ToolContext____global( self
) /*ToolContext::_global*/;
8 void compiling_base___ToolContext___global__eq(val_t self
, val_t param0
) {
9 struct trace_t trace
= {NULL
, "compiling_base::ToolContext::global= (src/compiling//compiling_base.nit:24,2--37)"};
10 trace
.prev
= tracehead
; tracehead
= &trace
;
11 ATTR_compiling_base___ToolContext____global( self
) /*ToolContext::_global*/ = param0
;
12 tracehead
= trace
.prev
;
15 val_t
compiling_base___ToolContext___attr_sim(val_t self
) {
16 struct trace_t trace
= {NULL
, "compiling_base::ToolContext::attr_sim (src/compiling//compiling_base.nit:25,2--39)"};
17 trace
.prev
= tracehead
; tracehead
= &trace
;
18 tracehead
= trace
.prev
;
19 return ATTR_compiling_base___ToolContext____attr_sim( self
) /*ToolContext::_attr_sim*/;
21 void compiling_base___ToolContext___attr_sim__eq(val_t self
, val_t param0
) {
22 struct trace_t trace
= {NULL
, "compiling_base::ToolContext::attr_sim= (src/compiling//compiling_base.nit:25,2--39)"};
23 trace
.prev
= tracehead
; tracehead
= &trace
;
24 ATTR_compiling_base___ToolContext____attr_sim( self
) /*ToolContext::_attr_sim*/ = param0
;
25 tracehead
= trace
.prev
;
28 val_t
compiling_base___ToolContext___base_dir(val_t self
) {
29 struct trace_t trace
= {NULL
, "compiling_base::ToolContext::base_dir (src/compiling//compiling_base.nit:26,2--41)"};
30 trace
.prev
= tracehead
; tracehead
= &trace
;
31 tracehead
= trace
.prev
;
32 return ATTR_compiling_base___ToolContext____base_dir( self
) /*ToolContext::_base_dir*/;
34 void compiling_base___ToolContext___base_dir__eq(val_t self
, val_t param0
) {
35 struct trace_t trace
= {NULL
, "compiling_base::ToolContext::base_dir= (src/compiling//compiling_base.nit:26,2--41)"};
36 trace
.prev
= tracehead
; tracehead
= &trace
;
37 ATTR_compiling_base___ToolContext____base_dir( self
) /*ToolContext::_base_dir*/ = param0
;
38 tracehead
= trace
.prev
;
41 val_t
compiling_base___ToolContext___clibdir(val_t self
) {
42 struct trace_t trace
= {NULL
, "compiling_base::ToolContext::clibdir (src/compiling//compiling_base.nit:27,2--40)"};
43 trace
.prev
= tracehead
; tracehead
= &trace
;
44 tracehead
= trace
.prev
;
45 return ATTR_compiling_base___ToolContext____clibdir( self
) /*ToolContext::_clibdir*/;
47 void compiling_base___ToolContext___clibdir__eq(val_t self
, val_t param0
) {
48 struct trace_t trace
= {NULL
, "compiling_base::ToolContext::clibdir= (src/compiling//compiling_base.nit:27,2--40)"};
49 trace
.prev
= tracehead
; tracehead
= &trace
;
50 ATTR_compiling_base___ToolContext____clibdir( self
) /*ToolContext::_clibdir*/ = param0
;
51 tracehead
= trace
.prev
;
54 val_t
compiling_base___ToolContext___bindir(val_t self
) {
55 struct trace_t trace
= {NULL
, "compiling_base::ToolContext::bindir (src/compiling//compiling_base.nit:28,2--39)"};
56 trace
.prev
= tracehead
; tracehead
= &trace
;
57 tracehead
= trace
.prev
;
58 return ATTR_compiling_base___ToolContext____bindir( self
) /*ToolContext::_bindir*/;
60 void compiling_base___ToolContext___bindir__eq(val_t self
, val_t param0
) {
61 struct trace_t trace
= {NULL
, "compiling_base::ToolContext::bindir= (src/compiling//compiling_base.nit:28,2--39)"};
62 trace
.prev
= tracehead
; tracehead
= &trace
;
63 ATTR_compiling_base___ToolContext____bindir( self
) /*ToolContext::_bindir*/ = param0
;
64 tracehead
= trace
.prev
;
67 val_t
compiling_base___ToolContext___output_file(val_t self
) {
68 struct trace_t trace
= {NULL
, "compiling_base::ToolContext::output_file (src/compiling//compiling_base.nit:29,2--44)"};
69 trace
.prev
= tracehead
; tracehead
= &trace
;
70 tracehead
= trace
.prev
;
71 return ATTR_compiling_base___ToolContext____output_file( self
) /*ToolContext::_output_file*/;
73 void compiling_base___ToolContext___output_file__eq(val_t self
, val_t param0
) {
74 struct trace_t trace
= {NULL
, "compiling_base::ToolContext::output_file= (src/compiling//compiling_base.nit:29,2--44)"};
75 trace
.prev
= tracehead
; tracehead
= &trace
;
76 ATTR_compiling_base___ToolContext____output_file( self
) /*ToolContext::_output_file*/ = param0
;
77 tracehead
= trace
.prev
;
80 val_t
compiling_base___ToolContext___boost(val_t self
) {
81 struct trace_t trace
= {NULL
, "compiling_base::ToolContext::boost (src/compiling//compiling_base.nit:30,2--36)"};
82 trace
.prev
= tracehead
; tracehead
= &trace
;
83 tracehead
= trace
.prev
;
84 return ATTR_compiling_base___ToolContext____boost( self
) /*ToolContext::_boost*/;
86 void compiling_base___ToolContext___boost__eq(val_t self
, val_t param0
) {
87 struct trace_t trace
= {NULL
, "compiling_base::ToolContext::boost= (src/compiling//compiling_base.nit:30,2--36)"};
88 trace
.prev
= tracehead
; tracehead
= &trace
;
89 ATTR_compiling_base___ToolContext____boost( self
) /*ToolContext::_boost*/ = param0
;
90 tracehead
= trace
.prev
;
93 val_t
compiling_base___ToolContext___no_cc(val_t self
) {
94 struct trace_t trace
= {NULL
, "compiling_base::ToolContext::no_cc (src/compiling//compiling_base.nit:31,2--36)"};
95 trace
.prev
= tracehead
; tracehead
= &trace
;
96 tracehead
= trace
.prev
;
97 return ATTR_compiling_base___ToolContext____no_cc( self
) /*ToolContext::_no_cc*/;
99 void compiling_base___ToolContext___no_cc__eq(val_t self
, val_t param0
) {
100 struct trace_t trace
= {NULL
, "compiling_base::ToolContext::no_cc= (src/compiling//compiling_base.nit:31,2--36)"};
101 trace
.prev
= tracehead
; tracehead
= &trace
;
102 ATTR_compiling_base___ToolContext____no_cc( self
) /*ToolContext::_no_cc*/ = param0
;
103 tracehead
= trace
.prev
;
106 val_t
compiling_base___ToolContext___ext_prefix(val_t self
) {
107 struct trace_t trace
= {NULL
, "compiling_base::ToolContext::ext_prefix (src/compiling//compiling_base.nit:32,2--43)"};
108 trace
.prev
= tracehead
; tracehead
= &trace
;
109 tracehead
= trace
.prev
;
110 return ATTR_compiling_base___ToolContext____ext_prefix( self
) /*ToolContext::_ext_prefix*/;
112 void compiling_base___ToolContext___ext_prefix__eq(val_t self
, val_t param0
) {
113 struct trace_t trace
= {NULL
, "compiling_base::ToolContext::ext_prefix= (src/compiling//compiling_base.nit:32,2--43)"};
114 trace
.prev
= tracehead
; tracehead
= &trace
;
115 ATTR_compiling_base___ToolContext____ext_prefix( self
) /*ToolContext::_ext_prefix*/ = param0
;
116 tracehead
= trace
.prev
;
119 void compiling_base___CompilerVisitor___add_decl(val_t self
, val_t param0
) {
120 struct trace_t trace
= {NULL
, "compiling_base::CompilerVisitor::add_decl (src/compiling//compiling_base.nit:39,2--45:42)"};
125 trace
.prev
= tracehead
; tracehead
= &trace
;
127 variable1
= ATTR_compiling_base___CompilerVisitor____indent_level( self
) /*CompilerVisitor::_indent_level*/;
128 variable1
= TAG_Bool(UNTAG_Int(variable1
)>=UNTAG_Int( TAG_Int(8)));
129 if (UNTAG_Bool(variable1
)) { /*if*/
130 variable1
= ATTR_compiling_base___CompilerVisitor____ctx( self
) /*CompilerVisitor::_ctx*/;
131 variable1
= ((compiling_base___CContext___decls_t
)CALL(variable1
,COLOR_compiling_base___CContext___decls
))(variable1
) /*CContext::decls*/;
132 variable2
= NEW_string___String___with_native(BOX_NativeString("\t\t"), TAG_Int(2)); /*new String*/
133 variable2
= ((string___String_____plus_t
)CALL(variable2
,COLOR_string___String_____plus
))(variable2
, variable0
/*s*/) /*String::+*/;
134 ((array___AbstractArray___add_t
)CALL(variable1
,COLOR_abstract_collection___SimpleCollection___add
))(variable1
, variable2
) /*Array::add*/;
136 variable1
= ATTR_compiling_base___CompilerVisitor____ctx( self
) /*CompilerVisitor::_ctx*/;
137 variable1
= ((compiling_base___CContext___decls_t
)CALL(variable1
,COLOR_compiling_base___CContext___decls
))(variable1
) /*CContext::decls*/;
138 variable2
= NEW_string___String___with_native(BOX_NativeString(" "), TAG_Int(2)); /*new String*/
139 variable3
= ATTR_compiling_base___CompilerVisitor____indent_level( self
) /*CompilerVisitor::_indent_level*/;
140 variable2
= ((string___String_____star_t
)CALL(variable2
,COLOR_string___String_____star
))(variable2
, variable3
) /*String::**/;
141 variable2
= ((string___String_____plus_t
)CALL(variable2
,COLOR_string___String_____plus
))(variable2
, variable0
/*s*/) /*String::+*/;
142 ((array___AbstractArray___add_t
)CALL(variable1
,COLOR_abstract_collection___SimpleCollection___add
))(variable1
, variable2
) /*Array::add*/;
144 tracehead
= trace
.prev
;
147 void compiling_base___CompilerVisitor___add_instr(val_t self
, val_t param0
) {
148 struct trace_t trace
= {NULL
, "compiling_base::CompilerVisitor::add_instr (src/compiling//compiling_base.nit:49,2--55:43)"};
153 trace
.prev
= tracehead
; tracehead
= &trace
;
155 variable1
= ATTR_compiling_base___CompilerVisitor____indent_level( self
) /*CompilerVisitor::_indent_level*/;
156 variable1
= TAG_Bool(UNTAG_Int(variable1
)>=UNTAG_Int( TAG_Int(8)));
157 if (UNTAG_Bool(variable1
)) { /*if*/
158 variable1
= ATTR_compiling_base___CompilerVisitor____ctx( self
) /*CompilerVisitor::_ctx*/;
159 variable1
= ((compiling_base___CContext___instrs_t
)CALL(variable1
,COLOR_compiling_base___CContext___instrs
))(variable1
) /*CContext::instrs*/;
160 variable2
= NEW_string___String___with_native(BOX_NativeString("\t\t"), TAG_Int(2)); /*new String*/
161 variable2
= ((string___String_____plus_t
)CALL(variable2
,COLOR_string___String_____plus
))(variable2
, variable0
/*s*/) /*String::+*/;
162 ((array___AbstractArray___add_t
)CALL(variable1
,COLOR_abstract_collection___SimpleCollection___add
))(variable1
, variable2
) /*Array::add*/;
164 variable1
= ATTR_compiling_base___CompilerVisitor____ctx( self
) /*CompilerVisitor::_ctx*/;
165 variable1
= ((compiling_base___CContext___instrs_t
)CALL(variable1
,COLOR_compiling_base___CContext___instrs
))(variable1
) /*CContext::instrs*/;
166 variable2
= NEW_string___String___with_native(BOX_NativeString(" "), TAG_Int(2)); /*new String*/
167 variable3
= ATTR_compiling_base___CompilerVisitor____indent_level( self
) /*CompilerVisitor::_indent_level*/;
168 variable2
= ((string___String_____star_t
)CALL(variable2
,COLOR_string___String_____star
))(variable2
, variable3
) /*String::**/;
169 variable2
= ((string___String_____plus_t
)CALL(variable2
,COLOR_string___String_____plus
))(variable2
, variable0
/*s*/) /*String::+*/;
170 ((array___AbstractArray___add_t
)CALL(variable1
,COLOR_abstract_collection___SimpleCollection___add
))(variable1
, variable2
) /*Array::add*/;
172 tracehead
= trace
.prev
;
175 val_t
compiling_base___CompilerVisitor___new_number(val_t self
) {
176 struct trace_t trace
= {NULL
, "compiling_base::CompilerVisitor::new_number (src/compiling//compiling_base.nit:59,2--64:12)"};
179 trace
.prev
= tracehead
; tracehead
= &trace
;
180 variable1
= ATTR_compiling_base___CompilerVisitor____number_cpt( self
) /*CompilerVisitor::_number_cpt*/;
181 variable0
= variable1
;
182 variable1
= TAG_Int(UNTAG_Int( variable0
/*res*/)+UNTAG_Int( TAG_Int(1)));
183 ATTR_compiling_base___CompilerVisitor____number_cpt( self
) /*CompilerVisitor::_number_cpt*/ = variable1
;
184 variable0
= variable0
/*res*/;
186 return_label2
: while(false);
187 tracehead
= trace
.prev
;
190 void compiling_base___CompilerVisitor___indent(val_t self
) {
191 struct trace_t trace
= {NULL
, "compiling_base::CompilerVisitor::indent (src/compiling//compiling_base.nit:69,2--71:34)"};
192 trace
.prev
= tracehead
; tracehead
= &trace
;
193 ATTR_compiling_base___CompilerVisitor____indent_level( self
) /*CompilerVisitor::_indent_level*/ = TAG_Int(UNTAG_Int(ATTR_compiling_base___CompilerVisitor____indent_level( self
) /*CompilerVisitor::_indent_level*/)+UNTAG_Int( TAG_Int(1)));
194 tracehead
= trace
.prev
;
197 void compiling_base___CompilerVisitor___unindent(val_t self
) {
198 struct trace_t trace
= {NULL
, "compiling_base::CompilerVisitor::unindent (src/compiling//compiling_base.nit:73,2--77:45)"};
200 trace
.prev
= tracehead
; tracehead
= &trace
;
201 ATTR_compiling_base___CompilerVisitor____indent_level( self
) /*CompilerVisitor::_indent_level*/ = TAG_Int(UNTAG_Int(ATTR_compiling_base___CompilerVisitor____indent_level( self
) /*CompilerVisitor::_indent_level*/)-UNTAG_Int( TAG_Int(1)));
202 variable0
= ATTR_compiling_base___CompilerVisitor____indent_level( self
) /*CompilerVisitor::_indent_level*/;
203 variable0
= TAG_Bool(UNTAG_Int(variable0
)<UNTAG_Int( TAG_Int(0)));
204 if (UNTAG_Bool(variable0
)) { /*if*/
205 ATTR_compiling_base___CompilerVisitor____indent_level( self
) /*CompilerVisitor::_indent_level*/ = TAG_Int(0);
207 tracehead
= trace
.prev
;
210 val_t
compiling_base___CompilerVisitor___to_s(val_t self
) {
211 struct trace_t trace
= {NULL
, "compiling_base::CompilerVisitor::to_s (src/compiling//compiling_base.nit:80,2--87:22)"};
214 trace
.prev
= tracehead
; tracehead
= &trace
;
215 variable1
= NEW_array___Array___init(); /*new Array[String]*/
216 variable0
= variable1
;
217 variable1
= ATTR_compiling_base___CompilerVisitor____ctx( self
) /*CompilerVisitor::_ctx*/;
218 variable1
= ((compiling_base___CContext___decls_t
)CALL(variable1
,COLOR_compiling_base___CContext___decls
))(variable1
) /*CContext::decls*/;
219 ((abstract_collection___IndexedCollection___append_t
)CALL( variable0
/*out*/,COLOR_abstract_collection___IndexedCollection___append
))( variable0
/*out*/, variable1
) /*Array::append*/;
220 variable1
= ATTR_compiling_base___CompilerVisitor____ctx( self
) /*CompilerVisitor::_ctx*/;
221 variable1
= ((compiling_base___CContext___instrs_t
)CALL(variable1
,COLOR_compiling_base___CContext___instrs
))(variable1
) /*CContext::instrs*/;
222 ((abstract_collection___IndexedCollection___append_t
)CALL( variable0
/*out*/,COLOR_abstract_collection___IndexedCollection___append
))( variable0
/*out*/, variable1
) /*Array::append*/;
223 variable1
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
224 ((array___AbstractArray___add_t
)CALL( variable0
/*out*/,COLOR_abstract_collection___SimpleCollection___add
))( variable0
/*out*/, variable1
) /*Array::add*/;
225 variable1
= NEW_string___String___with_native(BOX_NativeString("\n"), TAG_Int(1)); /*new String*/
226 variable1
= ((string___Collection___join_t
)CALL( variable0
/*out*/,COLOR_string___Collection___join
))( variable0
/*out*/, variable1
) /*Array::join*/;
227 variable0
= variable1
;
229 return_label5
: while(false);
230 tracehead
= trace
.prev
;
233 val_t
compiling_base___CompilerVisitor___module(val_t self
) {
234 struct trace_t trace
= {NULL
, "compiling_base::CompilerVisitor::module (src/compiling//compiling_base.nit:90,2--91:44)"};
235 trace
.prev
= tracehead
; tracehead
= &trace
;
236 tracehead
= trace
.prev
;
237 return ATTR_compiling_base___CompilerVisitor____module( self
) /*CompilerVisitor::_module*/;
239 void compiling_base___CompilerVisitor___module__eq(val_t self
, val_t param0
) {
240 struct trace_t trace
= {NULL
, "compiling_base::CompilerVisitor::module= (src/compiling//compiling_base.nit:90,2--91:44)"};
241 trace
.prev
= tracehead
; tracehead
= &trace
;
242 ATTR_compiling_base___CompilerVisitor____module( self
) /*CompilerVisitor::_module*/ = param0
;
243 tracehead
= trace
.prev
;
246 val_t
compiling_base___CompilerVisitor___ctx(val_t self
) {
247 struct trace_t trace
= {NULL
, "compiling_base::CompilerVisitor::ctx (src/compiling//compiling_base.nit:93,2--94:53)"};
248 trace
.prev
= tracehead
; tracehead
= &trace
;
249 tracehead
= trace
.prev
;
250 return ATTR_compiling_base___CompilerVisitor____ctx( self
) /*CompilerVisitor::_ctx*/;
252 void compiling_base___CompilerVisitor___ctx__eq(val_t self
, val_t param0
) {
253 struct trace_t trace
= {NULL
, "compiling_base::CompilerVisitor::ctx= (src/compiling//compiling_base.nit:93,2--94:53)"};
254 trace
.prev
= tracehead
; tracehead
= &trace
;
255 ATTR_compiling_base___CompilerVisitor____ctx( self
) /*CompilerVisitor::_ctx*/ = param0
;
256 tracehead
= trace
.prev
;
259 val_t
compiling_base___CompilerVisitor___indent_level(val_t self
) {
260 struct trace_t trace
= {NULL
, "compiling_base::CompilerVisitor::indent_level (src/compiling//compiling_base.nit:96,2--97:42)"};
261 trace
.prev
= tracehead
; tracehead
= &trace
;
262 tracehead
= trace
.prev
;
263 return ATTR_compiling_base___CompilerVisitor____indent_level( self
) /*CompilerVisitor::_indent_level*/;
265 void compiling_base___CompilerVisitor___indent_level__eq(val_t self
, val_t param0
) {
266 struct trace_t trace
= {NULL
, "compiling_base::CompilerVisitor::indent_level= (src/compiling//compiling_base.nit:96,2--97:42)"};
267 trace
.prev
= tracehead
; tracehead
= &trace
;
268 ATTR_compiling_base___CompilerVisitor____indent_level( self
) /*CompilerVisitor::_indent_level*/ = param0
;
269 tracehead
= trace
.prev
;
272 val_t
compiling_base___CompilerVisitor___tc(val_t self
) {
273 struct trace_t trace
= {NULL
, "compiling_base::CompilerVisitor::tc (src/compiling//compiling_base.nit:99,2--100:40)"};
274 trace
.prev
= tracehead
; tracehead
= &trace
;
275 tracehead
= trace
.prev
;
276 return ATTR_compiling_base___CompilerVisitor____tc( self
) /*CompilerVisitor::_tc*/;
278 void compiling_base___CompilerVisitor___tc__eq(val_t self
, val_t param0
) {
279 struct trace_t trace
= {NULL
, "compiling_base::CompilerVisitor::tc= (src/compiling//compiling_base.nit:99,2--100:40)"};
280 trace
.prev
= tracehead
; tracehead
= &trace
;
281 ATTR_compiling_base___CompilerVisitor____tc( self
) /*CompilerVisitor::_tc*/ = param0
;
282 tracehead
= trace
.prev
;
285 void compiling_base___CompilerVisitor___init(val_t self
, val_t param0
, int* init_table
) {
286 struct trace_t trace
= {NULL
, "compiling_base::CompilerVisitor::init (src/compiling//compiling_base.nit:102,2--103:46)"};
288 trace
.prev
= tracehead
; tracehead
= &trace
;
290 if (init_table
[VAL2OBJ( self
)->vft
[INIT_TABLE_POS_CompilerVisitor
].i
]) return;
291 ATTR_compiling_base___CompilerVisitor____module( self
) /*CompilerVisitor::_module*/ = variable0
/*module*/;
292 init_table
[VAL2OBJ( self
)->vft
[INIT_TABLE_POS_CompilerVisitor
].i
] = 1;
293 tracehead
= trace
.prev
;
296 val_t
compiling_base___CContext___decls(val_t self
) {
297 struct trace_t trace
= {NULL
, "compiling_base::CContext::decls (src/compiling//compiling_base.nit:109,2--55)"};
298 trace
.prev
= tracehead
; tracehead
= &trace
;
299 tracehead
= trace
.prev
;
300 return ATTR_compiling_base___CContext____decls( self
) /*CContext::_decls*/;
302 val_t
compiling_base___CContext___instrs(val_t self
) {
303 struct trace_t trace
= {NULL
, "compiling_base::CContext::instrs (src/compiling//compiling_base.nit:110,2--56)"};
304 trace
.prev
= tracehead
; tracehead
= &trace
;
305 tracehead
= trace
.prev
;
306 return ATTR_compiling_base___CContext____instrs( self
) /*CContext::_instrs*/;
308 void compiling_base___CContext___append(val_t self
, val_t param0
) {
309 struct trace_t trace
= {NULL
, "compiling_base::CContext::append (src/compiling//compiling_base.nit:112,2--115:25)"};
313 trace
.prev
= tracehead
; tracehead
= &trace
;
315 variable1
= ATTR_compiling_base___CContext____instrs( self
) /*CContext::_instrs*/;
316 variable2
= ((compiling_base___CContext___decls_t
)CALL( variable0
/*c*/,COLOR_compiling_base___CContext___decls
))( variable0
/*c*/) /*CContext::decls*/;
317 ((abstract_collection___IndexedCollection___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable2
) /*Array::append*/;
318 variable1
= ATTR_compiling_base___CContext____instrs( self
) /*CContext::_instrs*/;
319 variable2
= ((compiling_base___CContext___instrs_t
)CALL( variable0
/*c*/,COLOR_compiling_base___CContext___instrs
))( variable0
/*c*/) /*CContext::instrs*/;
320 ((abstract_collection___IndexedCollection___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable2
) /*Array::append*/;
321 tracehead
= trace
.prev
;
324 void compiling_base___CContext___init(val_t self
, int* init_table
) {
325 struct trace_t trace
= {NULL
, "compiling_base::CContext::init (src/compiling//compiling_base.nit:118,2--5)"};
326 trace
.prev
= tracehead
; tracehead
= &trace
;
327 if (init_table
[VAL2OBJ( self
)->vft
[INIT_TABLE_POS_CContext
].i
]) return;
328 init_table
[VAL2OBJ( self
)->vft
[INIT_TABLE_POS_CContext
].i
] = 1;
329 tracehead
= trace
.prev
;
332 val_t
compiling_base___MMGlobalProperty___meth_call(val_t self
) {
333 struct trace_t trace
= {NULL
, "compiling_base::MMGlobalProperty::meth_call (src/compiling//compiling_base.nit:122,2--125:29)"};
341 trace
.prev
= tracehead
; tracehead
= &trace
;
342 variable0
= NEW_string___String___init(); /*new String*/
343 variable1
= NEW_string___String___with_native(BOX_NativeString("CALL_"), TAG_Int(5)); /*new String*/
344 variable2
= variable1
;
345 ((string___String___append_t
)CALL(variable0
,COLOR_abstract_collection___IndexedCollection___append
))(variable0
, variable2
) /*String::append*/;
346 variable3
= ((abstractmetamodel___MMGlobalProperty___intro_t
)CALL( self
,COLOR_abstractmetamodel___MMGlobalProperty___intro
))( self
) /*MMGlobalProperty::intro*/;
347 variable3
= ((compiling_base___MMLocalProperty___cname_t
)CALL(variable3
,COLOR_compiling_base___MMLocalProperty___cname
))(variable3
) /*MMConcreteProperty::cname*/;
348 variable4
= variable3
;
349 ((string___String___append_t
)CALL(variable0
,COLOR_abstract_collection___IndexedCollection___append
))(variable0
, variable4
) /*String::append*/;
350 variable5
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
351 variable6
= variable5
;
352 ((string___String___append_t
)CALL(variable0
,COLOR_abstract_collection___IndexedCollection___append
))(variable0
, variable6
) /*String::append*/;
354 return_label9
: while(false);
355 tracehead
= trace
.prev
;
358 val_t
compiling_base___MMGlobalProperty___attr_access(val_t self
) {
359 struct trace_t trace
= {NULL
, "compiling_base::MMGlobalProperty::attr_access (src/compiling//compiling_base.nit:128,2--131:29)"};
367 trace
.prev
= tracehead
; tracehead
= &trace
;
368 variable0
= NEW_string___String___init(); /*new String*/
369 variable1
= NEW_string___String___with_native(BOX_NativeString("ATTR_"), TAG_Int(5)); /*new String*/
370 variable2
= variable1
;
371 ((string___String___append_t
)CALL(variable0
,COLOR_abstract_collection___IndexedCollection___append
))(variable0
, variable2
) /*String::append*/;
372 variable3
= ((abstractmetamodel___MMGlobalProperty___intro_t
)CALL( self
,COLOR_abstractmetamodel___MMGlobalProperty___intro
))( self
) /*MMGlobalProperty::intro*/;
373 variable3
= ((compiling_base___MMLocalProperty___cname_t
)CALL(variable3
,COLOR_compiling_base___MMLocalProperty___cname
))(variable3
) /*MMConcreteProperty::cname*/;
374 variable4
= variable3
;
375 ((string___String___append_t
)CALL(variable0
,COLOR_abstract_collection___IndexedCollection___append
))(variable0
, variable4
) /*String::append*/;
376 variable5
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
377 variable6
= variable5
;
378 ((string___String___append_t
)CALL(variable0
,COLOR_abstract_collection___IndexedCollection___append
))(variable0
, variable6
) /*String::append*/;
380 return_label10
: while(false);
381 tracehead
= trace
.prev
;
384 val_t
compiling_base___MMGlobalProperty___color_id(val_t self
) {
385 struct trace_t trace
= {NULL
, "compiling_base::MMGlobalProperty::color_id (src/compiling//compiling_base.nit:134,2--137:30)"};
393 trace
.prev
= tracehead
; tracehead
= &trace
;
394 variable0
= NEW_string___String___init(); /*new String*/
395 variable1
= NEW_string___String___with_native(BOX_NativeString("COLOR_"), TAG_Int(6)); /*new String*/
396 variable2
= variable1
;
397 ((string___String___append_t
)CALL(variable0
,COLOR_abstract_collection___IndexedCollection___append
))(variable0
, variable2
) /*String::append*/;
398 variable3
= ((abstractmetamodel___MMGlobalProperty___intro_t
)CALL( self
,COLOR_abstractmetamodel___MMGlobalProperty___intro
))( self
) /*MMGlobalProperty::intro*/;
399 variable3
= ((compiling_base___MMLocalProperty___cname_t
)CALL(variable3
,COLOR_compiling_base___MMLocalProperty___cname
))(variable3
) /*MMConcreteProperty::cname*/;
400 variable4
= variable3
;
401 ((string___String___append_t
)CALL(variable0
,COLOR_abstract_collection___IndexedCollection___append
))(variable0
, variable4
) /*String::append*/;
402 variable5
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
403 variable6
= variable5
;
404 ((string___String___append_t
)CALL(variable0
,COLOR_abstract_collection___IndexedCollection___append
))(variable0
, variable6
) /*String::append*/;
406 return_label11
: while(false);
407 tracehead
= trace
.prev
;
410 val_t
compiling_base___MMGlobalClass___id_id(val_t self
) {
411 struct trace_t trace
= {NULL
, "compiling_base::MMGlobalClass::id_id (src/compiling//compiling_base.nit:143,2--146:26)"};
419 trace
.prev
= tracehead
; tracehead
= &trace
;
420 variable0
= NEW_string___String___init(); /*new String*/
421 variable1
= NEW_string___String___with_native(BOX_NativeString("ID_"), TAG_Int(3)); /*new String*/
422 variable2
= variable1
;
423 ((string___String___append_t
)CALL(variable0
,COLOR_abstract_collection___IndexedCollection___append
))(variable0
, variable2
) /*String::append*/;
424 variable3
= ((abstractmetamodel___MMGlobalClass___intro_t
)CALL( self
,COLOR_abstractmetamodel___MMGlobalClass___intro
))( self
) /*MMGlobalClass::intro*/;
425 variable3
= ((abstractmetamodel___MMLocalClass___name_t
)CALL(variable3
,COLOR_abstractmetamodel___MMLocalClass___name
))(variable3
) /*MMLocalClass::name*/;
426 variable4
= variable3
;
427 variable4
= ((string___String___to_s_t
)CALL(variable4
,COLOR_string___Object___to_s
))(variable4
) /*String::to_s*/;
428 ((string___String___append_t
)CALL(variable0
,COLOR_abstract_collection___IndexedCollection___append
))(variable0
, variable4
) /*String::append*/;
429 variable5
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
430 variable6
= variable5
;
431 ((string___String___append_t
)CALL(variable0
,COLOR_abstract_collection___IndexedCollection___append
))(variable0
, variable6
) /*String::append*/;
433 return_label12
: while(false);
434 tracehead
= trace
.prev
;
437 val_t
compiling_base___MMGlobalClass___color_id(val_t self
) {
438 struct trace_t trace
= {NULL
, "compiling_base::MMGlobalClass::color_id (src/compiling//compiling_base.nit:149,2--152:29)"};
446 trace
.prev
= tracehead
; tracehead
= &trace
;
447 variable0
= NEW_string___String___init(); /*new String*/
448 variable1
= NEW_string___String___with_native(BOX_NativeString("COLOR_"), TAG_Int(6)); /*new String*/
449 variable2
= variable1
;
450 ((string___String___append_t
)CALL(variable0
,COLOR_abstract_collection___IndexedCollection___append
))(variable0
, variable2
) /*String::append*/;
451 variable3
= ((abstractmetamodel___MMGlobalClass___intro_t
)CALL( self
,COLOR_abstractmetamodel___MMGlobalClass___intro
))( self
) /*MMGlobalClass::intro*/;
452 variable3
= ((abstractmetamodel___MMLocalClass___name_t
)CALL(variable3
,COLOR_abstractmetamodel___MMLocalClass___name
))(variable3
) /*MMLocalClass::name*/;
453 variable4
= variable3
;
454 variable4
= ((string___String___to_s_t
)CALL(variable4
,COLOR_string___Object___to_s
))(variable4
) /*String::to_s*/;
455 ((string___String___append_t
)CALL(variable0
,COLOR_abstract_collection___IndexedCollection___append
))(variable0
, variable4
) /*String::append*/;
456 variable5
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
457 variable6
= variable5
;
458 ((string___String___append_t
)CALL(variable0
,COLOR_abstract_collection___IndexedCollection___append
))(variable0
, variable6
) /*String::append*/;
460 return_label13
: while(false);
461 tracehead
= trace
.prev
;
464 val_t
compiling_base___MMGlobalClass___init_table_pos_id(val_t self
) {
465 struct trace_t trace
= {NULL
, "compiling_base::MMGlobalClass::init_table_pos_id (src/compiling//compiling_base.nit:155,2--158:38)"};
473 trace
.prev
= tracehead
; tracehead
= &trace
;
474 variable0
= NEW_string___String___init(); /*new String*/
475 variable1
= NEW_string___String___with_native(BOX_NativeString("INIT_TABLE_POS_"), TAG_Int(15)); /*new String*/
476 variable2
= variable1
;
477 ((string___String___append_t
)CALL(variable0
,COLOR_abstract_collection___IndexedCollection___append
))(variable0
, variable2
) /*String::append*/;
478 variable3
= ((abstractmetamodel___MMGlobalClass___intro_t
)CALL( self
,COLOR_abstractmetamodel___MMGlobalClass___intro
))( self
) /*MMGlobalClass::intro*/;
479 variable3
= ((abstractmetamodel___MMLocalClass___name_t
)CALL(variable3
,COLOR_abstractmetamodel___MMLocalClass___name
))(variable3
) /*MMLocalClass::name*/;
480 variable4
= variable3
;
481 variable4
= ((string___String___to_s_t
)CALL(variable4
,COLOR_string___Object___to_s
))(variable4
) /*String::to_s*/;
482 ((string___String___append_t
)CALL(variable0
,COLOR_abstract_collection___IndexedCollection___append
))(variable0
, variable4
) /*String::append*/;
483 variable5
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
484 variable6
= variable5
;
485 ((string___String___append_t
)CALL(variable0
,COLOR_abstract_collection___IndexedCollection___append
))(variable0
, variable6
) /*String::append*/;
487 return_label14
: while(false);
488 tracehead
= trace
.prev
;
491 val_t
compiling_base___MMLocalClass___primitive_info(val_t self
) {
492 struct trace_t trace
= {NULL
, "compiling_base::MMLocalClass::primitive_info (src/compiling//compiling_base.nit:169,2--196:13)"};
495 static val_t once_value_variable1_16
; static int once_bool_variable1_16
;
499 trace
.prev
= tracehead
; tracehead
= &trace
;
500 variable0
= ATTR_compiling_base___MMLocalClass____primitive_info_b( self
) /*MMLocalClass::_primitive_info_b*/;
501 variable0
= TAG_Bool((variable0
)==( TAG_Bool(true)));
502 if (UNTAG_Bool(variable0
)) { /*if*/
503 variable0
= ATTR_compiling_base___MMLocalClass____primitive_info_cache( self
) /*MMLocalClass::_primitive_info_cache*/;
506 if (once_bool_variable1_16
) variable1
= once_value_variable1_16
;
508 variable1
= ((compiling_base___MMLocalClass___primitive_ctypes_t
)CALL( self
,COLOR_compiling_base___MMLocalClass___primitive_ctypes
))( self
) /*MMLocalClass::primitive_ctypes*/;
509 once_value_variable1_16
= variable1
;
510 once_bool_variable1_16
= true;
512 variable0
= variable1
;
513 variable1
= ((abstractmetamodel___MMLocalClass___name_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalClass___name
))( self
) /*MMLocalClass::name*/;
514 variable1
= ((abstract_collection___CoupleMap___has_key_t
)CALL( variable0
/*ctypes*/,COLOR_abstract_collection___Map___has_key
))( variable0
/*ctypes*/, variable1
) /*HashMap::has_key*/;
515 if (UNTAG_Bool(variable1
)) { /*if*/
516 variable1
= ((abstractmetamodel___MMLocalClass___name_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalClass___name
))( self
) /*MMLocalClass::name*/;
517 variable1
= ((abstract_collection___CoupleMap_____bra_t
)CALL( variable0
/*ctypes*/,COLOR_abstract_collection___Map_____bra
))( variable0
/*ctypes*/, variable1
) /*HashMap::[]*/;
518 ATTR_compiling_base___MMLocalClass____primitive_info_cache( self
) /*MMLocalClass::_primitive_info_cache*/ = variable1
;
519 ATTR_compiling_base___MMLocalClass____primitive_info_b( self
) /*MMLocalClass::_primitive_info_b*/ = TAG_Bool(true);
520 variable1
= ATTR_compiling_base___MMLocalClass____primitive_info_cache( self
) /*MMLocalClass::_primitive_info_cache*/;
521 variable0
= variable1
;
524 variable2
= ((hash___HashMap___iterator_t
)CALL( variable0
/*ctypes*/,COLOR_abstract_collection___Collection___iterator
))( variable0
/*ctypes*/) /*HashMap::iterator*/;
525 variable1
= variable2
;
526 while (true) { /*while*/
527 variable2
= ((hash___HashMapIterator___is_ok_t
)CALL( variable1
/*i*/,COLOR_abstract_collection___Iterator___is_ok
))( variable1
/*i*/) /*HashMapIterator::is_ok*/;
528 if (!UNTAG_Bool(variable2
)) break; /* while*/
529 variable3
= ((hash___HashMapIterator___key_t
)CALL( variable1
/*i*/,COLOR_abstract_collection___MapIterator___key
))( variable1
/*i*/) /*HashMapIterator::key*/;
530 variable2
= variable3
;
531 variable3
= ((abstractmetamodel___MMLocalClass___module_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalClass___module
))( self
) /*MMLocalClass::module*/;
532 variable3
= ((abstractmetamodel___MMModule___has_global_class_named_t
)CALL(variable3
,COLOR_abstractmetamodel___MMModule___has_global_class_named
))(variable3
, variable2
/*n*/) /*MMModule::has_global_class_named*/;
533 if (UNTAG_Bool(variable3
)) { /*if*/
534 variable4
= ((abstractmetamodel___MMLocalClass___module_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalClass___module
))( self
) /*MMLocalClass::module*/;
535 variable4
= ((abstractmetamodel___MMModule___class_by_name_t
)CALL(variable4
,COLOR_abstractmetamodel___MMModule___class_by_name
))(variable4
, variable2
/*n*/) /*MMModule::class_by_name*/;
536 variable3
= variable4
;
537 variable4
= ((abstractmetamodel___MMLocalClass___cshe_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalClass___cshe
))( self
) /*MMLocalClass::cshe*/;
538 variable4
= ((partial_order___PartialOrderElement_____l_t
)CALL(variable4
,COLOR_partial_order___PartialOrderElement_____l
))(variable4
, variable3
/*c*/) /*PartialOrderElement::<*/;
539 if (UNTAG_Bool(variable4
)) { /*if*/
540 variable4
= ((hash___HashMapIterator___item_t
)CALL( variable1
/*i*/,COLOR_abstract_collection___Iterator___item
))( variable1
/*i*/) /*HashMapIterator::item*/;
541 ATTR_compiling_base___MMLocalClass____primitive_info_cache( self
) /*MMLocalClass::_primitive_info_cache*/ = variable4
;
542 ATTR_compiling_base___MMLocalClass____primitive_info_b( self
) /*MMLocalClass::_primitive_info_b*/ = TAG_Bool(true);
543 variable4
= ATTR_compiling_base___MMLocalClass____primitive_info_cache( self
) /*MMLocalClass::_primitive_info_cache*/;
544 variable0
= variable4
;
548 ((hash___HashMapIterator___next_t
)CALL( variable1
/*i*/,COLOR_abstract_collection___Iterator___next
))( variable1
/*i*/) /*HashMapIterator::next*/;
549 continue_17
: while(0);
552 ATTR_compiling_base___MMLocalClass____primitive_info_b( self
) /*MMLocalClass::_primitive_info_b*/ = TAG_Bool(true);
553 variable0
= NIT_NULL
/*null*/;
555 return_label15
: while(false);
556 tracehead
= trace
.prev
;
559 val_t
compiling_base___MMLocalClass___primitive_ctypes(val_t self
) {
560 struct trace_t trace
= {NULL
, "compiling_base::MMLocalClass::primitive_ctypes (src/compiling//compiling_base.nit:199,2--214:12)"};
573 trace
.prev
= tracehead
; tracehead
= &trace
;
574 variable1
= NEW_hash___HashMap___init(); /*new HashMap[Symbol, PrimitiveInfo]*/
575 variable0
= variable1
;
576 variable2
= NEW_array___Array___with_capacity(TAG_Int(7)); /*new Array[String]*/
577 variable3
= NEW_string___String___with_native(BOX_NativeString("Int"), TAG_Int(3)); /*new String*/
578 ((array___AbstractArray___add_t
)CALL(variable2
,COLOR_abstract_collection___SimpleCollection___add
))(variable2
, variable3
) /*Array::add*/;
579 variable4
= NEW_string___String___with_native(BOX_NativeString("Char"), TAG_Int(4)); /*new String*/
580 ((array___AbstractArray___add_t
)CALL(variable2
,COLOR_abstract_collection___SimpleCollection___add
))(variable2
, variable4
) /*Array::add*/;
581 variable5
= NEW_string___String___with_native(BOX_NativeString("Bool"), TAG_Int(4)); /*new String*/
582 ((array___AbstractArray___add_t
)CALL(variable2
,COLOR_abstract_collection___SimpleCollection___add
))(variable2
, variable5
) /*Array::add*/;
583 variable6
= NEW_string___String___with_native(BOX_NativeString("Float"), TAG_Int(5)); /*new String*/
584 ((array___AbstractArray___add_t
)CALL(variable2
,COLOR_abstract_collection___SimpleCollection___add
))(variable2
, variable6
) /*Array::add*/;
585 variable7
= NEW_string___String___with_native(BOX_NativeString("NativeString"), TAG_Int(12)); /*new String*/
586 ((array___AbstractArray___add_t
)CALL(variable2
,COLOR_abstract_collection___SimpleCollection___add
))(variable2
, variable7
) /*Array::add*/;
587 variable8
= NEW_string___String___with_native(BOX_NativeString("NativeArray"), TAG_Int(11)); /*new String*/
588 ((array___AbstractArray___add_t
)CALL(variable2
,COLOR_abstract_collection___SimpleCollection___add
))(variable2
, variable8
) /*Array::add*/;
589 variable9
= NEW_string___String___with_native(BOX_NativeString("Pointer"), TAG_Int(7)); /*new String*/
590 ((array___AbstractArray___add_t
)CALL(variable2
,COLOR_abstract_collection___SimpleCollection___add
))(variable2
, variable9
) /*Array::add*/;
591 variable1
= variable2
;
592 variable3
= NEW_array___Array___with_capacity(TAG_Int(7)); /*new Array[Bool]*/
593 ((array___AbstractArray___add_t
)CALL(variable3
,COLOR_abstract_collection___SimpleCollection___add
))(variable3
, TAG_Bool(true)) /*Array::add*/;
594 ((array___AbstractArray___add_t
)CALL(variable3
,COLOR_abstract_collection___SimpleCollection___add
))(variable3
, TAG_Bool(true)) /*Array::add*/;
595 ((array___AbstractArray___add_t
)CALL(variable3
,COLOR_abstract_collection___SimpleCollection___add
))(variable3
, TAG_Bool(true)) /*Array::add*/;
596 ((array___AbstractArray___add_t
)CALL(variable3
,COLOR_abstract_collection___SimpleCollection___add
))(variable3
, TAG_Bool(false)) /*Array::add*/;
597 ((array___AbstractArray___add_t
)CALL(variable3
,COLOR_abstract_collection___SimpleCollection___add
))(variable3
, TAG_Bool(false)) /*Array::add*/;
598 ((array___AbstractArray___add_t
)CALL(variable3
,COLOR_abstract_collection___SimpleCollection___add
))(variable3
, TAG_Bool(false)) /*Array::add*/;
599 ((array___AbstractArray___add_t
)CALL(variable3
,COLOR_abstract_collection___SimpleCollection___add
))(variable3
, TAG_Bool(false)) /*Array::add*/;
600 variable2
= variable3
;
601 variable4
= NEW_array___Array___with_capacity(TAG_Int(7)); /*new Array[String]*/
602 variable5
= NEW_string___String___with_native(BOX_NativeString("int"), TAG_Int(3)); /*new String*/
603 ((array___AbstractArray___add_t
)CALL(variable4
,COLOR_abstract_collection___SimpleCollection___add
))(variable4
, variable5
) /*Array::add*/;
604 variable6
= NEW_string___String___with_native(BOX_NativeString("char"), TAG_Int(4)); /*new String*/
605 ((array___AbstractArray___add_t
)CALL(variable4
,COLOR_abstract_collection___SimpleCollection___add
))(variable4
, variable6
) /*Array::add*/;
606 variable7
= NEW_string___String___with_native(BOX_NativeString("int"), TAG_Int(3)); /*new String*/
607 ((array___AbstractArray___add_t
)CALL(variable4
,COLOR_abstract_collection___SimpleCollection___add
))(variable4
, variable7
) /*Array::add*/;
608 variable8
= NEW_string___String___with_native(BOX_NativeString("float"), TAG_Int(5)); /*new String*/
609 ((array___AbstractArray___add_t
)CALL(variable4
,COLOR_abstract_collection___SimpleCollection___add
))(variable4
, variable8
) /*Array::add*/;
610 variable9
= NEW_string___String___with_native(BOX_NativeString("char *"), TAG_Int(6)); /*new String*/
611 ((array___AbstractArray___add_t
)CALL(variable4
,COLOR_abstract_collection___SimpleCollection___add
))(variable4
, variable9
) /*Array::add*/;
612 variable10
= NEW_string___String___with_native(BOX_NativeString("val_t *"), TAG_Int(7)); /*new String*/
613 ((array___AbstractArray___add_t
)CALL(variable4
,COLOR_abstract_collection___SimpleCollection___add
))(variable4
, variable10
) /*Array::add*/;
614 variable11
= NEW_string___String___with_native(BOX_NativeString("void *"), TAG_Int(6)); /*new String*/
615 ((array___AbstractArray___add_t
)CALL(variable4
,COLOR_abstract_collection___SimpleCollection___add
))(variable4
, variable11
) /*Array::add*/;
616 variable3
= variable4
;
617 variable4
= ((array___AbstractArray___length_t
)CALL( variable1
/*pnames*/,COLOR_abstract_collection___Collection___length
))( variable1
/*pnames*/) /*Array::length*/;
618 variable5
= NEW_range___Range___without_last( TAG_Int(0), variable4
); /*new Range[Int]*/
619 variable4
= variable5
;
620 variable4
= ((range___Range___iterator_t
)CALL(variable4
,COLOR_abstract_collection___Collection___iterator
))(variable4
) /*Range::iterator*/;
621 while (true) { /*for*/
622 variable5
= ((abstract_collection___Iterator___is_ok_t
)CALL(variable4
,COLOR_abstract_collection___Iterator___is_ok
))(variable4
) /*Iterator::is_ok*/;
623 if (!UNTAG_Bool(variable5
)) break; /*for*/
624 variable5
= ((abstract_collection___Iterator___item_t
)CALL(variable4
,COLOR_abstract_collection___Iterator___item
))(variable4
) /*Iterator::item*/;
625 variable7
= variable5
/*i*/;
626 variable8
= TAG_Bool(UNTAG_Int( variable7
/*index*/)>=UNTAG_Int( TAG_Int(0)));
627 variable9
= variable8
;
628 if (UNTAG_Bool(variable9
)) { /* and */
629 variable9
= ATTR_array___AbstractArray____length( variable1
/*pnames*/) /*Array::_length*/;
630 variable9
= TAG_Bool(UNTAG_Int( variable7
/*index*/)<UNTAG_Int(variable9
));
632 variable8
= variable9
;
633 if (!UNTAG_Bool(variable8
)) { fprintf(stderr
, "Assert 'index' failed: bin/../lib/standard//array.nit:229,3--46\n"); nit_exit(1);}
634 variable8
= ATTR_array___Array____items( variable1
/*pnames*/) /*Array::_items*/;
635 variable8
= UNBOX_NativeArray(variable8
)[UNTAG_Int( variable7
/*index*/)];
637 return_label20
: while(false);
638 variable7
= variable8
;
639 variable7
= ((symbol___String___to_symbol_t
)CALL(variable7
,COLOR_symbol___String___to_symbol
))(variable7
) /*String::to_symbol*/;
640 variable6
= variable7
;
641 variable8
= NEW_compiling_base___PrimitiveInfo___init(); /*new PrimitiveInfo*/
642 variable7
= variable8
;
643 ((compiling_base___PrimitiveInfo___name__eq_t
)CALL( variable7
/*pi*/,COLOR_compiling_base___PrimitiveInfo___name__eq
))( variable7
/*pi*/, variable6
/*n*/) /*PrimitiveInfo::name=*/;
644 variable8
= variable5
/*i*/;
645 variable9
= TAG_Bool(UNTAG_Int( variable8
/*index*/)>=UNTAG_Int( TAG_Int(0)));
646 variable10
= variable9
;
647 if (UNTAG_Bool(variable10
)) { /* and */
648 variable10
= ATTR_array___AbstractArray____length( variable2
/*tagged*/) /*Array::_length*/;
649 variable10
= TAG_Bool(UNTAG_Int( variable8
/*index*/)<UNTAG_Int(variable10
));
651 variable9
= variable10
;
652 if (!UNTAG_Bool(variable9
)) { fprintf(stderr
, "Assert 'index' failed: bin/../lib/standard//array.nit:229,3--46\n"); nit_exit(1);}
653 variable9
= ATTR_array___Array____items( variable2
/*tagged*/) /*Array::_items*/;
654 variable9
= UNBOX_NativeArray(variable9
)[UNTAG_Int( variable8
/*index*/)];
656 return_label21
: while(false);
657 variable8
= variable9
;
658 ((compiling_base___PrimitiveInfo___tagged__eq_t
)CALL( variable7
/*pi*/,COLOR_compiling_base___PrimitiveInfo___tagged__eq
))( variable7
/*pi*/, variable8
) /*PrimitiveInfo::tagged=*/;
659 variable8
= variable5
/*i*/;
660 variable9
= TAG_Bool(UNTAG_Int( variable8
/*index*/)>=UNTAG_Int( TAG_Int(0)));
661 variable10
= variable9
;
662 if (UNTAG_Bool(variable10
)) { /* and */
663 variable10
= ATTR_array___AbstractArray____length( variable3
/*cnames*/) /*Array::_length*/;
664 variable10
= TAG_Bool(UNTAG_Int( variable8
/*index*/)<UNTAG_Int(variable10
));
666 variable9
= variable10
;
667 if (!UNTAG_Bool(variable9
)) { fprintf(stderr
, "Assert 'index' failed: bin/../lib/standard//array.nit:229,3--46\n"); nit_exit(1);}
668 variable9
= ATTR_array___Array____items( variable3
/*cnames*/) /*Array::_items*/;
669 variable9
= UNBOX_NativeArray(variable9
)[UNTAG_Int( variable8
/*index*/)];
671 return_label22
: while(false);
672 variable8
= variable9
;
673 ((compiling_base___PrimitiveInfo___cname__eq_t
)CALL( variable7
/*pi*/,COLOR_compiling_base___PrimitiveInfo___cname__eq
))( variable7
/*pi*/, variable8
) /*PrimitiveInfo::cname=*/;
674 ((hash___HashMap_____braeq_t
)CALL( variable0
/*res*/,COLOR_abstract_collection___Map_____braeq
))( variable0
/*res*/, variable6
/*n*/, variable7
/*pi*/) /*HashMap::[]=*/;
675 continue_19
: while(0);
676 ((abstract_collection___Iterator___next_t
)CALL(variable4
,COLOR_abstract_collection___Iterator___next
))(variable4
) /*Iterator::next*/;
679 variable0
= variable0
/*res*/;
681 return_label18
: while(false);
682 tracehead
= trace
.prev
;
685 val_t
compiling_base___PrimitiveInfo___name(val_t self
) {
686 struct trace_t trace
= {NULL
, "compiling_base::PrimitiveInfo::name (src/compiling//compiling_base.nit:220,2--221:37)"};
687 trace
.prev
= tracehead
; tracehead
= &trace
;
688 tracehead
= trace
.prev
;
689 return ATTR_compiling_base___PrimitiveInfo____name( self
) /*PrimitiveInfo::_name*/;
691 void compiling_base___PrimitiveInfo___name__eq(val_t self
, val_t param0
) {
692 struct trace_t trace
= {NULL
, "compiling_base::PrimitiveInfo::name= (src/compiling//compiling_base.nit:220,2--221:37)"};
693 trace
.prev
= tracehead
; tracehead
= &trace
;
694 ATTR_compiling_base___PrimitiveInfo____name( self
) /*PrimitiveInfo::_name*/ = param0
;
695 tracehead
= trace
.prev
;
698 val_t
compiling_base___PrimitiveInfo___tagged(val_t self
) {
699 struct trace_t trace
= {NULL
, "compiling_base::PrimitiveInfo::tagged (src/compiling//compiling_base.nit:223,2--224:37)"};
700 trace
.prev
= tracehead
; tracehead
= &trace
;
701 tracehead
= trace
.prev
;
702 return ATTR_compiling_base___PrimitiveInfo____tagged( self
) /*PrimitiveInfo::_tagged*/;
704 void compiling_base___PrimitiveInfo___tagged__eq(val_t self
, val_t param0
) {
705 struct trace_t trace
= {NULL
, "compiling_base::PrimitiveInfo::tagged= (src/compiling//compiling_base.nit:223,2--224:37)"};
706 trace
.prev
= tracehead
; tracehead
= &trace
;
707 ATTR_compiling_base___PrimitiveInfo____tagged( self
) /*PrimitiveInfo::_tagged*/ = param0
;
708 tracehead
= trace
.prev
;
711 val_t
compiling_base___PrimitiveInfo___cname(val_t self
) {
712 struct trace_t trace
= {NULL
, "compiling_base::PrimitiveInfo::cname (src/compiling//compiling_base.nit:226,2--227:38)"};
713 trace
.prev
= tracehead
; tracehead
= &trace
;
714 tracehead
= trace
.prev
;
715 return ATTR_compiling_base___PrimitiveInfo____cname( self
) /*PrimitiveInfo::_cname*/;
717 void compiling_base___PrimitiveInfo___cname__eq(val_t self
, val_t param0
) {
718 struct trace_t trace
= {NULL
, "compiling_base::PrimitiveInfo::cname= (src/compiling//compiling_base.nit:226,2--227:38)"};
719 trace
.prev
= tracehead
; tracehead
= &trace
;
720 ATTR_compiling_base___PrimitiveInfo____cname( self
) /*PrimitiveInfo::_cname*/ = param0
;
721 tracehead
= trace
.prev
;
724 void compiling_base___PrimitiveInfo___init(val_t self
, int* init_table
) {
725 struct trace_t trace
= {NULL
, "compiling_base::PrimitiveInfo::init (src/compiling//compiling_base.nit:229,2--13)"};
726 trace
.prev
= tracehead
; tracehead
= &trace
;
727 if (init_table
[VAL2OBJ( self
)->vft
[INIT_TABLE_POS_PrimitiveInfo
].i
]) return;
728 init_table
[VAL2OBJ( self
)->vft
[INIT_TABLE_POS_PrimitiveInfo
].i
] = 1;
729 tracehead
= trace
.prev
;
732 val_t
compiling_base___MMType___cname(val_t self
) {
733 struct trace_t trace
= {NULL
, "compiling_base::MMType::cname (src/compiling//compiling_base.nit:233,2--240:18)"};
736 trace
.prev
= tracehead
; tracehead
= &trace
;
737 variable1
= ((static_type___MMType___local_class_t
)CALL( self
,COLOR_static_type___MMType___local_class
))( self
) /*MMType::local_class*/;
738 variable1
= ((compiling_base___MMLocalClass___primitive_info_t
)CALL(variable1
,COLOR_compiling_base___MMLocalClass___primitive_info
))(variable1
) /*MMLocalClass::primitive_info*/;
739 variable0
= variable1
;
740 variable1
= TAG_Bool(( variable0
/*pi*/ == NIT_NULL
/*null*/) || (( variable0
/*pi*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable0
/*pi*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable0
/*pi*/, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable0
/*pi*/,COLOR_kernel___Object_____eqeq
))( variable0
/*pi*/, NIT_NULL
/*null*/) /*PrimitiveInfo::==*/)))));
741 if (UNTAG_Bool(variable1
)) { /*if*/
742 variable1
= NEW_string___String___with_native(BOX_NativeString("val_t"), TAG_Int(5)); /*new String*/
743 variable0
= variable1
;
746 variable1
= ((compiling_base___PrimitiveInfo___cname_t
)CALL( variable0
/*pi*/,COLOR_compiling_base___PrimitiveInfo___cname
))( variable0
/*pi*/) /*PrimitiveInfo::cname*/;
747 variable0
= variable1
;
750 return_label24
: while(false);
751 tracehead
= trace
.prev
;
754 val_t
compiling_base___MMType___default_cvalue(val_t self
) {
755 struct trace_t trace
= {NULL
, "compiling_base::MMType::default_cvalue (src/compiling//compiling_base.nit:244,2--252:20)"};
768 trace
.prev
= tracehead
; tracehead
= &trace
;
769 variable1
= ((static_type___MMType___local_class_t
)CALL( self
,COLOR_static_type___MMType___local_class
))( self
) /*MMType::local_class*/;
770 variable1
= ((compiling_base___MMLocalClass___primitive_info_t
)CALL(variable1
,COLOR_compiling_base___MMLocalClass___primitive_info
))(variable1
) /*MMLocalClass::primitive_info*/;
771 variable0
= variable1
;
772 variable1
= TAG_Bool(!UNTAG_Bool(TAG_Bool(( variable0
/*pi*/ == NIT_NULL
/*null*/) || (( variable0
/*pi*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable0
/*pi*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable0
/*pi*/, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable0
/*pi*/,COLOR_kernel___Object_____eqeq
))( variable0
/*pi*/, NIT_NULL
/*null*/) /*PrimitiveInfo::==*/)))))));
773 variable2
= variable1
;
774 if (UNTAG_Bool(variable2
)) { /* and */
775 variable2
= ((compiling_base___PrimitiveInfo___tagged_t
)CALL( variable0
/*pi*/,COLOR_compiling_base___PrimitiveInfo___tagged
))( variable0
/*pi*/) /*PrimitiveInfo::tagged*/;
777 variable1
= variable2
;
778 if (UNTAG_Bool(variable1
)) { /*if*/
779 variable1
= NEW_string___String___init(); /*new String*/
780 variable2
= NEW_string___String___with_native(BOX_NativeString("TAG_"), TAG_Int(4)); /*new String*/
781 variable3
= variable2
;
782 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable3
) /*String::append*/;
783 variable4
= ((static_type___MMType___local_class_t
)CALL( self
,COLOR_static_type___MMType___local_class
))( self
) /*MMType::local_class*/;
784 variable4
= ((abstractmetamodel___MMLocalClass___name_t
)CALL(variable4
,COLOR_abstractmetamodel___MMLocalClass___name
))(variable4
) /*MMLocalClass::name*/;
785 variable5
= variable4
;
786 variable5
= ((string___String___to_s_t
)CALL(variable5
,COLOR_string___Object___to_s
))(variable5
) /*String::to_s*/;
787 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable5
) /*String::append*/;
788 variable6
= NEW_string___String___with_native(BOX_NativeString("(("), TAG_Int(2)); /*new String*/
789 variable7
= variable6
;
790 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable7
) /*String::append*/;
791 variable8
= ((compiling_base___PrimitiveInfo___cname_t
)CALL( variable0
/*pi*/,COLOR_compiling_base___PrimitiveInfo___cname
))( variable0
/*pi*/) /*PrimitiveInfo::cname*/;
792 variable9
= variable8
;
793 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable9
) /*String::append*/;
794 variable10
= NEW_string___String___with_native(BOX_NativeString(")0)"), TAG_Int(3)); /*new String*/
795 variable11
= variable10
;
796 ((string___String___append_t
)CALL(variable1
,COLOR_abstract_collection___IndexedCollection___append
))(variable1
, variable11
) /*String::append*/;
797 variable0
= variable1
;
800 variable1
= NEW_string___String___with_native(BOX_NativeString("NIT_NULL"), TAG_Int(8)); /*new String*/
801 variable0
= variable1
;
804 return_label25
: while(false);
805 tracehead
= trace
.prev
;
808 val_t
compiling_base___MMType___boxtype(val_t self
, val_t param0
) {
809 struct trace_t trace
= {NULL
, "compiling_base::MMType::boxtype (src/compiling//compiling_base.nit:256,2--266:39)"};
822 trace
.prev
= tracehead
; tracehead
= &trace
;
824 variable2
= ((static_type___MMType___local_class_t
)CALL( self
,COLOR_static_type___MMType___local_class
))( self
) /*MMType::local_class*/;
825 variable2
= ((compiling_base___MMLocalClass___primitive_info_t
)CALL(variable2
,COLOR_compiling_base___MMLocalClass___primitive_info
))(variable2
) /*MMLocalClass::primitive_info*/;
826 variable1
= variable2
;
827 variable2
= TAG_Bool(( variable1
/*pi*/ == NIT_NULL
/*null*/) || (( variable1
/*pi*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable1
/*pi*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable1
/*pi*/, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable1
/*pi*/,COLOR_kernel___Object_____eqeq
))( variable1
/*pi*/, NIT_NULL
/*null*/) /*PrimitiveInfo::==*/)))));
828 if (UNTAG_Bool(variable2
)) { /*if*/
829 variable1
= variable0
/*s*/;
832 variable2
= ((compiling_base___PrimitiveInfo___tagged_t
)CALL( variable1
/*pi*/,COLOR_compiling_base___PrimitiveInfo___tagged
))( variable1
/*pi*/) /*PrimitiveInfo::tagged*/;
833 if (UNTAG_Bool(variable2
)) { /*if*/
834 variable2
= NEW_string___String___init(); /*new String*/
835 variable3
= NEW_string___String___with_native(BOX_NativeString("TAG_"), TAG_Int(4)); /*new String*/
836 variable4
= variable3
;
837 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable4
) /*String::append*/;
838 variable5
= ((static_type___MMType___local_class_t
)CALL( self
,COLOR_static_type___MMType___local_class
))( self
) /*MMType::local_class*/;
839 variable5
= ((abstractmetamodel___MMLocalClass___name_t
)CALL(variable5
,COLOR_abstractmetamodel___MMLocalClass___name
))(variable5
) /*MMLocalClass::name*/;
840 variable6
= variable5
;
841 variable6
= ((string___String___to_s_t
)CALL(variable6
,COLOR_string___Object___to_s
))(variable6
) /*String::to_s*/;
842 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable6
) /*String::append*/;
843 variable7
= NEW_string___String___with_native(BOX_NativeString("("), TAG_Int(1)); /*new String*/
844 variable8
= variable7
;
845 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable8
) /*String::append*/;
846 variable9
= variable0
/*s*/;
847 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable9
) /*String::append*/;
848 variable10
= NEW_string___String___with_native(BOX_NativeString(")"), TAG_Int(1)); /*new String*/
849 variable11
= variable10
;
850 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable11
) /*String::append*/;
851 variable1
= variable2
;
854 variable2
= NEW_string___String___init(); /*new String*/
855 variable3
= NEW_string___String___with_native(BOX_NativeString("BOX_"), TAG_Int(4)); /*new String*/
856 variable4
= variable3
;
857 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable4
) /*String::append*/;
858 variable5
= ((static_type___MMType___local_class_t
)CALL( self
,COLOR_static_type___MMType___local_class
))( self
) /*MMType::local_class*/;
859 variable5
= ((abstractmetamodel___MMLocalClass___name_t
)CALL(variable5
,COLOR_abstractmetamodel___MMLocalClass___name
))(variable5
) /*MMLocalClass::name*/;
860 variable6
= variable5
;
861 variable6
= ((string___String___to_s_t
)CALL(variable6
,COLOR_string___Object___to_s
))(variable6
) /*String::to_s*/;
862 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable6
) /*String::append*/;
863 variable7
= NEW_string___String___with_native(BOX_NativeString("("), TAG_Int(1)); /*new String*/
864 variable8
= variable7
;
865 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable8
) /*String::append*/;
866 variable9
= variable0
/*s*/;
867 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable9
) /*String::append*/;
868 variable10
= NEW_string___String___with_native(BOX_NativeString(")"), TAG_Int(1)); /*new String*/
869 variable11
= variable10
;
870 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable11
) /*String::append*/;
871 variable1
= variable2
;
875 return_label26
: while(false);
876 tracehead
= trace
.prev
;
879 val_t
compiling_base___MMType___unboxtype(val_t self
, val_t param0
) {
880 struct trace_t trace
= {NULL
, "compiling_base::MMType::unboxtype (src/compiling//compiling_base.nit:270,2--280:41)"};
893 trace
.prev
= tracehead
; tracehead
= &trace
;
895 variable2
= ((static_type___MMType___local_class_t
)CALL( self
,COLOR_static_type___MMType___local_class
))( self
) /*MMType::local_class*/;
896 variable2
= ((compiling_base___MMLocalClass___primitive_info_t
)CALL(variable2
,COLOR_compiling_base___MMLocalClass___primitive_info
))(variable2
) /*MMLocalClass::primitive_info*/;
897 variable1
= variable2
;
898 variable2
= TAG_Bool(( variable1
/*pi*/ == NIT_NULL
/*null*/) || (( variable1
/*pi*/ != NIT_NULL
) && ((((kernel___Object_____eqeq_t
)CALL( variable1
/*pi*/,COLOR_kernel___Object_____eqeq
))==kernel___Object_____eqeq
)?
(IS_EQUAL_NN( variable1
/*pi*/, NIT_NULL
/*null*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t
)CALL( variable1
/*pi*/,COLOR_kernel___Object_____eqeq
))( variable1
/*pi*/, NIT_NULL
/*null*/) /*PrimitiveInfo::==*/)))));
899 if (UNTAG_Bool(variable2
)) { /*if*/
900 variable1
= variable0
/*s*/;
903 variable2
= ((compiling_base___PrimitiveInfo___tagged_t
)CALL( variable1
/*pi*/,COLOR_compiling_base___PrimitiveInfo___tagged
))( variable1
/*pi*/) /*PrimitiveInfo::tagged*/;
904 if (UNTAG_Bool(variable2
)) { /*if*/
905 variable2
= NEW_string___String___init(); /*new String*/
906 variable3
= NEW_string___String___with_native(BOX_NativeString("UNTAG_"), TAG_Int(6)); /*new String*/
907 variable4
= variable3
;
908 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable4
) /*String::append*/;
909 variable5
= ((static_type___MMType___local_class_t
)CALL( self
,COLOR_static_type___MMType___local_class
))( self
) /*MMType::local_class*/;
910 variable5
= ((abstractmetamodel___MMLocalClass___name_t
)CALL(variable5
,COLOR_abstractmetamodel___MMLocalClass___name
))(variable5
) /*MMLocalClass::name*/;
911 variable6
= variable5
;
912 variable6
= ((string___String___to_s_t
)CALL(variable6
,COLOR_string___Object___to_s
))(variable6
) /*String::to_s*/;
913 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable6
) /*String::append*/;
914 variable7
= NEW_string___String___with_native(BOX_NativeString("("), TAG_Int(1)); /*new String*/
915 variable8
= variable7
;
916 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable8
) /*String::append*/;
917 variable9
= variable0
/*s*/;
918 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable9
) /*String::append*/;
919 variable10
= NEW_string___String___with_native(BOX_NativeString(")"), TAG_Int(1)); /*new String*/
920 variable11
= variable10
;
921 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable11
) /*String::append*/;
922 variable1
= variable2
;
925 variable2
= NEW_string___String___init(); /*new String*/
926 variable3
= NEW_string___String___with_native(BOX_NativeString("UNBOX_"), TAG_Int(6)); /*new String*/
927 variable4
= variable3
;
928 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable4
) /*String::append*/;
929 variable5
= ((static_type___MMType___local_class_t
)CALL( self
,COLOR_static_type___MMType___local_class
))( self
) /*MMType::local_class*/;
930 variable5
= ((abstractmetamodel___MMLocalClass___name_t
)CALL(variable5
,COLOR_abstractmetamodel___MMLocalClass___name
))(variable5
) /*MMLocalClass::name*/;
931 variable6
= variable5
;
932 variable6
= ((string___String___to_s_t
)CALL(variable6
,COLOR_string___Object___to_s
))(variable6
) /*String::to_s*/;
933 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable6
) /*String::append*/;
934 variable7
= NEW_string___String___with_native(BOX_NativeString("("), TAG_Int(1)); /*new String*/
935 variable8
= variable7
;
936 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable8
) /*String::append*/;
937 variable9
= variable0
/*s*/;
938 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable9
) /*String::append*/;
939 variable10
= NEW_string___String___with_native(BOX_NativeString(")"), TAG_Int(1)); /*new String*/
940 variable11
= variable10
;
941 ((string___String___append_t
)CALL(variable2
,COLOR_abstract_collection___IndexedCollection___append
))(variable2
, variable11
) /*String::append*/;
942 variable1
= variable2
;
946 return_label27
: while(false);
947 tracehead
= trace
.prev
;
950 val_t
compiling_base___MMLocalProperty___cname(val_t self
) {
951 struct trace_t trace
= {NULL
, "compiling_base::MMLocalProperty::cname (src/compiling//compiling_base.nit:289,2--295:21)"};
956 trace
.prev
= tracehead
; tracehead
= &trace
;
957 variable0
= ATTR_compiling_base___MMLocalProperty____cname_cache( self
) /*MMLocalProperty::_cname_cache*/;
958 variable0
= TAG_Bool((variable0
== NIT_NULL
/*null*/) || ((variable0
!= NIT_NULL
) && UNTAG_Bool(((string___String_____eqeq_t
)CALL(variable0
,COLOR_kernel___Object_____eqeq
))(variable0
, NIT_NULL
/*null*/) /*String::==*/)));
959 if (UNTAG_Bool(variable0
)) { /*if*/
960 variable0
= NEW_array___Array___with_capacity(TAG_Int(3)); /*new Array[Symbol]*/
961 variable1
= ((abstractmetamodel___MMLocalProperty___concrete_property_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___concrete_property
))( self
) /*MMLocalProperty::concrete_property*/;
962 variable1
= ((abstractmetamodel___MMLocalProperty___module_t
)CALL(variable1
,COLOR_abstractmetamodel___MMLocalProperty___module
))(variable1
) /*MMConcreteProperty::module*/;
963 variable1
= ((abstractmetamodel___MMModule___name_t
)CALL(variable1
,COLOR_abstractmetamodel___MMModule___name
))(variable1
) /*MMModule::name*/;
964 ((array___AbstractArray___add_t
)CALL(variable0
,COLOR_abstract_collection___SimpleCollection___add
))(variable0
, variable1
) /*Array::add*/;
965 variable2
= ((abstractmetamodel___MMLocalProperty___concrete_property_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___concrete_property
))( self
) /*MMLocalProperty::concrete_property*/;
966 variable2
= ((abstractmetamodel___MMLocalProperty___local_class_t
)CALL(variable2
,COLOR_abstractmetamodel___MMLocalProperty___local_class
))(variable2
) /*MMConcreteProperty::local_class*/;
967 variable2
= ((abstractmetamodel___MMLocalClass___name_t
)CALL(variable2
,COLOR_abstractmetamodel___MMLocalClass___name
))(variable2
) /*MMLocalClass::name*/;
968 ((array___AbstractArray___add_t
)CALL(variable0
,COLOR_abstract_collection___SimpleCollection___add
))(variable0
, variable2
) /*Array::add*/;
969 variable3
= ((abstractmetamodel___MMLocalProperty___name_t
)CALL( self
,COLOR_abstractmetamodel___MMLocalProperty___name
))( self
) /*MMLocalProperty::name*/;
970 ((array___AbstractArray___add_t
)CALL(variable0
,COLOR_abstract_collection___SimpleCollection___add
))(variable0
, variable3
) /*Array::add*/;
971 variable0
= ((utils___Object___cmangle_t
)CALL( self
,COLOR_utils___Object___cmangle
))( self
, variable0
) /*MMLocalProperty::cmangle*/;
972 ATTR_compiling_base___MMLocalProperty____cname_cache( self
) /*MMLocalProperty::_cname_cache*/ = variable0
;
974 variable0
= ATTR_compiling_base___MMLocalProperty____cname_cache( self
) /*MMLocalProperty::_cname_cache*/;
976 return_label28
: while(false);
977 tracehead
= trace
.prev
;
980 val_t
compiling_base___MMLocalProperty___color_id_for_super(val_t self
) {
981 struct trace_t trace
= {NULL
, "compiling_base::MMLocalProperty::color_id_for_super (src/compiling//compiling_base.nit:298,2--301:30)"};
989 trace
.prev
= tracehead
; tracehead
= &trace
;
990 variable0
= NEW_string___String___init(); /*new String*/
991 variable1
= NEW_string___String___with_native(BOX_NativeString("COLOR_SUPER_"), TAG_Int(12)); /*new String*/
992 variable2
= variable1
;
993 ((string___String___append_t
)CALL(variable0
,COLOR_abstract_collection___IndexedCollection___append
))(variable0
, variable2
) /*String::append*/;
994 variable3
= ((compiling_base___MMLocalProperty___cname_t
)CALL( self
,COLOR_compiling_base___MMLocalProperty___cname
))( self
) /*MMLocalProperty::cname*/;
995 variable4
= variable3
;
996 ((string___String___append_t
)CALL(variable0
,COLOR_abstract_collection___IndexedCollection___append
))(variable0
, variable4
) /*String::append*/;
997 variable5
= NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
998 variable6
= variable5
;
999 ((string___String___append_t
)CALL(variable0
,COLOR_abstract_collection___IndexedCollection___append
))(variable0
, variable6
) /*String::append*/;
1000 goto return_label29
;
1001 return_label29
: while(false);
1002 tracehead
= trace
.prev
;