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 p0){
   4   struct {struct stack_frame_t me;} fra;
   5   val_t REGB0;
   6   val_t tmp;
   7   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   8   fra.me.file = LOCATE_compiling_base;
   9   fra.me.line = 25;
  10   fra.me.meth = LOCATE_compiling_base___ToolContext___global;
  11   fra.me.has_broke = 0;
  12   fra.me.REG_size = 1;
  13   fra.me.REG[0] = NIT_NULL;
  14   fra.me.REG[0] = p0;
  15   REGB0 = TAG_Bool(ATTR_compiling_base___ToolContext____global(fra.me.REG[0])!=NIT_NULL);
  16   /* ./compiling//compiling_base.nit:25 */
  17   if (UNTAG_Bool(REGB0)) {
  18   } else {
  19     fprintf(stderr, "Uninitialized attribute %s", "_global");
  20     fprintf(stderr, " (%s:%d)\n", LOCATE_compiling_base, 25);
  21     nit_exit(1);
  22   }
  23   REGB0 = ATTR_compiling_base___ToolContext____global(fra.me.REG[0]);
  24   stack_frame_head = fra.me.prev;
  25   return REGB0;
  26 }
  27 void compiling_base___ToolContext___global__eq(val_t p0, val_t p1){
  28   struct {struct stack_frame_t me;} fra;
  29   val_t REGB0;
  30   val_t tmp;
  31   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
  32   fra.me.file = LOCATE_compiling_base;
  33   fra.me.line = 25;
  34   fra.me.meth = LOCATE_compiling_base___ToolContext___global__eq;
  35   fra.me.has_broke = 0;
  36   fra.me.REG_size = 1;
  37   fra.me.REG[0] = NIT_NULL;
  38   fra.me.REG[0] = p0;
  39   REGB0 = p1;
  40   /* ./compiling//compiling_base.nit:25 */
  41   ATTR_compiling_base___ToolContext____global(fra.me.REG[0]) = REGB0;
  42   stack_frame_head = fra.me.prev;
  43   return;
  44 }
  45 val_t compiling_base___ToolContext___compdir(val_t p0){
  46   struct {struct stack_frame_t me;} fra;
  47   val_t tmp;
  48   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
  49   fra.me.file = LOCATE_compiling_base;
  50   fra.me.line = 26;
  51   fra.me.meth = LOCATE_compiling_base___ToolContext___compdir;
  52   fra.me.has_broke = 0;
  53   fra.me.REG_size = 1;
  54   fra.me.REG[0] = NIT_NULL;
  55   fra.me.REG[0] = p0;
  56   fra.me.REG[0] = ATTR_compiling_base___ToolContext____compdir(fra.me.REG[0]);
  57   /* ./compiling//compiling_base.nit:26 */
  58   stack_frame_head = fra.me.prev;
  59   return fra.me.REG[0];
  60 }
  61 void compiling_base___ToolContext___compdir__eq(val_t p0, val_t p1){
  62   struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
  63   val_t tmp;
  64   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
  65   fra.me.file = LOCATE_compiling_base;
  66   fra.me.line = 26;
  67   fra.me.meth = LOCATE_compiling_base___ToolContext___compdir__eq;
  68   fra.me.has_broke = 0;
  69   fra.me.REG_size = 2;
  70   fra.me.REG[0] = NIT_NULL;
  71   fra.me.REG[1] = NIT_NULL;
  72   fra.me.REG[0] = p0;
  73   fra.me.REG[1] = p1;
  74   /* ./compiling//compiling_base.nit:26 */
  75   ATTR_compiling_base___ToolContext____compdir(fra.me.REG[0]) = fra.me.REG[1];
  76   stack_frame_head = fra.me.prev;
  77   return;
  78 }
  79 val_t compiling_base___ToolContext___clibdir(val_t p0){
  80   struct {struct stack_frame_t me;} fra;
  81   val_t tmp;
  82   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
  83   fra.me.file = LOCATE_compiling_base;
  84   fra.me.line = 27;
  85   fra.me.meth = LOCATE_compiling_base___ToolContext___clibdir;
  86   fra.me.has_broke = 0;
  87   fra.me.REG_size = 1;
  88   fra.me.REG[0] = NIT_NULL;
  89   fra.me.REG[0] = p0;
  90   fra.me.REG[0] = ATTR_compiling_base___ToolContext____clibdir(fra.me.REG[0]);
  91   /* ./compiling//compiling_base.nit:27 */
  92   stack_frame_head = fra.me.prev;
  93   return fra.me.REG[0];
  94 }
  95 void compiling_base___ToolContext___clibdir__eq(val_t p0, val_t p1){
  96   struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
  97   val_t tmp;
  98   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
  99   fra.me.file = LOCATE_compiling_base;
 100   fra.me.line = 27;
 101   fra.me.meth = LOCATE_compiling_base___ToolContext___clibdir__eq;
 102   fra.me.has_broke = 0;
 103   fra.me.REG_size = 2;
 104   fra.me.REG[0] = NIT_NULL;
 105   fra.me.REG[1] = NIT_NULL;
 106   fra.me.REG[0] = p0;
 107   fra.me.REG[1] = p1;
 108   /* ./compiling//compiling_base.nit:27 */
 109   ATTR_compiling_base___ToolContext____clibdir(fra.me.REG[0]) = fra.me.REG[1];
 110   stack_frame_head = fra.me.prev;
 111   return;
 112 }
 113 val_t compiling_base___ToolContext___bindir(val_t p0){
 114   struct {struct stack_frame_t me;} fra;
 115   val_t tmp;
 116   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 117   fra.me.file = LOCATE_compiling_base;
 118   fra.me.line = 28;
 119   fra.me.meth = LOCATE_compiling_base___ToolContext___bindir;
 120   fra.me.has_broke = 0;
 121   fra.me.REG_size = 1;
 122   fra.me.REG[0] = NIT_NULL;
 123   fra.me.REG[0] = p0;
 124   fra.me.REG[0] = ATTR_compiling_base___ToolContext____bindir(fra.me.REG[0]);
 125   /* ./compiling//compiling_base.nit:28 */
 126   stack_frame_head = fra.me.prev;
 127   return fra.me.REG[0];
 128 }
 129 void compiling_base___ToolContext___bindir__eq(val_t p0, val_t p1){
 130   struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
 131   val_t tmp;
 132   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 133   fra.me.file = LOCATE_compiling_base;
 134   fra.me.line = 28;
 135   fra.me.meth = LOCATE_compiling_base___ToolContext___bindir__eq;
 136   fra.me.has_broke = 0;
 137   fra.me.REG_size = 2;
 138   fra.me.REG[0] = NIT_NULL;
 139   fra.me.REG[1] = NIT_NULL;
 140   fra.me.REG[0] = p0;
 141   fra.me.REG[1] = p1;
 142   /* ./compiling//compiling_base.nit:28 */
 143   ATTR_compiling_base___ToolContext____bindir(fra.me.REG[0]) = fra.me.REG[1];
 144   stack_frame_head = fra.me.prev;
 145   return;
 146 }
 147 val_t compiling_base___ToolContext___output_file(val_t p0){
 148   struct {struct stack_frame_t me;} fra;
 149   val_t tmp;
 150   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 151   fra.me.file = LOCATE_compiling_base;
 152   fra.me.line = 29;
 153   fra.me.meth = LOCATE_compiling_base___ToolContext___output_file;
 154   fra.me.has_broke = 0;
 155   fra.me.REG_size = 1;
 156   fra.me.REG[0] = NIT_NULL;
 157   fra.me.REG[0] = p0;
 158   fra.me.REG[0] = ATTR_compiling_base___ToolContext____output_file(fra.me.REG[0]);
 159   /* ./compiling//compiling_base.nit:29 */
 160   stack_frame_head = fra.me.prev;
 161   return fra.me.REG[0];
 162 }
 163 void compiling_base___ToolContext___output_file__eq(val_t p0, val_t p1){
 164   struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
 165   val_t tmp;
 166   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 167   fra.me.file = LOCATE_compiling_base;
 168   fra.me.line = 29;
 169   fra.me.meth = LOCATE_compiling_base___ToolContext___output_file__eq;
 170   fra.me.has_broke = 0;
 171   fra.me.REG_size = 2;
 172   fra.me.REG[0] = NIT_NULL;
 173   fra.me.REG[1] = NIT_NULL;
 174   fra.me.REG[0] = p0;
 175   fra.me.REG[1] = p1;
 176   /* ./compiling//compiling_base.nit:29 */
 177   ATTR_compiling_base___ToolContext____output_file(fra.me.REG[0]) = fra.me.REG[1];
 178   stack_frame_head = fra.me.prev;
 179   return;
 180 }
 181 val_t compiling_base___ToolContext___boost(val_t p0){
 182   struct {struct stack_frame_t me;} fra;
 183   val_t REGB0;
 184   val_t tmp;
 185   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 186   fra.me.file = LOCATE_compiling_base;
 187   fra.me.line = 30;
 188   fra.me.meth = LOCATE_compiling_base___ToolContext___boost;
 189   fra.me.has_broke = 0;
 190   fra.me.REG_size = 1;
 191   fra.me.REG[0] = NIT_NULL;
 192   fra.me.REG[0] = p0;
 193   REGB0 = TAG_Bool(ATTR_compiling_base___ToolContext____boost(fra.me.REG[0])!=NIT_NULL);
 194   /* ./compiling//compiling_base.nit:30 */
 195   if (UNTAG_Bool(REGB0)) {
 196   } else {
 197     fprintf(stderr, "Uninitialized attribute %s", "_boost");
 198     fprintf(stderr, " (%s:%d)\n", LOCATE_compiling_base, 30);
 199     nit_exit(1);
 200   }
 201   REGB0 = ATTR_compiling_base___ToolContext____boost(fra.me.REG[0]);
 202   stack_frame_head = fra.me.prev;
 203   return REGB0;
 204 }
 205 void compiling_base___ToolContext___boost__eq(val_t p0, val_t p1){
 206   struct {struct stack_frame_t me;} fra;
 207   val_t REGB0;
 208   val_t tmp;
 209   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 210   fra.me.file = LOCATE_compiling_base;
 211   fra.me.line = 30;
 212   fra.me.meth = LOCATE_compiling_base___ToolContext___boost__eq;
 213   fra.me.has_broke = 0;
 214   fra.me.REG_size = 1;
 215   fra.me.REG[0] = NIT_NULL;
 216   fra.me.REG[0] = p0;
 217   REGB0 = p1;
 218   /* ./compiling//compiling_base.nit:30 */
 219   ATTR_compiling_base___ToolContext____boost(fra.me.REG[0]) = REGB0;
 220   stack_frame_head = fra.me.prev;
 221   return;
 222 }
 223 val_t compiling_base___ToolContext___no_cc(val_t p0){
 224   struct {struct stack_frame_t me;} fra;
 225   val_t REGB0;
 226   val_t tmp;
 227   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 228   fra.me.file = LOCATE_compiling_base;
 229   fra.me.line = 31;
 230   fra.me.meth = LOCATE_compiling_base___ToolContext___no_cc;
 231   fra.me.has_broke = 0;
 232   fra.me.REG_size = 1;
 233   fra.me.REG[0] = NIT_NULL;
 234   fra.me.REG[0] = p0;
 235   REGB0 = TAG_Bool(ATTR_compiling_base___ToolContext____no_cc(fra.me.REG[0])!=NIT_NULL);
 236   /* ./compiling//compiling_base.nit:31 */
 237   if (UNTAG_Bool(REGB0)) {
 238   } else {
 239     fprintf(stderr, "Uninitialized attribute %s", "_no_cc");
 240     fprintf(stderr, " (%s:%d)\n", LOCATE_compiling_base, 31);
 241     nit_exit(1);
 242   }
 243   REGB0 = ATTR_compiling_base___ToolContext____no_cc(fra.me.REG[0]);
 244   stack_frame_head = fra.me.prev;
 245   return REGB0;
 246 }
 247 void compiling_base___ToolContext___no_cc__eq(val_t p0, val_t p1){
 248   struct {struct stack_frame_t me;} fra;
 249   val_t REGB0;
 250   val_t tmp;
 251   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 252   fra.me.file = LOCATE_compiling_base;
 253   fra.me.line = 31;
 254   fra.me.meth = LOCATE_compiling_base___ToolContext___no_cc__eq;
 255   fra.me.has_broke = 0;
 256   fra.me.REG_size = 1;
 257   fra.me.REG[0] = NIT_NULL;
 258   fra.me.REG[0] = p0;
 259   REGB0 = p1;
 260   /* ./compiling//compiling_base.nit:31 */
 261   ATTR_compiling_base___ToolContext____no_cc(fra.me.REG[0]) = REGB0;
 262   stack_frame_head = fra.me.prev;
 263   return;
 264 }
 265 val_t compiling_base___ToolContext___ext_prefix(val_t p0){
 266   struct {struct stack_frame_t me;} fra;
 267   val_t REGB0;
 268   val_t tmp;
 269   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 270   fra.me.file = LOCATE_compiling_base;
 271   fra.me.line = 32;
 272   fra.me.meth = LOCATE_compiling_base___ToolContext___ext_prefix;
 273   fra.me.has_broke = 0;
 274   fra.me.REG_size = 1;
 275   fra.me.REG[0] = NIT_NULL;
 276   fra.me.REG[0] = p0;
 277   REGB0 = TAG_Bool(ATTR_compiling_base___ToolContext____ext_prefix(fra.me.REG[0])!=NIT_NULL);
 278   /* ./compiling//compiling_base.nit:32 */
 279   if (UNTAG_Bool(REGB0)) {
 280   } else {
 281     fprintf(stderr, "Uninitialized attribute %s", "_ext_prefix");
 282     fprintf(stderr, " (%s:%d)\n", LOCATE_compiling_base, 32);
 283     nit_exit(1);
 284   }
 285   fra.me.REG[0] = ATTR_compiling_base___ToolContext____ext_prefix(fra.me.REG[0]);
 286   stack_frame_head = fra.me.prev;
 287   return fra.me.REG[0];
 288 }
 289 void compiling_base___ToolContext___ext_prefix__eq(val_t p0, val_t p1){
 290   struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
 291   val_t tmp;
 292   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 293   fra.me.file = LOCATE_compiling_base;
 294   fra.me.line = 32;
 295   fra.me.meth = LOCATE_compiling_base___ToolContext___ext_prefix__eq;
 296   fra.me.has_broke = 0;
 297   fra.me.REG_size = 2;
 298   fra.me.REG[0] = NIT_NULL;
 299   fra.me.REG[1] = NIT_NULL;
 300   fra.me.REG[0] = p0;
 301   fra.me.REG[1] = p1;
 302   /* ./compiling//compiling_base.nit:32 */
 303   ATTR_compiling_base___ToolContext____ext_prefix(fra.me.REG[0]) = fra.me.REG[1];
 304   stack_frame_head = fra.me.prev;
 305   return;
 306 }
 307 val_t compiling_base___CompilerVisitor___to_s(val_t p0){
 308   struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
 309   val_t REGB0;
 310   val_t tmp;
 311   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 312   fra.me.file = LOCATE_compiling_base;
 313   fra.me.line = 98;
 314   fra.me.meth = LOCATE_compiling_base___CompilerVisitor___to_s;
 315   fra.me.has_broke = 0;
 316   fra.me.REG_size = 3;
 317   fra.me.REG[0] = NIT_NULL;
 318   fra.me.REG[1] = NIT_NULL;
 319   fra.me.REG[2] = NIT_NULL;
 320   fra.me.REG[0] = p0;
 321   fra.me.REG[1] = NEW_Array_array___Array___init();
 322   REGB0 = TAG_Bool(ATTR_compiling_base___CompilerVisitor____ctx(fra.me.REG[0])!=NIT_NULL);
 323   /* ./compiling//compiling_base.nit:102 */
 324   if (UNTAG_Bool(REGB0)) {
 325   } else {
 326     fprintf(stderr, "Uninitialized attribute %s", "_ctx");
 327     fprintf(stderr, " (%s:%d)\n", LOCATE_compiling_base, 102);
 328     nit_exit(1);
 329   }
 330   fra.me.REG[2] = ATTR_compiling_base___CompilerVisitor____ctx(fra.me.REG[0]);
 331   fra.me.REG[2] = CALL_compiling_base___CContext___decls(fra.me.REG[2])(fra.me.REG[2]);
 332   CALL_abstract_collection___Sequence___append(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]);
 333   REGB0 = TAG_Bool(ATTR_compiling_base___CompilerVisitor____ctx(fra.me.REG[0])!=NIT_NULL);
 334   /* ./compiling//compiling_base.nit:103 */
 335   if (UNTAG_Bool(REGB0)) {
 336   } else {
 337     fprintf(stderr, "Uninitialized attribute %s", "_ctx");
 338     fprintf(stderr, " (%s:%d)\n", LOCATE_compiling_base, 103);
 339     nit_exit(1);
 340   }
 341   fra.me.REG[0] = ATTR_compiling_base___CompilerVisitor____ctx(fra.me.REG[0]);
 342   fra.me.REG[0] = CALL_compiling_base___CContext___instrs(fra.me.REG[0])(fra.me.REG[0]);
 343   CALL_abstract_collection___Sequence___append(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]);
 344   fra.me.REG[1] = CALL_string___Object___to_s(fra.me.REG[1])(fra.me.REG[1]);
 345   /* ./compiling//compiling_base.nit:104 */
 346   goto label1;
 347   label1: while(0);
 348   stack_frame_head = fra.me.prev;
 349   return fra.me.REG[1];
 350 }
 351 void compiling_base___CompilerVisitor___add_decl(val_t p0, val_t p1){
 352   struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
 353   val_t REGB0;
 354   val_t tmp;
 355   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 356   fra.me.file = LOCATE_compiling_base;
 357   fra.me.line = 39;
 358   fra.me.meth = LOCATE_compiling_base___CompilerVisitor___add_decl;
 359   fra.me.has_broke = 0;
 360   fra.me.REG_size = 3;
 361   fra.me.REG[0] = NIT_NULL;
 362   fra.me.REG[1] = NIT_NULL;
 363   fra.me.REG[2] = NIT_NULL;
 364   fra.me.REG[0] = p0;
 365   fra.me.REG[1] = p1;
 366   REGB0 = TAG_Bool(VAL_ISA(fra.me.REG[1], COLOR_Array, ID_Array)) /*cast Array[String]*/;
 367   /* ./compiling//compiling_base.nit:39 */
 368   if (UNTAG_Bool(REGB0)) {
 369   } else {
 370     fprintf(stderr, "Cast failed");
 371     fprintf(stderr, " (%s:%d)\n", LOCATE_compiling_base, 39);
 372     nit_exit(1);
 373   }
 374   REGB0 = TAG_Bool(ATTR_compiling_base___CompilerVisitor____ctx(fra.me.REG[0])!=NIT_NULL);
 375   /* ./compiling//compiling_base.nit:42 */
 376   if (UNTAG_Bool(REGB0)) {
 377   } else {
 378     fprintf(stderr, "Uninitialized attribute %s", "_ctx");
 379     fprintf(stderr, " (%s:%d)\n", LOCATE_compiling_base, 42);
 380     nit_exit(1);
 381   }
 382   fra.me.REG[2] = ATTR_compiling_base___CompilerVisitor____ctx(fra.me.REG[0]);
 383   fra.me.REG[2] = CALL_compiling_base___CContext___decls(fra.me.REG[2])(fra.me.REG[2]);
 384   CALL_compiling_base___CompilerVisitor___add_line_to(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[2], fra.me.REG[1]);
 385   stack_frame_head = fra.me.prev;
 386   return;
 387 }
 388 void compiling_base___CompilerVisitor___add_instr(val_t p0, val_t p1){
 389   struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
 390   val_t REGB0;
 391   val_t tmp;
 392   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 393   fra.me.file = LOCATE_compiling_base;
 394   fra.me.line = 45;
 395   fra.me.meth = LOCATE_compiling_base___CompilerVisitor___add_instr;
 396   fra.me.has_broke = 0;
 397   fra.me.REG_size = 3;
 398   fra.me.REG[0] = NIT_NULL;
 399   fra.me.REG[1] = NIT_NULL;
 400   fra.me.REG[2] = NIT_NULL;
 401   fra.me.REG[0] = p0;
 402   fra.me.REG[1] = p1;
 403   REGB0 = TAG_Bool(VAL_ISA(fra.me.REG[1], COLOR_Array, ID_Array)) /*cast Array[String]*/;
 404   /* ./compiling//compiling_base.nit:45 */
 405   if (UNTAG_Bool(REGB0)) {
 406   } else {
 407     fprintf(stderr, "Cast failed");
 408     fprintf(stderr, " (%s:%d)\n", LOCATE_compiling_base, 45);
 409     nit_exit(1);
 410   }
 411   REGB0 = TAG_Bool(ATTR_compiling_base___CompilerVisitor____ctx(fra.me.REG[0])!=NIT_NULL);
 412   /* ./compiling//compiling_base.nit:48 */
 413   if (UNTAG_Bool(REGB0)) {
 414   } else {
 415     fprintf(stderr, "Uninitialized attribute %s", "_ctx");
 416     fprintf(stderr, " (%s:%d)\n", LOCATE_compiling_base, 48);
 417     nit_exit(1);
 418   }
 419   fra.me.REG[2] = ATTR_compiling_base___CompilerVisitor____ctx(fra.me.REG[0]);
 420   fra.me.REG[2] = CALL_compiling_base___CContext___instrs(fra.me.REG[2])(fra.me.REG[2]);
 421   CALL_compiling_base___CompilerVisitor___add_line_to(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[2], fra.me.REG[1]);
 422   stack_frame_head = fra.me.prev;
 423   return;
 424 }
 425 void compiling_base___CompilerVisitor___add_line_to(val_t p0, val_t p1, val_t p2){
 426   struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
 427   val_t REGB0;
 428   val_t REGB1;
 429   val_t tmp;
 430     static val_t once_value_1; /* Once value */
 431         static val_t once_value_2; /* Once value */
 432   static val_t once_value_5; /* Once value */
 433   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 434   fra.me.file = LOCATE_compiling_base;
 435   fra.me.line = 51;
 436   fra.me.meth = LOCATE_compiling_base___CompilerVisitor___add_line_to;
 437   fra.me.has_broke = 0;
 438   fra.me.REG_size = 4;
 439   fra.me.REG[0] = NIT_NULL;
 440   fra.me.REG[1] = NIT_NULL;
 441   fra.me.REG[2] = NIT_NULL;
 442   fra.me.REG[3] = NIT_NULL;
 443   fra.me.REG[0] = p0;
 444   fra.me.REG[1] = p1;
 445   fra.me.REG[2] = p2;
 446   REGB0 = TAG_Bool(ATTR_compiling_base___CompilerVisitor____indent_level(fra.me.REG[0])!=NIT_NULL);
 447   /* ./compiling//compiling_base.nit:53 */
 448   if (UNTAG_Bool(REGB0)) {
 449   } else {
 450     fprintf(stderr, "Uninitialized attribute %s", "_indent_level");
 451     fprintf(stderr, " (%s:%d)\n", LOCATE_compiling_base, 53);
 452     nit_exit(1);
 453   }
 454   REGB0 = ATTR_compiling_base___CompilerVisitor____indent_level(fra.me.REG[0]);
 455   REGB1 = TAG_Int(8);
 456   REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
 457   /* ./compiling//compiling_base.nit:53 */
 458   if (UNTAG_Bool(REGB1)) {
 459     /* ./compiling//compiling_base.nit:54 */
 460     if (!once_value_1) {
 461       fra.me.REG[3] = BOX_NativeString("\t\t");
 462       REGB1 = TAG_Int(2);
 463       fra.me.REG[3] = NEW_String_string___String___with_native(fra.me.REG[3], REGB1);
 464       once_value_1 = fra.me.REG[3];
 465       register_static_object(&once_value_1);
 466     } else fra.me.REG[3] = once_value_1;
 467     array___Array___add(fra.me.REG[1], fra.me.REG[3]);
 468   } else {
 469     REGB1 = TAG_Int(0);
 470     REGB0 = TAG_Bool(ATTR_compiling_base___CompilerVisitor____indent_level(fra.me.REG[0])!=NIT_NULL);
 471     /* ./compiling//compiling_base.nit:56 */
 472     if (UNTAG_Bool(REGB0)) {
 473     } else {
 474       fprintf(stderr, "Uninitialized attribute %s", "_indent_level");
 475       fprintf(stderr, " (%s:%d)\n", LOCATE_compiling_base, 56);
 476       nit_exit(1);
 477     }
 478     REGB0 = ATTR_compiling_base___CompilerVisitor____indent_level(fra.me.REG[0]);
 479     fra.me.REG[0] = NEW_Range_range___Range___without_last(REGB1, REGB0);
 480     fra.me.REG[0] = CALL_abstract_collection___Collection___iterator(fra.me.REG[0])(fra.me.REG[0]);
 481     while(1) {
 482       REGB0 = CALL_abstract_collection___Iterator___is_ok(fra.me.REG[0])(fra.me.REG[0]);
 483       if (UNTAG_Bool(REGB0)) {
 484         REGB0 = CALL_abstract_collection___Iterator___item(fra.me.REG[0])(fra.me.REG[0]);
 485         /* ./compiling//compiling_base.nit:57 */
 486         if (!once_value_2) {
 487           fra.me.REG[3] = BOX_NativeString("  ");
 488           REGB0 = TAG_Int(2);
 489           fra.me.REG[3] = NEW_String_string___String___with_native(fra.me.REG[3], REGB0);
 490           once_value_2 = fra.me.REG[3];
 491           register_static_object(&once_value_2);
 492         } else fra.me.REG[3] = once_value_2;
 493         array___Array___add(fra.me.REG[1], fra.me.REG[3]);
 494       } else {
 495         /* ./compiling//compiling_base.nit:56 */
 496         goto label3;
 497       }
 498       CALL_abstract_collection___Iterator___next(fra.me.REG[0])(fra.me.REG[0]);
 499     }
 500     label3: while(0);
 501   }
 502   fra.me.REG[2] = CALL_abstract_collection___Collection___iterator(fra.me.REG[2])(fra.me.REG[2]);
 503   /* ./compiling//compiling_base.nit:60 */
 504   while(1) {
 505     REGB0 = CALL_abstract_collection___Iterator___is_ok(fra.me.REG[2])(fra.me.REG[2]);
 506     if (UNTAG_Bool(REGB0)) {
 507       fra.me.REG[0] = CALL_abstract_collection___Iterator___item(fra.me.REG[2])(fra.me.REG[2]);
 508       /* ./compiling//compiling_base.nit:61 */
 509       array___Array___add(fra.me.REG[1], fra.me.REG[0]);
 510     } else {
 511       /* ./compiling//compiling_base.nit:60 */
 512       goto label4;
 513     }
 514     CALL_abstract_collection___Iterator___next(fra.me.REG[2])(fra.me.REG[2]);
 515   }
 516   label4: while(0);
 517   /* ./compiling//compiling_base.nit:63 */
 518   if (!once_value_5) {
 519     fra.me.REG[2] = BOX_NativeString("\n");
 520     REGB0 = TAG_Int(1);
 521     fra.me.REG[2] = NEW_String_string___String___with_native(fra.me.REG[2], REGB0);
 522     once_value_5 = fra.me.REG[2];
 523     register_static_object(&once_value_5);
 524   } else fra.me.REG[2] = once_value_5;
 525   array___Array___add(fra.me.REG[1], fra.me.REG[2]);
 526   stack_frame_head = fra.me.prev;
 527   return;
 528 }
 529 void compiling_base___CompilerVisitor___add_assignment(val_t p0, val_t p1, val_t p2){
 530   struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
 531   val_t REGB0;
 532   val_t REGB1;
 533   val_t tmp;
 534     static val_t once_value_1; /* Once value */
 535     static val_t once_value_2; /* Once value */
 536   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 537   fra.me.file = LOCATE_compiling_base;
 538   fra.me.line = 66;
 539   fra.me.meth = LOCATE_compiling_base___CompilerVisitor___add_assignment;
 540   fra.me.has_broke = 0;
 541   fra.me.REG_size = 4;
 542   fra.me.REG[0] = NIT_NULL;
 543   fra.me.REG[1] = NIT_NULL;
 544   fra.me.REG[2] = NIT_NULL;
 545   fra.me.REG[3] = NIT_NULL;
 546   fra.me.REG[0] = p0;
 547   fra.me.REG[1] = p1;
 548   fra.me.REG[2] = p2;
 549   REGB0 = TAG_Bool(IS_EQUAL_OO(fra.me.REG[1],fra.me.REG[2]));
 550   /* ./compiling//compiling_base.nit:69 */
 551   if (UNTAG_Bool(REGB0)) {
 552   } else {
 553     REGB1 = CALL_kernel___Object_____eqeq(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]);
 554     REGB0 = REGB1;
 555   }
 556   REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
 557   if (UNTAG_Bool(REGB0)) {
 558     REGB0 = TAG_Int(3);
 559     fra.me.REG[3] = NEW_Array_array___Array___with_capacity(REGB0);
 560     /* ./compiling//compiling_base.nit:70 */
 561     array___Array___add(fra.me.REG[3], fra.me.REG[1]);
 562     if (!once_value_1) {
 563       fra.me.REG[1] = BOX_NativeString(" = ");
 564       REGB0 = TAG_Int(3);
 565       fra.me.REG[1] = NEW_String_string___String___with_native(fra.me.REG[1], REGB0);
 566       once_value_1 = fra.me.REG[1];
 567       register_static_object(&once_value_1);
 568     } else fra.me.REG[1] = once_value_1;
 569     array___Array___add(fra.me.REG[3], fra.me.REG[1]);
 570     array___Array___add(fra.me.REG[3], fra.me.REG[2]);
 571     if (!once_value_2) {
 572       fra.me.REG[2] = BOX_NativeString(";");
 573       REGB0 = TAG_Int(1);
 574       fra.me.REG[2] = NEW_String_string___String___with_native(fra.me.REG[2], REGB0);
 575       once_value_2 = fra.me.REG[2];
 576       register_static_object(&once_value_2);
 577     } else fra.me.REG[2] = once_value_2;
 578     array___Array___add(fra.me.REG[3], fra.me.REG[2]);
 579     CALL_compiling_base___CompilerVisitor___add_instr(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[3]);
 580   }
 581   stack_frame_head = fra.me.prev;
 582   return;
 583 }
 584 val_t compiling_base___CompilerVisitor___out_contexts(val_t p0){
 585   struct {struct stack_frame_t me;} fra;
 586   val_t REGB0;
 587   val_t tmp;
 588   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 589   fra.me.file = LOCATE_compiling_base;
 590   fra.me.line = 74;
 591   fra.me.meth = LOCATE_compiling_base___CompilerVisitor___out_contexts;
 592   fra.me.has_broke = 0;
 593   fra.me.REG_size = 1;
 594   fra.me.REG[0] = NIT_NULL;
 595   fra.me.REG[0] = p0;
 596   REGB0 = TAG_Bool(ATTR_compiling_base___CompilerVisitor____out_contexts(fra.me.REG[0])!=NIT_NULL);
 597   /* ./compiling//compiling_base.nit:74 */
 598   if (UNTAG_Bool(REGB0)) {
 599   } else {
 600     fprintf(stderr, "Uninitialized attribute %s", "_out_contexts");
 601     fprintf(stderr, " (%s:%d)\n", LOCATE_compiling_base, 74);
 602     nit_exit(1);
 603   }
 604   fra.me.REG[0] = ATTR_compiling_base___CompilerVisitor____out_contexts(fra.me.REG[0]);
 605   stack_frame_head = fra.me.prev;
 606   return fra.me.REG[0];
 607 }
 608 void compiling_base___CompilerVisitor___out_contexts__eq(val_t p0, val_t p1){
 609   struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
 610   val_t tmp;
 611   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 612   fra.me.file = LOCATE_compiling_base;
 613   fra.me.line = 74;
 614   fra.me.meth = LOCATE_compiling_base___CompilerVisitor___out_contexts__eq;
 615   fra.me.has_broke = 0;
 616   fra.me.REG_size = 2;
 617   fra.me.REG[0] = NIT_NULL;
 618   fra.me.REG[1] = NIT_NULL;
 619   fra.me.REG[0] = p0;
 620   fra.me.REG[1] = p1;
 621   /* ./compiling//compiling_base.nit:74 */
 622   ATTR_compiling_base___CompilerVisitor____out_contexts(fra.me.REG[0]) = fra.me.REG[1];
 623   stack_frame_head = fra.me.prev;
 624   return;
 625 }
 626 val_t compiling_base___CompilerVisitor___new_number(val_t p0){
 627   struct {struct stack_frame_t me;} fra;
 628   val_t REGB0;
 629   val_t REGB1;
 630   val_t tmp;
 631   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 632   fra.me.file = LOCATE_compiling_base;
 633   fra.me.line = 77;
 634   fra.me.meth = LOCATE_compiling_base___CompilerVisitor___new_number;
 635   fra.me.has_broke = 0;
 636   fra.me.REG_size = 1;
 637   fra.me.REG[0] = NIT_NULL;
 638   fra.me.REG[0] = p0;
 639   REGB0 = TAG_Bool(ATTR_compiling_base___CompilerVisitor____number_cpt(fra.me.REG[0])!=NIT_NULL);
 640   /* ./compiling//compiling_base.nit:80 */
 641   if (UNTAG_Bool(REGB0)) {
 642   } else {
 643     fprintf(stderr, "Uninitialized attribute %s", "_number_cpt");
 644     fprintf(stderr, " (%s:%d)\n", LOCATE_compiling_base, 80);
 645     nit_exit(1);
 646   }
 647   REGB0 = ATTR_compiling_base___CompilerVisitor____number_cpt(fra.me.REG[0]);
 648   REGB1 = TAG_Int(1);
 649   REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
 650   /* ./compiling//compiling_base.nit:81 */
 651   ATTR_compiling_base___CompilerVisitor____number_cpt(fra.me.REG[0]) = REGB1;
 652   /* ./compiling//compiling_base.nit:82 */
 653   goto label1;
 654   label1: while(0);
 655   stack_frame_head = fra.me.prev;
 656   return REGB0;
 657 }
 658 void compiling_base___CompilerVisitor___indent(val_t p0){
 659   struct {struct stack_frame_t me;} fra;
 660   val_t REGB0;
 661   val_t REGB1;
 662   val_t tmp;
 663   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 664   fra.me.file = LOCATE_compiling_base;
 665   fra.me.line = 87;
 666   fra.me.meth = LOCATE_compiling_base___CompilerVisitor___indent;
 667   fra.me.has_broke = 0;
 668   fra.me.REG_size = 1;
 669   fra.me.REG[0] = NIT_NULL;
 670   fra.me.REG[0] = p0;
 671   REGB0 = ATTR_compiling_base___CompilerVisitor____indent_level(fra.me.REG[0]);
 672   REGB1 = TAG_Int(1);
 673   REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
 674   /* ./compiling//compiling_base.nit:89 */
 675   ATTR_compiling_base___CompilerVisitor____indent_level(fra.me.REG[0]) = REGB1;
 676   stack_frame_head = fra.me.prev;
 677   return;
 678 }
 679 void compiling_base___CompilerVisitor___unindent(val_t p0){
 680   struct {struct stack_frame_t me;} fra;
 681   val_t REGB0;
 682   val_t REGB1;
 683   val_t tmp;
 684   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 685   fra.me.file = LOCATE_compiling_base;
 686   fra.me.line = 91;
 687   fra.me.meth = LOCATE_compiling_base___CompilerVisitor___unindent;
 688   fra.me.has_broke = 0;
 689   fra.me.REG_size = 1;
 690   fra.me.REG[0] = NIT_NULL;
 691   fra.me.REG[0] = p0;
 692   REGB0 = ATTR_compiling_base___CompilerVisitor____indent_level(fra.me.REG[0]);
 693   REGB1 = TAG_Int(1);
 694   REGB1 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB1));
 695   /* ./compiling//compiling_base.nit:94 */
 696   ATTR_compiling_base___CompilerVisitor____indent_level(fra.me.REG[0]) = REGB1;
 697   REGB1 = TAG_Bool(ATTR_compiling_base___CompilerVisitor____indent_level(fra.me.REG[0])!=NIT_NULL);
 698   /* ./compiling//compiling_base.nit:95 */
 699   if (UNTAG_Bool(REGB1)) {
 700   } else {
 701     fprintf(stderr, "Uninitialized attribute %s", "_indent_level");
 702     fprintf(stderr, " (%s:%d)\n", LOCATE_compiling_base, 95);
 703     nit_exit(1);
 704   }
 705   REGB1 = ATTR_compiling_base___CompilerVisitor____indent_level(fra.me.REG[0]);
 706   REGB0 = TAG_Int(0);
 707   REGB0 = TAG_Bool(UNTAG_Int(REGB1)<UNTAG_Int(REGB0));
 708   /* ./compiling//compiling_base.nit:95 */
 709   if (UNTAG_Bool(REGB0)) {
 710     REGB0 = TAG_Int(0);
 711     ATTR_compiling_base___CompilerVisitor____indent_level(fra.me.REG[0]) = REGB0;
 712   }
 713   stack_frame_head = fra.me.prev;
 714   return;
 715 }
 716 val_t compiling_base___CompilerVisitor___module(val_t p0){
 717   struct {struct stack_frame_t me;} fra;
 718   val_t REGB0;
 719   val_t tmp;
 720   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 721   fra.me.file = LOCATE_compiling_base;
 722   fra.me.line = 107;
 723   fra.me.meth = LOCATE_compiling_base___CompilerVisitor___module;
 724   fra.me.has_broke = 0;
 725   fra.me.REG_size = 1;
 726   fra.me.REG[0] = NIT_NULL;
 727   fra.me.REG[0] = p0;
 728   REGB0 = TAG_Bool(ATTR_compiling_base___CompilerVisitor____module(fra.me.REG[0])!=NIT_NULL);
 729   /* ./compiling//compiling_base.nit:107 */
 730   if (UNTAG_Bool(REGB0)) {
 731   } else {
 732     fprintf(stderr, "Uninitialized attribute %s", "_module");
 733     fprintf(stderr, " (%s:%d)\n", LOCATE_compiling_base, 107);
 734     nit_exit(1);
 735   }
 736   fra.me.REG[0] = ATTR_compiling_base___CompilerVisitor____module(fra.me.REG[0]);
 737   stack_frame_head = fra.me.prev;
 738   return fra.me.REG[0];
 739 }
 740 val_t compiling_base___CompilerVisitor___ctx(val_t p0){
 741   struct {struct stack_frame_t me;} fra;
 742   val_t REGB0;
 743   val_t tmp;
 744   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 745   fra.me.file = LOCATE_compiling_base;
 746   fra.me.line = 110;
 747   fra.me.meth = LOCATE_compiling_base___CompilerVisitor___ctx;
 748   fra.me.has_broke = 0;
 749   fra.me.REG_size = 1;
 750   fra.me.REG[0] = NIT_NULL;
 751   fra.me.REG[0] = p0;
 752   REGB0 = TAG_Bool(ATTR_compiling_base___CompilerVisitor____ctx(fra.me.REG[0])!=NIT_NULL);
 753   /* ./compiling//compiling_base.nit:110 */
 754   if (UNTAG_Bool(REGB0)) {
 755   } else {
 756     fprintf(stderr, "Uninitialized attribute %s", "_ctx");
 757     fprintf(stderr, " (%s:%d)\n", LOCATE_compiling_base, 110);
 758     nit_exit(1);
 759   }
 760   fra.me.REG[0] = ATTR_compiling_base___CompilerVisitor____ctx(fra.me.REG[0]);
 761   stack_frame_head = fra.me.prev;
 762   return fra.me.REG[0];
 763 }
 764 void compiling_base___CompilerVisitor___ctx__eq(val_t p0, val_t p1){
 765   struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
 766   val_t tmp;
 767   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 768   fra.me.file = LOCATE_compiling_base;
 769   fra.me.line = 110;
 770   fra.me.meth = LOCATE_compiling_base___CompilerVisitor___ctx__eq;
 771   fra.me.has_broke = 0;
 772   fra.me.REG_size = 2;
 773   fra.me.REG[0] = NIT_NULL;
 774   fra.me.REG[1] = NIT_NULL;
 775   fra.me.REG[0] = p0;
 776   fra.me.REG[1] = p1;
 777   /* ./compiling//compiling_base.nit:110 */
 778   ATTR_compiling_base___CompilerVisitor____ctx(fra.me.REG[0]) = fra.me.REG[1];
 779   stack_frame_head = fra.me.prev;
 780   return;
 781 }
 782 val_t compiling_base___CompilerVisitor___indent_level(val_t p0){
 783   struct {struct stack_frame_t me;} fra;
 784   val_t REGB0;
 785   val_t tmp;
 786   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 787   fra.me.file = LOCATE_compiling_base;
 788   fra.me.line = 113;
 789   fra.me.meth = LOCATE_compiling_base___CompilerVisitor___indent_level;
 790   fra.me.has_broke = 0;
 791   fra.me.REG_size = 1;
 792   fra.me.REG[0] = NIT_NULL;
 793   fra.me.REG[0] = p0;
 794   REGB0 = TAG_Bool(ATTR_compiling_base___CompilerVisitor____indent_level(fra.me.REG[0])!=NIT_NULL);
 795   /* ./compiling//compiling_base.nit:113 */
 796   if (UNTAG_Bool(REGB0)) {
 797   } else {
 798     fprintf(stderr, "Uninitialized attribute %s", "_indent_level");
 799     fprintf(stderr, " (%s:%d)\n", LOCATE_compiling_base, 113);
 800     nit_exit(1);
 801   }
 802   REGB0 = ATTR_compiling_base___CompilerVisitor____indent_level(fra.me.REG[0]);
 803   stack_frame_head = fra.me.prev;
 804   return REGB0;
 805 }
 806 void compiling_base___CompilerVisitor___indent_level__eq(val_t p0, val_t p1){
 807   struct {struct stack_frame_t me;} fra;
 808   val_t REGB0;
 809   val_t tmp;
 810   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 811   fra.me.file = LOCATE_compiling_base;
 812   fra.me.line = 113;
 813   fra.me.meth = LOCATE_compiling_base___CompilerVisitor___indent_level__eq;
 814   fra.me.has_broke = 0;
 815   fra.me.REG_size = 1;
 816   fra.me.REG[0] = NIT_NULL;
 817   fra.me.REG[0] = p0;
 818   REGB0 = p1;
 819   /* ./compiling//compiling_base.nit:113 */
 820   ATTR_compiling_base___CompilerVisitor____indent_level(fra.me.REG[0]) = REGB0;
 821   stack_frame_head = fra.me.prev;
 822   return;
 823 }
 824 val_t compiling_base___CompilerVisitor___tc(val_t p0){
 825   struct {struct stack_frame_t me;} fra;
 826   val_t REGB0;
 827   val_t tmp;
 828   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 829   fra.me.file = LOCATE_compiling_base;
 830   fra.me.line = 116;
 831   fra.me.meth = LOCATE_compiling_base___CompilerVisitor___tc;
 832   fra.me.has_broke = 0;
 833   fra.me.REG_size = 1;
 834   fra.me.REG[0] = NIT_NULL;
 835   fra.me.REG[0] = p0;
 836   REGB0 = TAG_Bool(ATTR_compiling_base___CompilerVisitor____tc(fra.me.REG[0])!=NIT_NULL);
 837   /* ./compiling//compiling_base.nit:116 */
 838   if (UNTAG_Bool(REGB0)) {
 839   } else {
 840     fprintf(stderr, "Uninitialized attribute %s", "_tc");
 841     fprintf(stderr, " (%s:%d)\n", LOCATE_compiling_base, 116);
 842     nit_exit(1);
 843   }
 844   fra.me.REG[0] = ATTR_compiling_base___CompilerVisitor____tc(fra.me.REG[0]);
 845   stack_frame_head = fra.me.prev;
 846   return fra.me.REG[0];
 847 }
 848 void compiling_base___CompilerVisitor___init(val_t p0, val_t p1, val_t p2, int* init_table){
 849   int itpos0 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_CompilerVisitor].i;
 850   struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
 851   val_t tmp;
 852   if (init_table[itpos0]) return;
 853   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 854   fra.me.file = LOCATE_compiling_base;
 855   fra.me.line = 119;
 856   fra.me.meth = LOCATE_compiling_base___CompilerVisitor___init;
 857   fra.me.has_broke = 0;
 858   fra.me.REG_size = 3;
 859   fra.me.REG[0] = NIT_NULL;
 860   fra.me.REG[1] = NIT_NULL;
 861   fra.me.REG[2] = NIT_NULL;
 862   fra.me.REG[0] = p0;
 863   fra.me.REG[1] = p1;
 864   fra.me.REG[2] = p2;
 865   /* ./compiling//compiling_base.nit:122 */
 866   ATTR_compiling_base___CompilerVisitor____module(fra.me.REG[0]) = fra.me.REG[1];
 867   /* ./compiling//compiling_base.nit:123 */
 868   ATTR_compiling_base___CompilerVisitor____tc(fra.me.REG[0]) = fra.me.REG[2];
 869   stack_frame_head = fra.me.prev;
 870   init_table[itpos0] = 1;
 871   return;
 872 }
 873 val_t compiling_base___CContext___decls(val_t p0){
 874   struct {struct stack_frame_t me;} fra;
 875   val_t REGB0;
 876   val_t tmp;
 877   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 878   fra.me.file = LOCATE_compiling_base;
 879   fra.me.line = 130;
 880   fra.me.meth = LOCATE_compiling_base___CContext___decls;
 881   fra.me.has_broke = 0;
 882   fra.me.REG_size = 1;
 883   fra.me.REG[0] = NIT_NULL;
 884   fra.me.REG[0] = p0;
 885   REGB0 = TAG_Bool(ATTR_compiling_base___CContext____decls(fra.me.REG[0])!=NIT_NULL);
 886   /* ./compiling//compiling_base.nit:130 */
 887   if (UNTAG_Bool(REGB0)) {
 888   } else {
 889     fprintf(stderr, "Uninitialized attribute %s", "_decls");
 890     fprintf(stderr, " (%s:%d)\n", LOCATE_compiling_base, 130);
 891     nit_exit(1);
 892   }
 893   fra.me.REG[0] = ATTR_compiling_base___CContext____decls(fra.me.REG[0]);
 894   stack_frame_head = fra.me.prev;
 895   return fra.me.REG[0];
 896 }
 897 val_t compiling_base___CContext___instrs(val_t p0){
 898   struct {struct stack_frame_t me;} fra;
 899   val_t REGB0;
 900   val_t tmp;
 901   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 902   fra.me.file = LOCATE_compiling_base;
 903   fra.me.line = 131;
 904   fra.me.meth = LOCATE_compiling_base___CContext___instrs;
 905   fra.me.has_broke = 0;
 906   fra.me.REG_size = 1;
 907   fra.me.REG[0] = NIT_NULL;
 908   fra.me.REG[0] = p0;
 909   REGB0 = TAG_Bool(ATTR_compiling_base___CContext____instrs(fra.me.REG[0])!=NIT_NULL);
 910   /* ./compiling//compiling_base.nit:131 */
 911   if (UNTAG_Bool(REGB0)) {
 912   } else {
 913     fprintf(stderr, "Uninitialized attribute %s", "_instrs");
 914     fprintf(stderr, " (%s:%d)\n", LOCATE_compiling_base, 131);
 915     nit_exit(1);
 916   }
 917   fra.me.REG[0] = ATTR_compiling_base___CContext____instrs(fra.me.REG[0]);
 918   stack_frame_head = fra.me.prev;
 919   return fra.me.REG[0];
 920 }
 921 void compiling_base___CContext___append(val_t p0, val_t p1){
 922   struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
 923   val_t REGB0;
 924   val_t tmp;
 925   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 926   fra.me.file = LOCATE_compiling_base;
 927   fra.me.line = 133;
 928   fra.me.meth = LOCATE_compiling_base___CContext___append;
 929   fra.me.has_broke = 0;
 930   fra.me.REG_size = 4;
 931   fra.me.REG[0] = NIT_NULL;
 932   fra.me.REG[1] = NIT_NULL;
 933   fra.me.REG[2] = NIT_NULL;
 934   fra.me.REG[3] = NIT_NULL;
 935   fra.me.REG[0] = p0;
 936   fra.me.REG[1] = p1;
 937   REGB0 = TAG_Bool(ATTR_compiling_base___CContext____instrs(fra.me.REG[0])!=NIT_NULL);
 938   /* ./compiling//compiling_base.nit:135 */
 939   if (UNTAG_Bool(REGB0)) {
 940   } else {
 941     fprintf(stderr, "Uninitialized attribute %s", "_instrs");
 942     fprintf(stderr, " (%s:%d)\n", LOCATE_compiling_base, 135);
 943     nit_exit(1);
 944   }
 945   fra.me.REG[2] = ATTR_compiling_base___CContext____instrs(fra.me.REG[0]);
 946   fra.me.REG[3] = CALL_compiling_base___CContext___decls(fra.me.REG[1])(fra.me.REG[1]);
 947   CALL_abstract_collection___Sequence___append(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]);
 948   REGB0 = TAG_Bool(ATTR_compiling_base___CContext____instrs(fra.me.REG[0])!=NIT_NULL);
 949   /* ./compiling//compiling_base.nit:136 */
 950   if (UNTAG_Bool(REGB0)) {
 951   } else {
 952     fprintf(stderr, "Uninitialized attribute %s", "_instrs");
 953     fprintf(stderr, " (%s:%d)\n", LOCATE_compiling_base, 136);
 954     nit_exit(1);
 955   }
 956   fra.me.REG[0] = ATTR_compiling_base___CContext____instrs(fra.me.REG[0]);
 957   fra.me.REG[1] = CALL_compiling_base___CContext___instrs(fra.me.REG[1])(fra.me.REG[1]);
 958   CALL_abstract_collection___Sequence___append(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
 959   stack_frame_head = fra.me.prev;
 960   return;
 961 }
 962 void compiling_base___CContext___merge(val_t p0, val_t p1){
 963   struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
 964   val_t REGB0;
 965   val_t tmp;
 966   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
 967   fra.me.file = LOCATE_compiling_base;
 968   fra.me.line = 139;
 969   fra.me.meth = LOCATE_compiling_base___CContext___merge;
 970   fra.me.has_broke = 0;
 971   fra.me.REG_size = 4;
 972   fra.me.REG[0] = NIT_NULL;
 973   fra.me.REG[1] = NIT_NULL;
 974   fra.me.REG[2] = NIT_NULL;
 975   fra.me.REG[3] = NIT_NULL;
 976   fra.me.REG[0] = p0;
 977   fra.me.REG[1] = p1;
 978   REGB0 = TAG_Bool(ATTR_compiling_base___CContext____decls(fra.me.REG[0])!=NIT_NULL);
 979   /* ./compiling//compiling_base.nit:141 */
 980   if (UNTAG_Bool(REGB0)) {
 981   } else {
 982     fprintf(stderr, "Uninitialized attribute %s", "_decls");
 983     fprintf(stderr, " (%s:%d)\n", LOCATE_compiling_base, 141);
 984     nit_exit(1);
 985   }
 986   fra.me.REG[2] = ATTR_compiling_base___CContext____decls(fra.me.REG[0]);
 987   fra.me.REG[3] = CALL_compiling_base___CContext___decls(fra.me.REG[1])(fra.me.REG[1]);
 988   CALL_abstract_collection___Sequence___append(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]);
 989   REGB0 = TAG_Bool(ATTR_compiling_base___CContext____instrs(fra.me.REG[0])!=NIT_NULL);
 990   /* ./compiling//compiling_base.nit:142 */
 991   if (UNTAG_Bool(REGB0)) {
 992   } else {
 993     fprintf(stderr, "Uninitialized attribute %s", "_instrs");
 994     fprintf(stderr, " (%s:%d)\n", LOCATE_compiling_base, 142);
 995     nit_exit(1);
 996   }
 997   fra.me.REG[0] = ATTR_compiling_base___CContext____instrs(fra.me.REG[0]);
 998   fra.me.REG[1] = CALL_compiling_base___CContext___instrs(fra.me.REG[1])(fra.me.REG[1]);
 999   CALL_abstract_collection___Sequence___append(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
1000   stack_frame_head = fra.me.prev;
1001   return;
1002 }
1003 void compiling_base___CContext___init(val_t p0, int* init_table){
1004   int itpos1 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_CContext].i;
1005   struct {struct stack_frame_t me;} fra;
1006   val_t tmp;
1007   if (init_table[itpos1]) return;
1008   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1009   fra.me.file = LOCATE_compiling_base;
1010   fra.me.line = 145;
1011   fra.me.meth = LOCATE_compiling_base___CContext___init;
1012   fra.me.has_broke = 0;
1013   fra.me.REG_size = 1;
1014   fra.me.REG[0] = NIT_NULL;
1015   fra.me.REG[0] = p0;
1016   /* ./compiling//compiling_base.nit:145 */
1017   stack_frame_head = fra.me.prev;
1018   init_table[itpos1] = 1;
1019   return;
1020 }
1021 val_t compiling_base___MMGlobalProperty___meth_call(val_t p0){
1022   struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
1023   val_t REGB0;
1024   val_t tmp;
1025   static val_t once_value_1; /* Once value */
1026   static val_t once_value_2; /* Once value */
1027   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1028   fra.me.file = LOCATE_compiling_base;
1029   fra.me.line = 149;
1030   fra.me.meth = LOCATE_compiling_base___MMGlobalProperty___meth_call;
1031   fra.me.has_broke = 0;
1032   fra.me.REG_size = 3;
1033   fra.me.REG[0] = NIT_NULL;
1034   fra.me.REG[1] = NIT_NULL;
1035   fra.me.REG[2] = NIT_NULL;
1036   fra.me.REG[0] = p0;
1037   REGB0 = TAG_Int(3);
1038   fra.me.REG[1] = NEW_Array_array___Array___with_capacity(REGB0);
1039   /* ./compiling//compiling_base.nit:152 */
1040   if (!once_value_1) {
1041     fra.me.REG[2] = BOX_NativeString("CALL_");
1042     REGB0 = TAG_Int(5);
1043     fra.me.REG[2] = NEW_String_string___String___with_native(fra.me.REG[2], REGB0);
1044     once_value_1 = fra.me.REG[2];
1045     register_static_object(&once_value_1);
1046   } else fra.me.REG[2] = once_value_1;
1047   array___Array___add(fra.me.REG[1], fra.me.REG[2]);
1048   fra.me.REG[0] = CALL_abstractmetamodel___MMGlobalProperty___intro(fra.me.REG[0])(fra.me.REG[0]);
1049   fra.me.REG[0] = CALL_compiling_base___MMLocalProperty___cname(fra.me.REG[0])(fra.me.REG[0]);
1050   array___Array___add(fra.me.REG[1], fra.me.REG[0]);
1051   if (!once_value_2) {
1052     fra.me.REG[0] = BOX_NativeString("");
1053     REGB0 = TAG_Int(0);
1054     fra.me.REG[0] = NEW_String_string___String___with_native(fra.me.REG[0], REGB0);
1055     once_value_2 = fra.me.REG[0];
1056     register_static_object(&once_value_2);
1057   } else fra.me.REG[0] = once_value_2;
1058   array___Array___add(fra.me.REG[1], fra.me.REG[0]);
1059   fra.me.REG[1] = CALL_string___Object___to_s(fra.me.REG[1])(fra.me.REG[1]);
1060   goto label3;
1061   label3: while(0);
1062   stack_frame_head = fra.me.prev;
1063   return fra.me.REG[1];
1064 }
1065 val_t compiling_base___MMGlobalProperty___attr_access(val_t p0){
1066   struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
1067   val_t REGB0;
1068   val_t tmp;
1069   static val_t once_value_1; /* Once value */
1070   static val_t once_value_2; /* Once value */
1071   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1072   fra.me.file = LOCATE_compiling_base;
1073   fra.me.line = 155;
1074   fra.me.meth = LOCATE_compiling_base___MMGlobalProperty___attr_access;
1075   fra.me.has_broke = 0;
1076   fra.me.REG_size = 3;
1077   fra.me.REG[0] = NIT_NULL;
1078   fra.me.REG[1] = NIT_NULL;
1079   fra.me.REG[2] = NIT_NULL;
1080   fra.me.REG[0] = p0;
1081   REGB0 = TAG_Int(3);
1082   fra.me.REG[1] = NEW_Array_array___Array___with_capacity(REGB0);
1083   /* ./compiling//compiling_base.nit:158 */
1084   if (!once_value_1) {
1085     fra.me.REG[2] = BOX_NativeString("ATTR_");
1086     REGB0 = TAG_Int(5);
1087     fra.me.REG[2] = NEW_String_string___String___with_native(fra.me.REG[2], REGB0);
1088     once_value_1 = fra.me.REG[2];
1089     register_static_object(&once_value_1);
1090   } else fra.me.REG[2] = once_value_1;
1091   array___Array___add(fra.me.REG[1], fra.me.REG[2]);
1092   fra.me.REG[0] = CALL_abstractmetamodel___MMGlobalProperty___intro(fra.me.REG[0])(fra.me.REG[0]);
1093   fra.me.REG[0] = CALL_compiling_base___MMLocalProperty___cname(fra.me.REG[0])(fra.me.REG[0]);
1094   array___Array___add(fra.me.REG[1], fra.me.REG[0]);
1095   if (!once_value_2) {
1096     fra.me.REG[0] = BOX_NativeString("");
1097     REGB0 = TAG_Int(0);
1098     fra.me.REG[0] = NEW_String_string___String___with_native(fra.me.REG[0], REGB0);
1099     once_value_2 = fra.me.REG[0];
1100     register_static_object(&once_value_2);
1101   } else fra.me.REG[0] = once_value_2;
1102   array___Array___add(fra.me.REG[1], fra.me.REG[0]);
1103   fra.me.REG[1] = CALL_string___Object___to_s(fra.me.REG[1])(fra.me.REG[1]);
1104   goto label3;
1105   label3: while(0);
1106   stack_frame_head = fra.me.prev;
1107   return fra.me.REG[1];
1108 }
1109 val_t compiling_base___MMGlobalClass___id_id(val_t p0){
1110   struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
1111   val_t REGB0;
1112   val_t tmp;
1113   static val_t once_value_1; /* Once value */
1114   static val_t once_value_2; /* Once value */
1115   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1116   fra.me.file = LOCATE_compiling_base;
1117   fra.me.line = 163;
1118   fra.me.meth = LOCATE_compiling_base___MMGlobalClass___id_id;
1119   fra.me.has_broke = 0;
1120   fra.me.REG_size = 3;
1121   fra.me.REG[0] = NIT_NULL;
1122   fra.me.REG[1] = NIT_NULL;
1123   fra.me.REG[2] = NIT_NULL;
1124   fra.me.REG[0] = p0;
1125   REGB0 = TAG_Int(3);
1126   fra.me.REG[1] = NEW_Array_array___Array___with_capacity(REGB0);
1127   /* ./compiling//compiling_base.nit:166 */
1128   if (!once_value_1) {
1129     fra.me.REG[2] = BOX_NativeString("ID_");
1130     REGB0 = TAG_Int(3);
1131     fra.me.REG[2] = NEW_String_string___String___with_native(fra.me.REG[2], REGB0);
1132     once_value_1 = fra.me.REG[2];
1133     register_static_object(&once_value_1);
1134   } else fra.me.REG[2] = once_value_1;
1135   array___Array___add(fra.me.REG[1], fra.me.REG[2]);
1136   fra.me.REG[0] = CALL_abstractmetamodel___MMGlobalClass___intro(fra.me.REG[0])(fra.me.REG[0]);
1137   fra.me.REG[0] = CALL_abstractmetamodel___MMLocalClass___name(fra.me.REG[0])(fra.me.REG[0]);
1138   fra.me.REG[0] = CALL_string___Object___to_s(fra.me.REG[0])(fra.me.REG[0]);
1139   array___Array___add(fra.me.REG[1], fra.me.REG[0]);
1140   if (!once_value_2) {
1141     fra.me.REG[0] = BOX_NativeString("");
1142     REGB0 = TAG_Int(0);
1143     fra.me.REG[0] = NEW_String_string___String___with_native(fra.me.REG[0], REGB0);
1144     once_value_2 = fra.me.REG[0];
1145     register_static_object(&once_value_2);
1146   } else fra.me.REG[0] = once_value_2;
1147   array___Array___add(fra.me.REG[1], fra.me.REG[0]);
1148   fra.me.REG[1] = CALL_string___Object___to_s(fra.me.REG[1])(fra.me.REG[1]);
1149   goto label3;
1150   label3: while(0);
1151   stack_frame_head = fra.me.prev;
1152   return fra.me.REG[1];
1153 }
1154 val_t compiling_base___MMGlobalClass___color_id(val_t p0){
1155   struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
1156   val_t REGB0;
1157   val_t tmp;
1158   static val_t once_value_1; /* Once value */
1159   static val_t once_value_2; /* Once value */
1160   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1161   fra.me.file = LOCATE_compiling_base;
1162   fra.me.line = 169;
1163   fra.me.meth = LOCATE_compiling_base___MMGlobalClass___color_id;
1164   fra.me.has_broke = 0;
1165   fra.me.REG_size = 3;
1166   fra.me.REG[0] = NIT_NULL;
1167   fra.me.REG[1] = NIT_NULL;
1168   fra.me.REG[2] = NIT_NULL;
1169   fra.me.REG[0] = p0;
1170   REGB0 = TAG_Int(3);
1171   fra.me.REG[1] = NEW_Array_array___Array___with_capacity(REGB0);
1172   /* ./compiling//compiling_base.nit:172 */
1173   if (!once_value_1) {
1174     fra.me.REG[2] = BOX_NativeString("COLOR_");
1175     REGB0 = TAG_Int(6);
1176     fra.me.REG[2] = NEW_String_string___String___with_native(fra.me.REG[2], REGB0);
1177     once_value_1 = fra.me.REG[2];
1178     register_static_object(&once_value_1);
1179   } else fra.me.REG[2] = once_value_1;
1180   array___Array___add(fra.me.REG[1], fra.me.REG[2]);
1181   fra.me.REG[0] = CALL_abstractmetamodel___MMGlobalClass___intro(fra.me.REG[0])(fra.me.REG[0]);
1182   fra.me.REG[0] = CALL_abstractmetamodel___MMLocalClass___name(fra.me.REG[0])(fra.me.REG[0]);
1183   fra.me.REG[0] = CALL_string___Object___to_s(fra.me.REG[0])(fra.me.REG[0]);
1184   array___Array___add(fra.me.REG[1], fra.me.REG[0]);
1185   if (!once_value_2) {
1186     fra.me.REG[0] = BOX_NativeString("");
1187     REGB0 = TAG_Int(0);
1188     fra.me.REG[0] = NEW_String_string___String___with_native(fra.me.REG[0], REGB0);
1189     once_value_2 = fra.me.REG[0];
1190     register_static_object(&once_value_2);
1191   } else fra.me.REG[0] = once_value_2;
1192   array___Array___add(fra.me.REG[1], fra.me.REG[0]);
1193   fra.me.REG[1] = CALL_string___Object___to_s(fra.me.REG[1])(fra.me.REG[1]);
1194   goto label3;
1195   label3: while(0);
1196   stack_frame_head = fra.me.prev;
1197   return fra.me.REG[1];
1198 }
1199 val_t compiling_base___MMGlobalClass___init_table_pos_id(val_t p0){
1200   struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
1201   val_t REGB0;
1202   val_t tmp;
1203   static val_t once_value_1; /* Once value */
1204   static val_t once_value_2; /* Once value */
1205   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1206   fra.me.file = LOCATE_compiling_base;
1207   fra.me.line = 175;
1208   fra.me.meth = LOCATE_compiling_base___MMGlobalClass___init_table_pos_id;
1209   fra.me.has_broke = 0;
1210   fra.me.REG_size = 3;
1211   fra.me.REG[0] = NIT_NULL;
1212   fra.me.REG[1] = NIT_NULL;
1213   fra.me.REG[2] = NIT_NULL;
1214   fra.me.REG[0] = p0;
1215   REGB0 = TAG_Int(3);
1216   fra.me.REG[1] = NEW_Array_array___Array___with_capacity(REGB0);
1217   /* ./compiling//compiling_base.nit:178 */
1218   if (!once_value_1) {
1219     fra.me.REG[2] = BOX_NativeString("INIT_TABLE_POS_");
1220     REGB0 = TAG_Int(15);
1221     fra.me.REG[2] = NEW_String_string___String___with_native(fra.me.REG[2], REGB0);
1222     once_value_1 = fra.me.REG[2];
1223     register_static_object(&once_value_1);
1224   } else fra.me.REG[2] = once_value_1;
1225   array___Array___add(fra.me.REG[1], fra.me.REG[2]);
1226   fra.me.REG[0] = CALL_abstractmetamodel___MMGlobalClass___intro(fra.me.REG[0])(fra.me.REG[0]);
1227   fra.me.REG[0] = CALL_abstractmetamodel___MMLocalClass___name(fra.me.REG[0])(fra.me.REG[0]);
1228   fra.me.REG[0] = CALL_string___Object___to_s(fra.me.REG[0])(fra.me.REG[0]);
1229   array___Array___add(fra.me.REG[1], fra.me.REG[0]);
1230   if (!once_value_2) {
1231     fra.me.REG[0] = BOX_NativeString("");
1232     REGB0 = TAG_Int(0);
1233     fra.me.REG[0] = NEW_String_string___String___with_native(fra.me.REG[0], REGB0);
1234     once_value_2 = fra.me.REG[0];
1235     register_static_object(&once_value_2);
1236   } else fra.me.REG[0] = once_value_2;
1237   array___Array___add(fra.me.REG[1], fra.me.REG[0]);
1238   fra.me.REG[1] = CALL_string___Object___to_s(fra.me.REG[1])(fra.me.REG[1]);
1239   goto label3;
1240   label3: while(0);
1241   stack_frame_head = fra.me.prev;
1242   return fra.me.REG[1];
1243 }
1244 val_t compiling_base___MMLocalProperty___cname(val_t p0){
1245   struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
1246   val_t REGB0;
1247   val_t REGB1;
1248   val_t tmp;
1249   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1250   fra.me.file = LOCATE_compiling_base;
1251   fra.me.line = 186;
1252   fra.me.meth = LOCATE_compiling_base___MMLocalProperty___cname;
1253   fra.me.has_broke = 0;
1254   fra.me.REG_size = 4;
1255   fra.me.REG[0] = NIT_NULL;
1256   fra.me.REG[1] = NIT_NULL;
1257   fra.me.REG[2] = NIT_NULL;
1258   fra.me.REG[3] = NIT_NULL;
1259   fra.me.REG[0] = p0;
1260   fra.me.REG[1] = ATTR_compiling_base___MMLocalProperty____cname_cache(fra.me.REG[0]);
1261   REGB0 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
1262   /* ./compiling//compiling_base.nit:190 */
1263   if (UNTAG_Bool(REGB0)) {
1264   } else {
1265     REGB1 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
1266     if (UNTAG_Bool(REGB1)) {
1267       REGB1 = TAG_Bool(false);
1268       REGB0 = REGB1;
1269     } else {
1270       REGB1 = CALL_kernel___Object_____eqeq(fra.me.REG[1])(fra.me.REG[1], NIT_NULL);
1271       REGB0 = REGB1;
1272     }
1273   }
1274   if (UNTAG_Bool(REGB0)) {
1275     REGB0 = TAG_Int(2);
1276     fra.me.REG[2] = NEW_Array_array___Array___with_capacity(REGB0);
1277     fra.me.REG[3] = CALL_abstractmetamodel___MMLocalProperty___module(fra.me.REG[0])(fra.me.REG[0]);
1278     fra.me.REG[3] = CALL_abstractmetamodel___MMModule___name(fra.me.REG[3])(fra.me.REG[3]);
1279     /* ./compiling//compiling_base.nit:191 */
1280     array___Array___add(fra.me.REG[2], fra.me.REG[3]);
1281     fra.me.REG[3] = CALL_abstractmetamodel___MMLocalProperty___local_class(fra.me.REG[0])(fra.me.REG[0]);
1282     fra.me.REG[3] = CALL_abstractmetamodel___MMLocalClass___name(fra.me.REG[3])(fra.me.REG[3]);
1283     array___Array___add(fra.me.REG[2], fra.me.REG[3]);
1284     fra.me.REG[3] = CALL_abstractmetamodel___MMLocalProperty___name(fra.me.REG[0])(fra.me.REG[0]);
1285     array___Array___add(fra.me.REG[2], fra.me.REG[3]);
1286     fra.me.REG[2] = CALL_utils___Object___cmangle(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[2]);
1287     fra.me.REG[1] = fra.me.REG[2];
1288     /* ./compiling//compiling_base.nit:192 */
1289     ATTR_compiling_base___MMLocalProperty____cname_cache(fra.me.REG[0]) = fra.me.REG[1];
1290   }
1291   /* ./compiling//compiling_base.nit:194 */
1292   goto label1;
1293   label1: while(0);
1294   stack_frame_head = fra.me.prev;
1295   return fra.me.REG[1];
1296 }
1297 val_t compiling_base___MMLocalProperty___super_meth_call(val_t p0){
1298   struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
1299   val_t REGB0;
1300   val_t tmp;
1301   static val_t once_value_1; /* Once value */
1302   static val_t once_value_2; /* Once value */
1303   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
1304   fra.me.file = LOCATE_compiling_base;
1305   fra.me.line = 197;
1306   fra.me.meth = LOCATE_compiling_base___MMLocalProperty___super_meth_call;
1307   fra.me.has_broke = 0;
1308   fra.me.REG_size = 3;
1309   fra.me.REG[0] = NIT_NULL;
1310   fra.me.REG[1] = NIT_NULL;
1311   fra.me.REG[2] = NIT_NULL;
1312   fra.me.REG[0] = p0;
1313   REGB0 = TAG_Int(3);
1314   fra.me.REG[1] = NEW_Array_array___Array___with_capacity(REGB0);
1315   /* ./compiling//compiling_base.nit:200 */
1316   if (!once_value_1) {
1317     fra.me.REG[2] = BOX_NativeString("CALL_SUPER_");
1318     REGB0 = TAG_Int(11);
1319     fra.me.REG[2] = NEW_String_string___String___with_native(fra.me.REG[2], REGB0);
1320     once_value_1 = fra.me.REG[2];
1321     register_static_object(&once_value_1);
1322   } else fra.me.REG[2] = once_value_1;
1323   array___Array___add(fra.me.REG[1], fra.me.REG[2]);
1324   fra.me.REG[0] = CALL_compiling_base___MMLocalProperty___cname(fra.me.REG[0])(fra.me.REG[0]);
1325   array___Array___add(fra.me.REG[1], fra.me.REG[0]);
1326   if (!once_value_2) {
1327     fra.me.REG[0] = BOX_NativeString("");
1328     REGB0 = TAG_Int(0);
1329     fra.me.REG[0] = NEW_String_string___String___with_native(fra.me.REG[0], REGB0);
1330     once_value_2 = fra.me.REG[0];
1331     register_static_object(&once_value_2);
1332   } else fra.me.REG[0] = once_value_2;
1333   array___Array___add(fra.me.REG[1], fra.me.REG[0]);
1334   fra.me.REG[1] = CALL_string___Object___to_s(fra.me.REG[1])(fra.me.REG[1]);
1335   goto label3;
1336   label3: while(0);
1337   stack_frame_head = fra.me.prev;
1338   return fra.me.REG[1];
1339 }