c_src: update to have intern args
[nit.git] / c_src / primitive_info._sep.c
index c0fc524..3981125 100644 (file)
@@ -1,5 +1,22 @@
 /* This C file is generated by NIT to compile module primitive_info. */
 #include "primitive_info._sep.h"
+static const char LOCATE_primitive_info___MMLocalClass___extern_c_type[] = "primitive_info::MMLocalClass::extern_c_type";
+val_t primitive_info___MMLocalClass___extern_c_type(val_t p0){
+  struct {struct stack_frame_t me;} fra;
+  val_t tmp;
+  fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+  fra.me.file = LOCATE_primitive_info;
+  fra.me.line = 25;
+  fra.me.meth = LOCATE_primitive_info___MMLocalClass___extern_c_type;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 0;
+  fra.me.nitni_local_ref_head = NULL;
+  /* primitive_info.nit:25 */
+  nit_abort("Deferred method called", NULL, LOCATE_primitive_info, 25);
+  stack_frame_head = fra.me.prev;
+  return NIT_NULL;
+}
+static const char LOCATE_primitive_info___MMLocalClass___primitive_info[] = "primitive_info::MMLocalClass::primitive_info";
 val_t primitive_info___MMLocalClass___primitive_info(val_t p0){
   struct {struct stack_frame_t me; val_t MORE_REG[4];} fra;
   val_t REGB0;
@@ -9,7 +26,7 @@ val_t primitive_info___MMLocalClass___primitive_info(val_t p0){
   static val_t once_value_2; /* Once value */
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_primitive_info;
-  fra.me.line = 31;
+  fra.me.line = 34;
   fra.me.meth = LOCATE_primitive_info___MMLocalClass___primitive_info;
   fra.me.has_broke = 0;
   fra.me.REG_size = 5;
@@ -20,98 +37,118 @@ val_t primitive_info___MMLocalClass___primitive_info(val_t p0){
   fra.me.REG[3] = NIT_NULL;
   fra.me.REG[4] = NIT_NULL;
   fra.me.REG[0] = p0;
-  /* primitive_info.nit:35 */
+  /* primitive_info.nit:38 */
   REGB0 = TAG_Bool(ATTR_primitive_info___MMLocalClass____primitive_info_b(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB0)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_primitive_info_b", LOCATE_primitive_info, 35);
+    nit_abort("Uninitialized attribute %s", "_primitive_info_b", LOCATE_primitive_info, 38);
   }
   REGB0 = ATTR_primitive_info___MMLocalClass____primitive_info_b(fra.me.REG[0]);
-  REGB1 = TAG_Bool(true);
+  REGB1 = TAG_Bool(1);
   REGB2 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB1));
   if (UNTAG_Bool(REGB2)) {
   } else {
-    /* ../lib/standard/kernel.nit:195 */
+    /* ../lib/standard/kernel.nit:198 */
     REGB1 = TAG_Bool((REGB0)==(REGB1));
-    /* primitive_info.nit:35 */
+    /* primitive_info.nit:38 */
     REGB2 = REGB1;
   }
   if (UNTAG_Bool(REGB2)) {
     fra.me.REG[1] = ATTR_primitive_info___MMLocalClass____primitive_info_cache(fra.me.REG[0]);
     goto label1;
   }
-  /* primitive_info.nit:37 */
+  /* primitive_info.nit:40 */
   if (!once_value_2) {
     fra.me.REG[2] = CALL_primitive_info___MMLocalClass___primitive_ctypes(fra.me.REG[0])(fra.me.REG[0]);
     once_value_2 = fra.me.REG[2];
     register_static_object(&once_value_2);
   } else fra.me.REG[2] = once_value_2;
   fra.me.REG[2] = fra.me.REG[2];
-  /* primitive_info.nit:38 */
+  /* primitive_info.nit:41 */
   fra.me.REG[3] = CALL_metamodel___abstractmetamodel___MMLocalClass___name(fra.me.REG[0])(fra.me.REG[0]);
   REGB2 = CALL_standard___collection___abstract_collection___MapRead___has_key(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]);
   if (UNTAG_Bool(REGB2)) {
-    /* primitive_info.nit:39 */
+    /* primitive_info.nit:42 */
     fra.me.REG[3] = CALL_metamodel___abstractmetamodel___MMLocalClass___name(fra.me.REG[0])(fra.me.REG[0]);
     fra.me.REG[3] = CALL_standard___collection___abstract_collection___MapRead_____bra(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]);
     ATTR_primitive_info___MMLocalClass____primitive_info_cache(fra.me.REG[0]) = fra.me.REG[3];
-    /* primitive_info.nit:40 */
-    REGB2 = TAG_Bool(true);
+    /* primitive_info.nit:43 */
+    REGB2 = TAG_Bool(1);
     ATTR_primitive_info___MMLocalClass____primitive_info_b(fra.me.REG[0]) = REGB2;
-    /* primitive_info.nit:41 */
+    /* primitive_info.nit:44 */
     fra.me.REG[3] = ATTR_primitive_info___MMLocalClass____primitive_info_cache(fra.me.REG[0]);
     fra.me.REG[1] = fra.me.REG[3];
     goto label1;
   }
-  /* primitive_info.nit:43 */
+  /* primitive_info.nit:46 */
+  fra.me.REG[3] = CALL_metamodel___abstractmetamodel___MMLocalClass___global(fra.me.REG[0])(fra.me.REG[0]);
+  REGB2 = CALL_metamodel___abstractmetamodel___MMGlobalClass___is_extern(fra.me.REG[3])(fra.me.REG[3]);
+  if (UNTAG_Bool(REGB2)) {
+    /* primitive_info.nit:47 */
+    fra.me.REG[3] = CALL_metamodel___abstractmetamodel___MMLocalClass___name(fra.me.REG[0])(fra.me.REG[0]);
+    REGB2 = TAG_Bool(0);
+    fra.me.REG[4] = CALL_primitive_info___MMLocalClass___extern_c_type(fra.me.REG[0])(fra.me.REG[0]);
+    fra.me.REG[4] = NEW_PrimitiveInfo_primitive_info___PrimitiveInfo___init(fra.me.REG[3], REGB2, fra.me.REG[4]);
+    /* primitive_info.nit:48 */
+    ATTR_primitive_info___MMLocalClass____primitive_info_cache(fra.me.REG[0]) = fra.me.REG[4];
+    /* primitive_info.nit:49 */
+    REGB2 = TAG_Bool(1);
+    ATTR_primitive_info___MMLocalClass____primitive_info_b(fra.me.REG[0]) = REGB2;
+    /* primitive_info.nit:50 */
+    fra.me.REG[4] = ATTR_primitive_info___MMLocalClass____primitive_info_cache(fra.me.REG[0]);
+    fra.me.REG[1] = fra.me.REG[4];
+    goto label1;
+  }
+  /* primitive_info.nit:52 */
   fra.me.REG[2] = CALL_standard___collection___abstract_collection___MapRead___iterator(fra.me.REG[2])(fra.me.REG[2]);
