c_src/compiling_base._sep.c

   1 /* This C file is generated by NIT to compile module compiling_base. */
   2 #include "compiling_base._sep.h"
   3 val_t compiling_base___ToolContext___global(val_t  self) {
   4   struct trace_t trace = {NULL, LOCATE_compiling_base___ToolContext___global, 24};
   5   trace.prev = tracehead; tracehead = &trace;
   6   tracehead = trace.prev;
   7   return ATTR_compiling_base___ToolContext____global( self) /*ToolContext::_global*/;
   8 }
   9 void compiling_base___ToolContext___global__eq(val_t  self, val_t  param0) {
  10   struct trace_t trace = {NULL, LOCATE_compiling_base___ToolContext___global__eq, 24};
  11   trace.prev = tracehead; tracehead = &trace;
  12   ATTR_compiling_base___ToolContext____global( self) /*ToolContext::_global*/ =  param0;
  13   tracehead = trace.prev;
  14   return;
  15 }
  16 val_t compiling_base___ToolContext___attr_sim(val_t  self) {
  17   struct trace_t trace = {NULL, LOCATE_compiling_base___ToolContext___attr_sim, 25};
  18   trace.prev = tracehead; tracehead = &trace;
  19   tracehead = trace.prev;
  20   return ATTR_compiling_base___ToolContext____attr_sim( self) /*ToolContext::_attr_sim*/;
  21 }
  22 void compiling_base___ToolContext___attr_sim__eq(val_t  self, val_t  param0) {
  23   struct trace_t trace = {NULL, LOCATE_compiling_base___ToolContext___attr_sim__eq, 25};
  24   trace.prev = tracehead; tracehead = &trace;
  25   ATTR_compiling_base___ToolContext____attr_sim( self) /*ToolContext::_attr_sim*/ =  param0;
  26   tracehead = trace.prev;
  27   return;
  28 }
  29 val_t compiling_base___ToolContext___base_dir(val_t  self) {
  30   struct trace_t trace = {NULL, LOCATE_compiling_base___ToolContext___base_dir, 26};
  31   trace.prev = tracehead; tracehead = &trace;
  32   tracehead = trace.prev;
  33   return ATTR_compiling_base___ToolContext____base_dir( self) /*ToolContext::_base_dir*/;
  34 }
  35 void compiling_base___ToolContext___base_dir__eq(val_t  self, val_t  param0) {
  36   struct trace_t trace = {NULL, LOCATE_compiling_base___ToolContext___base_dir__eq, 26};
  37   trace.prev = tracehead; tracehead = &trace;
  38   ATTR_compiling_base___ToolContext____base_dir( self) /*ToolContext::_base_dir*/ =  param0;
  39   tracehead = trace.prev;
  40   return;
  41 }
  42 val_t compiling_base___ToolContext___clibdir(val_t  self) {
  43   struct trace_t trace = {NULL, LOCATE_compiling_base___ToolContext___clibdir, 27};
  44   trace.prev = tracehead; tracehead = &trace;
  45   tracehead = trace.prev;
  46   return ATTR_compiling_base___ToolContext____clibdir( self) /*ToolContext::_clibdir*/;
  47 }
  48 void compiling_base___ToolContext___clibdir__eq(val_t  self, val_t  param0) {
  49   struct trace_t trace = {NULL, LOCATE_compiling_base___ToolContext___clibdir__eq, 27};
  50   trace.prev = tracehead; tracehead = &trace;
  51   ATTR_compiling_base___ToolContext____clibdir( self) /*ToolContext::_clibdir*/ =  param0;
  52   tracehead = trace.prev;
  53   return;
  54 }
  55 val_t compiling_base___ToolContext___bindir(val_t  self) {
  56   struct trace_t trace = {NULL, LOCATE_compiling_base___ToolContext___bindir, 28};
  57   trace.prev = tracehead; tracehead = &trace;
  58   tracehead = trace.prev;
  59   return ATTR_compiling_base___ToolContext____bindir( self) /*ToolContext::_bindir*/;
  60 }
  61 void compiling_base___ToolContext___bindir__eq(val_t  self, val_t  param0) {
  62   struct trace_t trace = {NULL, LOCATE_compiling_base___ToolContext___bindir__eq, 28};
  63   trace.prev = tracehead; tracehead = &trace;
  64   ATTR_compiling_base___ToolContext____bindir( self) /*ToolContext::_bindir*/ =  param0;
  65   tracehead = trace.prev;
  66   return;
  67 }
  68 val_t compiling_base___ToolContext___output_file(val_t  self) {
  69   struct trace_t trace = {NULL, LOCATE_compiling_base___ToolContext___output_file, 29};
  70   trace.prev = tracehead; tracehead = &trace;
  71   tracehead = trace.prev;
  72   return ATTR_compiling_base___ToolContext____output_file( self) /*ToolContext::_output_file*/;
  73 }
  74 void compiling_base___ToolContext___output_file__eq(val_t  self, val_t  param0) {
  75   struct trace_t trace = {NULL, LOCATE_compiling_base___ToolContext___output_file__eq, 29};
  76   trace.prev = tracehead; tracehead = &trace;
  77   ATTR_compiling_base___ToolContext____output_file( self) /*ToolContext::_output_file*/ =  param0;
  78   tracehead = trace.prev;
  79   return;
  80 }
  81 val_t compiling_base___ToolContext___boost(val_t  self) {
  82   struct trace_t trace = {NULL, LOCATE_compiling_base___ToolContext___boost, 30};
  83   trace.prev = tracehead; tracehead = &trace;
  84   tracehead = trace.prev;
  85   return ATTR_compiling_base___ToolContext____boost( self) /*ToolContext::_boost*/;
  86 }
  87 void compiling_base___ToolContext___boost__eq(val_t  self, val_t  param0) {
  88   struct trace_t trace = {NULL, LOCATE_compiling_base___ToolContext___boost__eq, 30};
  89   trace.prev = tracehead; tracehead = &trace;
  90   ATTR_compiling_base___ToolContext____boost( self) /*ToolContext::_boost*/ =  param0;
  91   tracehead = trace.prev;
  92   return;
  93 }
  94 val_t compiling_base___ToolContext___no_cc(val_t  self) {
  95   struct trace_t trace = {NULL, LOCATE_compiling_base___ToolContext___no_cc, 31};
  96   trace.prev = tracehead; tracehead = &trace;
  97   tracehead = trace.prev;
  98   return ATTR_compiling_base___ToolContext____no_cc( self) /*ToolContext::_no_cc*/;
  99 }
 100 void compiling_base___ToolContext___no_cc__eq(val_t  self, val_t  param0) {
 101   struct trace_t trace = {NULL, LOCATE_compiling_base___ToolContext___no_cc__eq, 31};
 102   trace.prev = tracehead; tracehead = &trace;
 103   ATTR_compiling_base___ToolContext____no_cc( self) /*ToolContext::_no_cc*/ =  param0;
 104   tracehead = trace.prev;
 105   return;
 106 }
 107 val_t compiling_base___ToolContext___ext_prefix(val_t  self) {
 108   struct trace_t trace = {NULL, LOCATE_compiling_base___ToolContext___ext_prefix, 32};
 109   trace.prev = tracehead; tracehead = &trace;
 110   tracehead = trace.prev;
 111   return ATTR_compiling_base___ToolContext____ext_prefix( self) /*ToolContext::_ext_prefix*/;
 112 }
 113 void compiling_base___ToolContext___ext_prefix__eq(val_t  self, val_t  param0) {
 114   struct trace_t trace = {NULL, LOCATE_compiling_base___ToolContext___ext_prefix__eq, 32};
 115   trace.prev = tracehead; tracehead = &trace;
 116   ATTR_compiling_base___ToolContext____ext_prefix( self) /*ToolContext::_ext_prefix*/ =  param0;
 117   tracehead = trace.prev;
 118   return;
 119 }
 120 void compiling_base___CompilerVisitor___add_decl(val_t  self, val_t  param0) {
 121   struct trace_t trace = {NULL, LOCATE_compiling_base___CompilerVisitor___add_decl, 39};
 122   val_t variable0;
 123   val_t variable1;
 124     val_t variable2;
 125     val_t variable3;
 126   trace.prev = tracehead; tracehead = &trace;
 127   variable0 =  param0;
 128   variable1 = ATTR_compiling_base___CompilerVisitor____indent_level( self) /*CompilerVisitor::_indent_level*/;
 129   variable1 = TAG_Bool(UNTAG_Int(variable1)>=UNTAG_Int( TAG_Int(8)));
 130   if (UNTAG_Bool(variable1)) { /*if*/
 131     variable1 = ATTR_compiling_base___CompilerVisitor____ctx( self) /*CompilerVisitor::_ctx*/;
 132     variable1 = ((compiling_base___CContext___decls_t)CALL(variable1,COLOR_compiling_base___CContext___decls))(variable1) /*CContext::decls*/;
 133     variable2 = NEW_string___String___with_native(BOX_NativeString("\t\t"), TAG_Int(2)); /*new String*/
 134     variable2 = ((string___String_____plus_t)CALL(variable2,COLOR_string___String_____plus))(variable2,  variable0 /*s*/) /*String::+*/;
 135     ((array___AbstractArray___add_t)CALL(variable1,COLOR_abstract_collection___SimpleCollection___add))(variable1, variable2) /*Array::add*/;
 136   } else { /*if*/
 137     variable1 = ATTR_compiling_base___CompilerVisitor____ctx( self) /*CompilerVisitor::_ctx*/;
 138     variable1 = ((compiling_base___CContext___decls_t)CALL(variable1,COLOR_compiling_base___CContext___decls))(variable1) /*CContext::decls*/;
 139     variable2 = NEW_string___String___with_native(BOX_NativeString("  "), TAG_Int(2)); /*new String*/
 140     variable3 = ATTR_compiling_base___CompilerVisitor____indent_level( self) /*CompilerVisitor::_indent_level*/;
 141     variable2 = ((string___String_____star_t)CALL(variable2,COLOR_string___String_____star))(variable2, variable3) /*String::**/;
 142     variable2 = ((string___String_____plus_t)CALL(variable2,COLOR_string___String_____plus))(variable2,  variable0 /*s*/) /*String::+*/;
 143     ((array___AbstractArray___add_t)CALL(variable1,COLOR_abstract_collection___SimpleCollection___add))(variable1, variable2) /*Array::add*/;
 144   }
 145   tracehead = trace.prev;
 146   return;
 147 }
 148 void compiling_base___CompilerVisitor___add_instr(val_t  self, val_t  param0) {
 149   struct trace_t trace = {NULL, LOCATE_compiling_base___CompilerVisitor___add_instr, 49};
 150   val_t variable0;
 151   val_t variable1;
 152     val_t variable2;
 153     val_t variable3;
 154   trace.prev = tracehead; tracehead = &trace;
 155   variable0 =  param0;
 156   variable1 = ATTR_compiling_base___CompilerVisitor____indent_level( self) /*CompilerVisitor::_indent_level*/;
 157   variable1 = TAG_Bool(UNTAG_Int(variable1)>=UNTAG_Int( TAG_Int(8)));
 158   if (UNTAG_Bool(variable1)) { /*if*/
 159     variable1 = ATTR_compiling_base___CompilerVisitor____ctx( self) /*CompilerVisitor::_ctx*/;
 160     variable1 = ((compiling_base___CContext___instrs_t)CALL(variable1,COLOR_compiling_base___CContext___instrs))(variable1) /*CContext::instrs*/;
 161     variable2 = NEW_string___String___with_native(BOX_NativeString("\t\t"), TAG_Int(2)); /*new String*/
 162     variable2 = ((string___String_____plus_t)CALL(variable2,COLOR_string___String_____plus))(variable2,  variable0 /*s*/) /*String::+*/;
 163     ((array___AbstractArray___add_t)CALL(variable1,COLOR_abstract_collection___SimpleCollection___add))(variable1, variable2) /*Array::add*/;
 164   } else { /*if*/
 165     variable1 = ATTR_compiling_base___CompilerVisitor____ctx( self) /*CompilerVisitor::_ctx*/;
 166     variable1 = ((compiling_base___CContext___instrs_t)CALL(variable1,COLOR_compiling_base___CContext___instrs))(variable1) /*CContext::instrs*/;
 167     variable2 = NEW_string___String___with_native(BOX_NativeString("  "), TAG_Int(2)); /*new String*/
 168     variable3 = ATTR_compiling_base___CompilerVisitor____indent_level( self) /*CompilerVisitor::_indent_level*/;
 169     variable2 = ((string___String_____star_t)CALL(variable2,COLOR_string___String_____star))(variable2, variable3) /*String::**/;
 170     variable2 = ((string___String_____plus_t)CALL(variable2,COLOR_string___String_____plus))(variable2,  variable0 /*s*/) /*String::+*/;
 171     ((array___AbstractArray___add_t)CALL(variable1,COLOR_abstract_collection___SimpleCollection___add))(variable1, variable2) /*Array::add*/;
 172   }
 173   tracehead = trace.prev;
 174   return;
 175 }
 176 val_t compiling_base___CompilerVisitor___new_number(val_t  self) {
 177   struct trace_t trace = {NULL, LOCATE_compiling_base___CompilerVisitor___new_number, 59};
 178   val_t variable0;
 179   val_t variable1;
 180   trace.prev = tracehead; tracehead = &trace;
 181   variable1 = ATTR_compiling_base___CompilerVisitor____number_cpt( self) /*CompilerVisitor::_number_cpt*/;
 182   variable0 = variable1;
 183   variable1 = TAG_Int(UNTAG_Int( variable0 /*res*/)+UNTAG_Int( TAG_Int(1)));
 184   ATTR_compiling_base___CompilerVisitor____number_cpt( self) /*CompilerVisitor::_number_cpt*/ = variable1;
 185   variable0 =  variable0 /*res*/;
 186   goto return_label2;
 187   return_label2: while(false);
 188   tracehead = trace.prev;
 189   return variable0;
 190 }
 191 void compiling_base___CompilerVisitor___indent(val_t  self) {
 192   struct trace_t trace = {NULL, LOCATE_compiling_base___CompilerVisitor___indent, 69};
 193   trace.prev = tracehead; tracehead = &trace;
 194   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)));
 195   tracehead = trace.prev;
 196   return;
 197 }
 198 void compiling_base___CompilerVisitor___unindent(val_t  self) {
 199   struct trace_t trace = {NULL, LOCATE_compiling_base___CompilerVisitor___unindent, 73};
 200   val_t variable0;
 201   trace.prev = tracehead; tracehead = &trace;
 202   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)));
 203   variable0 = ATTR_compiling_base___CompilerVisitor____indent_level( self) /*CompilerVisitor::_indent_level*/;
 204   variable0 = TAG_Bool(UNTAG_Int(variable0)<UNTAG_Int( TAG_Int(0)));
 205   if (UNTAG_Bool(variable0)) { /*if*/
 206     ATTR_compiling_base___CompilerVisitor____indent_level( self) /*CompilerVisitor::_indent_level*/ =  TAG_Int(0);
 207   }
 208   tracehead = trace.prev;
 209   return;
 210 }
 211 val_t compiling_base___CompilerVisitor___to_s(val_t  self) {
 212   struct trace_t trace = {NULL, LOCATE_compiling_base___CompilerVisitor___to_s, 80};
 213   val_t variable0;
 214   val_t variable1;
 215   trace.prev = tracehead; tracehead = &trace;
 216   variable1 = NEW_array___Array___init(); /*new Array[String]*/
 217   variable0 = variable1;
 218   variable1 = ATTR_compiling_base___CompilerVisitor____ctx( self) /*CompilerVisitor::_ctx*/;
 219   variable1 = ((compiling_base___CContext___decls_t)CALL(variable1,COLOR_compiling_base___CContext___decls))(variable1) /*CContext::decls*/;
 220   ((abstract_collection___IndexedCollection___append_t)CALL( variable0 /*out*/,COLOR_abstract_collection___IndexedCollection___append))( variable0 /*out*/, variable1) /*Array::append*/;
 221   variable1 = ATTR_compiling_base___CompilerVisitor____ctx( self) /*CompilerVisitor::_ctx*/;
 222   variable1 = ((compiling_base___CContext___instrs_t)CALL(variable1,COLOR_compiling_base___CContext___instrs))(variable1) /*CContext::instrs*/;
 223   ((abstract_collection___IndexedCollection___append_t)CALL( variable0 /*out*/,COLOR_abstract_collection___IndexedCollection___append))( variable0 /*out*/, variable1) /*Array::append*/;
 224   variable1 = NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
 225   ((array___AbstractArray___add_t)CALL( variable0 /*out*/,COLOR_abstract_collection___SimpleCollection___add))( variable0 /*out*/, variable1) /*Array::add*/;
 226   variable1 = NEW_string___String___with_native(BOX_NativeString("\n"), TAG_Int(1)); /*new String*/
 227   variable1 = ((string___Collection___join_t)CALL( variable0 /*out*/,COLOR_string___Collection___join))( variable0 /*out*/, variable1) /*Array::join*/;
 228   variable0 = variable1;
 229   goto return_label5;
 230   return_label5: while(false);
 231   tracehead = trace.prev;
 232   return variable0;
 233 }
 234 val_t compiling_base___CompilerVisitor___module(val_t  self) {
 235   struct trace_t trace = {NULL, LOCATE_compiling_base___CompilerVisitor___module, 90};
 236   trace.prev = tracehead; tracehead = &trace;
 237   tracehead = trace.prev;
 238   return ATTR_compiling_base___CompilerVisitor____module( self) /*CompilerVisitor::_module*/;
 239 }
 240 void compiling_base___CompilerVisitor___module__eq(val_t  self, val_t  param0) {
 241   struct trace_t trace = {NULL, LOCATE_compiling_base___CompilerVisitor___module__eq, 90};
 242   trace.prev = tracehead; tracehead = &trace;
 243   ATTR_compiling_base___CompilerVisitor____module( self) /*CompilerVisitor::_module*/ =  param0;
 244   tracehead = trace.prev;
 245   return;
 246 }
 247 val_t compiling_base___CompilerVisitor___ctx(val_t  self) {
 248   struct trace_t trace = {NULL, LOCATE_compiling_base___CompilerVisitor___ctx, 93};
 249   trace.prev = tracehead; tracehead = &trace;
 250   tracehead = trace.prev;
 251   return ATTR_compiling_base___CompilerVisitor____ctx( self) /*CompilerVisitor::_ctx*/;
 252 }
 253 void compiling_base___CompilerVisitor___ctx__eq(val_t  self, val_t  param0) {
 254   struct trace_t trace = {NULL, LOCATE_compiling_base___CompilerVisitor___ctx__eq, 93};
 255   trace.prev = tracehead; tracehead = &trace;
 256   ATTR_compiling_base___CompilerVisitor____ctx( self) /*CompilerVisitor::_ctx*/ =  param0;
 257   tracehead = trace.prev;
 258   return;
 259 }
 260 val_t compiling_base___CompilerVisitor___indent_level(val_t  self) {
 261   struct trace_t trace = {NULL, LOCATE_compiling_base___CompilerVisitor___indent_level, 96};
 262   trace.prev = tracehead; tracehead = &trace;
 263   tracehead = trace.prev;
 264   return ATTR_compiling_base___CompilerVisitor____indent_level( self) /*CompilerVisitor::_indent_level*/;
 265 }
 266 void compiling_base___CompilerVisitor___indent_level__eq(val_t  self, val_t  param0) {
 267   struct trace_t trace = {NULL, LOCATE_compiling_base___CompilerVisitor___indent_level__eq, 96};
 268   trace.prev = tracehead; tracehead = &trace;
 269   ATTR_compiling_base___CompilerVisitor____indent_level( self) /*CompilerVisitor::_indent_level*/ =  param0;
 270   tracehead = trace.prev;
 271   return;
 272 }
 273 val_t compiling_base___CompilerVisitor___tc(val_t  self) {
 274   struct trace_t trace = {NULL, LOCATE_compiling_base___CompilerVisitor___tc, 99};
 275   trace.prev = tracehead; tracehead = &trace;
 276   tracehead = trace.prev;
 277   return ATTR_compiling_base___CompilerVisitor____tc( self) /*CompilerVisitor::_tc*/;
 278 }
 279 void compiling_base___CompilerVisitor___tc__eq(val_t  self, val_t  param0) {
 280   struct trace_t trace = {NULL, LOCATE_compiling_base___CompilerVisitor___tc__eq, 99};
 281   trace.prev = tracehead; tracehead = &trace;
 282   ATTR_compiling_base___CompilerVisitor____tc( self) /*CompilerVisitor::_tc*/ =  param0;
 283   tracehead = trace.prev;
 284   return;
 285 }
 286 void compiling_base___CompilerVisitor___init(val_t  self, val_t  param0, int* init_table) {
 287   struct trace_t trace = {NULL, LOCATE_compiling_base___CompilerVisitor___init, 102};
 288   val_t variable0;
 289   trace.prev = tracehead; tracehead = &trace;
 290   variable0 =  param0;
 291   if (init_table[VAL2OBJ( self)->vft[INIT_TABLE_POS_CompilerVisitor].i]) return;
 292   ATTR_compiling_base___CompilerVisitor____module( self) /*CompilerVisitor::_module*/ =  variable0 /*module*/;
 293   init_table[VAL2OBJ( self)->vft[INIT_TABLE_POS_CompilerVisitor].i] = 1;
 294   tracehead = trace.prev;
 295   return;
 296 }
 297 val_t compiling_base___CContext___decls(val_t  self) {
 298   struct trace_t trace = {NULL, LOCATE_compiling_base___CContext___decls, 109};
 299   trace.prev = tracehead; tracehead = &trace;
 300   tracehead = trace.prev;
 301   return ATTR_compiling_base___CContext____decls( self) /*CContext::_decls*/;
 302 }
 303 val_t compiling_base___CContext___instrs(val_t  self) {
 304   struct trace_t trace = {NULL, LOCATE_compiling_base___CContext___instrs, 110};
 305   trace.prev = tracehead; tracehead = &trace;
 306   tracehead = trace.prev;
 307   return ATTR_compiling_base___CContext____instrs( self) /*CContext::_instrs*/;
 308 }
 309 void compiling_base___CContext___append(val_t  self, val_t  param0) {
 310   struct trace_t trace = {NULL, LOCATE_compiling_base___CContext___append, 112};
 311   val_t variable0;
 312   val_t variable1;
 313   val_t variable2;
 314   trace.prev = tracehead; tracehead = &trace;
 315   variable0 =  param0;
 316   variable1 = ATTR_compiling_base___CContext____instrs( self) /*CContext::_instrs*/;
 317   variable2 = ((compiling_base___CContext___decls_t)CALL( variable0 /*c*/,COLOR_compiling_base___CContext___decls))( variable0 /*c*/) /*CContext::decls*/;
 318   ((abstract_collection___IndexedCollection___append_t)CALL(variable1,COLOR_abstract_collection___IndexedCollection___append))(variable1, variable2) /*Array::append*/;
 319   variable1 = ATTR_compiling_base___CContext____instrs( self) /*CContext::_instrs*/;
 320   variable2 = ((compiling_base___CContext___instrs_t)CALL( variable0 /*c*/,COLOR_compiling_base___CContext___instrs))( variable0 /*c*/) /*CContext::instrs*/;
 321   ((abstract_collection___IndexedCollection___append_t)CALL(variable1,COLOR_abstract_collection___IndexedCollection___append))(variable1, variable2) /*Array::append*/;
 322   tracehead = trace.prev;
 323   return;
 324 }
 325 void compiling_base___CContext___init(val_t  self, int* init_table) {
 326   struct trace_t trace = {NULL, LOCATE_compiling_base___CContext___init, 118};
 327   trace.prev = tracehead; tracehead = &trace;
 328   if (init_table[VAL2OBJ( self)->vft[INIT_TABLE_POS_CContext].i]) return;
 329   init_table[VAL2OBJ( self)->vft[INIT_TABLE_POS_CContext].i] = 1;
 330   tracehead = trace.prev;
 331   return;
 332 }
 333 val_t compiling_base___MMGlobalProperty___meth_call(val_t  self) {
 334   struct trace_t trace = {NULL, LOCATE_compiling_base___MMGlobalProperty___meth_call, 122};
 335   val_t variable0;
 336   val_t variable1;
 337   val_t variable2;
 338   val_t variable3;
 339   val_t variable4;
 340   val_t variable5;
 341   val_t variable6;
 342   trace.prev = tracehead; tracehead = &trace;
 343   variable0 = NEW_string___String___init(); /*new String*/
 344   variable1 = NEW_string___String___with_native(BOX_NativeString("CALL_"), TAG_Int(5)); /*new String*/
 345   variable2 = variable1;
 346   ((string___String___append_t)CALL(variable0,COLOR_abstract_collection___IndexedCollection___append))(variable0, variable2) /*String::append*/;
 347   variable3 = ((abstractmetamodel___MMGlobalProperty___intro_t)CALL( self,COLOR_abstractmetamodel___MMGlobalProperty___intro))( self) /*MMGlobalProperty::intro*/;
 348   variable3 = ((compiling_base___MMLocalProperty___cname_t)CALL(variable3,COLOR_compiling_base___MMLocalProperty___cname))(variable3) /*MMConcreteProperty::cname*/;
 349   variable4 = variable3;
 350   ((string___String___append_t)CALL(variable0,COLOR_abstract_collection___IndexedCollection___append))(variable0, variable4) /*String::append*/;
 351   variable5 = NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
 352   variable6 = variable5;
 353   ((string___String___append_t)CALL(variable0,COLOR_abstract_collection___IndexedCollection___append))(variable0, variable6) /*String::append*/;
 354   goto return_label9;
 355   return_label9: while(false);
 356   tracehead = trace.prev;
 357   return variable0;
 358 }
 359 val_t compiling_base___MMGlobalProperty___attr_access(val_t  self) {
 360   struct trace_t trace = {NULL, LOCATE_compiling_base___MMGlobalProperty___attr_access, 128};
 361   val_t variable0;
 362   val_t variable1;
 363   val_t variable2;
 364   val_t variable3;
 365   val_t variable4;
 366   val_t variable5;
 367   val_t variable6;
 368   trace.prev = tracehead; tracehead = &trace;
 369   variable0 = NEW_string___String___init(); /*new String*/
 370   variable1 = NEW_string___String___with_native(BOX_NativeString("ATTR_"), TAG_Int(5)); /*new String*/
 371   variable2 = variable1;
 372   ((string___String___append_t)CALL(variable0,COLOR_abstract_collection___IndexedCollection___append))(variable0, variable2) /*String::append*/;
 373   variable3 = ((abstractmetamodel___MMGlobalProperty___intro_t)CALL( self,COLOR_abstractmetamodel___MMGlobalProperty___intro))( self) /*MMGlobalProperty::intro*/;
 374   variable3 = ((compiling_base___MMLocalProperty___cname_t)CALL(variable3,COLOR_compiling_base___MMLocalProperty___cname))(variable3) /*MMConcreteProperty::cname*/;
 375   variable4 = variable3;
 376   ((string___String___append_t)CALL(variable0,COLOR_abstract_collection___IndexedCollection___append))(variable0, variable4) /*String::append*/;
 377   variable5 = NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
 378   variable6 = variable5;
 379   ((string___String___append_t)CALL(variable0,COLOR_abstract_collection___IndexedCollection___append))(variable0, variable6) /*String::append*/;
 380   goto return_label10;
 381   return_label10: while(false);
 382   tracehead = trace.prev;
 383   return variable0;
 384 }
 385 val_t compiling_base___MMGlobalProperty___color_id(val_t  self) {
 386   struct trace_t trace = {NULL, LOCATE_compiling_base___MMGlobalProperty___color_id, 134};
 387   val_t variable0;
 388   val_t variable1;
 389   val_t variable2;
 390   val_t variable3;
 391   val_t variable4;
 392   val_t variable5;
 393   val_t variable6;
 394   trace.prev = tracehead; tracehead = &trace;
 395   variable0 = NEW_string___String___init(); /*new String*/
 396   variable1 = NEW_string___String___with_native(BOX_NativeString("COLOR_"), TAG_Int(6)); /*new String*/
 397   variable2 = variable1;
 398   ((string___String___append_t)CALL(variable0,COLOR_abstract_collection___IndexedCollection___append))(variable0, variable2) /*String::append*/;
 399   variable3 = ((abstractmetamodel___MMGlobalProperty___intro_t)CALL( self,COLOR_abstractmetamodel___MMGlobalProperty___intro))( self) /*MMGlobalProperty::intro*/;
 400   variable3 = ((compiling_base___MMLocalProperty___cname_t)CALL(variable3,COLOR_compiling_base___MMLocalProperty___cname))(variable3) /*MMConcreteProperty::cname*/;
 401   variable4 = variable3;
 402   ((string___String___append_t)CALL(variable0,COLOR_abstract_collection___IndexedCollection___append))(variable0, variable4) /*String::append*/;
 403   variable5 = NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
 404   variable6 = variable5;
 405   ((string___String___append_t)CALL(variable0,COLOR_abstract_collection___IndexedCollection___append))(variable0, variable6) /*String::append*/;
 406   goto return_label11;
 407   return_label11: while(false);
 408   tracehead = trace.prev;
 409   return variable0;
 410 }
 411 val_t compiling_base___MMGlobalClass___id_id(val_t  self) {
 412   struct trace_t trace = {NULL, LOCATE_compiling_base___MMGlobalClass___id_id, 143};
 413   val_t variable0;
 414   val_t variable1;
 415   val_t variable2;
 416   val_t variable3;
 417   val_t variable4;
 418   val_t variable5;
 419   val_t variable6;
 420   trace.prev = tracehead; tracehead = &trace;
 421   variable0 = NEW_string___String___init(); /*new String*/
 422   variable1 = NEW_string___String___with_native(BOX_NativeString("ID_"), TAG_Int(3)); /*new String*/
 423   variable2 = variable1;
 424   ((string___String___append_t)CALL(variable0,COLOR_abstract_collection___IndexedCollection___append))(variable0, variable2) /*String::append*/;
 425   variable3 = ((abstractmetamodel___MMGlobalClass___intro_t)CALL( self,COLOR_abstractmetamodel___MMGlobalClass___intro))( self) /*MMGlobalClass::intro*/;
 426   variable3 = ((abstractmetamodel___MMLocalClass___name_t)CALL(variable3,COLOR_abstractmetamodel___MMLocalClass___name))(variable3) /*MMLocalClass::name*/;
 427   variable4 = variable3;
 428   variable4 = ((string___String___to_s_t)CALL(variable4,COLOR_string___Object___to_s))(variable4) /*String::to_s*/;
 429   ((string___String___append_t)CALL(variable0,COLOR_abstract_collection___IndexedCollection___append))(variable0, variable4) /*String::append*/;
 430   variable5 = NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
 431   variable6 = variable5;
 432   ((string___String___append_t)CALL(variable0,COLOR_abstract_collection___IndexedCollection___append))(variable0, variable6) /*String::append*/;
 433   goto return_label12;
 434   return_label12: while(false);
 435   tracehead = trace.prev;
 436   return variable0;
 437 }
 438 val_t compiling_base___MMGlobalClass___color_id(val_t  self) {
 439   struct trace_t trace = {NULL, LOCATE_compiling_base___MMGlobalClass___color_id, 149};
 440   val_t variable0;
 441   val_t variable1;
 442   val_t variable2;
 443   val_t variable3;
 444   val_t variable4;
 445   val_t variable5;
 446   val_t variable6;
 447   trace.prev = tracehead; tracehead = &trace;
 448   variable0 = NEW_string___String___init(); /*new String*/
 449   variable1 = NEW_string___String___with_native(BOX_NativeString("COLOR_"), TAG_Int(6)); /*new String*/
 450   variable2 = variable1;
 451   ((string___String___append_t)CALL(variable0,COLOR_abstract_collection___IndexedCollection___append))(variable0, variable2) /*String::append*/;
 452   variable3 = ((abstractmetamodel___MMGlobalClass___intro_t)CALL( self,COLOR_abstractmetamodel___MMGlobalClass___intro))( self) /*MMGlobalClass::intro*/;
 453   variable3 = ((abstractmetamodel___MMLocalClass___name_t)CALL(variable3,COLOR_abstractmetamodel___MMLocalClass___name))(variable3) /*MMLocalClass::name*/;
 454   variable4 = variable3;
 455   variable4 = ((string___String___to_s_t)CALL(variable4,COLOR_string___Object___to_s))(variable4) /*String::to_s*/;
 456   ((string___String___append_t)CALL(variable0,COLOR_abstract_collection___IndexedCollection___append))(variable0, variable4) /*String::append*/;
 457   variable5 = NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
 458   variable6 = variable5;
 459   ((string___String___append_t)CALL(variable0,COLOR_abstract_collection___IndexedCollection___append))(variable0, variable6) /*String::append*/;
 460   goto return_label13;
 461   return_label13: while(false);
 462   tracehead = trace.prev;
 463   return variable0;
 464 }
 465 val_t compiling_base___MMGlobalClass___init_table_pos_id(val_t  self) {
 466   struct trace_t trace = {NULL, LOCATE_compiling_base___MMGlobalClass___init_table_pos_id, 155};
 467   val_t variable0;
 468   val_t variable1;
 469   val_t variable2;
 470   val_t variable3;
 471   val_t variable4;
 472   val_t variable5;
 473   val_t variable6;
 474   trace.prev = tracehead; tracehead = &trace;
 475   variable0 = NEW_string___String___init(); /*new String*/
 476   variable1 = NEW_string___String___with_native(BOX_NativeString("INIT_TABLE_POS_"), TAG_Int(15)); /*new String*/
 477   variable2 = variable1;
 478   ((string___String___append_t)CALL(variable0,COLOR_abstract_collection___IndexedCollection___append))(variable0, variable2) /*String::append*/;
 479   variable3 = ((abstractmetamodel___MMGlobalClass___intro_t)CALL( self,COLOR_abstractmetamodel___MMGlobalClass___intro))( self) /*MMGlobalClass::intro*/;
 480   variable3 = ((abstractmetamodel___MMLocalClass___name_t)CALL(variable3,COLOR_abstractmetamodel___MMLocalClass___name))(variable3) /*MMLocalClass::name*/;
 481   variable4 = variable3;
 482   variable4 = ((string___String___to_s_t)CALL(variable4,COLOR_string___Object___to_s))(variable4) /*String::to_s*/;
 483   ((string___String___append_t)CALL(variable0,COLOR_abstract_collection___IndexedCollection___append))(variable0, variable4) /*String::append*/;
 484   variable5 = NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
 485   variable6 = variable5;
 486   ((string___String___append_t)CALL(variable0,COLOR_abstract_collection___IndexedCollection___append))(variable0, variable6) /*String::append*/;
 487   goto return_label14;
 488   return_label14: while(false);
 489   tracehead = trace.prev;
 490   return variable0;
 491 }
 492 val_t compiling_base___MMLocalClass___primitive_info(val_t  self) {
 493   struct trace_t trace = {NULL, LOCATE_compiling_base___MMLocalClass___primitive_info, 169};
 494   val_t variable0;
 495   val_t variable1;
 496   static val_t once_value_variable1_16; static int once_bool_variable1_16;
 497   val_t variable2;
 498     val_t variable3;
 499       val_t variable4;
 500   trace.prev = tracehead; tracehead = &trace;
 501   variable0 = ATTR_compiling_base___MMLocalClass____primitive_info_b( self) /*MMLocalClass::_primitive_info_b*/;
 502   variable0 = TAG_Bool((variable0)==( TAG_Bool(true)));
 503   if (UNTAG_Bool(variable0)) { /*if*/
 504     variable0 = ATTR_compiling_base___MMLocalClass____primitive_info_cache( self) /*MMLocalClass::_primitive_info_cache*/;
 505     goto return_label15;
 506   }
 507   if (once_bool_variable1_16) variable1 = once_value_variable1_16;
 508   else {
 509     variable1 = ((compiling_base___MMLocalClass___primitive_ctypes_t)CALL( self,COLOR_compiling_base___MMLocalClass___primitive_ctypes))( self) /*MMLocalClass::primitive_ctypes*/;
 510     once_value_variable1_16 = variable1;
 511     once_bool_variable1_16 = true;
 512   }
 513   variable0 = variable1;
 514   variable1 = ((abstractmetamodel___MMLocalClass___name_t)CALL( self,COLOR_abstractmetamodel___MMLocalClass___name))( self) /*MMLocalClass::name*/;
 515   variable1 = ((abstract_collection___CoupleMap___has_key_t)CALL( variable0 /*ctypes*/,COLOR_abstract_collection___Map___has_key))( variable0 /*ctypes*/, variable1) /*HashMap::has_key*/;
 516   if (UNTAG_Bool(variable1)) { /*if*/
 517     variable1 = ((abstractmetamodel___MMLocalClass___name_t)CALL( self,COLOR_abstractmetamodel___MMLocalClass___name))( self) /*MMLocalClass::name*/;
 518     variable1 = ((abstract_collection___CoupleMap_____bra_t)CALL( variable0 /*ctypes*/,COLOR_abstract_collection___Map_____bra))( variable0 /*ctypes*/, variable1) /*HashMap::[]*/;
 519     ATTR_compiling_base___MMLocalClass____primitive_info_cache( self) /*MMLocalClass::_primitive_info_cache*/ = variable1;
 520     ATTR_compiling_base___MMLocalClass____primitive_info_b( self) /*MMLocalClass::_primitive_info_b*/ =  TAG_Bool(true);
 521     variable1 = ATTR_compiling_base___MMLocalClass____primitive_info_cache( self) /*MMLocalClass::_primitive_info_cache*/;
 522     variable0 = variable1;
 523     goto return_label15;
 524   }
 525   variable2 = ((hash___HashMap___iterator_t)CALL( variable0 /*ctypes*/,COLOR_abstract_collection___Collection___iterator))( variable0 /*ctypes*/) /*HashMap::iterator*/;
 526   variable1 = variable2;
 527   while (true) { /*while*/
 528     variable2 = ((hash___HashMapIterator___is_ok_t)CALL( variable1 /*i*/,COLOR_abstract_collection___Iterator___is_ok))( variable1 /*i*/) /*HashMapIterator::is_ok*/;
 529     if (!UNTAG_Bool(variable2)) break; /* while*/
 530     variable3 = ((hash___HashMapIterator___key_t)CALL( variable1 /*i*/,COLOR_abstract_collection___MapIterator___key))( variable1 /*i*/) /*HashMapIterator::key*/;
 531     variable2 = variable3;
 532     variable3 = ((abstractmetamodel___MMLocalClass___module_t)CALL( self,COLOR_abstractmetamodel___MMLocalClass___module))( self) /*MMLocalClass::module*/;
 533     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*/;
 534     if (UNTAG_Bool(variable3)) { /*if*/
 535       variable4 = ((abstractmetamodel___MMLocalClass___module_t)CALL( self,COLOR_abstractmetamodel___MMLocalClass___module))( self) /*MMLocalClass::module*/;
 536       variable4 = ((abstractmetamodel___MMModule___class_by_name_t)CALL(variable4,COLOR_abstractmetamodel___MMModule___class_by_name))(variable4,  variable2 /*n*/) /*MMModule::class_by_name*/;
 537       variable3 = variable4;
 538       variable4 = ((abstractmetamodel___MMLocalClass___cshe_t)CALL( self,COLOR_abstractmetamodel___MMLocalClass___cshe))( self) /*MMLocalClass::cshe*/;
 539       variable4 = ((partial_order___PartialOrderElement_____l_t)CALL(variable4,COLOR_partial_order___PartialOrderElement_____l))(variable4,  variable3 /*c*/) /*PartialOrderElement::<*/;
 540       if (UNTAG_Bool(variable4)) { /*if*/
 541         variable4 = ((hash___HashMapIterator___item_t)CALL( variable1 /*i*/,COLOR_abstract_collection___Iterator___item))( variable1 /*i*/) /*HashMapIterator::item*/;
 542         ATTR_compiling_base___MMLocalClass____primitive_info_cache( self) /*MMLocalClass::_primitive_info_cache*/ = variable4;
 543         ATTR_compiling_base___MMLocalClass____primitive_info_b( self) /*MMLocalClass::_primitive_info_b*/ =  TAG_Bool(true);
 544         variable4 = ATTR_compiling_base___MMLocalClass____primitive_info_cache( self) /*MMLocalClass::_primitive_info_cache*/;
 545         variable0 = variable4;
 546         goto return_label15;
 547       }
 548     }
 549     ((hash___HashMapIterator___next_t)CALL( variable1 /*i*/,COLOR_abstract_collection___Iterator___next))( variable1 /*i*/) /*HashMapIterator::next*/;
 550     continue_17: while(0);
 551   }
 552   break_17: while(0);
 553   ATTR_compiling_base___MMLocalClass____primitive_info_b( self) /*MMLocalClass::_primitive_info_b*/ =  TAG_Bool(true);
 554   variable0 =  NIT_NULL /*null*/;
 555   goto return_label15;
 556   return_label15: while(false);
 557   tracehead = trace.prev;
 558   return variable0;
 559 }
 560 val_t compiling_base___MMLocalClass___primitive_ctypes(val_t  self) {
 561   struct trace_t trace = {NULL, LOCATE_compiling_base___MMLocalClass___primitive_ctypes, 199};
 562   val_t variable0;
 563   val_t variable1;
 564   val_t variable2;
 565   val_t variable3;
 566   val_t variable4;
 567   val_t variable5;
 568   val_t variable6;
 569   val_t variable7;
 570   val_t variable8;
 571   val_t variable9;
 572   val_t variable10;
 573   val_t variable11;
 574   trace.prev = tracehead; tracehead = &trace;
 575   variable1 = NEW_hash___HashMap___init(); /*new HashMap[Symbol, PrimitiveInfo]*/
 576   variable0 = variable1;
 577   variable2 = NEW_array___Array___with_capacity(TAG_Int(7)); /*new Array[String]*/
 578   variable3 = NEW_string___String___with_native(BOX_NativeString("Int"), TAG_Int(3)); /*new String*/
 579   ((array___AbstractArray___add_t)CALL(variable2,COLOR_abstract_collection___SimpleCollection___add))(variable2, variable3) /*Array::add*/;
 580   variable4 = NEW_string___String___with_native(BOX_NativeString("Char"), TAG_Int(4)); /*new String*/
 581   ((array___AbstractArray___add_t)CALL(variable2,COLOR_abstract_collection___SimpleCollection___add))(variable2, variable4) /*Array::add*/;
 582   variable5 = NEW_string___String___with_native(BOX_NativeString("Bool"), TAG_Int(4)); /*new String*/
 583   ((array___AbstractArray___add_t)CALL(variable2,COLOR_abstract_collection___SimpleCollection___add))(variable2, variable5) /*Array::add*/;
 584   variable6 = NEW_string___String___with_native(BOX_NativeString("Float"), TAG_Int(5)); /*new String*/
 585   ((array___AbstractArray___add_t)CALL(variable2,COLOR_abstract_collection___SimpleCollection___add))(variable2, variable6) /*Array::add*/;
 586   variable7 = NEW_string___String___with_native(BOX_NativeString("NativeString"), TAG_Int(12)); /*new String*/
 587   ((array___AbstractArray___add_t)CALL(variable2,COLOR_abstract_collection___SimpleCollection___add))(variable2, variable7) /*Array::add*/;
 588   variable8 = NEW_string___String___with_native(BOX_NativeString("NativeArray"), TAG_Int(11)); /*new String*/
 589   ((array___AbstractArray___add_t)CALL(variable2,COLOR_abstract_collection___SimpleCollection___add))(variable2, variable8) /*Array::add*/;
 590   variable9 = NEW_string___String___with_native(BOX_NativeString("Pointer"), TAG_Int(7)); /*new String*/
 591   ((array___AbstractArray___add_t)CALL(variable2,COLOR_abstract_collection___SimpleCollection___add))(variable2, variable9) /*Array::add*/;
 592   variable1 = variable2;
 593   variable3 = NEW_array___Array___with_capacity(TAG_Int(7)); /*new Array[Bool]*/
 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(true)) /*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   ((array___AbstractArray___add_t)CALL(variable3,COLOR_abstract_collection___SimpleCollection___add))(variable3,  TAG_Bool(false)) /*Array::add*/;
 601   variable2 = variable3;
 602   variable4 = NEW_array___Array___with_capacity(TAG_Int(7)); /*new Array[String]*/
 603   variable5 = NEW_string___String___with_native(BOX_NativeString("int"), TAG_Int(3)); /*new String*/
 604   ((array___AbstractArray___add_t)CALL(variable4,COLOR_abstract_collection___SimpleCollection___add))(variable4, variable5) /*Array::add*/;
 605   variable6 = NEW_string___String___with_native(BOX_NativeString("char"), TAG_Int(4)); /*new String*/
 606   ((array___AbstractArray___add_t)CALL(variable4,COLOR_abstract_collection___SimpleCollection___add))(variable4, variable6) /*Array::add*/;
 607   variable7 = NEW_string___String___with_native(BOX_NativeString("int"), TAG_Int(3)); /*new String*/
 608   ((array___AbstractArray___add_t)CALL(variable4,COLOR_abstract_collection___SimpleCollection___add))(variable4, variable7) /*Array::add*/;
 609   variable8 = NEW_string___String___with_native(BOX_NativeString("float"), TAG_Int(5)); /*new String*/
 610   ((array___AbstractArray___add_t)CALL(variable4,COLOR_abstract_collection___SimpleCollection___add))(variable4, variable8) /*Array::add*/;
 611   variable9 = NEW_string___String___with_native(BOX_NativeString("char *"), TAG_Int(6)); /*new String*/
 612   ((array___AbstractArray___add_t)CALL(variable4,COLOR_abstract_collection___SimpleCollection___add))(variable4, variable9) /*Array::add*/;
 613   variable10 = NEW_string___String___with_native(BOX_NativeString("val_t *"), TAG_Int(7)); /*new String*/
 614   ((array___AbstractArray___add_t)CALL(variable4,COLOR_abstract_collection___SimpleCollection___add))(variable4, variable10) /*Array::add*/;
 615   variable11 = NEW_string___String___with_native(BOX_NativeString("void *"), TAG_Int(6)); /*new String*/
 616   ((array___AbstractArray___add_t)CALL(variable4,COLOR_abstract_collection___SimpleCollection___add))(variable4, variable11) /*Array::add*/;
 617   variable3 = variable4;
 618   variable4 = ((array___AbstractArray___length_t)CALL( variable1 /*pnames*/,COLOR_abstract_collection___Collection___length))( variable1 /*pnames*/) /*Array::length*/;
 619   variable5 = NEW_range___Range___without_last( TAG_Int(0), variable4); /*new Range[Int]*/
 620   variable4 = variable5;
 621   variable4 = ((range___Range___iterator_t)CALL(variable4,COLOR_abstract_collection___Collection___iterator))(variable4) /*Range::iterator*/;
 622   while (true) { /*for*/
 623     variable5 = ((abstract_collection___Iterator___is_ok_t)CALL(variable4,COLOR_abstract_collection___Iterator___is_ok))(variable4) /*Iterator::is_ok*/;
 624     if (!UNTAG_Bool(variable5)) break; /*for*/
 625     variable5 = ((abstract_collection___Iterator___item_t)CALL(variable4,COLOR_abstract_collection___Iterator___item))(variable4) /*Iterator::item*/;
 626     variable7 =  variable5 /*i*/;
 627     variable8 = TAG_Bool(UNTAG_Int( variable7 /*index*/)>=UNTAG_Int( TAG_Int(0)));
 628     variable9 = variable8;
 629     if (UNTAG_Bool(variable9)) { /* and */
 630       variable9 = ATTR_array___AbstractArray____length( variable1 /*pnames*/) /*Array::_length*/;
 631       variable9 = TAG_Bool(UNTAG_Int( variable7 /*index*/)<UNTAG_Int(variable9));
 632     }
 633     variable8 = variable9;
 634     if (!UNTAG_Bool(variable8)) { fprintf(stderr, "Assert%s failed (%s: %d)\n", " 'index' ", LOCATE_array___Array_____bra, 229); nit_exit(1);}
 635     variable8 = ATTR_array___Array____items( variable1 /*pnames*/) /*Array::_items*/;
 636     variable8 = UNBOX_NativeArray(variable8)[UNTAG_Int( variable7 /*index*/)];
 637     goto return_label20;
 638     return_label20: while(false);
 639     variable7 = variable8;
 640     variable7 = ((symbol___String___to_symbol_t)CALL(variable7,COLOR_symbol___String___to_symbol))(variable7) /*String::to_symbol*/;
 641     variable6 = variable7;
 642     variable8 = NEW_compiling_base___PrimitiveInfo___init(); /*new PrimitiveInfo*/
 643     variable7 = variable8;
 644     ((compiling_base___PrimitiveInfo___name__eq_t)CALL( variable7 /*pi*/,COLOR_compiling_base___PrimitiveInfo___name__eq))( variable7 /*pi*/,  variable6 /*n*/) /*PrimitiveInfo::name=*/;
 645     variable8 =  variable5 /*i*/;
 646     variable9 = TAG_Bool(UNTAG_Int( variable8 /*index*/)>=UNTAG_Int( TAG_Int(0)));
 647     variable10 = variable9;
 648     if (UNTAG_Bool(variable10)) { /* and */
 649       variable10 = ATTR_array___AbstractArray____length( variable2 /*tagged*/) /*Array::_length*/;
 650       variable10 = TAG_Bool(UNTAG_Int( variable8 /*index*/)<UNTAG_Int(variable10));
 651     }
 652     variable9 = variable10;
 653     if (!UNTAG_Bool(variable9)) { fprintf(stderr, "Assert%s failed (%s: %d)\n", " 'index' ", LOCATE_array___Array_____bra, 229); nit_exit(1);}
 654     variable9 = ATTR_array___Array____items( variable2 /*tagged*/) /*Array::_items*/;
 655     variable9 = UNBOX_NativeArray(variable9)[UNTAG_Int( variable8 /*index*/)];
 656     goto return_label21;
 657     return_label21: while(false);
 658     variable8 = variable9;
 659     ((compiling_base___PrimitiveInfo___tagged__eq_t)CALL( variable7 /*pi*/,COLOR_compiling_base___PrimitiveInfo___tagged__eq))( variable7 /*pi*/, variable8) /*PrimitiveInfo::tagged=*/;
 660     variable8 =  variable5 /*i*/;
 661     variable9 = TAG_Bool(UNTAG_Int( variable8 /*index*/)>=UNTAG_Int( TAG_Int(0)));
 662     variable10 = variable9;
 663     if (UNTAG_Bool(variable10)) { /* and */
 664       variable10 = ATTR_array___AbstractArray____length( variable3 /*cnames*/) /*Array::_length*/;
 665       variable10 = TAG_Bool(UNTAG_Int( variable8 /*index*/)<UNTAG_Int(variable10));
 666     }
 667     variable9 = variable10;
 668     if (!UNTAG_Bool(variable9)) { fprintf(stderr, "Assert%s failed (%s: %d)\n", " 'index' ", LOCATE_array___Array_____bra, 229); nit_exit(1);}
 669     variable9 = ATTR_array___Array____items( variable3 /*cnames*/) /*Array::_items*/;
 670     variable9 = UNBOX_NativeArray(variable9)[UNTAG_Int( variable8 /*index*/)];
 671     goto return_label22;
 672     return_label22: while(false);
 673     variable8 = variable9;
 674     ((compiling_base___PrimitiveInfo___cname__eq_t)CALL( variable7 /*pi*/,COLOR_compiling_base___PrimitiveInfo___cname__eq))( variable7 /*pi*/, variable8) /*PrimitiveInfo::cname=*/;
 675     ((hash___HashMap_____braeq_t)CALL( variable0 /*res*/,COLOR_abstract_collection___Map_____braeq))( variable0 /*res*/,  variable6 /*n*/,  variable7 /*pi*/) /*HashMap::[]=*/;
 676     continue_19: while(0);
 677     ((abstract_collection___Iterator___next_t)CALL(variable4,COLOR_abstract_collection___Iterator___next))(variable4) /*Iterator::next*/;
 678   }
 679   break_19: while(0);
 680   variable0 =  variable0 /*res*/;
 681   goto return_label18;
 682   return_label18: while(false);
 683   tracehead = trace.prev;
 684   return variable0;
 685 }
 686 val_t compiling_base___PrimitiveInfo___name(val_t  self) {
 687   struct trace_t trace = {NULL, LOCATE_compiling_base___PrimitiveInfo___name, 220};
 688   trace.prev = tracehead; tracehead = &trace;
 689   tracehead = trace.prev;
 690   return ATTR_compiling_base___PrimitiveInfo____name( self) /*PrimitiveInfo::_name*/;
 691 }
 692 void compiling_base___PrimitiveInfo___name__eq(val_t  self, val_t  param0) {
 693   struct trace_t trace = {NULL, LOCATE_compiling_base___PrimitiveInfo___name__eq, 220};
 694   trace.prev = tracehead; tracehead = &trace;
 695   ATTR_compiling_base___PrimitiveInfo____name( self) /*PrimitiveInfo::_name*/ =  param0;
 696   tracehead = trace.prev;
 697   return;
 698 }
 699 val_t compiling_base___PrimitiveInfo___tagged(val_t  self) {
 700   struct trace_t trace = {NULL, LOCATE_compiling_base___PrimitiveInfo___tagged, 223};
 701   trace.prev = tracehead; tracehead = &trace;
 702   tracehead = trace.prev;
 703   return ATTR_compiling_base___PrimitiveInfo____tagged( self) /*PrimitiveInfo::_tagged*/;
 704 }
 705 void compiling_base___PrimitiveInfo___tagged__eq(val_t  self, val_t  param0) {
 706   struct trace_t trace = {NULL, LOCATE_compiling_base___PrimitiveInfo___tagged__eq, 223};
 707   trace.prev = tracehead; tracehead = &trace;
 708   ATTR_compiling_base___PrimitiveInfo____tagged( self) /*PrimitiveInfo::_tagged*/ =  param0;
 709   tracehead = trace.prev;
 710   return;
 711 }
 712 val_t compiling_base___PrimitiveInfo___cname(val_t  self) {
 713   struct trace_t trace = {NULL, LOCATE_compiling_base___PrimitiveInfo___cname, 226};
 714   trace.prev = tracehead; tracehead = &trace;
 715   tracehead = trace.prev;
 716   return ATTR_compiling_base___PrimitiveInfo____cname( self) /*PrimitiveInfo::_cname*/;
 717 }
 718 void compiling_base___PrimitiveInfo___cname__eq(val_t  self, val_t  param0) {
 719   struct trace_t trace = {NULL, LOCATE_compiling_base___PrimitiveInfo___cname__eq, 226};
 720   trace.prev = tracehead; tracehead = &trace;
 721   ATTR_compiling_base___PrimitiveInfo____cname( self) /*PrimitiveInfo::_cname*/ =  param0;
 722   tracehead = trace.prev;
 723   return;
 724 }
 725 void compiling_base___PrimitiveInfo___init(val_t  self, int* init_table) {
 726   struct trace_t trace = {NULL, LOCATE_compiling_base___PrimitiveInfo___init, 229};
 727   trace.prev = tracehead; tracehead = &trace;
 728   if (init_table[VAL2OBJ( self)->vft[INIT_TABLE_POS_PrimitiveInfo].i]) return;
 729   init_table[VAL2OBJ( self)->vft[INIT_TABLE_POS_PrimitiveInfo].i] = 1;
 730   tracehead = trace.prev;
 731   return;
 732 }
 733 val_t compiling_base___MMType___cname(val_t  self) {
 734   struct trace_t trace = {NULL, LOCATE_compiling_base___MMType___cname, 233};
 735   val_t variable0;
 736   val_t variable1;
 737   trace.prev = tracehead; tracehead = &trace;
 738   variable1 = ((static_type___MMType___local_class_t)CALL( self,COLOR_static_type___MMType___local_class))( self) /*MMType::local_class*/;
 739   variable1 = ((compiling_base___MMLocalClass___primitive_info_t)CALL(variable1,COLOR_compiling_base___MMLocalClass___primitive_info))(variable1) /*MMLocalClass::primitive_info*/;
 740   variable0 = variable1;
 741   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::==*/)))));
 742   if (UNTAG_Bool(variable1)) { /*if*/
 743     variable1 = NEW_string___String___with_native(BOX_NativeString("val_t"), TAG_Int(5)); /*new String*/
 744     variable0 = variable1;
 745     goto return_label24;
 746   } else { /*if*/
 747     variable1 = ((compiling_base___PrimitiveInfo___cname_t)CALL( variable0 /*pi*/,COLOR_compiling_base___PrimitiveInfo___cname))( variable0 /*pi*/) /*PrimitiveInfo::cname*/;
 748     variable0 = variable1;
 749     goto return_label24;
 750   }
 751   return_label24: while(false);
 752   tracehead = trace.prev;
 753   return variable0;
 754 }
 755 val_t compiling_base___MMType___default_cvalue(val_t  self) {
 756   struct trace_t trace = {NULL, LOCATE_compiling_base___MMType___default_cvalue, 244};
 757   val_t variable0;
 758   val_t variable1;
 759   val_t variable2;
 760     val_t variable3;
 761     val_t variable4;
 762     val_t variable5;
 763     val_t variable6;
 764     val_t variable7;
 765     val_t variable8;
 766     val_t variable9;
 767     val_t variable10;
 768     val_t variable11;
 769   trace.prev = tracehead; tracehead = &trace;
 770   variable1 = ((static_type___MMType___local_class_t)CALL( self,COLOR_static_type___MMType___local_class))( self) /*MMType::local_class*/;
 771   variable1 = ((compiling_base___MMLocalClass___primitive_info_t)CALL(variable1,COLOR_compiling_base___MMLocalClass___primitive_info))(variable1) /*MMLocalClass::primitive_info*/;
 772   variable0 = variable1;
 773   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::==*/)))))));
 774   variable2 = variable1;
 775   if (UNTAG_Bool(variable2)) { /* and */
 776     variable2 = ((compiling_base___PrimitiveInfo___tagged_t)CALL( variable0 /*pi*/,COLOR_compiling_base___PrimitiveInfo___tagged))( variable0 /*pi*/) /*PrimitiveInfo::tagged*/;
 777   }
 778   variable1 = variable2;
 779   if (UNTAG_Bool(variable1)) { /*if*/
 780     variable1 = NEW_string___String___init(); /*new String*/
 781     variable2 = NEW_string___String___with_native(BOX_NativeString("TAG_"), TAG_Int(4)); /*new String*/
 782     variable3 = variable2;
 783     ((string___String___append_t)CALL(variable1,COLOR_abstract_collection___IndexedCollection___append))(variable1, variable3) /*String::append*/;
 784     variable4 = ((static_type___MMType___local_class_t)CALL( self,COLOR_static_type___MMType___local_class))( self) /*MMType::local_class*/;
 785     variable4 = ((abstractmetamodel___MMLocalClass___name_t)CALL(variable4,COLOR_abstractmetamodel___MMLocalClass___name))(variable4) /*MMLocalClass::name*/;
 786     variable5 = variable4;
 787     variable5 = ((string___String___to_s_t)CALL(variable5,COLOR_string___Object___to_s))(variable5) /*String::to_s*/;
 788     ((string___String___append_t)CALL(variable1,COLOR_abstract_collection___IndexedCollection___append))(variable1, variable5) /*String::append*/;
 789     variable6 = NEW_string___String___with_native(BOX_NativeString("(("), TAG_Int(2)); /*new String*/
 790     variable7 = variable6;
 791     ((string___String___append_t)CALL(variable1,COLOR_abstract_collection___IndexedCollection___append))(variable1, variable7) /*String::append*/;
 792     variable8 = ((compiling_base___PrimitiveInfo___cname_t)CALL( variable0 /*pi*/,COLOR_compiling_base___PrimitiveInfo___cname))( variable0 /*pi*/) /*PrimitiveInfo::cname*/;
 793     variable9 = variable8;
 794     ((string___String___append_t)CALL(variable1,COLOR_abstract_collection___IndexedCollection___append))(variable1, variable9) /*String::append*/;
 795     variable10 = NEW_string___String___with_native(BOX_NativeString(")0)"), TAG_Int(3)); /*new String*/
 796     variable11 = variable10;
 797     ((string___String___append_t)CALL(variable1,COLOR_abstract_collection___IndexedCollection___append))(variable1, variable11) /*String::append*/;
 798     variable0 = variable1;
 799     goto return_label25;
 800   } else { /*if*/
 801     variable1 = NEW_string___String___with_native(BOX_NativeString("NIT_NULL"), TAG_Int(8)); /*new String*/
 802     variable0 = variable1;
 803     goto return_label25;
 804   }
 805   return_label25: while(false);
 806   tracehead = trace.prev;
 807   return variable0;
 808 }
 809 val_t compiling_base___MMType___boxtype(val_t  self, val_t  param0) {
 810   struct trace_t trace = {NULL, LOCATE_compiling_base___MMType___boxtype, 256};
 811   val_t variable0;
 812   val_t variable1;
 813   val_t variable2;
 814       val_t variable3;
 815       val_t variable4;
 816       val_t variable5;
 817       val_t variable6;
 818       val_t variable7;
 819       val_t variable8;
 820       val_t variable9;
 821       val_t variable10;
 822       val_t variable11;
 823   trace.prev = tracehead; tracehead = &trace;
 824   variable0 =  param0;
 825   variable2 = ((static_type___MMType___local_class_t)CALL( self,COLOR_static_type___MMType___local_class))( self) /*MMType::local_class*/;
 826   variable2 = ((compiling_base___MMLocalClass___primitive_info_t)CALL(variable2,COLOR_compiling_base___MMLocalClass___primitive_info))(variable2) /*MMLocalClass::primitive_info*/;
 827   variable1 = variable2;
 828   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::==*/)))));
 829   if (UNTAG_Bool(variable2)) { /*if*/
 830     variable1 =  variable0 /*s*/;
 831     goto return_label26;
 832   } else { /*if*/
 833     variable2 = ((compiling_base___PrimitiveInfo___tagged_t)CALL( variable1 /*pi*/,COLOR_compiling_base___PrimitiveInfo___tagged))( variable1 /*pi*/) /*PrimitiveInfo::tagged*/;
 834     if (UNTAG_Bool(variable2)) { /*if*/
 835       variable2 = NEW_string___String___init(); /*new String*/
 836       variable3 = NEW_string___String___with_native(BOX_NativeString("TAG_"), TAG_Int(4)); /*new String*/
 837       variable4 = variable3;
 838       ((string___String___append_t)CALL(variable2,COLOR_abstract_collection___IndexedCollection___append))(variable2, variable4) /*String::append*/;
 839       variable5 = ((static_type___MMType___local_class_t)CALL( self,COLOR_static_type___MMType___local_class))( self) /*MMType::local_class*/;
 840       variable5 = ((abstractmetamodel___MMLocalClass___name_t)CALL(variable5,COLOR_abstractmetamodel___MMLocalClass___name))(variable5) /*MMLocalClass::name*/;
 841       variable6 = variable5;
 842       variable6 = ((string___String___to_s_t)CALL(variable6,COLOR_string___Object___to_s))(variable6) /*String::to_s*/;
 843       ((string___String___append_t)CALL(variable2,COLOR_abstract_collection___IndexedCollection___append))(variable2, variable6) /*String::append*/;
 844       variable7 = NEW_string___String___with_native(BOX_NativeString("("), TAG_Int(1)); /*new String*/
 845       variable8 = variable7;
 846       ((string___String___append_t)CALL(variable2,COLOR_abstract_collection___IndexedCollection___append))(variable2, variable8) /*String::append*/;
 847       variable9 =  variable0 /*s*/;
 848       ((string___String___append_t)CALL(variable2,COLOR_abstract_collection___IndexedCollection___append))(variable2, variable9) /*String::append*/;
 849       variable10 = NEW_string___String___with_native(BOX_NativeString(")"), TAG_Int(1)); /*new String*/
 850       variable11 = variable10;
 851       ((string___String___append_t)CALL(variable2,COLOR_abstract_collection___IndexedCollection___append))(variable2, variable11) /*String::append*/;
 852       variable1 = variable2;
 853       goto return_label26;
 854     } else { /*if*/
 855       variable2 = NEW_string___String___init(); /*new String*/
 856       variable3 = NEW_string___String___with_native(BOX_NativeString("BOX_"), TAG_Int(4)); /*new String*/
 857       variable4 = variable3;
 858       ((string___String___append_t)CALL(variable2,COLOR_abstract_collection___IndexedCollection___append))(variable2, variable4) /*String::append*/;
 859       variable5 = ((static_type___MMType___local_class_t)CALL( self,COLOR_static_type___MMType___local_class))( self) /*MMType::local_class*/;
 860       variable5 = ((abstractmetamodel___MMLocalClass___name_t)CALL(variable5,COLOR_abstractmetamodel___MMLocalClass___name))(variable5) /*MMLocalClass::name*/;
 861       variable6 = variable5;
 862       variable6 = ((string___String___to_s_t)CALL(variable6,COLOR_string___Object___to_s))(variable6) /*String::to_s*/;
 863       ((string___String___append_t)CALL(variable2,COLOR_abstract_collection___IndexedCollection___append))(variable2, variable6) /*String::append*/;
 864       variable7 = NEW_string___String___with_native(BOX_NativeString("("), TAG_Int(1)); /*new String*/
 865       variable8 = variable7;
 866       ((string___String___append_t)CALL(variable2,COLOR_abstract_collection___IndexedCollection___append))(variable2, variable8) /*String::append*/;
 867       variable9 =  variable0 /*s*/;
 868       ((string___String___append_t)CALL(variable2,COLOR_abstract_collection___IndexedCollection___append))(variable2, variable9) /*String::append*/;
 869       variable10 = NEW_string___String___with_native(BOX_NativeString(")"), TAG_Int(1)); /*new String*/
 870       variable11 = variable10;
 871       ((string___String___append_t)CALL(variable2,COLOR_abstract_collection___IndexedCollection___append))(variable2, variable11) /*String::append*/;
 872       variable1 = variable2;
 873       goto return_label26;
 874     }
 875   }
 876   return_label26: while(false);
 877   tracehead = trace.prev;
 878   return variable1;
 879 }
 880 val_t compiling_base___MMType___unboxtype(val_t  self, val_t  param0) {
 881   struct trace_t trace = {NULL, LOCATE_compiling_base___MMType___unboxtype, 270};
 882   val_t variable0;
 883   val_t variable1;
 884   val_t variable2;
 885       val_t variable3;
 886       val_t variable4;
 887       val_t variable5;
 888       val_t variable6;
 889       val_t variable7;
 890       val_t variable8;
 891       val_t variable9;
 892       val_t variable10;
 893       val_t variable11;
 894   trace.prev = tracehead; tracehead = &trace;
 895   variable0 =  param0;
 896   variable2 = ((static_type___MMType___local_class_t)CALL( self,COLOR_static_type___MMType___local_class))( self) /*MMType::local_class*/;
 897   variable2 = ((compiling_base___MMLocalClass___primitive_info_t)CALL(variable2,COLOR_compiling_base___MMLocalClass___primitive_info))(variable2) /*MMLocalClass::primitive_info*/;
 898   variable1 = variable2;
 899   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::==*/)))));
 900   if (UNTAG_Bool(variable2)) { /*if*/
 901     variable1 =  variable0 /*s*/;
 902     goto return_label27;
 903   } else { /*if*/
 904     variable2 = ((compiling_base___PrimitiveInfo___tagged_t)CALL( variable1 /*pi*/,COLOR_compiling_base___PrimitiveInfo___tagged))( variable1 /*pi*/) /*PrimitiveInfo::tagged*/;
 905     if (UNTAG_Bool(variable2)) { /*if*/
 906       variable2 = NEW_string___String___init(); /*new String*/
 907       variable3 = NEW_string___String___with_native(BOX_NativeString("UNTAG_"), TAG_Int(6)); /*new String*/
 908       variable4 = variable3;
 909       ((string___String___append_t)CALL(variable2,COLOR_abstract_collection___IndexedCollection___append))(variable2, variable4) /*String::append*/;
 910       variable5 = ((static_type___MMType___local_class_t)CALL( self,COLOR_static_type___MMType___local_class))( self) /*MMType::local_class*/;
 911       variable5 = ((abstractmetamodel___MMLocalClass___name_t)CALL(variable5,COLOR_abstractmetamodel___MMLocalClass___name))(variable5) /*MMLocalClass::name*/;
 912       variable6 = variable5;
 913       variable6 = ((string___String___to_s_t)CALL(variable6,COLOR_string___Object___to_s))(variable6) /*String::to_s*/;
 914       ((string___String___append_t)CALL(variable2,COLOR_abstract_collection___IndexedCollection___append))(variable2, variable6) /*String::append*/;
 915       variable7 = NEW_string___String___with_native(BOX_NativeString("("), TAG_Int(1)); /*new String*/
 916       variable8 = variable7;
 917       ((string___String___append_t)CALL(variable2,COLOR_abstract_collection___IndexedCollection___append))(variable2, variable8) /*String::append*/;
 918       variable9 =  variable0 /*s*/;
 919       ((string___String___append_t)CALL(variable2,COLOR_abstract_collection___IndexedCollection___append))(variable2, variable9) /*String::append*/;
 920       variable10 = NEW_string___String___with_native(BOX_NativeString(")"), TAG_Int(1)); /*new String*/
 921       variable11 = variable10;
 922       ((string___String___append_t)CALL(variable2,COLOR_abstract_collection___IndexedCollection___append))(variable2, variable11) /*String::append*/;
 923       variable1 = variable2;
 924       goto return_label27;
 925     } else { /*if*/
 926       variable2 = NEW_string___String___init(); /*new String*/
 927       variable3 = NEW_string___String___with_native(BOX_NativeString("UNBOX_"), TAG_Int(6)); /*new String*/
 928       variable4 = variable3;
 929       ((string___String___append_t)CALL(variable2,COLOR_abstract_collection___IndexedCollection___append))(variable2, variable4) /*String::append*/;
 930       variable5 = ((static_type___MMType___local_class_t)CALL( self,COLOR_static_type___MMType___local_class))( self) /*MMType::local_class*/;
 931       variable5 = ((abstractmetamodel___MMLocalClass___name_t)CALL(variable5,COLOR_abstractmetamodel___MMLocalClass___name))(variable5) /*MMLocalClass::name*/;
 932       variable6 = variable5;
 933       variable6 = ((string___String___to_s_t)CALL(variable6,COLOR_string___Object___to_s))(variable6) /*String::to_s*/;
 934       ((string___String___append_t)CALL(variable2,COLOR_abstract_collection___IndexedCollection___append))(variable2, variable6) /*String::append*/;
 935       variable7 = NEW_string___String___with_native(BOX_NativeString("("), TAG_Int(1)); /*new String*/
 936       variable8 = variable7;
 937       ((string___String___append_t)CALL(variable2,COLOR_abstract_collection___IndexedCollection___append))(variable2, variable8) /*String::append*/;
 938       variable9 =  variable0 /*s*/;
 939       ((string___String___append_t)CALL(variable2,COLOR_abstract_collection___IndexedCollection___append))(variable2, variable9) /*String::append*/;
 940       variable10 = NEW_string___String___with_native(BOX_NativeString(")"), TAG_Int(1)); /*new String*/
 941       variable11 = variable10;
 942       ((string___String___append_t)CALL(variable2,COLOR_abstract_collection___IndexedCollection___append))(variable2, variable11) /*String::append*/;
 943       variable1 = variable2;
 944       goto return_label27;
 945     }
 946   }
 947   return_label27: while(false);
 948   tracehead = trace.prev;
 949   return variable1;
 950 }
 951 val_t compiling_base___MMLocalProperty___cname(val_t  self) {
 952   struct trace_t trace = {NULL, LOCATE_compiling_base___MMLocalProperty___cname, 289};
 953   val_t variable0;
 954     val_t variable1;
 955     val_t variable2;
 956     val_t variable3;
 957   trace.prev = tracehead; tracehead = &trace;
 958   variable0 = ATTR_compiling_base___MMLocalProperty____cname_cache( self) /*MMLocalProperty::_cname_cache*/;
 959   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::==*/)));
 960   if (UNTAG_Bool(variable0)) { /*if*/
 961     variable0 = NEW_array___Array___with_capacity(TAG_Int(3)); /*new Array[Symbol]*/
 962     variable1 = ((abstractmetamodel___MMLocalProperty___concrete_property_t)CALL( self,COLOR_abstractmetamodel___MMLocalProperty___concrete_property))( self) /*MMLocalProperty::concrete_property*/;
 963     variable1 = ((abstractmetamodel___MMLocalProperty___module_t)CALL(variable1,COLOR_abstractmetamodel___MMLocalProperty___module))(variable1) /*MMConcreteProperty::module*/;
 964     variable1 = ((abstractmetamodel___MMModule___name_t)CALL(variable1,COLOR_abstractmetamodel___MMModule___name))(variable1) /*MMModule::name*/;
 965     ((array___AbstractArray___add_t)CALL(variable0,COLOR_abstract_collection___SimpleCollection___add))(variable0, variable1) /*Array::add*/;
 966     variable2 = ((abstractmetamodel___MMLocalProperty___concrete_property_t)CALL( self,COLOR_abstractmetamodel___MMLocalProperty___concrete_property))( self) /*MMLocalProperty::concrete_property*/;
 967     variable2 = ((abstractmetamodel___MMLocalProperty___local_class_t)CALL(variable2,COLOR_abstractmetamodel___MMLocalProperty___local_class))(variable2) /*MMConcreteProperty::local_class*/;
 968     variable2 = ((abstractmetamodel___MMLocalClass___name_t)CALL(variable2,COLOR_abstractmetamodel___MMLocalClass___name))(variable2) /*MMLocalClass::name*/;
 969     ((array___AbstractArray___add_t)CALL(variable0,COLOR_abstract_collection___SimpleCollection___add))(variable0, variable2) /*Array::add*/;
 970     variable3 = ((abstractmetamodel___MMLocalProperty___name_t)CALL( self,COLOR_abstractmetamodel___MMLocalProperty___name))( self) /*MMLocalProperty::name*/;
 971     ((array___AbstractArray___add_t)CALL(variable0,COLOR_abstract_collection___SimpleCollection___add))(variable0, variable3) /*Array::add*/;
 972     variable0 = ((utils___Object___cmangle_t)CALL( self,COLOR_utils___Object___cmangle))( self, variable0) /*MMLocalProperty::cmangle*/;
 973     ATTR_compiling_base___MMLocalProperty____cname_cache( self) /*MMLocalProperty::_cname_cache*/ = variable0;
 974   }
 975   variable0 = ATTR_compiling_base___MMLocalProperty____cname_cache( self) /*MMLocalProperty::_cname_cache*/;
 976   goto return_label28;
 977   return_label28: while(false);
 978   tracehead = trace.prev;
 979   return variable0;
 980 }
 981 val_t compiling_base___MMLocalProperty___color_id_for_super(val_t  self) {
 982   struct trace_t trace = {NULL, LOCATE_compiling_base___MMLocalProperty___color_id_for_super, 298};
 983   val_t variable0;
 984   val_t variable1;
 985   val_t variable2;
 986   val_t variable3;
 987   val_t variable4;
 988   val_t variable5;
 989   val_t variable6;
 990   trace.prev = tracehead; tracehead = &trace;
 991   variable0 = NEW_string___String___init(); /*new String*/
 992   variable1 = NEW_string___String___with_native(BOX_NativeString("COLOR_SUPER_"), TAG_Int(12)); /*new String*/
 993   variable2 = variable1;
 994   ((string___String___append_t)CALL(variable0,COLOR_abstract_collection___IndexedCollection___append))(variable0, variable2) /*String::append*/;
 995   variable3 = ((compiling_base___MMLocalProperty___cname_t)CALL( self,COLOR_compiling_base___MMLocalProperty___cname))( self) /*MMLocalProperty::cname*/;
 996   variable4 = variable3;
 997   ((string___String___append_t)CALL(variable0,COLOR_abstract_collection___IndexedCollection___append))(variable0, variable4) /*String::append*/;
 998   variable5 = NEW_string___String___with_native(BOX_NativeString(""), TAG_Int(0)); /*new String*/
 999   variable6 = variable5;
1000   ((string___String___append_t)CALL(variable0,COLOR_abstract_collection___IndexedCollection___append))(variable0, variable6) /*String::append*/;
1001   goto return_label29;
1002   return_label29: while(false);
1003   tracehead = trace.prev;
1004   return variable0;
1005 }