-  /* primitive_info.nit:44 */
+  /* primitive_info.nit:53 */
   while(1) {
     REGB2 = CALL_standard___collection___abstract_collection___MapIterator___is_ok(fra.me.REG[2])(fra.me.REG[2]);
     if (UNTAG_Bool(REGB2)) {
-      /* primitive_info.nit:45 */
-      fra.me.REG[3] = CALL_standard___collection___abstract_collection___MapIterator___key(fra.me.REG[2])(fra.me.REG[2]);
-      /* primitive_info.nit:46 */
-      fra.me.REG[4] = CALL_metamodel___abstractmetamodel___MMLocalClass___mmmodule(fra.me.REG[0])(fra.me.REG[0]);
-      REGB2 = CALL_metamodel___abstractmetamodel___MMModule___has_global_class_named(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[3]);
+      /* primitive_info.nit:54 */
+      fra.me.REG[4] = CALL_standard___collection___abstract_collection___MapIterator___key(fra.me.REG[2])(fra.me.REG[2]);
+      /* primitive_info.nit:55 */
+      fra.me.REG[3] = CALL_metamodel___abstractmetamodel___MMLocalClass___mmmodule(fra.me.REG[0])(fra.me.REG[0]);
+      REGB2 = CALL_metamodel___abstractmetamodel___MMModule___has_global_class_named(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[4]);
       if (UNTAG_Bool(REGB2)) {
-        /* primitive_info.nit:47 */
-        fra.me.REG[4] = CALL_metamodel___abstractmetamodel___MMLocalClass___mmmodule(fra.me.REG[0])(fra.me.REG[0]);
-        fra.me.REG[3] = CALL_metamodel___abstractmetamodel___MMModule___class_by_name(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[3]);
-        /* primitive_info.nit:48 */
-        fra.me.REG[4] = CALL_metamodel___abstractmetamodel___MMLocalClass___cshe(fra.me.REG[0])(fra.me.REG[0]);
-        REGB2 = CALL_metamodel___partial_order___PartialOrderElement_____l(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[3]);
+        /* primitive_info.nit:56 */
+        fra.me.REG[3] = CALL_metamodel___abstractmetamodel___MMLocalClass___mmmodule(fra.me.REG[0])(fra.me.REG[0]);
+        fra.me.REG[4] = CALL_metamodel___abstractmetamodel___MMModule___class_by_name(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[4]);
+        /* primitive_info.nit:57 */
+        fra.me.REG[3] = CALL_metamodel___abstractmetamodel___MMLocalClass___cshe(fra.me.REG[0])(fra.me.REG[0]);
+        REGB2 = CALL_metamodel___partial_order___PartialOrderElement_____l(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[4]);
         if (UNTAG_Bool(REGB2)) {
-          /* primitive_info.nit:49 */
-          fra.me.REG[3] = CALL_standard___collection___abstract_collection___MapIterator___item(fra.me.REG[2])(fra.me.REG[2]);
-          ATTR_primitive_info___MMLocalClass____primitive_info_cache(fra.me.REG[0]) = fra.me.REG[3];
-          /* primitive_info.nit:50 */
-          REGB2 = TAG_Bool(true);
+          /* primitive_info.nit:58 */
+          fra.me.REG[4] = CALL_standard___collection___abstract_collection___MapIterator___item(fra.me.REG[2])(fra.me.REG[2]);
+          ATTR_primitive_info___MMLocalClass____primitive_info_cache(fra.me.REG[0]) = fra.me.REG[4];
+          /* primitive_info.nit:59 */
+          REGB2 = TAG_Bool(1);
           ATTR_primitive_info___MMLocalClass____primitive_info_b(fra.me.REG[0]) = REGB2;
-          /* primitive_info.nit:51 */
-          fra.me.REG[3] = ATTR_primitive_info___MMLocalClass____primitive_info_cache(fra.me.REG[0]);
-          fra.me.REG[1] = fra.me.REG[3];
+          /* primitive_info.nit:60 */
+          fra.me.REG[4] = ATTR_primitive_info___MMLocalClass____primitive_info_cache(fra.me.REG[0]);
+          fra.me.REG[1] = fra.me.REG[4];
           goto label1;
         }
       }
-      /* primitive_info.nit:54 */
+      /* primitive_info.nit:63 */
       CALL_standard___collection___abstract_collection___MapIterator___next(fra.me.REG[2])(fra.me.REG[2]);
     } else {
-      /* primitive_info.nit:44 */
+      /* primitive_info.nit:53 */
       goto label3;
     }
   }
   label3: while(0);
-  /* primitive_info.nit:56 */
-  REGB2 = TAG_Bool(true);
+  /* primitive_info.nit:65 */
+  REGB2 = TAG_Bool(1);
   ATTR_primitive_info___MMLocalClass____primitive_info_b(fra.me.REG[0]) = REGB2;
-  /* primitive_info.nit:57 */
+  /* primitive_info.nit:66 */
   fra.me.REG[1] = NIT_NULL;
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
   return fra.me.REG[1];
 }
+static const char LOCATE_primitive_info___MMLocalClass___primitive_ctypes[] = "primitive_info::MMLocalClass::primitive_ctypes";
 val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){
   struct {struct stack_frame_t me; val_t MORE_REG[6];} fra;
   val_t REGB0;
@@ -135,7 +172,7 @@ val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){
   static val_t once_value_12; /* Once value */
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_primitive_info;
-  fra.me.line = 60;
+  fra.me.line = 69;
   fra.me.meth = LOCATE_primitive_info___MMLocalClass___primitive_ctypes;
   fra.me.has_broke = 0;
   fra.me.REG_size = 7;
@@ -148,9 +185,9 @@ val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){
   fra.me.REG[5] = NIT_NULL;
   fra.me.REG[6] = NIT_NULL;
   fra.me.REG[0] = p0;
-  /* primitive_info.nit:63 */
+  /* primitive_info.nit:72 */
   fra.me.REG[0] = NEW_HashMap_standard___collection___hash_collection___HashMap___init();
-  /* primitive_info.nit:64 */
+  /* primitive_info.nit:73 */
   REGB0 = TAG_Int(6);
   fra.me.REG[1] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0);
   if (!once_value_1) {
@@ -207,22 +244,22 @@ val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){
   } else fra.me.REG[2] = once_value_6;
   fra.me.REG[2] = fra.me.REG[2];
   CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]);
-  /* primitive_info.nit:65 */
+  /* primitive_info.nit:74 */
   REGB0 = TAG_Int(6);
   fra.me.REG[2] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0);
-  REGB0 = TAG_Bool(true);
+  REGB0 = TAG_Bool(1);
   CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], REGB0);
-  REGB0 = TAG_Bool(true);
+  REGB0 = TAG_Bool(1);
   CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], REGB0);
-  REGB0 = TAG_Bool(true);
+  REGB0 = TAG_Bool(1);
   CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], REGB0);
-  REGB0 = TAG_Bool(false);
+  REGB0 = TAG_Bool(0);
   CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], REGB0);
-  REGB0 = TAG_Bool(false);
+  REGB0 = TAG_Bool(0);
   CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], REGB0);
-  REGB0 = TAG_Bool(false);
+  REGB0 = TAG_Bool(0);
   CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], REGB0);
-  /* primitive_info.nit:66 */
+  /* primitive_info.nit:75 */
   REGB0 = TAG_Int(6);
   fra.me.REG[3] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0);
   if (!once_value_7) {
@@ -279,7 +316,7 @@ val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){
   } else fra.me.REG[4] = once_value_12;
   fra.me.REG[4] = fra.me.REG[4];
   CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[4]);
-  /* primitive_info.nit:67 */
+  /* primitive_info.nit:76 */
   REGB0 = TAG_Int(0);
   /* ../lib/standard/collection/array.nit:24 */
   REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
@@ -288,18 +325,18 @@ val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){
     nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
   }
   REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]);
-  /* ../lib/standard/kernel.nit:352 */
+  /* ../lib/standard/kernel.nit:355 */
   while(1) {
     REGB2 = TAG_Bool(VAL_ISA(REGB1, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
     if (UNTAG_Bool(REGB2)) {
     } else {
       nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
     }
-    /* ../lib/standard/kernel.nit:232 */
+    /* ../lib/standard/kernel.nit:235 */
     REGB2 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
-    /* ../lib/standard/kernel.nit:352 */
+    /* ../lib/standard/kernel.nit:355 */
     if (UNTAG_Bool(REGB2)) {
-      /* primitive_info.nit:67 */
+      /* primitive_info.nit:76 */
       REGB2 = REGB0;
       /* ../lib/standard/collection/array.nit:278 */
       fra.me.REG[4] = fra.me.REG[1];
@@ -311,7 +348,7 @@ val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){
       } else {
         nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
       }
-      /* ../lib/standard/kernel.nit:233 */
+      /* ../lib/standard/kernel.nit:236 */
       REGB4 = TAG_Bool(UNTAG_Int(REGB3)>=UNTAG_Int(REGB4));
       /* ../lib/standard/collection/array.nit:280 */
       if (UNTAG_Bool(REGB4)) {
@@ -326,11 +363,11 @@ val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){
         } else {
           nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
         }
-        /* ../lib/standard/kernel.nit:232 */
+        /* ../lib/standard/kernel.nit:235 */
         REGB4 = TAG_Bool(UNTAG_Int(REGB3)<UNTAG_Int(REGB4));
       } else {
         /* ../lib/standard/collection/array.nit:280 */
-        REGB5 = TAG_Bool(false);
+        REGB5 = TAG_Bool(0);
         REGB4 = REGB5;
       }
       if (UNTAG_Bool(REGB4)) {
@@ -343,17 +380,17 @@ val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){
       if (UNTAG_Bool(REGB4)) {
         nit_abort("Reciever is null", NULL, LOCATE_standard___collection___array, 281);
       }
-      /* ../lib/standard/collection/array.nit:718 */
+      /* ../lib/standard/collection/array.nit:724 */
       fra.me.REG[4] = ((Nit_NativeArray)fra.me.REG[4])->val[UNTAG_Int(REGB3)];
       /* ../lib/standard/collection/array.nit:281 */
       goto label13;
       label13: while(0);
-      /* primitive_info.nit:68 */
+      /* primitive_info.nit:77 */
       REGB3 = TAG_Bool(fra.me.REG[4]==NIT_NULL);
       if (UNTAG_Bool(REGB3)) {
-        nit_abort("Reciever is null", NULL, LOCATE_primitive_info, 68);
+        nit_abort("Reciever is null", NULL, LOCATE_primitive_info, 77);
       }
-      fra.me.REG[4] = CALL_standard___symbol___String___to_symbol(fra.me.REG[4])(fra.me.REG[4]);
+      fra.me.REG[4] = CALL_symbol___String___to_symbol(fra.me.REG[4])(fra.me.REG[4]);
       /* ../lib/standard/collection/array.nit:278 */
       fra.me.REG[5] = fra.me.REG[2];
       REGB3 = REGB2;
@@ -364,7 +401,7 @@ val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){
       } else {
         nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
       }
-      /* ../lib/standard/kernel.nit:233 */
+      /* ../lib/standard/kernel.nit:236 */
       REGB4 = TAG_Bool(UNTAG_Int(REGB3)>=UNTAG_Int(REGB4));
       /* ../lib/standard/collection/array.nit:280 */
       if (UNTAG_Bool(REGB4)) {
@@ -379,11 +416,11 @@ val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){
         } else {
           nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
         }
-        /* ../lib/standard/kernel.nit:232 */
+        /* ../lib/standard/kernel.nit:235 */
         REGB4 = TAG_Bool(UNTAG_Int(REGB3)<UNTAG_Int(REGB4));
       } else {
         /* ../lib/standard/collection/array.nit:280 */
-        REGB5 = TAG_Bool(false);
+        REGB5 = TAG_Bool(0);
         REGB4 = REGB5;
       }
       if (UNTAG_Bool(REGB4)) {
@@ -396,7 +433,7 @@ val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){
       if (UNTAG_Bool(REGB4)) {
         nit_abort("Reciever is null", NULL, LOCATE_standard___collection___array, 281);
       }
-      /* ../lib/standard/collection/array.nit:718 */
+      /* ../lib/standard/collection/array.nit:724 */
       fra.me.REG[5] = ((Nit_NativeArray)fra.me.REG[5])->val[UNTAG_Int(REGB3)];
       /* ../lib/standard/collection/array.nit:281 */
       goto label14;
@@ -410,7 +447,7 @@ val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){
       } else {
         nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
       }
-      /* ../lib/standard/kernel.nit:233 */
+      /* ../lib/standard/kernel.nit:236 */
       REGB3 = TAG_Bool(UNTAG_Int(REGB2)>=UNTAG_Int(REGB3));
       /* ../lib/standard/collection/array.nit:280 */
       if (UNTAG_Bool(REGB3)) {
@@ -425,11 +462,11 @@ val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){
         } else {
           nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
         }
-        /* ../lib/standard/kernel.nit:232 */
+        /* ../lib/standard/kernel.nit:235 */
         REGB3 = TAG_Bool(UNTAG_Int(REGB2)<UNTAG_Int(REGB3));
       } else {
         /* ../lib/standard/collection/array.nit:280 */
-        REGB4 = TAG_Bool(false);
+        REGB4 = TAG_Bool(0);
         REGB3 = REGB4;
       }
       if (UNTAG_Bool(REGB3)) {
@@ -442,102 +479,106 @@ val_t primitive_info___MMLocalClass___primitive_ctypes(val_t p0){
       if (UNTAG_Bool(REGB3)) {
         nit_abort("Reciever is null", NULL, LOCATE_standard___collection___array, 281);
       }
-      /* ../lib/standard/collection/array.nit:718 */
+      /* ../lib/standard/collection/array.nit:724 */
       fra.me.REG[6] = ((Nit_NativeArray)fra.me.REG[6])->val[UNTAG_Int(REGB2)];
       /* ../lib/standard/collection/array.nit:281 */
       goto label15;
       label15: while(0);
-      /* primitive_info.nit:69 */
+      /* primitive_info.nit:78 */
       fra.me.REG[6] = NEW_PrimitiveInfo_primitive_info___PrimitiveInfo___init(fra.me.REG[4], fra.me.REG[5], fra.me.REG[6]);
-      /* primitive_info.nit:70 */
+      /* primitive_info.nit:79 */
       CALL_standard___collection___abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[4], fra.me.REG[6]);
-      /* ../lib/standard/kernel.nit:354 */
+      /* ../lib/standard/kernel.nit:357 */
       REGB2 = TAG_Int(1);
-      /* ../lib/standard/kernel.nit:235 */
+      /* ../lib/standard/kernel.nit:238 */
       REGB2 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB2));
-      /* ../lib/standard/kernel.nit:354 */
+      /* ../lib/standard/kernel.nit:357 */
       REGB0 = REGB2;
     } else {
-      /* ../lib/standard/kernel.nit:352 */
+      /* ../lib/standard/kernel.nit:355 */
       goto label16;
     }
   }
   label16: while(0);
-  /* primitive_info.nit:72 */
+  /* primitive_info.nit:81 */
   goto label17;
   label17: while(0);
   stack_frame_head = fra.me.prev;
   return fra.me.REG[0];
 }
+static const char LOCATE_primitive_info___PrimitiveInfo___name[] = "primitive_info::PrimitiveInfo::name";
 val_t primitive_info___PrimitiveInfo___name(val_t p0){
   struct {struct stack_frame_t me;} fra;
   val_t REGB0;
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_primitive_info;
-  fra.me.line = 78;
+  fra.me.line = 87;
   fra.me.meth = LOCATE_primitive_info___PrimitiveInfo___name;
   fra.me.has_broke = 0;
   fra.me.REG_size = 1;
   fra.me.nitni_local_ref_head = NULL;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[0] = p0;
-  /* primitive_info.nit:78 */
+  /* primitive_info.nit:87 */
   REGB0 = TAG_Bool(ATTR_primitive_info___PrimitiveInfo____name(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB0)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_name", LOCATE_primitive_info, 78);
+    nit_abort("Uninitialized attribute %s", "_name", LOCATE_primitive_info, 87);
   }
   fra.me.REG[0] = ATTR_primitive_info___PrimitiveInfo____name(fra.me.REG[0]);
   stack_frame_head = fra.me.prev;
   return fra.me.REG[0];
 }
+static const char LOCATE_primitive_info___PrimitiveInfo___tagged[] = "primitive_info::PrimitiveInfo::tagged";
 val_t primitive_info___PrimitiveInfo___tagged(val_t p0){
   struct {struct stack_frame_t me;} fra;
   val_t REGB0;
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_primitive_info;
-  fra.me.line = 81;
+  fra.me.line = 90;
   fra.me.meth = LOCATE_primitive_info___PrimitiveInfo___tagged;
   fra.me.has_broke = 0;
   fra.me.REG_size = 1;
   fra.me.nitni_local_ref_head = NULL;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[0] = p0;
-  /* primitive_info.nit:81 */
+  /* primitive_info.nit:90 */
   REGB0 = TAG_Bool(ATTR_primitive_info___PrimitiveInfo____tagged(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB0)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_tagged", LOCATE_primitive_info, 81);
+    nit_abort("Uninitialized attribute %s", "_tagged", LOCATE_primitive_info, 90);
   }
   REGB0 = ATTR_primitive_info___PrimitiveInfo____tagged(fra.me.REG[0]);
   stack_frame_head = fra.me.prev;
   return REGB0;
 }
+static const char LOCATE_primitive_info___PrimitiveInfo___cname[] = "primitive_info::PrimitiveInfo::cname";
 val_t primitive_info___PrimitiveInfo___cname(val_t p0){
   struct {struct stack_frame_t me;} fra;
   val_t REGB0;
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_primitive_info;
-  fra.me.line = 84;
+  fra.me.line = 93;
   fra.me.meth = LOCATE_primitive_info___PrimitiveInfo___cname;
   fra.me.has_broke = 0;
   fra.me.REG_size = 1;
   fra.me.nitni_local_ref_head = NULL;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[0] = p0;
-  /* primitive_info.nit:84 */
+  /* primitive_info.nit:93 */
   REGB0 = TAG_Bool(ATTR_primitive_info___PrimitiveInfo____cname(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB0)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_cname", LOCATE_primitive_info, 84);
+    nit_abort("Uninitialized attribute %s", "_cname", LOCATE_primitive_info, 93);
   }
   fra.me.REG[0] = ATTR_primitive_info___PrimitiveInfo____cname(fra.me.REG[0]);
   stack_frame_head = fra.me.prev;
   return fra.me.REG[0];
 }
+static const char LOCATE_primitive_info___PrimitiveInfo___init[] = "primitive_info::PrimitiveInfo::init";
 void primitive_info___PrimitiveInfo___init(val_t p0, val_t p1, val_t p2, val_t p3, int* init_table){
   int itpos0 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_primitive_info___PrimitiveInfo].i;
   struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
@@ -546,7 +587,7 @@ void primitive_info___PrimitiveInfo___init(val_t p0, val_t p1, val_t p2, val_t p
   if (init_table[itpos0]) return;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_primitive_info;
-  fra.me.line = 87;
+  fra.me.line = 96;
   fra.me.meth = LOCATE_primitive_info___PrimitiveInfo___init;
   fra.me.has_broke = 0;
   fra.me.REG_size = 3;
@@ -558,16 +599,17 @@ void primitive_info___PrimitiveInfo___init(val_t p0, val_t p1, val_t p2, val_t p
   fra.me.REG[1] = p1;
   REGB0 = p2;
   fra.me.REG[2] = p3;
-  /* primitive_info.nit:89 */
+  /* primitive_info.nit:98 */
   ATTR_primitive_info___PrimitiveInfo____name(fra.me.REG[0]) = fra.me.REG[1];
-  /* primitive_info.nit:90 */
+  /* primitive_info.nit:99 */
   ATTR_primitive_info___PrimitiveInfo____tagged(fra.me.REG[0]) = REGB0;
-  /* primitive_info.nit:91 */
+  /* primitive_info.nit:100 */
   ATTR_primitive_info___PrimitiveInfo____cname(fra.me.REG[0]) = fra.me.REG[2];
   stack_frame_head = fra.me.prev;
   init_table[itpos0] = 1;
   return;
 }
+static const char LOCATE_primitive_info___MMType___cname[] = "primitive_info::MMType::cname";
 val_t primitive_info___MMType___cname(val_t p0){
   struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
   val_t REGB0;
@@ -576,7 +618,7 @@ val_t primitive_info___MMType___cname(val_t p0){
     static val_t once_value_1; /* Once value */
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_primitive_info;
-  fra.me.line = 96;
+  fra.me.line = 105;
   fra.me.meth = LOCATE_primitive_info___MMType___cname;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
@@ -584,16 +626,16 @@ val_t primitive_info___MMType___cname(val_t p0){
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
-  /* primitive_info.nit:99 */
+  /* primitive_info.nit:108 */
   fra.me.REG[0] = CALL_metamodel___static_type___MMType___local_class(fra.me.REG[0])(fra.me.REG[0]);
   fra.me.REG[0] = CALL_primitive_info___MMLocalClass___primitive_info(fra.me.REG[0])(fra.me.REG[0]);
-  /* primitive_info.nit:100 */
+  /* primitive_info.nit:109 */
   REGB0 = TAG_Bool(fra.me.REG[0]==NIT_NULL);
   if (UNTAG_Bool(REGB0)) {
   } else {
     REGB1 = TAG_Bool(fra.me.REG[0]==NIT_NULL);
     if (UNTAG_Bool(REGB1)) {
-      REGB1 = TAG_Bool(false);
+      REGB1 = TAG_Bool(0);
       REGB0 = REGB1;
     } else {
       REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[0])(fra.me.REG[0], NIT_NULL);
@@ -601,7 +643,7 @@ val_t primitive_info___MMType___cname(val_t p0){
     }
   }
   if (UNTAG_Bool(REGB0)) {
-    /* primitive_info.nit:101 */
+    /* primitive_info.nit:110 */
     if (!once_value_1) {
       fra.me.REG[1] = BOX_NativeString("val_t");
       REGB0 = TAG_Int(5);
@@ -612,10 +654,10 @@ val_t primitive_info___MMType___cname(val_t p0){
     fra.me.REG[1] = fra.me.REG[1];
     goto label2;
   } else {
-    /* primitive_info.nit:103 */
+    /* primitive_info.nit:112 */
     REGB0 = TAG_Bool(fra.me.REG[0]==NIT_NULL);
     if (UNTAG_Bool(REGB0)) {
-      nit_abort("Reciever is null", NULL, LOCATE_primitive_info, 103);
+      nit_abort("Reciever is null", NULL, LOCATE_primitive_info, 112);
     }
     fra.me.REG[0] = CALL_primitive_info___PrimitiveInfo___cname(fra.me.REG[0])(fra.me.REG[0]);
     fra.me.REG[1] = fra.me.REG[0];
@@ -625,6 +667,7 @@ val_t primitive_info___MMType___cname(val_t p0){
   stack_frame_head = fra.me.prev;
   return fra.me.REG[1];
 }
+static const char LOCATE_primitive_info___MMType___is_tagged[] = "primitive_info::MMType::is_tagged";
 val_t primitive_info___MMType___is_tagged(val_t p0){
   struct {struct stack_frame_t me;} fra;
   val_t REGB0;
@@ -633,29 +676,29 @@ val_t primitive_info___MMType___is_tagged(val_t p0){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_primitive_info;
-  fra.me.line = 107;
+  fra.me.line = 116;
   fra.me.meth = LOCATE_primitive_info___MMType___is_tagged;
   fra.me.has_broke = 0;
   fra.me.REG_size = 1;
   fra.me.nitni_local_ref_head = NULL;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[0] = p0;
-  /* primitive_info.nit:110 */
+  /* primitive_info.nit:119 */
   REGB0 = CALL_metamodel___static_type___MMType___is_nullable(fra.me.REG[0])(fra.me.REG[0]);
   if (UNTAG_Bool(REGB0)) {
-    REGB0 = TAG_Bool(false);
+    REGB0 = TAG_Bool(0);
     goto label1;
   }
-  /* primitive_info.nit:111 */
+  /* primitive_info.nit:120 */
   fra.me.REG[0] = CALL_metamodel___static_type___MMType___local_class(fra.me.REG[0])(fra.me.REG[0]);
   fra.me.REG[0] = CALL_primitive_info___MMLocalClass___primitive_info(fra.me.REG[0])(fra.me.REG[0]);
-  /* primitive_info.nit:112 */
+  /* primitive_info.nit:121 */
   REGB1 = TAG_Bool(fra.me.REG[0]==NIT_NULL);
   if (UNTAG_Bool(REGB1)) {
   } else {
     REGB2 = TAG_Bool(fra.me.REG[0]==NIT_NULL);
     if (UNTAG_Bool(REGB2)) {
-      REGB2 = TAG_Bool(false);
+      REGB2 = TAG_Bool(0);
       REGB1 = REGB2;
     } else {
       REGB2 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[0])(fra.me.REG[0], NIT_NULL);
@@ -666,11 +709,11 @@ val_t primitive_info___MMType___is_tagged(val_t p0){
   if (UNTAG_Bool(REGB1)) {
     REGB1 = TAG_Bool(fra.me.REG[0]==NIT_NULL);
     if (UNTAG_Bool(REGB1)) {
-      nit_abort("Reciever is null", NULL, LOCATE_primitive_info, 112);
+      nit_abort("Reciever is null", NULL, LOCATE_primitive_info, 121);
     }
     REGB1 = CALL_primitive_info___PrimitiveInfo___tagged(fra.me.REG[0])(fra.me.REG[0]);
   } else {
-    REGB2 = TAG_Bool(false);
+    REGB2 = TAG_Bool(0);
     REGB1 = REGB2;
   }
   REGB0 = REGB1;
@@ -679,6 +722,7 @@ val_t primitive_info___MMType___is_tagged(val_t p0){
   stack_frame_head = fra.me.prev;
   return REGB0;
 }
+static const char LOCATE_primitive_info___MMType___default_cvalue[] = "primitive_info::MMType::default_cvalue";
 val_t primitive_info___MMType___default_cvalue(val_t p0){
   struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
   val_t REGB0;
@@ -690,7 +734,7 @@ val_t primitive_info___MMType___default_cvalue(val_t p0){
     static val_t once_value_5; /* Once value */
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_primitive_info;
-  fra.me.line = 115;
+  fra.me.line = 124;
   fra.me.meth = LOCATE_primitive_info___MMType___default_cvalue;
   fra.me.has_broke = 0;
   fra.me.REG_size = 4;
@@ -700,16 +744,16 @@ val_t primitive_info___MMType___default_cvalue(val_t p0){
   fra.me.REG[2] = NIT_NULL;
   fra.me.REG[3] = NIT_NULL;
   fra.me.REG[0] = p0;
-  /* primitive_info.nit:119 */
+  /* primitive_info.nit:128 */
   fra.me.REG[1] = CALL_metamodel___static_type___MMType___local_class(fra.me.REG[0])(fra.me.REG[0]);
   fra.me.REG[1] = CALL_primitive_info___MMLocalClass___primitive_info(fra.me.REG[1])(fra.me.REG[1]);
-  /* primitive_info.nit:120 */
+  /* primitive_info.nit:129 */
   REGB0 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
   if (UNTAG_Bool(REGB0)) {
   } else {
     REGB1 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
     if (UNTAG_Bool(REGB1)) {
-      REGB1 = TAG_Bool(false);
+      REGB1 = TAG_Bool(0);
       REGB0 = REGB1;
     } else {
       REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[1])(fra.me.REG[1], NIT_NULL);
@@ -720,15 +764,15 @@ val_t primitive_info___MMType___default_cvalue(val_t p0){
   if (UNTAG_Bool(REGB0)) {
     REGB0 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
     if (UNTAG_Bool(REGB0)) {
-      nit_abort("Reciever is null", NULL, LOCATE_primitive_info, 120);
+      nit_abort("Reciever is null", NULL, LOCATE_primitive_info, 129);
     }
     REGB0 = CALL_primitive_info___PrimitiveInfo___tagged(fra.me.REG[1])(fra.me.REG[1]);
   } else {
-    REGB1 = TAG_Bool(false);
+    REGB1 = TAG_Bool(0);
     REGB0 = REGB1;
   }
   if (UNTAG_Bool(REGB0)) {
-    /* primitive_info.nit:121 */
+    /* primitive_info.nit:130 */
     REGB0 = TAG_Int(5);
     fra.me.REG[2] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0);
     if (!once_value_1) {
@@ -755,7 +799,7 @@ val_t primitive_info___MMType___default_cvalue(val_t p0){
     CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[0]);
     REGB0 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
     if (UNTAG_Bool(REGB0)) {
-      nit_abort("Reciever is null", NULL, LOCATE_primitive_info, 121);
+      nit_abort("Reciever is null", NULL, LOCATE_primitive_info, 130);
     }
     fra.me.REG[1] = CALL_primitive_info___PrimitiveInfo___cname(fra.me.REG[1])(fra.me.REG[1]);
     CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]);
@@ -771,7 +815,7 @@ val_t primitive_info___MMType___default_cvalue(val_t p0){
     fra.me.REG[2] = CALL_standard___string___Object___to_s(fra.me.REG[2])(fra.me.REG[2]);
     goto label4;
   } else {
-    /* primitive_info.nit:123 */
+    /* primitive_info.nit:132 */
     if (!once_value_5) {
       fra.me.REG[1] = BOX_NativeString("NIT_NULL");
       REGB0 = TAG_Int(8);
@@ -787,6 +831,7 @@ val_t primitive_info___MMType___default_cvalue(val_t p0){
   stack_frame_head = fra.me.prev;
   return fra.me.REG[2];
 }
+static const char LOCATE_primitive_info___MMType___boxtype[] = "primitive_info::MMType::boxtype";
 val_t primitive_info___MMType___boxtype(val_t p0, val_t p1){
   struct {struct stack_frame_t me; val_t MORE_REG[4];} fra;
   val_t REGB0;
@@ -800,7 +845,7 @@ val_t primitive_info___MMType___boxtype(val_t p0, val_t p1){
       static val_t once_value_7; /* Once value */
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_primitive_info;
-  fra.me.line = 127;
+  fra.me.line = 136;
   fra.me.meth = LOCATE_primitive_info___MMType___boxtype;
   fra.me.has_broke = 0;
   fra.me.REG_size = 5;
@@ -812,16 +857,16 @@ val_t primitive_info___MMType___boxtype(val_t p0, val_t p1){
   fra.me.REG[4] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
-  /* primitive_info.nit:131 */
+  /* primitive_info.nit:140 */
   fra.me.REG[2] = CALL_metamodel___static_type___MMType___local_class(fra.me.REG[0])(fra.me.REG[0]);
   fra.me.REG[2] = CALL_primitive_info___MMLocalClass___primitive_info(fra.me.REG[2])(fra.me.REG[2]);
-  /* primitive_info.nit:132 */
+  /* primitive_info.nit:141 */
   REGB0 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
   if (UNTAG_Bool(REGB0)) {
   } else {
     REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
     if (UNTAG_Bool(REGB1)) {
-      REGB1 = TAG_Bool(false);
+      REGB1 = TAG_Bool(0);
       REGB0 = REGB1;
     } else {
       REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], NIT_NULL);
@@ -829,24 +874,24 @@ val_t primitive_info___MMType___boxtype(val_t p0, val_t p1){
     }
   }
   if (UNTAG_Bool(REGB0)) {
-    REGB0 = TAG_Bool(true);
+    REGB0 = TAG_Bool(1);
   } else {
     REGB1 = CALL_metamodel___static_type___MMType___is_nullable(fra.me.REG[0])(fra.me.REG[0]);
     REGB0 = REGB1;
   }
   if (UNTAG_Bool(REGB0)) {
-    /* primitive_info.nit:133 */
+    /* primitive_info.nit:142 */
     fra.me.REG[3] = fra.me.REG[1];
     goto label1;
   } else {
-    /* primitive_info.nit:134 */
+    /* primitive_info.nit:143 */
     REGB0 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
     if (UNTAG_Bool(REGB0)) {
-      nit_abort("Reciever is null", NULL, LOCATE_primitive_info, 134);
+      nit_abort("Reciever is null", NULL, LOCATE_primitive_info, 143);
     }
     REGB0 = CALL_primitive_info___PrimitiveInfo___tagged(fra.me.REG[2])(fra.me.REG[2]);
     if (UNTAG_Bool(REGB0)) {
-      /* primitive_info.nit:135 */
+      /* primitive_info.nit:144 */
       REGB0 = TAG_Int(5);
       fra.me.REG[2] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0);
       if (!once_value_2) {
@@ -885,7 +930,7 @@ val_t primitive_info___MMType___boxtype(val_t p0, val_t p1){
       fra.me.REG[3] = fra.me.REG[2];
       goto label1;
     } else {
-      /* primitive_info.nit:137 */
+      /* primitive_info.nit:146 */
       REGB0 = TAG_Int(5);
       fra.me.REG[2] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0);
       if (!once_value_5) {
@@ -929,6 +974,7 @@ val_t primitive_info___MMType___boxtype(val_t p0, val_t p1){
   stack_frame_head = fra.me.prev;
   return fra.me.REG[3];
 }
+static const char LOCATE_primitive_info___MMType___unboxtype[] = "primitive_info::MMType::unboxtype";
 val_t primitive_info___MMType___unboxtype(val_t p0, val_t p1){
   struct {struct stack_frame_t me; val_t MORE_REG[4];} fra;
   val_t REGB0;
@@ -942,7 +988,7 @@ val_t primitive_info___MMType___unboxtype(val_t p0, val_t p1){
       static val_t once_value_7; /* Once value */
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_primitive_info;
-  fra.me.line = 141;
+  fra.me.line = 150;
   fra.me.meth = LOCATE_primitive_info___MMType___unboxtype;
   fra.me.has_broke = 0;
   fra.me.REG_size = 5;
@@ -954,16 +1000,16 @@ val_t primitive_info___MMType___unboxtype(val_t p0, val_t p1){
   fra.me.REG[4] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
-  /* primitive_info.nit:145 */
+  /* primitive_info.nit:154 */
   fra.me.REG[2] = CALL_metamodel___static_type___MMType___local_class(fra.me.REG[0])(fra.me.REG[0]);
   fra.me.REG[2] = CALL_primitive_info___MMLocalClass___primitive_info(fra.me.REG[2])(fra.me.REG[2]);
-  /* primitive_info.nit:146 */
+  /* primitive_info.nit:155 */
   REGB0 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
   if (UNTAG_Bool(REGB0)) {
   } else {
     REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
     if (UNTAG_Bool(REGB1)) {
-      REGB1 = TAG_Bool(false);
+      REGB1 = TAG_Bool(0);
       REGB0 = REGB1;
     } else {
       REGB1 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], NIT_NULL);
@@ -971,24 +1017,24 @@ val_t primitive_info___MMType___unboxtype(val_t p0, val_t p1){
     }
   }
   if (UNTAG_Bool(REGB0)) {
-    REGB0 = TAG_Bool(true);
+    REGB0 = TAG_Bool(1);
   } else {
     REGB1 = CALL_metamodel___static_type___MMType___is_nullable(fra.me.REG[0])(fra.me.REG[0]);
     REGB0 = REGB1;
   }
   if (UNTAG_Bool(REGB0)) {
-    /* primitive_info.nit:147 */
+    /* primitive_info.nit:156 */
     fra.me.REG[3] = fra.me.REG[1];
     goto label1;
   } else {
-    /* primitive_info.nit:148 */
+    /* primitive_info.nit:157 */
     REGB0 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
     if (UNTAG_Bool(REGB0)) {
-      nit_abort("Reciever is null", NULL, LOCATE_primitive_info, 148);
+      nit_abort("Reciever is null", NULL, LOCATE_primitive_info, 157);
     }
     REGB0 = CALL_primitive_info___PrimitiveInfo___tagged(fra.me.REG[2])(fra.me.REG[2]);
     if (UNTAG_Bool(REGB0)) {
-      /* primitive_info.nit:149 */
+      /* primitive_info.nit:158 */
       REGB0 = TAG_Int(5);
       fra.me.REG[2] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0);
       if (!once_value_2) {
@@ -1027,7 +1073,7 @@ val_t primitive_info___MMType___unboxtype(val_t p0, val_t p1){
       fra.me.REG[3] = fra.me.REG[2];
       goto label1;
     } else {
-      /* primitive_info.nit:151 */
+      /* primitive_info.nit:160 */
       REGB0 = TAG_Int(5);
       fra.me.REG[2] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0);
       if (!once_value_5) {
@@ -1071,6 +1117,7 @@ val_t primitive_info___MMType___unboxtype(val_t p0, val_t p1){
   stack_frame_head = fra.me.prev;
   return fra.me.REG[3];
 }
+static const char LOCATE_primitive_info___MMMethod___default_extern_name[] = "primitive_info::MMMethod::default_extern_name";
 val_t primitive_info___MMMethod___default_extern_name(val_t p0){
   struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
   val_t REGB0;
@@ -1079,7 +1126,7 @@ val_t primitive_info___MMMethod___default_extern_name(val_t p0){
   static val_t once_value_2; /* Once value */
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_primitive_info;
-  fra.me.line = 157;
+  fra.me.line = 166;
   fra.me.meth = LOCATE_primitive_info___MMMethod___default_extern_name;
   fra.me.has_broke = 0;
   fra.me.REG_size = 3;
@@ -1088,7 +1135,7 @@ val_t primitive_info___MMMethod___default_extern_name(val_t p0){
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[2] = NIT_NULL;
   fra.me.REG[0] = p0;
-  /* primitive_info.nit:159 */
+  /* primitive_info.nit:168 */
   REGB0 = TAG_Int(3);
   fra.me.REG[1] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0);
   if (!once_value_1) {
@@ -1118,6 +1165,7 @@ val_t primitive_info___MMMethod___default_extern_name(val_t p0){
   stack_frame_head = fra.me.prev;
   return fra.me.REG[1];
 }
+static const char LOCATE_primitive_info___MMMethod___friendly_extern_name[] = "primitive_info::MMMethod::friendly_extern_name";
 val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
   struct {struct stack_frame_t me; val_t MORE_REG[5];} fra;
   val_t REGB0;
@@ -1170,7 +1218,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
       static val_t once_value_45; /* Once value */
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_primitive_info;
-  fra.me.line = 162;
+  fra.me.line = 171;
   fra.me.meth = LOCATE_primitive_info___MMMethod___friendly_extern_name;
   fra.me.has_broke = 0;
   fra.me.REG_size = 6;
@@ -1183,15 +1231,15 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
   fra.me.REG[5] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
-  /* primitive_info.nit:166 */
+  /* primitive_info.nit:175 */
   fra.me.REG[2] = CALL_metamodel___abstractmetamodel___MMLocalProperty___global(fra.me.REG[0])(fra.me.REG[0]);
   REGB0 = CALL_metamodel___abstractmetamodel___MMGlobalProperty___is_init(fra.me.REG[2])(fra.me.REG[2]);
   REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
   if (UNTAG_Bool(REGB0)) {
-    /* primitive_info.nit:168 */
+    /* primitive_info.nit:177 */
     fra.me.REG[2] = CALL_metamodel___abstractmetamodel___MMLocalProperty___name(fra.me.REG[0])(fra.me.REG[0]);
     fra.me.REG[2] = CALL_standard___string___Object___to_s(fra.me.REG[2])(fra.me.REG[2]);
-    /* primitive_info.nit:169 */
+    /* primitive_info.nit:178 */
     if (!once_value_1) {
       fra.me.REG[3] = BOX_NativeString("+");
       REGB0 = TAG_Int(1);
@@ -1207,7 +1255,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
       REGB0 = REGB1;
     }
     if (UNTAG_Bool(REGB0)) {
-      /* primitive_info.nit:170 */
+      /* primitive_info.nit:179 */
       if (!once_value_2) {
         fra.me.REG[3] = BOX_NativeString("_plus");
         REGB0 = TAG_Int(5);
@@ -1217,7 +1265,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
       } else fra.me.REG[3] = once_value_2;
       fra.me.REG[3] = fra.me.REG[3];
     } else {
-      /* primitive_info.nit:171 */
+      /* primitive_info.nit:180 */
       if (!once_value_3) {
         fra.me.REG[4] = BOX_NativeString("-");
         REGB0 = TAG_Int(1);
@@ -1233,7 +1281,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
         REGB0 = REGB1;
       }
       if (UNTAG_Bool(REGB0)) {
-        /* primitive_info.nit:172 */
+        /* primitive_info.nit:181 */
         if (!once_value_4) {
           fra.me.REG[4] = BOX_NativeString("_minus");
           REGB0 = TAG_Int(6);
@@ -1244,7 +1292,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
         fra.me.REG[4] = fra.me.REG[4];
         fra.me.REG[3] = fra.me.REG[4];
       } else {
-        /* primitive_info.nit:173 */
+        /* primitive_info.nit:182 */
         if (!once_value_5) {
           fra.me.REG[4] = BOX_NativeString("*");
           REGB0 = TAG_Int(1);
@@ -1260,7 +1308,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
           REGB0 = REGB1;
         }
         if (UNTAG_Bool(REGB0)) {
-          /* primitive_info.nit:174 */
+          /* primitive_info.nit:183 */
           if (!once_value_6) {
             fra.me.REG[4] = BOX_NativeString("_star");
             REGB0 = TAG_Int(5);
@@ -1271,7 +1319,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
           fra.me.REG[4] = fra.me.REG[4];
           fra.me.REG[3] = fra.me.REG[4];
         } else {
-          /* primitive_info.nit:175 */
+          /* primitive_info.nit:184 */
           if (!once_value_7) {
             fra.me.REG[4] = BOX_NativeString("/");
             REGB0 = TAG_Int(1);
@@ -1287,7 +1335,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
             REGB0 = REGB1;
           }
           if (UNTAG_Bool(REGB0)) {
-            /* primitive_info.nit:176 */
+            /* primitive_info.nit:185 */
             if (!once_value_8) {
               fra.me.REG[4] = BOX_NativeString("_slash");
               REGB0 = TAG_Int(6);
@@ -1298,7 +1346,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
             fra.me.REG[4] = fra.me.REG[4];
             fra.me.REG[3] = fra.me.REG[4];
           } else {
-            /* primitive_info.nit:177 */
+            /* primitive_info.nit:186 */
             if (!once_value_9) {
               fra.me.REG[4] = BOX_NativeString("%");
               REGB0 = TAG_Int(1);
@@ -1314,7 +1362,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
               REGB0 = REGB1;
             }
             if (UNTAG_Bool(REGB0)) {
-              /* primitive_info.nit:178 */
+              /* primitive_info.nit:187 */
               if (!once_value_10) {
                fra.me.REG[4] = BOX_NativeString("_percent");
                REGB0 = TAG_Int(8);
@@ -1325,7 +1373,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
               fra.me.REG[4] = fra.me.REG[4];
               fra.me.REG[3] = fra.me.REG[4];
             } else {
-              /* primitive_info.nit:179 */
+              /* primitive_info.nit:188 */
               if (!once_value_11) {
                fra.me.REG[4] = BOX_NativeString("[]");
                REGB0 = TAG_Int(2);
@@ -1341,7 +1389,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
                REGB0 = REGB1;
               }
               if (UNTAG_Bool(REGB0)) {
-               /* primitive_info.nit:180 */
+               /* primitive_info.nit:189 */
                if (!once_value_12) {
                fra.me.REG[4] = BOX_NativeString("_index");
                REGB0 = TAG_Int(6);
@@ -1352,7 +1400,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
                fra.me.REG[4] = fra.me.REG[4];
                fra.me.REG[3] = fra.me.REG[4];
               } else {
-               /* primitive_info.nit:181 */
+               /* primitive_info.nit:190 */
                if (!once_value_13) {
                fra.me.REG[4] = BOX_NativeString("[]=");
                REGB0 = TAG_Int(3);
@@ -1368,7 +1416,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
                REGB0 = REGB1;
                }
                if (UNTAG_Bool(REGB0)) {
-               /* primitive_info.nit:182 */
+               /* primitive_info.nit:191 */
                if (!once_value_14) {
                fra.me.REG[4] = BOX_NativeString("_index_assign");
                REGB0 = TAG_Int(13);
@@ -1379,7 +1427,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
                fra.me.REG[4] = fra.me.REG[4];
                fra.me.REG[3] = fra.me.REG[4];
                } else {
-               /* primitive_info.nit:183 */
+               /* primitive_info.nit:192 */
                if (!once_value_15) {
                fra.me.REG[4] = BOX_NativeString("==");
                REGB0 = TAG_Int(2);
@@ -1395,7 +1443,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
                REGB0 = REGB1;
                }
                if (UNTAG_Bool(REGB0)) {
-               /* primitive_info.nit:184 */
+               /* primitive_info.nit:193 */
                if (!once_value_16) {
                fra.me.REG[4] = BOX_NativeString("_equal");
                REGB0 = TAG_Int(6);
@@ -1406,7 +1454,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
                fra.me.REG[4] = fra.me.REG[4];
                fra.me.REG[3] = fra.me.REG[4];
                } else {
-               /* primitive_info.nit:185 */
+               /* primitive_info.nit:194 */
                if (!once_value_17) {
                fra.me.REG[4] = BOX_NativeString("<");
                REGB0 = TAG_Int(1);
@@ -1422,7 +1470,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
                REGB0 = REGB1;
                }
                if (UNTAG_Bool(REGB0)) {
-               /* primitive_info.nit:186 */
+               /* primitive_info.nit:195 */
                if (!once_value_18) {
                fra.me.REG[4] = BOX_NativeString("_less");
                REGB0 = TAG_Int(5);
@@ -1433,7 +1481,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
                fra.me.REG[4] = fra.me.REG[4];
                fra.me.REG[3] = fra.me.REG[4];
                } else {
-               /* primitive_info.nit:187 */
+               /* primitive_info.nit:196 */
                if (!once_value_19) {
                fra.me.REG[4] = BOX_NativeString(">");
                REGB0 = TAG_Int(1);
@@ -1449,7 +1497,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
                REGB0 = REGB1;
                }
                if (UNTAG_Bool(REGB0)) {
-               /* primitive_info.nit:188 */
+               /* primitive_info.nit:197 */
                if (!once_value_20) {
                fra.me.REG[4] = BOX_NativeString("_greater");
                REGB0 = TAG_Int(8);
@@ -1460,7 +1508,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
                fra.me.REG[4] = fra.me.REG[4];
                fra.me.REG[3] = fra.me.REG[4];
                } else {
-               /* primitive_info.nit:189 */
+               /* primitive_info.nit:198 */
                if (!once_value_21) {
                fra.me.REG[4] = BOX_NativeString("<=");
                REGB0 = TAG_Int(2);
@@ -1476,7 +1524,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
                REGB0 = REGB1;
                }
                if (UNTAG_Bool(REGB0)) {
-               /* primitive_info.nit:190 */
+               /* primitive_info.nit:199 */
                if (!once_value_22) {
                fra.me.REG[4] = BOX_NativeString("_less_or_equal");
                REGB0 = TAG_Int(14);
@@ -1487,7 +1535,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
                fra.me.REG[4] = fra.me.REG[4];
                fra.me.REG[3] = fra.me.REG[4];
                } else {
-               /* primitive_info.nit:191 */
+               /* primitive_info.nit:200 */
                if (!once_value_23) {
                fra.me.REG[4] = BOX_NativeString(">=");
                REGB0 = TAG_Int(2);
@@ -1503,7 +1551,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
                REGB0 = REGB1;
                }
                if (UNTAG_Bool(REGB0)) {
-               /* primitive_info.nit:192 */
+               /* primitive_info.nit:201 */
                if (!once_value_24) {
                fra.me.REG[4] = BOX_NativeString("_ge");
                REGB0 = TAG_Int(3);
@@ -1514,7 +1562,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
                fra.me.REG[4] = fra.me.REG[4];
                fra.me.REG[3] = fra.me.REG[4];
                } else {
-               /* primitive_info.nit:193 */
+               /* primitive_info.nit:202 */
                if (!once_value_25) {
                fra.me.REG[4] = BOX_NativeString("!=");
                REGB0 = TAG_Int(2);
@@ -1530,7 +1578,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
                REGB0 = REGB1;
                }
                if (UNTAG_Bool(REGB0)) {
-               /* primitive_info.nit:194 */
+               /* primitive_info.nit:203 */
                if (!once_value_26) {
                fra.me.REG[4] = BOX_NativeString("_not_equal");
                REGB0 = TAG_Int(10);
@@ -1541,7 +1589,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
                fra.me.REG[4] = fra.me.REG[4];
                fra.me.REG[3] = fra.me.REG[4];
                } else {
-               /* primitive_info.nit:195 */
+               /* primitive_info.nit:204 */
                if (!once_value_27) {
                fra.me.REG[4] = BOX_NativeString(">>");
                REGB0 = TAG_Int(2);
@@ -1557,7 +1605,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
                REGB0 = REGB1;
                }
                if (UNTAG_Bool(REGB0)) {
-               /* primitive_info.nit:196 */
+               /* primitive_info.nit:205 */
                if (!once_value_28) {
                fra.me.REG[4] = BOX_NativeString("_right");
                REGB0 = TAG_Int(6);
@@ -1568,7 +1616,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
                fra.me.REG[4] = fra.me.REG[4];
                fra.me.REG[3] = fra.me.REG[4];
                } else {
-               /* primitive_info.nit:197 */
+               /* primitive_info.nit:206 */
                if (!once_value_29) {
                fra.me.REG[4] = BOX_NativeString("<<");
                REGB0 = TAG_Int(2);
@@ -1584,7 +1632,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
                REGB0 = REGB1;
                }
                if (UNTAG_Bool(REGB0)) {
-               /* primitive_info.nit:198 */
+               /* primitive_info.nit:207 */
                if (!once_value_30) {
                fra.me.REG[4] = BOX_NativeString("_left");
                REGB0 = TAG_Int(5);
@@ -1595,7 +1643,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
                fra.me.REG[4] = fra.me.REG[4];
                fra.me.REG[3] = fra.me.REG[4];
                } else {
-               /* primitive_info.nit:199 */
+               /* primitive_info.nit:208 */
                if (!once_value_31) {
                fra.me.REG[4] = BOX_NativeString("<=>");
                REGB0 = TAG_Int(3);
@@ -1611,7 +1659,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
                REGB0 = REGB1;
                }
                if (UNTAG_Bool(REGB0)) {
-               /* primitive_info.nit:200 */
+               /* primitive_info.nit:209 */
                if (!once_value_32) {
                fra.me.REG[4] = BOX_NativeString("_starship");
                REGB0 = TAG_Int(9);
@@ -1629,23 +1677,23 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
                nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
                }
                REGB0 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2]);
-               /* primitive_info.nit:201 */
+               /* primitive_info.nit:210 */
                REGB1 = TAG_Int(1);
-               /* ../lib/standard/kernel.nit:237 */
+               /* ../lib/standard/kernel.nit:240 */
                REGB1 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB1));
-               /* primitive_info.nit:201 */
+               /* primitive_info.nit:210 */
                REGB1 = CALL_standard___collection___abstract_collection___SequenceRead_____bra(fra.me.REG[2])(fra.me.REG[2], REGB1);
                REGB0 = TAG_Char('=');
                REGB2 = TAG_Bool(IS_EQUAL_OO(REGB1,REGB0));
                if (UNTAG_Bool(REGB2)) {
                } else {
-               /* ../lib/standard/kernel.nit:378 */
+               /* ../lib/standard/kernel.nit:381 */
                REGB0 = TAG_Bool((REGB1)==(REGB0));
-               /* primitive_info.nit:201 */
+               /* primitive_info.nit:210 */
                REGB2 = REGB0;
                }
                if (UNTAG_Bool(REGB2)) {
-               /* primitive_info.nit:202 */
+               /* primitive_info.nit:211 */
                REGB2 = TAG_Int(3);
                fra.me.REG[4] = NEW_Array_standard___collection___array___Array___with_capacity(REGB2);
                if (!once_value_33) {
@@ -1665,11 +1713,11 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
                nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
                }
                REGB0 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2]);
-               /* primitive_info.nit:202 */
+               /* primitive_info.nit:211 */
                REGB1 = TAG_Int(1);
-               /* ../lib/standard/kernel.nit:237 */
+               /* ../lib/standard/kernel.nit:240 */
                REGB1 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB1));
-               /* primitive_info.nit:202 */
+               /* primitive_info.nit:211 */
                fra.me.REG[5] = CALL_standard___string___AbstractString___substring(fra.me.REG[2])(fra.me.REG[2], REGB2, REGB1);
                CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[5]);
                if (!once_value_34) {
@@ -1684,7 +1732,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
                fra.me.REG[4] = CALL_standard___string___Object___to_s(fra.me.REG[4])(fra.me.REG[4]);
                fra.me.REG[3] = fra.me.REG[4];
                } else {
-               /* primitive_info.nit:204 */
+               /* primitive_info.nit:213 */
                fra.me.REG[3] = fra.me.REG[2];
                }
                }
@@ -1703,7 +1751,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
         }
       }
     }
-    /* primitive_info.nit:207 */
+    /* primitive_info.nit:216 */
     REGB1 = TAG_Int(5);
     fra.me.REG[2] = NEW_Array_standard___collection___array___Array___with_capacity(REGB1);
     if (!once_value_35) {
@@ -1740,7 +1788,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
     fra.me.REG[2] = CALL_standard___string___Object___to_s(fra.me.REG[2])(fra.me.REG[2]);
     goto label38;
   } else {
-    /* primitive_info.nit:209 */
+    /* primitive_info.nit:218 */
     fra.me.REG[3] = CALL_metamodel___abstractmetamodel___MMLocalProperty___name(fra.me.REG[0])(fra.me.REG[0]);
     if (!once_value_39) {
       if (!once_value_40) {
@@ -1751,7 +1799,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
         register_static_object(&once_value_40);
       } else fra.me.REG[4] = once_value_40;
       fra.me.REG[4] = fra.me.REG[4];
-      fra.me.REG[4] = CALL_standard___symbol___String___to_symbol(fra.me.REG[4])(fra.me.REG[4]);
+      fra.me.REG[4] = CALL_symbol___String___to_symbol(fra.me.REG[4])(fra.me.REG[4]);
       once_value_39 = fra.me.REG[4];
       register_static_object(&once_value_39);
     } else fra.me.REG[4] = once_value_39;
@@ -1763,7 +1811,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
       REGB1 = REGB2;
     }
     if (UNTAG_Bool(REGB1)) {
-      /* primitive_info.nit:210 */
+      /* primitive_info.nit:219 */
       REGB1 = TAG_Int(3);
       fra.me.REG[4] = NEW_Array_standard___collection___array___Array___with_capacity(REGB1);
       if (!once_value_41) {
@@ -1791,7 +1839,7 @@ val_t primitive_info___MMMethod___friendly_extern_name(val_t p0, val_t p1){
       fra.me.REG[2] = fra.me.REG[4];
       goto label38;
     } else {
-      /* primitive_info.nit:212 */
+      /* primitive_info.nit:221 */
       REGB1 = TAG_Int(5);
       fra.me.REG[4] = NEW_Array_standard___collection___array___Array___with_capacity(REGB1);
       if (!once_value_43) {