c_src : Regenerated c_src to prevent use of String contructors

[nit.git] / c_src / standard___string._sep.c

diff --git a/c_src/standard___string._sep.c b/c_src/standard___string._sep.c
index d9fa511..44581b9 100644 (file)
--- a/c_src/standard___string._sep.c
+++ b/c_src/standard___string._sep.c
@@ -1,28 +1,30 @@
 /* This C file is generated by NIT to compile module standard___string. */
 #include "standard___string._sep.h"
+static const char LOCATE_standard___string___AbstractString___items[] = "string::AbstractString::items";
 val_t standard___string___AbstractString___items(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_standard___string;
-  fra.me.line = 28;
+  fra.me.line = 32;
   fra.me.meth = LOCATE_standard___string___AbstractString___items;
   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;
-  /* ../lib/standard/string.nit:28 */
+  /* ../lib/standard/string.nit:32 */
   REGB0 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB0)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 28);
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 32);
   }
   fra.me.REG[0] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
   stack_frame_head = fra.me.prev;
   return fra.me.REG[0];
 }
+static const char LOCATE_standard___string___AbstractString_____bra[] = "string::AbstractString::(abstract_collection::SequenceRead::[])";
 val_t standard___string___AbstractString_____bra(val_t p0, val_t p1){
   struct {struct stack_frame_t me;} fra;
   val_t REGB0;
@@ -30,7 +32,7 @@ val_t standard___string___AbstractString_____bra(val_t p0, val_t p1){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 30;
+  fra.me.line = 34;
   fra.me.meth = LOCATE_standard___string___AbstractString_____bra;
   fra.me.has_broke = 0;
   fra.me.REG_size = 1;
@@ -38,21 +40,22 @@ val_t standard___string___AbstractString_____bra(val_t p0, val_t p1){
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[0] = p0;
   REGB0 = p1;
-  /* ../lib/standard/string.nit:30 */
+  /* ../lib/standard/string.nit:37 */
   REGB1 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB1)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 30);
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 37);
   }
   fra.me.REG[0] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
-  /* ../lib/standard/string.nit:595 */
+  /* ../lib/standard/string.nit:970 */
   REGB0 = TAG_Char(UNBOX_NativeString(fra.me.REG[0])[UNTAG_Int(REGB0)]);
-  /* ../lib/standard/string.nit:30 */
+  /* ../lib/standard/string.nit:37 */
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
   return REGB0;
 }
+static const char LOCATE_standard___string___AbstractString___substring[] = "string::AbstractString::substring";
 val_t standard___string___AbstractString___substring(val_t p0, val_t p1, val_t p2){
   struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
   val_t REGB0;
@@ -63,7 +66,7 @@ val_t standard___string___AbstractString___substring(val_t p0, val_t p1, val_t p
     static val_t once_value_3; /* Once value */
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 32;
+  fra.me.line = 39;
   fra.me.meth = LOCATE_standard___string___AbstractString___substring;
   fra.me.has_broke = 0;
   fra.me.REG_size = 3;
@@ -74,34 +77,34 @@ val_t standard___string___AbstractString___substring(val_t p0, val_t p1, val_t p
   fra.me.REG[0] = p0;
   REGB0 = p1;
   REGB1 = p2;
-  /* ../lib/standard/string.nit:40 */
+  /* ../lib/standard/string.nit:51 */
   REGB2 = TAG_Int(0);
   REGB3 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1), VTID_standard___kernel___Comparable___OTHER(REGB1))) /*cast OTHER*/;
   if (UNTAG_Bool(REGB3)) {
   } else {
     nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
   }
-  /* ../lib/standard/kernel.nit:233 */
+  /* ../lib/standard/kernel.nit:243 */
   REGB2 = TAG_Bool(UNTAG_Int(REGB1)>=UNTAG_Int(REGB2));
-  /* ../lib/standard/string.nit:40 */
+  /* ../lib/standard/string.nit:51 */
   if (UNTAG_Bool(REGB2)) {
   } else {
-    nit_abort("Assert failed", NULL, LOCATE_standard___string, 40);
+    nit_abort("Assert failed", NULL, LOCATE_standard___string, 51);
   }
-  /* ../lib/standard/kernel.nit:235 */
+  /* ../lib/standard/kernel.nit:245 */
   REGB2 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB0));
-  /* ../lib/standard/string.nit:41 */
+  /* ../lib/standard/string.nit:52 */
   REGB1 = REGB2;
-  /* ../lib/standard/string.nit:42 */
+  /* ../lib/standard/string.nit:53 */
   REGB2 = TAG_Int(0);
   REGB3 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
   if (UNTAG_Bool(REGB3)) {
   } else {
     nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
   }
-  /* ../lib/standard/kernel.nit:232 */
+  /* ../lib/standard/kernel.nit:242 */
   REGB2 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB2));
-  /* ../lib/standard/string.nit:42 */
+  /* ../lib/standard/string.nit:53 */
   if (UNTAG_Bool(REGB2)) {
     REGB2 = TAG_Int(0);
     REGB0 = REGB2;
@@ -118,9 +121,9 @@ val_t standard___string___AbstractString___substring(val_t p0, val_t p1, val_t p
   } else {
     nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
   }
-  /* ../lib/standard/kernel.nit:234 */
+  /* ../lib/standard/kernel.nit:244 */
   REGB2 = TAG_Bool(UNTAG_Int(REGB1)>UNTAG_Int(REGB2));
-  /* ../lib/standard/string.nit:43 */
+  /* ../lib/standard/string.nit:54 */
   if (UNTAG_Bool(REGB2)) {
     /* ../lib/standard/collection/array.nit:24 */
     REGB2 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
@@ -129,7 +132,7 @@ val_t standard___string___AbstractString___substring(val_t p0, val_t p1, val_t p
       nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
     }
     REGB2 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
-    /* ../lib/standard/string.nit:43 */
+    /* ../lib/standard/string.nit:54 */
     REGB1 = REGB2;
   }
   REGB2 = TAG_Bool(VAL_ISA(REGB1, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
@@ -137,57 +140,57 @@ val_t standard___string___AbstractString___substring(val_t p0, val_t p1, val_t p
   } else {
     nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
   }
-  /* ../lib/standard/kernel.nit:232 */
+  /* ../lib/standard/kernel.nit:242 */
   REGB2 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
-  /* ../lib/standard/string.nit:44 */
+  /* ../lib/standard/string.nit:55 */
   if (UNTAG_Bool(REGB2)) {
-    /* ../lib/standard/kernel.nit:237 */
+    /* ../lib/standard/kernel.nit:247 */
     REGB2 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB0));
-    /* ../lib/standard/string.nit:45 */
+    /* ../lib/standard/string.nit:56 */
     fra.me.REG[1] = NEW_Buffer_standard___string___Buffer___with_capacity(REGB2);
-    /* ../lib/standard/string.nit:46 */
+    /* ../lib/standard/string.nit:57 */
     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:242 */
       REGB2 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
-      /* ../lib/standard/string.nit:46 */
+      /* ../lib/standard/string.nit:57 */
       if (UNTAG_Bool(REGB2)) {
-        /* ../lib/standard/string.nit:47 */
+        /* ../lib/standard/string.nit:58 */
         REGB2 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
         if (UNTAG_Bool(REGB2)) {
         } else {
-          nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 47);
+          nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 58);
         }
         fra.me.REG[2] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
-        /* ../lib/standard/string.nit:595 */
+        /* ../lib/standard/string.nit:970 */
         REGB2 = TAG_Char(UNBOX_NativeString(fra.me.REG[2])[UNTAG_Int(REGB0)]);
-        /* ../lib/standard/string.nit:47 */
+        /* ../lib/standard/string.nit:58 */
         CALL_standard___collection___abstract_collection___Sequence___push(fra.me.REG[1])(fra.me.REG[1], REGB2);
-        /* ../lib/standard/string.nit:48 */
+        /* ../lib/standard/string.nit:59 */
         REGB2 = TAG_Int(1);
-        /* ../lib/standard/kernel.nit:235 */
+        /* ../lib/standard/kernel.nit:245 */
         REGB2 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB2));
-        /* ../lib/standard/string.nit:48 */
+        /* ../lib/standard/string.nit:59 */
         REGB0 = REGB2;
       } else {
-        /* ../lib/standard/string.nit:46 */
+        /* ../lib/standard/string.nit:57 */
         goto label1;
       }
     }
     label1: while(0);
-    /* ../lib/standard/string.nit:50 */
+    /* ../lib/standard/string.nit:61 */
     fra.me.REG[1] = CALL_standard___string___Object___to_s(fra.me.REG[1])(fra.me.REG[1]);
     goto label2;
   } else {
-    /* ../lib/standard/string.nit:52 */
+    /* ../lib/standard/string.nit:63 */
     if (!once_value_3) {
       fra.me.REG[0] = BOX_NativeString("");
       REGB0 = TAG_Int(0);
-      fra.me.REG[0] = NEW_String_standard___string___String___with_native(fra.me.REG[0], REGB0);
+      fra.me.REG[0] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[0])(fra.me.REG[0], REGB0);
       once_value_3 = fra.me.REG[0];
       register_static_object(&once_value_3);
     } else fra.me.REG[0] = once_value_3;
@@ -199,6 +202,7 @@ val_t standard___string___AbstractString___substring(val_t p0, val_t p1, val_t p
   stack_frame_head = fra.me.prev;
   return fra.me.REG[1];
 }
+static const char LOCATE_standard___string___AbstractString___substring_from[] = "string::AbstractString::substring_from";
 val_t standard___string___AbstractString___substring_from(val_t p0, val_t p1){
   struct {struct stack_frame_t me;} fra;
   val_t REGB0;
@@ -207,7 +211,7 @@ val_t standard___string___AbstractString___substring_from(val_t p0, val_t p1){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 56;
+  fra.me.line = 67;
   fra.me.meth = LOCATE_standard___string___AbstractString___substring_from;
   fra.me.has_broke = 0;
   fra.me.REG_size = 1;
@@ -227,12 +231,12 @@ val_t standard___string___AbstractString___substring_from(val_t p0, val_t p1){
   } else {
     nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
   }
-  /* ../lib/standard/kernel.nit:232 */
+  /* ../lib/standard/kernel.nit:242 */
   REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
-  /* ../lib/standard/string.nit:63 */
+  /* ../lib/standard/string.nit:76 */
   if (UNTAG_Bool(REGB1)) {
   } else {
-    nit_abort("Assert failed", NULL, LOCATE_standard___string, 63);
+    nit_abort("Assert failed", NULL, LOCATE_standard___string, 76);
   }
   /* ../lib/standard/collection/array.nit:24 */
   REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
@@ -241,34 +245,37 @@ val_t standard___string___AbstractString___substring_from(val_t p0, val_t p1){
     nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
   }
   REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
-  /* ../lib/standard/kernel.nit:237 */
+  /* ../lib/standard/kernel.nit:247 */
   REGB1 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB0));
-  /* ../lib/standard/string.nit:64 */
+  /* ../lib/standard/string.nit:77 */
   fra.me.REG[0] = CALL_standard___string___AbstractString___substring(fra.me.REG[0])(fra.me.REG[0], REGB0, REGB1);
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
   return fra.me.REG[0];
 }
+static const char LOCATE_standard___string___AbstractString___has_substring[] = "string::AbstractString::has_substring";
 val_t standard___string___AbstractString___has_substring(val_t p0, val_t p1, val_t p2){
-  struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
+  struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
   val_t REGB0;
   val_t REGB1;
   val_t REGB2;
   val_t REGB3;
   val_t REGB4;
   val_t REGB5;
+  val_t REGB6;
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 67;
+  fra.me.line = 80;
   fra.me.meth = LOCATE_standard___string___AbstractString___has_substring;
   fra.me.has_broke = 0;
-  fra.me.REG_size = 3;
+  fra.me.REG_size = 4;
   fra.me.nitni_local_ref_head = NULL;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[2] = NIT_NULL;
+  fra.me.REG[3] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
   REGB0 = p2;
@@ -279,26 +286,26 @@ val_t standard___string___AbstractString___has_substring(val_t p0, val_t p1, val
     nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
   }
   REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]);
-  /* ../lib/standard/string.nit:73 */
+  /* ../lib/standard/string.nit:86 */
   REGB2 = TAG_Int(1);
-  /* ../lib/standard/kernel.nit:237 */
+  /* ../lib/standard/kernel.nit:247 */
   REGB2 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB2));
-  /* ../lib/standard/kernel.nit:235 */
+  /* ../lib/standard/kernel.nit:245 */
   REGB0 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB2));
-  /* ../lib/standard/string.nit:75 */
+  /* ../lib/standard/string.nit:88 */
   REGB1 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB1)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 75);
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 88);
   }
   fra.me.REG[2] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
-  /* ../lib/standard/string.nit:76 */
+  /* ../lib/standard/string.nit:89 */
   REGB1 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[1])!=NIT_NULL);
   if (UNTAG_Bool(REGB1)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 76);
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 89);
   }
-  fra.me.REG[1] = ATTR_standard___string___AbstractString____items(fra.me.REG[1]);
+  fra.me.REG[3] = ATTR_standard___string___AbstractString____items(fra.me.REG[1]);
   /* ../lib/standard/collection/array.nit:24 */
   REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB1)) {
@@ -311,89 +318,100 @@ val_t standard___string___AbstractString___has_substring(val_t p0, val_t p1, val
   } else {
     nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
   }
-  /* ../lib/standard/kernel.nit:234 */
+  /* ../lib/standard/kernel.nit:244 */
   REGB1 = TAG_Bool(UNTAG_Int(REGB0)>UNTAG_Int(REGB1));
-  /* ../lib/standard/string.nit:77 */
+  /* ../lib/standard/string.nit:90 */
   if (UNTAG_Bool(REGB1)) {
-    REGB1 = TAG_Bool(true);
+    REGB1 = TAG_Bool(1);
   } else {
     REGB3 = TAG_Bool(VAL_ISA(REGB0, VTCOLOR_standard___kernel___Comparable___OTHER(REGB2), VTID_standard___kernel___Comparable___OTHER(REGB2))) /*cast OTHER*/;
     if (UNTAG_Bool(REGB3)) {
     } else {
       nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
     }
-    /* ../lib/standard/kernel.nit:234 */
+    /* ../lib/standard/kernel.nit:244 */
     REGB3 = TAG_Bool(UNTAG_Int(REGB2)>UNTAG_Int(REGB0));
-    /* ../lib/standard/string.nit:77 */
+    /* ../lib/standard/string.nit:90 */
     REGB1 = REGB3;
   }
   if (UNTAG_Bool(REGB1)) {
-    REGB1 = TAG_Bool(false);
+    REGB1 = TAG_Bool(0);
     goto label1;
   }
-  /* ../lib/standard/string.nit:78 */
+  /* ../lib/standard/string.nit:91 */
+  REGB3 = TAG_Bool(ATTR_standard___string___String____index_from(fra.me.REG[1])!=NIT_NULL);
+  if (UNTAG_Bool(REGB3)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_index_from", LOCATE_standard___string, 91);
+  }
+  REGB3 = ATTR_standard___string___String____index_from(fra.me.REG[1]);
+  /* ../lib/standard/kernel.nit:245 */
+  REGB4 = TAG_Int(UNTAG_Int(REGB2)+UNTAG_Int(REGB3));
+  /* ../lib/standard/string.nit:92 */
+  REGB2 = REGB4;
+  /* ../lib/standard/string.nit:93 */
   while(1) {
-    REGB3 = TAG_Int(0);
     REGB4 = TAG_Bool(VAL_ISA(REGB3, VTCOLOR_standard___kernel___Comparable___OTHER(REGB2), VTID_standard___kernel___Comparable___OTHER(REGB2))) /*cast OTHER*/;
     if (UNTAG_Bool(REGB4)) {
     } else {
       nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
     }
-    /* ../lib/standard/kernel.nit:233 */
-    REGB3 = TAG_Bool(UNTAG_Int(REGB2)>=UNTAG_Int(REGB3));
-    /* ../lib/standard/string.nit:78 */
-    if (UNTAG_Bool(REGB3)) {
-      /* ../lib/standard/string.nit:595 */
-      REGB3 = TAG_Char(UNBOX_NativeString(fra.me.REG[2])[UNTAG_Int(REGB0)]);
-      REGB4 = TAG_Char(UNBOX_NativeString(fra.me.REG[1])[UNTAG_Int(REGB2)]);
-      /* ../lib/standard/string.nit:79 */
-      REGB5 = TAG_Bool(IS_EQUAL_OO(REGB3,REGB4));
-      if (UNTAG_Bool(REGB5)) {
+    /* ../lib/standard/kernel.nit:243 */
+    REGB4 = TAG_Bool(UNTAG_Int(REGB2)>=UNTAG_Int(REGB3));
+    /* ../lib/standard/string.nit:93 */
+    if (UNTAG_Bool(REGB4)) {
+      /* ../lib/standard/string.nit:970 */
+      REGB4 = TAG_Char(UNBOX_NativeString(fra.me.REG[2])[UNTAG_Int(REGB0)]);
+      REGB5 = TAG_Char(UNBOX_NativeString(fra.me.REG[3])[UNTAG_Int(REGB2)]);
+      /* ../lib/standard/string.nit:94 */
+      REGB6 = TAG_Bool(IS_EQUAL_OO(REGB4,REGB5));
+      if (UNTAG_Bool(REGB6)) {
       } else {
-        /* ../lib/standard/kernel.nit:378 */
-        REGB4 = TAG_Bool((REGB3)==(REGB4));
-        /* ../lib/standard/string.nit:79 */
-        REGB5 = REGB4;
+        /* ../lib/standard/kernel.nit:434 */
+        REGB5 = TAG_Bool((REGB4)==(REGB5));
+        /* ../lib/standard/string.nit:94 */
+        REGB6 = REGB5;
       }
-      REGB5 = TAG_Bool(!UNTAG_Bool(REGB5));
-      if (UNTAG_Bool(REGB5)) {
-        REGB5 = TAG_Bool(false);
-        REGB1 = REGB5;
+      REGB6 = TAG_Bool(!UNTAG_Bool(REGB6));
+      if (UNTAG_Bool(REGB6)) {
+        REGB6 = TAG_Bool(0);
+        REGB1 = REGB6;
         goto label1;
       }
-      /* ../lib/standard/string.nit:80 */
-      REGB5 = TAG_Int(1);
-      /* ../lib/standard/kernel.nit:237 */
-      REGB5 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB5));
-      /* ../lib/standard/string.nit:80 */
-      REGB0 = REGB5;
-      /* ../lib/standard/string.nit:81 */
-      REGB5 = TAG_Int(1);
-      /* ../lib/standard/kernel.nit:237 */
-      REGB5 = TAG_Int(UNTAG_Int(REGB2)-UNTAG_Int(REGB5));
-      /* ../lib/standard/string.nit:81 */
-      REGB2 = REGB5;
+      /* ../lib/standard/string.nit:95 */
+      REGB6 = TAG_Int(1);
+      /* ../lib/standard/kernel.nit:247 */
+      REGB6 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB6));
+      /* ../lib/standard/string.nit:95 */
+      REGB0 = REGB6;
+      /* ../lib/standard/string.nit:96 */
+      REGB6 = TAG_Int(1);
+      /* ../lib/standard/kernel.nit:247 */
+      REGB6 = TAG_Int(UNTAG_Int(REGB2)-UNTAG_Int(REGB6));
+      /* ../lib/standard/string.nit:96 */
+      REGB2 = REGB6;
     } else {
-      /* ../lib/standard/string.nit:78 */
+      /* ../lib/standard/string.nit:93 */
       goto label2;
     }
   }
   label2: while(0);
-  /* ../lib/standard/string.nit:83 */
-  REGB2 = TAG_Bool(true);
+  /* ../lib/standard/string.nit:98 */
+  REGB2 = TAG_Bool(1);
   REGB1 = REGB2;
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
   return REGB1;
 }
+static const char LOCATE_standard___string___AbstractString___has_prefix[] = "string::AbstractString::has_prefix";
 val_t standard___string___AbstractString___has_prefix(val_t p0, val_t p1){
   struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
   val_t REGB0;
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 86;
+  fra.me.line = 101;
   fra.me.meth = LOCATE_standard___string___AbstractString___has_prefix;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
@@ -402,7 +420,7 @@ val_t standard___string___AbstractString___has_prefix(val_t p0, val_t p1){
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
-  /* ../lib/standard/string.nit:90 */
+  /* ../lib/standard/string.nit:105 */
   REGB0 = TAG_Int(0);
   REGB0 = CALL_standard___string___AbstractString___has_substring(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], REGB0);
   goto label1;
@@ -410,6 +428,7 @@ val_t standard___string___AbstractString___has_prefix(val_t p0, val_t p1){
   stack_frame_head = fra.me.prev;
   return REGB0;
 }
+static const char LOCATE_standard___string___AbstractString___has_suffix[] = "string::AbstractString::has_suffix";
 val_t standard___string___AbstractString___has_suffix(val_t p0, val_t p1){
   struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
   val_t REGB0;
@@ -417,7 +436,7 @@ val_t standard___string___AbstractString___has_suffix(val_t p0, val_t p1){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 92;
+  fra.me.line = 107;
   fra.me.meth = LOCATE_standard___string___AbstractString___has_suffix;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
@@ -439,53 +458,77 @@ val_t standard___string___AbstractString___has_suffix(val_t p0, val_t p1){
     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:237 */
+  /* ../lib/standard/kernel.nit:247 */
   REGB1 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB1));
-  /* ../lib/standard/string.nit:96 */
+  /* ../lib/standard/string.nit:111 */
   REGB1 = CALL_standard___string___AbstractString___has_substring(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], REGB1);
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
   return REGB1;
 }
+static const char LOCATE_standard___string___AbstractString___to_i[] = "string::AbstractString::to_i";
 val_t standard___string___AbstractString___to_i(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_standard___string;
-  fra.me.line = 98;
+  fra.me.line = 113;
   fra.me.meth = LOCATE_standard___string___AbstractString___to_i;
   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;
-  /* ../lib/standard/string.nit:102 */
+  /* ../lib/standard/string.nit:120 */
   fra.me.REG[0] = CALL_standard___string___Object___to_s(fra.me.REG[0])(fra.me.REG[0]);
   fra.me.REG[0] = CALL_standard___string___String___to_cstring(fra.me.REG[0])(fra.me.REG[0]);
-  /* ../lib/standard/string.nit:606 */
+  /* ../lib/standard/string.nit:981 */
   REGB0 = TAG_Int(atoi(UNBOX_NativeString(fra.me.REG[0])));
-  /* ../lib/standard/string.nit:102 */
+  /* ../lib/standard/string.nit:120 */
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
   return REGB0;
 }
+static const char LOCATE_standard___string___AbstractString___to_f[] = "string::AbstractString::to_f";
+val_t standard___string___AbstractString___to_f(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_standard___string;
+  fra.me.line = 123;
+  fra.me.meth = LOCATE_standard___string___AbstractString___to_f;
+  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;
+  /* ../lib/standard/string.nit:131 */
+  fra.me.REG[0] = CALL_standard___string___Object___to_s(fra.me.REG[0])(fra.me.REG[0]);
+  fra.me.REG[0] = CALL_standard___string___String___to_cstring(fra.me.REG[0])(fra.me.REG[0]);
+  fra.me.REG[0] = CALL_standard___string___NativeString___atof(fra.me.REG[0])(fra.me.REG[0]);
+  goto label1;
+  label1: while(0);
+  stack_frame_head = fra.me.prev;
+  return fra.me.REG[0];
+}
+static const char LOCATE_standard___string___AbstractString___to_hex[] = "string::AbstractString::to_hex";
 val_t standard___string___AbstractString___to_hex(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_standard___string;
-  fra.me.line = 105;
+  fra.me.line = 134;
   fra.me.meth = LOCATE_standard___string___AbstractString___to_hex;
   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;
-  /* ../lib/standard/string.nit:106 */
+  /* ../lib/standard/string.nit:135 */
   REGB0 = TAG_Int(16);
   REGB0 = CALL_standard___string___AbstractString___a_to(fra.me.REG[0])(fra.me.REG[0], REGB0);
   goto label1;
@@ -493,13 +536,14 @@ val_t standard___string___AbstractString___to_hex(val_t p0){
   stack_frame_head = fra.me.prev;
   return REGB0;
 }
+static const char LOCATE_standard___string___AbstractString___a_to[] = "string::AbstractString::a_to";
 val_t standard___string___AbstractString___a_to(val_t p0, val_t p1){
   struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
   val_t REGB0;
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 108;
+  fra.me.line = 137;
   fra.me.meth = LOCATE_standard___string___AbstractString___a_to;
   fra.me.has_broke = 0;
   fra.me.REG_size = 4;
@@ -510,28 +554,28 @@ val_t standard___string___AbstractString___a_to(val_t p0, val_t p1){
   fra.me.REG[3] = NIT_NULL;
   fra.me.REG[0] = p0;
   REGB0 = p1;
-  /* ../lib/standard/string.nit:108 */
+  /* ../lib/standard/string.nit:137 */
   fra.me.REG[1] = REGB0;
-  /* ../lib/standard/string.nit:111 */
+  /* ../lib/standard/string.nit:142 */
   REGB0 = TAG_Int(0);
   fra.me.REG[2] = REGB0;
-  /* ../lib/standard/string.nit:112 */
-  REGB0 = TAG_Bool(false);
+  /* ../lib/standard/string.nit:143 */
+  REGB0 = TAG_Bool(0);
   fra.me.REG[3] = REGB0;
   CALL_standard___collection___abstract_collection___Collection___iterate(fra.me.REG[0])(fra.me.REG[0], (&(fra.me)), ((fun_t)OC_standard___string___AbstractString___a_to_1));
   switch ((&(fra.me))->has_broke) {
     case 0: break;
     case 1: (&(fra.me))->has_broke = 0; goto label3;
   }
-  /* ../lib/standard/string.nit:129 */
+  /* ../lib/standard/string.nit:160 */
   if (UNTAG_Bool(fra.me.REG[3])) {
-    /* ../lib/standard/kernel.nit:236 */
+    /* ../lib/standard/kernel.nit:246 */
     REGB0 = TAG_Int(-UNTAG_Int(fra.me.REG[2]));
-    /* ../lib/standard/string.nit:130 */
+    /* ../lib/standard/string.nit:161 */
     fra.me.REG[0] = REGB0;
     goto label3;
   } else {
-    /* ../lib/standard/string.nit:132 */
+    /* ../lib/standard/string.nit:163 */
     fra.me.REG[0] = fra.me.REG[2];
     goto label3;
   }
@@ -546,7 +590,7 @@ val_t standard___string___AbstractString___a_to(val_t p0, val_t p1){
     val_t REGB2;
     fun_t CREG[1];
     val_t tmp;
-    /* ../lib/standard/string.nit:114 */
+    /* ../lib/standard/string.nit:145 */
     fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
     fra.me.file = LOCATE_standard___string;
     fra.me.line = 0;
@@ -560,52 +604,52 @@ val_t standard___string___AbstractString___a_to(val_t p0, val_t p1){
     fra.me.REG[0] = p0;
     CREG[0] = clos_fun0;
     REGB0 = fra.me.REG[0];
-    /* ../lib/standard/string.nit:116 */
+    /* ../lib/standard/string.nit:147 */
     REGB0 = CALL_standard___kernel___Char___to_i(REGB0)(REGB0);
     REGB1 = TAG_Bool(VAL_ISA(closctx->REG[1], VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
     if (UNTAG_Bool(REGB1)) {
     } else {
       nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
     }
-    /* ../lib/standard/kernel.nit:234 */
+    /* ../lib/standard/kernel.nit:244 */
     REGB1 = TAG_Bool(UNTAG_Int(REGB0)>UNTAG_Int(closctx->REG[1]));
-    /* ../lib/standard/string.nit:117 */
+    /* ../lib/standard/string.nit:148 */
     if (UNTAG_Bool(REGB1)) {
-      /* ../lib/standard/string.nit:118 */
+      /* ../lib/standard/string.nit:149 */
       if (UNTAG_Bool(closctx->REG[3])) {
-        /* ../lib/standard/kernel.nit:236 */
+        /* ../lib/standard/kernel.nit:246 */
         REGB1 = TAG_Int(-UNTAG_Int(closctx->REG[2]));
-        /* ../lib/standard/string.nit:119 */
+        /* ../lib/standard/string.nit:150 */
         closctx->REG[0] = REGB1;
         closctx->has_broke = 1;
         goto label2;
       } else {
-        /* ../lib/standard/string.nit:121 */
+        /* ../lib/standard/string.nit:152 */
         closctx->REG[0] = closctx->REG[2];
         closctx->has_broke = 1;
         goto label2;
       }
     } else {
-      /* ../lib/standard/string.nit:123 */
+      /* ../lib/standard/string.nit:154 */
       REGB1 = TAG_Int(0);
       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:242 */
       REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
-      /* ../lib/standard/string.nit:123 */
+      /* ../lib/standard/string.nit:154 */
       if (UNTAG_Bool(REGB1)) {
-        /* ../lib/standard/string.nit:124 */
-        REGB1 = TAG_Bool(true);
+        /* ../lib/standard/string.nit:155 */
+        REGB1 = TAG_Bool(1);
         closctx->REG[3] = REGB1;
       } else {
-        /* ../lib/standard/kernel.nit:238 */
+        /* ../lib/standard/kernel.nit:248 */
         REGB1 = TAG_Int(UNTAG_Int(closctx->REG[2])*UNTAG_Int(closctx->REG[1]));
-        /* ../lib/standard/kernel.nit:235 */
+        /* ../lib/standard/kernel.nit:245 */
         REGB0 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB0));
-        /* ../lib/standard/string.nit:126 */
+        /* ../lib/standard/string.nit:157 */
         closctx->REG[2] = REGB0;
       }
     }
@@ -613,13 +657,117 @@ val_t standard___string___AbstractString___a_to(val_t p0, val_t p1){
     stack_frame_head = fra.me.prev;
     return;
   }
+static const char LOCATE_standard___string___AbstractString___is_numeric[] = "string::AbstractString::is_numeric";
+val_t standard___string___AbstractString___is_numeric(val_t p0){
+  struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
+  val_t REGB0;
+  val_t tmp;
+  fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+  fra.me.file = LOCATE_standard___string;
+  fra.me.line = 167;
+  fra.me.meth = LOCATE_standard___string___AbstractString___is_numeric;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 2;
+  fra.me.nitni_local_ref_head = NULL;
+  fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[1] = NIT_NULL;
+  fra.me.REG[0] = p0;
+  /* ../lib/standard/string.nit:175 */
+  REGB0 = TAG_Bool(0);
+  fra.me.REG[1] = REGB0;
+  CALL_standard___collection___abstract_collection___Collection___iterate(fra.me.REG[0])(fra.me.REG[0], (&(fra.me)), ((fun_t)OC_standard___string___AbstractString___is_numeric_1));
+  switch ((&(fra.me))->has_broke) {
+    case 0: break;
+    case 1: (&(fra.me))->has_broke = 0; goto label3;
+  }
+  /* ../lib/standard/string.nit:188 */
+  REGB0 = TAG_Bool(1);
+  fra.me.REG[0] = REGB0;
+  goto label3;
+  label3: while(0);
+  stack_frame_head = fra.me.prev;
+  return fra.me.REG[0];
+}
+  void OC_standard___string___AbstractString___is_numeric_1(struct stack_frame_t *closctx, val_t p0, struct stack_frame_t *closctx_param, fun_t clos_fun0){
+    struct {struct stack_frame_t me;} fra;
+    val_t REGB0;
+    val_t REGB1;
+    val_t REGB2;
+    val_t REGB3;
+    fun_t CREG[1];
+    val_t tmp;
+    /* ../lib/standard/string.nit:176 */
+    fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+    fra.me.file = LOCATE_standard___string;
+    fra.me.line = 0;
+    fra.me.meth = LOCATE_standard___string___AbstractString___is_numeric;
+    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.closure_ctx = closctx_param;
+    fra.me.closure_funs = CREG;
+    fra.me.REG[0] = p0;
+    CREG[0] = clos_fun0;
+    REGB0 = fra.me.REG[0];
+    /* ../lib/standard/string.nit:178 */
+    REGB1 = CALL_standard___string___Char___is_numeric(REGB0)(REGB0);
+    REGB1 = TAG_Bool(!UNTAG_Bool(REGB1));
+    if (UNTAG_Bool(REGB1)) {
+      /* ../lib/standard/string.nit:180 */
+      REGB1 = TAG_Char('.');
+      REGB2 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB1));
+      if (UNTAG_Bool(REGB2)) {
+      } else {
+        /* ../lib/standard/kernel.nit:434 */
+        REGB1 = TAG_Bool((REGB0)==(REGB1));
+        /* ../lib/standard/string.nit:180 */
+        REGB2 = REGB1;
+      }
+      if (UNTAG_Bool(REGB2)) {
+        REGB2 = TAG_Bool(1);
+      } else {
+        REGB1 = TAG_Char(',');
+        REGB3 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB1));
+        if (UNTAG_Bool(REGB3)) {
+        } else {
+          /* ../lib/standard/kernel.nit:434 */
+          REGB1 = TAG_Bool((REGB0)==(REGB1));
+          /* ../lib/standard/string.nit:180 */
+          REGB3 = REGB1;
+        }
+        REGB2 = REGB3;
+      }
+      if (UNTAG_Bool(REGB2)) {
+        REGB2 = TAG_Bool(!UNTAG_Bool(closctx->REG[1]));
+      } else {
+        REGB3 = TAG_Bool(0);
+        REGB2 = REGB3;
+      }
+      if (UNTAG_Bool(REGB2)) {
+        /* ../lib/standard/string.nit:182 */
+        REGB2 = TAG_Bool(1);
+        closctx->REG[1] = REGB2;
+      } else {
+        /* ../lib/standard/string.nit:184 */
+        REGB2 = TAG_Bool(0);
+        closctx->REG[0] = REGB2;
+        closctx->has_broke = 1;
+        goto label2;
+      }
+    }
+    label2: while(0);
+    stack_frame_head = fra.me.prev;
+    return;
+  }
+static const char LOCATE_standard___string___AbstractString___to_upper[] = "string::AbstractString::to_upper";
 val_t standard___string___AbstractString___to_upper(val_t p0){
   struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
   val_t REGB0;
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 136;
+  fra.me.line = 191;
   fra.me.meth = LOCATE_standard___string___AbstractString___to_upper;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
@@ -634,10 +782,10 @@ val_t standard___string___AbstractString___to_upper(val_t p0){
     nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
   }
   REGB0 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
-  /* ../lib/standard/string.nit:139 */
+  /* ../lib/standard/string.nit:196 */
   fra.me.REG[1] = NEW_Buffer_standard___string___Buffer___with_capacity(REGB0);
   CALL_standard___collection___abstract_collection___Collection___iterate(fra.me.REG[0])(fra.me.REG[0], (&(fra.me)), ((fun_t)OC_standard___string___AbstractString___to_upper_1));
-  /* ../lib/standard/string.nit:141 */
+  /* ../lib/standard/string.nit:198 */
   fra.me.REG[1] = CALL_standard___string___Object___to_s(fra.me.REG[1])(fra.me.REG[1]);
   goto label2;
   label2: while(0);
@@ -649,7 +797,7 @@ val_t standard___string___AbstractString___to_upper(val_t p0){
     val_t REGB0;
     fun_t CREG[1];
     val_t tmp;
-    /* ../lib/standard/string.nit:140 */
+    /* ../lib/standard/string.nit:197 */
     fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
     fra.me.file = LOCATE_standard___string;
     fra.me.line = 0;
@@ -668,13 +816,14 @@ val_t standard___string___AbstractString___to_upper(val_t p0){
     stack_frame_head = fra.me.prev;
     return;
   }
+static const char LOCATE_standard___string___AbstractString___to_lower[] = "string::AbstractString::to_lower";
 val_t standard___string___AbstractString___to_lower(val_t p0){
   struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
   val_t REGB0;
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 144;
+  fra.me.line = 201;
   fra.me.meth = LOCATE_standard___string___AbstractString___to_lower;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
@@ -689,10 +838,10 @@ val_t standard___string___AbstractString___to_lower(val_t p0){
     nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
   }
   REGB0 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
-  /* ../lib/standard/string.nit:147 */
+  /* ../lib/standard/string.nit:206 */
   fra.me.REG[1] = NEW_Buffer_standard___string___Buffer___with_capacity(REGB0);
   CALL_standard___collection___abstract_collection___Collection___iterate(fra.me.REG[0])(fra.me.REG[0], (&(fra.me)), ((fun_t)OC_standard___string___AbstractString___to_lower_1));
-  /* ../lib/standard/string.nit:149 */
+  /* ../lib/standard/string.nit:208 */
   fra.me.REG[1] = CALL_standard___string___Object___to_s(fra.me.REG[1])(fra.me.REG[1]);
   goto label2;
   label2: while(0);
@@ -704,7 +853,7 @@ val_t standard___string___AbstractString___to_lower(val_t p0){
     val_t REGB0;
     fun_t CREG[1];
     val_t tmp;
-    /* ../lib/standard/string.nit:148 */
+    /* ../lib/standard/string.nit:207 */
     fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
     fra.me.file = LOCATE_standard___string;
     fra.me.line = 0;
@@ -723,6 +872,173 @@ val_t standard___string___AbstractString___to_lower(val_t p0){
     stack_frame_head = fra.me.prev;
     return;
   }
+static const char LOCATE_standard___string___AbstractString___trim[] = "string::AbstractString::trim";
+val_t standard___string___AbstractString___trim(val_t p0){
+  struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
+  val_t REGB0;
+  val_t REGB1;
+  val_t REGB2;
+  val_t REGB3;
+  val_t REGB4;
+  val_t tmp;
+        static val_t once_value_2; /* Once value */
+  fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+  fra.me.file = LOCATE_standard___string;
+  fra.me.line = 211;
+  fra.me.meth = LOCATE_standard___string___AbstractString___trim;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 3;
+  fra.me.nitni_local_ref_head = NULL;
+  fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[1] = NIT_NULL;
+  fra.me.REG[2] = NIT_NULL;
+  fra.me.REG[0] = p0;
+  /* ../lib/standard/string.nit:218 */
+  REGB0 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB0)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string, 218);
+  }
+  REGB0 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
+  REGB1 = TAG_Int(0);
+  REGB2 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB1));
+  if (UNTAG_Bool(REGB2)) {
+  } else {
+    /* ../lib/standard/kernel.nit:237 */
+    REGB1 = TAG_Bool((REGB0)==(REGB1));
+    /* ../lib/standard/string.nit:218 */
+    REGB2 = REGB1;
+  }
+  if (UNTAG_Bool(REGB2)) {
+    fra.me.REG[1] = CALL_standard___string___Object___to_s(fra.me.REG[0])(fra.me.REG[0]);
+    goto label1;
+  }
+  /* ../lib/standard/string.nit:220 */
+  REGB2 = TAG_Int(0);
+  /* ../lib/standard/string.nit:221 */
+  while(1) {
+    REGB1 = CALL_standard___collection___abstract_collection___SequenceRead_____bra(fra.me.REG[0])(fra.me.REG[0], REGB2);
+    /* ../lib/standard/kernel.nit:471 */
+    REGB1 = TAG_Int((unsigned char)UNTAG_Char(REGB1));
+    /* ../lib/standard/string.nit:221 */
+    REGB0 = TAG_Int(32);
+    REGB3 = TAG_Bool(VAL_ISA(REGB0, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1), VTID_standard___kernel___Comparable___OTHER(REGB1))) /*cast OTHER*/;
+    if (UNTAG_Bool(REGB3)) {
+    } else {
+      nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
+    }
+    /* ../lib/standard/kernel.nit:241 */
+    REGB0 = TAG_Bool(UNTAG_Int(REGB1)<=UNTAG_Int(REGB0));
+    /* ../lib/standard/string.nit:221 */
+    if (UNTAG_Bool(REGB0)) {
+      /* ../lib/standard/string.nit:222 */
+      REGB0 = TAG_Int(1);
+      /* ../lib/standard/kernel.nit:245 */
+      REGB0 = TAG_Int(UNTAG_Int(REGB2)+UNTAG_Int(REGB0));
+      /* ../lib/standard/string.nit:222 */
+      REGB2 = REGB0;
+      /* ../lib/standard/string.nit:223 */
+      REGB0 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+      if (UNTAG_Bool(REGB0)) {
+      } else {
+        nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string, 223);
+      }
+      REGB0 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
+      REGB1 = TAG_Bool(IS_EQUAL_OO(REGB2,REGB0));
+      if (UNTAG_Bool(REGB1)) {
+      } else {
+        /* ../lib/standard/kernel.nit:237 */
+        REGB0 = TAG_Bool((REGB2)==(REGB0));
+        /* ../lib/standard/string.nit:223 */
+        REGB1 = REGB0;
+      }
+      if (UNTAG_Bool(REGB1)) {
+        if (!once_value_2) {
+          fra.me.REG[2] = BOX_NativeString("");
+          REGB1 = TAG_Int(0);
+          fra.me.REG[2] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[2])(fra.me.REG[2], REGB1);
+          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];
+        fra.me.REG[1] = fra.me.REG[2];
+        goto label1;
+      }
+    } else {
+      /* ../lib/standard/string.nit:221 */
+      goto label3;
+    }
+  }
+  label3: while(0);
+  /* ../lib/standard/collection/array.nit:24 */
+  REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB1)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
+  }
+  REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
+  /* ../lib/standard/string.nit:226 */
+  REGB0 = TAG_Int(1);
+  /* ../lib/standard/kernel.nit:247 */
+  REGB0 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB0));
+  /* ../lib/standard/string.nit:227 */
+  while(1) {
+    REGB1 = CALL_standard___collection___abstract_collection___SequenceRead_____bra(fra.me.REG[0])(fra.me.REG[0], REGB0);
+    /* ../lib/standard/kernel.nit:471 */
+    REGB1 = TAG_Int((unsigned char)UNTAG_Char(REGB1));
+    /* ../lib/standard/string.nit:227 */
+    REGB3 = TAG_Int(32);
+    REGB4 = TAG_Bool(VAL_ISA(REGB3, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1), VTID_standard___kernel___Comparable___OTHER(REGB1))) /*cast OTHER*/;
+    if (UNTAG_Bool(REGB4)) {
+    } else {
+      nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
+    }
+    /* ../lib/standard/kernel.nit:241 */
+    REGB3 = TAG_Bool(UNTAG_Int(REGB1)<=UNTAG_Int(REGB3));
+    /* ../lib/standard/string.nit:227 */
+    if (UNTAG_Bool(REGB3)) {
+      /* ../lib/standard/string.nit:228 */
+      REGB3 = TAG_Int(1);
+      /* ../lib/standard/kernel.nit:247 */
+      REGB3 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB3));
+      /* ../lib/standard/string.nit:228 */
+      REGB0 = REGB3;
+      /* ../lib/standard/string.nit:229 */
+      REGB3 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB2));
+      if (UNTAG_Bool(REGB3)) {
+      } else {
+        /* ../lib/standard/kernel.nit:237 */
+        REGB1 = TAG_Bool((REGB0)==(REGB2));
+        /* ../lib/standard/string.nit:229 */
+        REGB3 = REGB1;
+      }
+      if (UNTAG_Bool(REGB3)) {
+        REGB3 = CALL_standard___collection___abstract_collection___SequenceRead_____bra(fra.me.REG[0])(fra.me.REG[0], REGB2);
+        fra.me.REG[2] = CALL_standard___string___Object___to_s(REGB3)(REGB3);
+        fra.me.REG[1] = fra.me.REG[2];
+        goto label1;
+      }
+    } else {
+      /* ../lib/standard/string.nit:227 */
+      goto label4;
+    }
+  }
+  label4: while(0);
+  /* ../lib/standard/kernel.nit:247 */
+  REGB0 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB2));
+  /* ../lib/standard/string.nit:231 */
+  REGB3 = TAG_Int(1);
+  /* ../lib/standard/kernel.nit:245 */
+  REGB3 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB3));
+  /* ../lib/standard/string.nit:231 */
+  fra.me.REG[0] = CALL_standard___string___AbstractString___substring(fra.me.REG[0])(fra.me.REG[0], REGB2, REGB3);
+  fra.me.REG[1] = fra.me.REG[0];
+  goto label1;
+  label1: while(0);
+  stack_frame_head = fra.me.prev;
+  return fra.me.REG[1];
+}
+static const char LOCATE_standard___string___AbstractString___output[] = "string::AbstractString::(kernel::Object::output)";
 void standard___string___AbstractString___output(val_t p0){
   struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
   val_t REGB0;
@@ -731,7 +1047,7 @@ void standard___string___AbstractString___output(val_t p0){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 153;
+  fra.me.line = 234;
   fra.me.meth = LOCATE_standard___string___AbstractString___output;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
@@ -739,9 +1055,9 @@ void standard___string___AbstractString___output(val_t p0){
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
-  /* ../lib/standard/string.nit:155 */
+  /* ../lib/standard/string.nit:236 */
   REGB0 = TAG_Int(0);
-  /* ../lib/standard/string.nit:156 */
+  /* ../lib/standard/string.nit:237 */
   while(1) {
     /* ../lib/standard/collection/array.nit:24 */
     REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
@@ -755,29 +1071,29 @@ void standard___string___AbstractString___output(val_t p0){
     } else {
       nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
     }
-    /* ../lib/standard/kernel.nit:232 */
+    /* ../lib/standard/kernel.nit:242 */
     REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
-    /* ../lib/standard/string.nit:156 */
+    /* ../lib/standard/string.nit:237 */
     if (UNTAG_Bool(REGB1)) {
-      /* ../lib/standard/string.nit:157 */
+      /* ../lib/standard/string.nit:238 */
       REGB1 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
       if (UNTAG_Bool(REGB1)) {
       } else {
-        nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 157);
+        nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 238);
       }
       fra.me.REG[1] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
-      /* ../lib/standard/string.nit:595 */
+      /* ../lib/standard/string.nit:970 */
       REGB1 = TAG_Char(UNBOX_NativeString(fra.me.REG[1])[UNTAG_Int(REGB0)]);
-      /* ../lib/standard/kernel.nit:380 */
+      /* ../lib/standard/kernel.nit:436 */
       printf("%c", (unsigned char)UNTAG_Char(REGB1));;
-      /* ../lib/standard/string.nit:158 */
+      /* ../lib/standard/string.nit:239 */
       REGB1 = TAG_Int(1);
-      /* ../lib/standard/kernel.nit:235 */
+      /* ../lib/standard/kernel.nit:245 */
       REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
-      /* ../lib/standard/string.nit:158 */
+      /* ../lib/standard/string.nit:239 */
       REGB0 = REGB1;
     } else {
-      /* ../lib/standard/string.nit:156 */
+      /* ../lib/standard/string.nit:237 */
       goto label1;
     }
   }
@@ -785,58 +1101,1065 @@ void standard___string___AbstractString___output(val_t p0){
   stack_frame_head = fra.me.prev;
   return;
 }
-void standard___string___String___with_native(val_t p0, val_t p1, val_t p2, int* init_table){
-  int itpos0 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_standard___string___String].i;
+static const char LOCATE_standard___string___String___index_from[] = "string::String::index_from";
+val_t standard___string___String___index_from(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_standard___string;
+  fra.me.line = 252;
+  fra.me.meth = LOCATE_standard___string___String___index_from;
+  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;
+  /* ../lib/standard/string.nit:252 */
+  REGB0 = TAG_Bool(ATTR_standard___string___String____index_from(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB0)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_index_from", LOCATE_standard___string, 252);
+  }
+  REGB0 = ATTR_standard___string___String____index_from(fra.me.REG[0]);
+  stack_frame_head = fra.me.prev;
+  return REGB0;
+}
+static const char LOCATE_standard___string___String___index_to[] = "string::String::index_to";
+val_t standard___string___String___index_to(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_standard___string;
+  fra.me.line = 255;
+  fra.me.meth = LOCATE_standard___string___String___index_to;
+  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;
+  /* ../lib/standard/string.nit:255 */
+  REGB0 = TAG_Bool(ATTR_standard___string___String____index_to(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB0)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_index_to", LOCATE_standard___string, 255);
+  }
+  REGB0 = ATTR_standard___string___String____index_to(fra.me.REG[0]);
+  stack_frame_head = fra.me.prev;
+  return REGB0;
+}
+static const char LOCATE_standard___string___String_____bra[] = "string::String::(abstract_collection::SequenceRead::[])";
+val_t standard___string___String_____bra(val_t p0, val_t p1){
   struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
   val_t REGB0;
   val_t REGB1;
   val_t REGB2;
+  val_t REGB3;
   val_t tmp;
-  if (init_table[itpos0]) return;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 170;
-  fra.me.meth = LOCATE_standard___string___String___with_native;
+  fra.me.line = 262;
+  fra.me.meth = LOCATE_standard___string___String_____bra;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
   fra.me.nitni_local_ref_head = NULL;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
-  fra.me.REG[1] = p1;
-  REGB0 = p2;
-  /* ../lib/standard/string.nit:173 */
+  REGB0 = p1;
+  /* ../lib/standard/string.nit:263 */
   REGB1 = TAG_Int(0);
   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:233 */
+  /* ../lib/standard/kernel.nit:243 */
   REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
-  /* ../lib/standard/string.nit:173 */
+  /* ../lib/standard/string.nit:263 */
   if (UNTAG_Bool(REGB1)) {
   } else {
-    nit_abort("Assert failed", NULL, LOCATE_standard___string, 173);
+    nit_abort("Assert failed", NULL, LOCATE_standard___string, 263);
   }
-  /* ../lib/standard/string.nit:174 */
-  ATTR_standard___string___AbstractString____items(fra.me.REG[0]) = fra.me.REG[1];
-  /* ../lib/standard/string.nit:175 */
-  ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]) = REGB0;
+  /* ../lib/standard/string.nit:266 */
+  REGB1 = TAG_Bool(ATTR_standard___string___String____index_from(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB1)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_index_from", LOCATE_standard___string, 266);
+  }
+  REGB1 = ATTR_standard___string___String____index_from(fra.me.REG[0]);
+  /* ../lib/standard/kernel.nit:245 */
+  REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
+  /* ../lib/standard/string.nit:266 */
+  REGB2 = TAG_Bool(ATTR_standard___string___String____index_to(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB2)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_index_to", LOCATE_standard___string, 266);
+  }
+  REGB2 = ATTR_standard___string___String____index_to(fra.me.REG[0]);
+  REGB3 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1), VTID_standard___kernel___Comparable___OTHER(REGB1))) /*cast OTHER*/;
+  if (UNTAG_Bool(REGB3)) {
+  } else {
+    nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
+  }
+  /* ../lib/standard/kernel.nit:241 */
+  REGB2 = TAG_Bool(UNTAG_Int(REGB1)<=UNTAG_Int(REGB2));
+  /* ../lib/standard/string.nit:266 */
+  if (UNTAG_Bool(REGB2)) {
+  } else {
+    nit_abort("Assert failed", NULL, LOCATE_standard___string, 266);
+  }
+  /* ../lib/standard/string.nit:267 */
+  REGB2 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB2)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 267);
+  }
+  fra.me.REG[1] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
+  REGB2 = TAG_Bool(ATTR_standard___string___String____index_from(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB2)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_index_from", LOCATE_standard___string, 267);
+  }
+  REGB2 = ATTR_standard___string___String____index_from(fra.me.REG[0]);
+  /* ../lib/standard/kernel.nit:245 */
+  REGB2 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB2));
+  /* ../lib/standard/string.nit:970 */
+  REGB2 = TAG_Char(UNBOX_NativeString(fra.me.REG[1])[UNTAG_Int(REGB2)]);
+  /* ../lib/standard/string.nit:267 */
+  goto label1;
+  label1: while(0);
+  stack_frame_head = fra.me.prev;
+  return REGB2;
+}
+static const char LOCATE_standard___string___String___substring[] = "string::String::(string::AbstractString::substring)";
+val_t standard___string___String___substring(val_t p0, val_t p1, val_t p2){
+  struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
+  val_t REGB0;
+  val_t REGB1;
+  val_t REGB2;
+  val_t REGB3;
+  val_t REGB4;
+  val_t tmp;
+    static val_t once_value_2; /* Once value */
+  fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+  fra.me.file = LOCATE_standard___string;
+  fra.me.line = 270;
+  fra.me.meth = LOCATE_standard___string___String___substring;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 3;
+  fra.me.nitni_local_ref_head = NULL;
+  fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[1] = NIT_NULL;
+  fra.me.REG[2] = NIT_NULL;
+  fra.me.REG[0] = p0;
+  REGB0 = p1;
+  REGB1 = p2;
+  /* ../lib/standard/string.nit:272 */
+  REGB2 = TAG_Int(0);
+  REGB3 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1), VTID_standard___kernel___Comparable___OTHER(REGB1))) /*cast OTHER*/;
+  if (UNTAG_Bool(REGB3)) {
+  } else {
+    nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
+  }
+  /* ../lib/standard/kernel.nit:243 */
+  REGB2 = TAG_Bool(UNTAG_Int(REGB1)>=UNTAG_Int(REGB2));
+  /* ../lib/standard/string.nit:272 */
+  if (UNTAG_Bool(REGB2)) {
+  } else {
+    nit_abort("Assert failed", NULL, LOCATE_standard___string, 272);
+  }
+  /* ../lib/standard/string.nit:274 */
+  REGB2 = TAG_Int(0);
+  REGB3 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
+  if (UNTAG_Bool(REGB3)) {
+  } else {
+    nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
+  }
+  /* ../lib/standard/kernel.nit:242 */
+  REGB2 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB2));
+  /* ../lib/standard/string.nit:274 */
+  if (UNTAG_Bool(REGB2)) {
+    /* ../lib/standard/kernel.nit:245 */
+    REGB2 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB0));
+    /* ../lib/standard/string.nit:275 */
+    REGB1 = REGB2;
+    /* ../lib/standard/string.nit:276 */
+    REGB2 = TAG_Int(0);
+    REGB3 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1), VTID_standard___kernel___Comparable___OTHER(REGB1))) /*cast OTHER*/;
+    if (UNTAG_Bool(REGB3)) {
+    } else {
+      nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
+    }
+    /* ../lib/standard/kernel.nit:242 */
+    REGB2 = TAG_Bool(UNTAG_Int(REGB1)<UNTAG_Int(REGB2));
+    /* ../lib/standard/string.nit:276 */
+    if (UNTAG_Bool(REGB2)) {
+      REGB2 = TAG_Int(0);
+      REGB1 = REGB2;
+    }
+    /* ../lib/standard/string.nit:277 */
+    REGB2 = TAG_Int(0);
+    REGB0 = REGB2;
+  }
+  /* ../lib/standard/string.nit:280 */
+  REGB2 = TAG_Bool(ATTR_standard___string___String____index_from(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB2)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_index_from", LOCATE_standard___string, 280);
+  }
+  REGB2 = ATTR_standard___string___String____index_from(fra.me.REG[0]);
+  /* ../lib/standard/kernel.nit:245 */
+  REGB0 = TAG_Int(UNTAG_Int(REGB2)+UNTAG_Int(REGB0));
+  REGB2 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
+  /* ../lib/standard/string.nit:282 */
+  REGB3 = TAG_Bool(ATTR_standard___string___String____index_to(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB3)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_index_to", LOCATE_standard___string, 282);
+  }
+  REGB3 = ATTR_standard___string___String____index_to(fra.me.REG[0]);
+  REGB4 = TAG_Bool(VAL_ISA(REGB3, VTCOLOR_standard___kernel___Comparable___OTHER(REGB2), VTID_standard___kernel___Comparable___OTHER(REGB2))) /*cast OTHER*/;
+  if (UNTAG_Bool(REGB4)) {
+  } else {
+    nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
+  }
+  /* ../lib/standard/kernel.nit:244 */
+  REGB3 = TAG_Bool(UNTAG_Int(REGB2)>UNTAG_Int(REGB3));
+  /* ../lib/standard/string.nit:282 */
+  if (UNTAG_Bool(REGB3)) {
+    REGB3 = TAG_Bool(ATTR_standard___string___String____index_to(fra.me.REG[0])!=NIT_NULL);
+    if (UNTAG_Bool(REGB3)) {
+    } else {
+      nit_abort("Uninitialized attribute %s", "_index_to", LOCATE_standard___string, 282);
+    }
+    REGB3 = ATTR_standard___string___String____index_to(fra.me.REG[0]);
+    REGB2 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
+    if (UNTAG_Bool(REGB2)) {
+    } else {
+      nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 282);
+    }
+    fra.me.REG[1] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
+    fra.me.REG[1] = NEW_String_standard___string___String___from_substring(REGB0, REGB3, fra.me.REG[1]);
+    goto label1;
+  }
+  /* ../lib/standard/string.nit:284 */
+  REGB3 = TAG_Int(0);
+  REGB2 = TAG_Bool(IS_EQUAL_OO(REGB1,REGB3));
+  if (UNTAG_Bool(REGB2)) {
+  } else {
+    /* ../lib/standard/kernel.nit:237 */
+    REGB3 = TAG_Bool((REGB1)==(REGB3));
+    /* ../lib/standard/string.nit:284 */
+    REGB2 = REGB3;
+  }
+  if (UNTAG_Bool(REGB2)) {
+    if (!once_value_2) {
+      fra.me.REG[2] = BOX_NativeString("");
+      REGB2 = TAG_Int(0);
+      fra.me.REG[2] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[2])(fra.me.REG[2], REGB2);
+      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];
+    fra.me.REG[1] = fra.me.REG[2];
+    goto label1;
+  }
+  /* ../lib/standard/kernel.nit:245 */
+  REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
+  /* ../lib/standard/string.nit:286 */
+  REGB2 = TAG_Int(1);
+  /* ../lib/standard/kernel.nit:247 */
+  REGB2 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB2));
+  /* ../lib/standard/string.nit:286 */
+  REGB1 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB1)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 286);
+  }
+  fra.me.REG[0] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
+  fra.me.REG[0] = NEW_String_standard___string___String___from_substring(REGB0, REGB2, fra.me.REG[0]);
+  fra.me.REG[1] = fra.me.REG[0];
+  goto label1;
+  label1: while(0);
+  stack_frame_head = fra.me.prev;
+  return fra.me.REG[1];
+}
+static const char LOCATE_standard___string___String___substring_from[] = "string::String::(string::AbstractString::substring_from)";
+val_t standard___string___String___substring_from(val_t p0, val_t p1){
+  struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
+  val_t REGB0;
+  val_t REGB1;
+  val_t REGB2;
+  val_t tmp;
+    static val_t once_value_1; /* Once value */
+  fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+  fra.me.file = LOCATE_standard___string;
+  fra.me.line = 289;
+  fra.me.meth = LOCATE_standard___string___String___substring_from;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 2;
+  fra.me.nitni_local_ref_head = NULL;
+  fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[1] = NIT_NULL;
+  fra.me.REG[0] = p0;
+  REGB0 = p1;
+  /* ../lib/standard/string.nit:291 */
+  REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB1)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string, 291);
+  }
+  REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
+  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:244 */
+  REGB1 = TAG_Bool(UNTAG_Int(REGB0)>UNTAG_Int(REGB1));
+  /* ../lib/standard/string.nit:291 */
+  if (UNTAG_Bool(REGB1)) {
+    if (!once_value_1) {
+      fra.me.REG[1] = BOX_NativeString("");
+      REGB1 = TAG_Int(0);
+      fra.me.REG[1] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[1])(fra.me.REG[1], REGB1);
+      once_value_1 = fra.me.REG[1];
+      register_static_object(&once_value_1);
+    } else fra.me.REG[1] = once_value_1;
+    fra.me.REG[1] = fra.me.REG[1];
+    goto label2;
+  }
+  /* ../lib/standard/string.nit:292 */
+  REGB1 = TAG_Int(0);
+  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:242 */
+  REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
+  /* ../lib/standard/string.nit:292 */
+  if (UNTAG_Bool(REGB1)) {
+    REGB1 = TAG_Int(0);
+    REGB0 = REGB1;
+  }
+  /* ../lib/standard/string.nit:293 */
+  REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB1)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string, 293);
+  }
+  REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
+  fra.me.REG[0] = CALL_standard___string___AbstractString___substring(fra.me.REG[0])(fra.me.REG[0], REGB0, REGB1);
+  fra.me.REG[1] = fra.me.REG[0];
+  goto label2;
+  label2: while(0);
+  stack_frame_head = fra.me.prev;
+  return fra.me.REG[1];
+}
+static const char LOCATE_standard___string___String___has_substring[] = "string::String::(string::AbstractString::has_substring)";
+val_t standard___string___String___has_substring(val_t p0, val_t p1, val_t p2){
+  struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
+  val_t REGB0;
+  val_t REGB1;
+  val_t REGB2;
+  val_t REGB3;
+  val_t REGB4;
+  val_t REGB5;
+  val_t REGB6;
+  val_t tmp;
+  fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+  fra.me.file = LOCATE_standard___string;
+  fra.me.line = 296;
+  fra.me.meth = LOCATE_standard___string___String___has_substring;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 4;
+  fra.me.nitni_local_ref_head = NULL;
+  fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[1] = NIT_NULL;
+  fra.me.REG[2] = NIT_NULL;
+  fra.me.REG[3] = NIT_NULL;
+  fra.me.REG[0] = p0;
+  fra.me.REG[1] = p1;
+  REGB0 = p2;
+  /* ../lib/standard/string.nit:298 */
+  REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
+  if (UNTAG_Bool(REGB1)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string, 298);
+  }
+  REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]);
+  REGB2 = TAG_Int(1);
+  /* ../lib/standard/kernel.nit:247 */
+  REGB2 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB2));
+  /* ../lib/standard/kernel.nit:245 */
+  REGB0 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB2));
+  /* ../lib/standard/string.nit:301 */
+  REGB1 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB1)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 301);
+  }
+  fra.me.REG[2] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
+  /* ../lib/standard/string.nit:303 */
+  REGB1 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[1])!=NIT_NULL);
+  if (UNTAG_Bool(REGB1)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 303);
+  }
+  fra.me.REG[3] = ATTR_standard___string___AbstractString____items(fra.me.REG[1]);
+  /* ../lib/standard/string.nit:305 */
+  REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB1)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string, 305);
+  }
+  REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
+  REGB3 = TAG_Bool(VAL_ISA(REGB1, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
+  if (UNTAG_Bool(REGB3)) {
+  } else {
+    nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
+  }
+  /* ../lib/standard/kernel.nit:244 */
+  REGB1 = TAG_Bool(UNTAG_Int(REGB0)>UNTAG_Int(REGB1));
+  /* ../lib/standard/string.nit:305 */
+  if (UNTAG_Bool(REGB1)) {
+    REGB1 = TAG_Bool(1);
+  } else {
+    REGB3 = TAG_Bool(VAL_ISA(REGB0, VTCOLOR_standard___kernel___Comparable___OTHER(REGB2), VTID_standard___kernel___Comparable___OTHER(REGB2))) /*cast OTHER*/;
+    if (UNTAG_Bool(REGB3)) {
+    } else {
+      nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
+    }
+    /* ../lib/standard/kernel.nit:244 */
+    REGB3 = TAG_Bool(UNTAG_Int(REGB2)>UNTAG_Int(REGB0));
+    /* ../lib/standard/string.nit:305 */
+    REGB1 = REGB3;
+  }
+  if (UNTAG_Bool(REGB1)) {
+    REGB1 = TAG_Bool(0);
+    goto label1;
+  }
+  /* ../lib/standard/string.nit:307 */
+  REGB3 = CALL_standard___string___String___index_from(fra.me.REG[1])(fra.me.REG[1]);
+  /* ../lib/standard/kernel.nit:245 */
+  REGB4 = TAG_Int(UNTAG_Int(REGB2)+UNTAG_Int(REGB3));
+  /* ../lib/standard/string.nit:308 */
+  REGB2 = REGB4;
+  /* ../lib/standard/string.nit:309 */
+  REGB4 = CALL_standard___string___String___index_from(fra.me.REG[0])(fra.me.REG[0]);
+  /* ../lib/standard/kernel.nit:245 */
+  REGB4 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB4));
+  /* ../lib/standard/string.nit:309 */
+  REGB0 = REGB4;
+  /* ../lib/standard/string.nit:311 */
+  while(1) {
+    REGB4 = TAG_Bool(VAL_ISA(REGB3, VTCOLOR_standard___kernel___Comparable___OTHER(REGB2), VTID_standard___kernel___Comparable___OTHER(REGB2))) /*cast OTHER*/;
+    if (UNTAG_Bool(REGB4)) {
+    } else {
+      nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
+    }
+    /* ../lib/standard/kernel.nit:243 */
+    REGB4 = TAG_Bool(UNTAG_Int(REGB2)>=UNTAG_Int(REGB3));
+    /* ../lib/standard/string.nit:311 */
+    if (UNTAG_Bool(REGB4)) {
+      /* ../lib/standard/string.nit:970 */
+      REGB4 = TAG_Char(UNBOX_NativeString(fra.me.REG[2])[UNTAG_Int(REGB0)]);
+      REGB5 = TAG_Char(UNBOX_NativeString(fra.me.REG[3])[UNTAG_Int(REGB2)]);
+      /* ../lib/standard/string.nit:312 */
+      REGB6 = TAG_Bool(IS_EQUAL_OO(REGB4,REGB5));
+      if (UNTAG_Bool(REGB6)) {
+      } else {
+        /* ../lib/standard/kernel.nit:434 */
+        REGB5 = TAG_Bool((REGB4)==(REGB5));
+        /* ../lib/standard/string.nit:312 */
+        REGB6 = REGB5;
+      }
+      REGB6 = TAG_Bool(!UNTAG_Bool(REGB6));
+      if (UNTAG_Bool(REGB6)) {
+        REGB6 = TAG_Bool(0);
+        REGB1 = REGB6;
+        goto label1;
+      }
+      /* ../lib/standard/string.nit:313 */
+      REGB6 = TAG_Int(1);
+      /* ../lib/standard/kernel.nit:247 */
+      REGB6 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB6));
+      /* ../lib/standard/string.nit:313 */
+      REGB0 = REGB6;
+      /* ../lib/standard/string.nit:314 */
+      REGB6 = TAG_Int(1);
+      /* ../lib/standard/kernel.nit:247 */
+      REGB6 = TAG_Int(UNTAG_Int(REGB2)-UNTAG_Int(REGB6));
+      /* ../lib/standard/string.nit:314 */
+      REGB2 = REGB6;
+    } else {
+      /* ../lib/standard/string.nit:311 */
+      goto label2;
+    }
+  }
+  label2: while(0);
+  /* ../lib/standard/string.nit:317 */
+  REGB2 = TAG_Bool(1);
+  REGB1 = REGB2;
+  goto label1;
+  label1: while(0);
+  stack_frame_head = fra.me.prev;
+  return REGB1;
+}
+static const char LOCATE_standard___string___String___to_upper[] = "string::String::(string::AbstractString::to_upper)";
+val_t standard___string___String___to_upper(val_t p0){
+  struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
+  val_t REGB0;
+  val_t REGB1;
+  val_t REGB2;
+  val_t REGB3;
+  val_t tmp;
+  fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+  fra.me.file = LOCATE_standard___string;
+  fra.me.line = 320;
+  fra.me.meth = LOCATE_standard___string___String___to_upper;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 3;
+  fra.me.nitni_local_ref_head = NULL;
+  fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[1] = NIT_NULL;
+  fra.me.REG[2] = NIT_NULL;
+  fra.me.REG[0] = p0;
+  /* ../lib/standard/string.nit:322 */
+  REGB0 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB0)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string, 322);
+  }
+  REGB0 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
+  REGB1 = TAG_Int(1);
+  /* ../lib/standard/kernel.nit:245 */
+  REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
+  /* ../lib/standard/string.nit:1007 */
+  fra.me.REG[1] = BOX_NativeString((char*)raw_alloc((UNTAG_Int(REGB1) * sizeof(char))));
+  /* ../lib/standard/string.nit:323 */
+  REGB1 = TAG_Int(0);
+  /* ../lib/standard/string.nit:325 */
+  REGB0 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB0)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 325);
+  }
+  fra.me.REG[2] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
+  /* ../lib/standard/string.nit:326 */
+  REGB0 = TAG_Bool(ATTR_standard___string___String____index_from(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB0)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_index_from", LOCATE_standard___string, 326);
+  }
+  REGB0 = ATTR_standard___string___String____index_from(fra.me.REG[0]);
+  /* ../lib/standard/string.nit:327 */
+  REGB2 = TAG_Bool(ATTR_standard___string___String____index_to(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB2)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_index_to", LOCATE_standard___string, 327);
+  }
+  REGB2 = ATTR_standard___string___String____index_to(fra.me.REG[0]);
+  /* ../lib/standard/string.nit:329 */
+  while(1) {
+    REGB3 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
+    if (UNTAG_Bool(REGB3)) {
+    } else {
+      nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
+    }
+    /* ../lib/standard/kernel.nit:241 */
+    REGB3 = TAG_Bool(UNTAG_Int(REGB0)<=UNTAG_Int(REGB2));
+    /* ../lib/standard/string.nit:329 */
+    if (UNTAG_Bool(REGB3)) {
+      /* ../lib/standard/string.nit:970 */
+      REGB3 = TAG_Char(UNBOX_NativeString(fra.me.REG[2])[UNTAG_Int(REGB0)]);
+      /* ../lib/standard/string.nit:330 */
+      REGB3 = CALL_standard___kernel___Char___to_upper(REGB3)(REGB3);
+      /* ../lib/standard/string.nit:971 */
+      UNBOX_NativeString(fra.me.REG[1])[UNTAG_Int(REGB1)]=UNTAG_Char(REGB3);;
+      /* ../lib/standard/string.nit:331 */
+      REGB3 = TAG_Int(1);
+      /* ../lib/standard/kernel.nit:245 */
+      REGB3 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB3));
+      /* ../lib/standard/string.nit:331 */
+      REGB1 = REGB3;
+      /* ../lib/standard/string.nit:332 */
+      REGB3 = TAG_Int(1);
+      /* ../lib/standard/kernel.nit:245 */
+      REGB3 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB3));
+      /* ../lib/standard/string.nit:332 */
+      REGB0 = REGB3;
+    } else {
+      /* ../lib/standard/string.nit:329 */
+      goto label1;
+    }
+  }
+  label1: while(0);
+  /* ../lib/standard/collection/array.nit:24 */
+  REGB0 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB0)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
+  }
+  REGB0 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
+  /* ../lib/standard/string.nit:335 */
+  REGB1 = TAG_Char('\0');
+  /* ../lib/standard/string.nit:971 */
+  UNBOX_NativeString(fra.me.REG[1])[UNTAG_Int(REGB0)]=UNTAG_Char(REGB1);;
+  /* ../lib/standard/string.nit:337 */
+  REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB1)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string, 337);
+  }
+  REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
+  fra.me.REG[1] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[1])(fra.me.REG[1], REGB1);
+  goto label2;
+  label2: while(0);
+  stack_frame_head = fra.me.prev;
+  return fra.me.REG[1];
+}
+static const char LOCATE_standard___string___String___to_lower[] = "string::String::(string::AbstractString::to_lower)";
+val_t standard___string___String___to_lower(val_t p0){
+  struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
+  val_t REGB0;
+  val_t REGB1;
+  val_t REGB2;
+  val_t REGB3;
+  val_t tmp;
+  fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+  fra.me.file = LOCATE_standard___string;
+  fra.me.line = 340;
+  fra.me.meth = LOCATE_standard___string___String___to_lower;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 3;
+  fra.me.nitni_local_ref_head = NULL;
+  fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[1] = NIT_NULL;
+  fra.me.REG[2] = NIT_NULL;
+  fra.me.REG[0] = p0;
+  /* ../lib/standard/string.nit:342 */
+  REGB0 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB0)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string, 342);
+  }
+  REGB0 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
+  REGB1 = TAG_Int(1);
+  /* ../lib/standard/kernel.nit:245 */
+  REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
+  /* ../lib/standard/string.nit:1007 */
+  fra.me.REG[1] = BOX_NativeString((char*)raw_alloc((UNTAG_Int(REGB1) * sizeof(char))));
+  /* ../lib/standard/string.nit:343 */
+  REGB1 = TAG_Int(0);
+  /* ../lib/standard/string.nit:345 */
+  REGB0 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB0)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 345);
+  }
+  fra.me.REG[2] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
+  /* ../lib/standard/string.nit:346 */
+  REGB0 = TAG_Bool(ATTR_standard___string___String____index_from(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB0)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_index_from", LOCATE_standard___string, 346);
+  }
+  REGB0 = ATTR_standard___string___String____index_from(fra.me.REG[0]);
+  /* ../lib/standard/string.nit:347 */
+  REGB2 = TAG_Bool(ATTR_standard___string___String____index_to(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB2)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_index_to", LOCATE_standard___string, 347);
+  }
+  REGB2 = ATTR_standard___string___String____index_to(fra.me.REG[0]);
+  /* ../lib/standard/string.nit:349 */
+  while(1) {
+    REGB3 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
+    if (UNTAG_Bool(REGB3)) {
+    } else {
+      nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
+    }
+    /* ../lib/standard/kernel.nit:241 */
+    REGB3 = TAG_Bool(UNTAG_Int(REGB0)<=UNTAG_Int(REGB2));
+    /* ../lib/standard/string.nit:349 */
+    if (UNTAG_Bool(REGB3)) {
+      /* ../lib/standard/string.nit:970 */
+      REGB3 = TAG_Char(UNBOX_NativeString(fra.me.REG[2])[UNTAG_Int(REGB0)]);
+      /* ../lib/standard/string.nit:350 */
+      REGB3 = CALL_standard___kernel___Char___to_lower(REGB3)(REGB3);
+      /* ../lib/standard/string.nit:971 */
+      UNBOX_NativeString(fra.me.REG[1])[UNTAG_Int(REGB1)]=UNTAG_Char(REGB3);;
+      /* ../lib/standard/string.nit:351 */
+      REGB3 = TAG_Int(1);
+      /* ../lib/standard/kernel.nit:245 */
+      REGB3 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB3));
+      /* ../lib/standard/string.nit:351 */
+      REGB1 = REGB3;
+      /* ../lib/standard/string.nit:352 */
+      REGB3 = TAG_Int(1);
+      /* ../lib/standard/kernel.nit:245 */
+      REGB3 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB3));
+      /* ../lib/standard/string.nit:352 */
+      REGB0 = REGB3;
+    } else {
+      /* ../lib/standard/string.nit:349 */
+      goto label1;
+    }
+  }
+  label1: while(0);
+  /* ../lib/standard/collection/array.nit:24 */
+  REGB0 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB0)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
+  }
+  REGB0 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
+  /* ../lib/standard/string.nit:355 */
+  REGB1 = TAG_Char('\0');
+  /* ../lib/standard/string.nit:971 */
+  UNBOX_NativeString(fra.me.REG[1])[UNTAG_Int(REGB0)]=UNTAG_Char(REGB1);;
+  /* ../lib/standard/string.nit:357 */
+  REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB1)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string, 357);
+  }
+  REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
+  fra.me.REG[1] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[1])(fra.me.REG[1], REGB1);
+  goto label2;
+  label2: while(0);
+  stack_frame_head = fra.me.prev;
+  return fra.me.REG[1];
+}
+static const char LOCATE_standard___string___String___trim[] = "string::String::(string::AbstractString::trim)";
+val_t standard___string___String___trim(val_t p0){
+  struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
+  val_t REGB0;
+  val_t REGB1;
+  val_t REGB2;
+  val_t REGB3;
+  val_t REGB4;
+  val_t tmp;
+        static val_t once_value_2; /* Once value */
+  fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+  fra.me.file = LOCATE_standard___string;
+  fra.me.line = 360;
+  fra.me.meth = LOCATE_standard___string___String___trim;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 3;
+  fra.me.nitni_local_ref_head = NULL;
+  fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[1] = NIT_NULL;
+  fra.me.REG[2] = NIT_NULL;
+  fra.me.REG[0] = p0;
+  /* ../lib/standard/string.nit:362 */
+  REGB0 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB0)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string, 362);
+  }
+  REGB0 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
+  REGB1 = TAG_Int(0);
+  REGB2 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB1));
+  if (UNTAG_Bool(REGB2)) {
+  } else {
+    /* ../lib/standard/kernel.nit:237 */
+    REGB1 = TAG_Bool((REGB0)==(REGB1));
+    /* ../lib/standard/string.nit:362 */
+    REGB2 = REGB1;
+  }
+  if (UNTAG_Bool(REGB2)) {
+    fra.me.REG[1] = fra.me.REG[0];
+    goto label1;
+  }
+  /* ../lib/standard/string.nit:364 */
+  REGB2 = TAG_Bool(ATTR_standard___string___String____index_from(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB2)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_index_from", LOCATE_standard___string, 364);
+  }
+  REGB2 = ATTR_standard___string___String____index_from(fra.me.REG[0]);
+  /* ../lib/standard/string.nit:365 */
+  while(1) {
+    REGB1 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
+    if (UNTAG_Bool(REGB1)) {
+    } else {
+      nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 365);
+    }
+    fra.me.REG[2] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
+    /* ../lib/standard/string.nit:970 */
+    REGB1 = TAG_Char(UNBOX_NativeString(fra.me.REG[2])[UNTAG_Int(REGB2)]);
+    /* ../lib/standard/kernel.nit:471 */
+    REGB1 = TAG_Int((unsigned char)UNTAG_Char(REGB1));
+    /* ../lib/standard/string.nit:365 */
+    REGB0 = TAG_Int(32);
+    REGB3 = TAG_Bool(VAL_ISA(REGB0, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1), VTID_standard___kernel___Comparable___OTHER(REGB1))) /*cast OTHER*/;
+    if (UNTAG_Bool(REGB3)) {
+    } else {
+      nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
+    }
+    /* ../lib/standard/kernel.nit:241 */
+    REGB0 = TAG_Bool(UNTAG_Int(REGB1)<=UNTAG_Int(REGB0));
+    /* ../lib/standard/string.nit:365 */
+    if (UNTAG_Bool(REGB0)) {
+      /* ../lib/standard/string.nit:366 */
+      REGB0 = TAG_Int(1);
+      /* ../lib/standard/kernel.nit:245 */
+      REGB0 = TAG_Int(UNTAG_Int(REGB2)+UNTAG_Int(REGB0));
+      /* ../lib/standard/string.nit:366 */
+      REGB2 = REGB0;
+      /* ../lib/standard/string.nit:367 */
+      REGB0 = TAG_Bool(ATTR_standard___string___String____index_to(fra.me.REG[0])!=NIT_NULL);
+      if (UNTAG_Bool(REGB0)) {
+      } else {
+        nit_abort("Uninitialized attribute %s", "_index_to", LOCATE_standard___string, 367);
+      }
+      REGB0 = ATTR_standard___string___String____index_to(fra.me.REG[0]);
+      REGB1 = TAG_Int(1);
+      /* ../lib/standard/kernel.nit:245 */
+      REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
+      /* ../lib/standard/string.nit:367 */
+      REGB0 = TAG_Bool(IS_EQUAL_OO(REGB2,REGB1));
+      if (UNTAG_Bool(REGB0)) {
+      } else {
+        /* ../lib/standard/kernel.nit:237 */
+        REGB1 = TAG_Bool((REGB2)==(REGB1));
+        /* ../lib/standard/string.nit:367 */
+        REGB0 = REGB1;
+      }
+      if (UNTAG_Bool(REGB0)) {
+        if (!once_value_2) {
+          fra.me.REG[2] = BOX_NativeString("");
+          REGB0 = TAG_Int(0);
+          fra.me.REG[2] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[2])(fra.me.REG[2], REGB0);
+          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];
+        fra.me.REG[1] = fra.me.REG[2];
+        goto label1;
+      }
+    } else {
+      /* ../lib/standard/string.nit:365 */
+      goto label3;
+    }
+  }
+  label3: while(0);
+  /* ../lib/standard/string.nit:370 */
+  REGB0 = TAG_Bool(ATTR_standard___string___String____index_to(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB0)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_index_to", LOCATE_standard___string, 370);
+  }
+  REGB0 = ATTR_standard___string___String____index_to(fra.me.REG[0]);
+  /* ../lib/standard/string.nit:371 */
+  while(1) {
+    REGB1 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
+    if (UNTAG_Bool(REGB1)) {
+    } else {
+      nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 371);
+    }
+    fra.me.REG[2] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
+    /* ../lib/standard/string.nit:970 */
+    REGB1 = TAG_Char(UNBOX_NativeString(fra.me.REG[2])[UNTAG_Int(REGB0)]);
+    /* ../lib/standard/kernel.nit:471 */
+    REGB1 = TAG_Int((unsigned char)UNTAG_Char(REGB1));
+    /* ../lib/standard/string.nit:371 */
+    REGB3 = TAG_Int(32);
+    REGB4 = TAG_Bool(VAL_ISA(REGB3, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1), VTID_standard___kernel___Comparable___OTHER(REGB1))) /*cast OTHER*/;
+    if (UNTAG_Bool(REGB4)) {
+    } else {
+      nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
+    }
+    /* ../lib/standard/kernel.nit:241 */
+    REGB3 = TAG_Bool(UNTAG_Int(REGB1)<=UNTAG_Int(REGB3));
+    /* ../lib/standard/string.nit:371 */
+    if (UNTAG_Bool(REGB3)) {
+      /* ../lib/standard/string.nit:372 */
+      REGB3 = TAG_Int(1);
+      /* ../lib/standard/kernel.nit:247 */
+      REGB3 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB3));
+      /* ../lib/standard/string.nit:372 */
+      REGB0 = REGB3;
+      /* ../lib/standard/string.nit:373 */
+      REGB3 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB2));
+      if (UNTAG_Bool(REGB3)) {
+      } else {
+        /* ../lib/standard/kernel.nit:237 */
+        REGB1 = TAG_Bool((REGB0)==(REGB2));
+        /* ../lib/standard/string.nit:373 */
+        REGB3 = REGB1;
+      }
+      if (UNTAG_Bool(REGB3)) {
+        REGB3 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
+        if (UNTAG_Bool(REGB3)) {
+        } else {
+          nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 373);
+        }
+        fra.me.REG[2] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
+        /* ../lib/standard/string.nit:970 */
+        REGB3 = TAG_Char(UNBOX_NativeString(fra.me.REG[2])[UNTAG_Int(REGB2)]);
+        /* ../lib/standard/string.nit:373 */
+        fra.me.REG[2] = CALL_standard___string___Object___to_s(REGB3)(REGB3);
+        fra.me.REG[1] = fra.me.REG[2];
+        goto label1;
+      }
+    } else {
+      /* ../lib/standard/string.nit:371 */
+      goto label4;
+    }
+  }
+  label4: while(0);
+  /* ../lib/standard/string.nit:375 */
+  REGB3 = CALL_standard___string___String___index_from(fra.me.REG[0])(fra.me.REG[0]);
+  /* ../lib/standard/kernel.nit:247 */
+  REGB3 = TAG_Int(UNTAG_Int(REGB2)-UNTAG_Int(REGB3));
+  /* ../lib/standard/string.nit:375 */
+  REGB2 = REGB3;
+  /* ../lib/standard/string.nit:376 */
+  REGB3 = CALL_standard___string___String___index_from(fra.me.REG[0])(fra.me.REG[0]);
+  /* ../lib/standard/kernel.nit:247 */
+  REGB3 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB3));
+  /* ../lib/standard/string.nit:376 */
+  REGB0 = REGB3;
+  /* ../lib/standard/kernel.nit:247 */
+  REGB0 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB2));
+  /* ../lib/standard/string.nit:377 */
+  REGB3 = TAG_Int(1);
+  /* ../lib/standard/kernel.nit:245 */
+  REGB3 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB3));
+  /* ../lib/standard/string.nit:377 */
+  fra.me.REG[0] = CALL_standard___string___AbstractString___substring(fra.me.REG[0])(fra.me.REG[0], REGB2, REGB3);
+  fra.me.REG[1] = fra.me.REG[0];
+  goto label1;
+  label1: while(0);
+  stack_frame_head = fra.me.prev;
+  return fra.me.REG[1];
+}
+static const char LOCATE_standard___string___String___output[] = "string::String::(kernel::Object::output)";
+void standard___string___String___output(val_t p0){
+  struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
+  val_t REGB0;
+  val_t REGB1;
+  val_t REGB2;
+  val_t tmp;
+  fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+  fra.me.file = LOCATE_standard___string;
+  fra.me.line = 380;
+  fra.me.meth = LOCATE_standard___string___String___output;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 2;
+  fra.me.nitni_local_ref_head = NULL;
+  fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[1] = NIT_NULL;
+  fra.me.REG[0] = p0;
+  /* ../lib/standard/string.nit:382 */
+  REGB0 = TAG_Bool(ATTR_standard___string___String____index_from(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB0)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_index_from", LOCATE_standard___string, 382);
+  }
+  REGB0 = ATTR_standard___string___String____index_from(fra.me.REG[0]);
+  /* ../lib/standard/string.nit:383 */
+  REGB1 = TAG_Bool(ATTR_standard___string___String____index_to(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB1)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_index_to", LOCATE_standard___string, 383);
+  }
+  REGB1 = ATTR_standard___string___String____index_to(fra.me.REG[0]);
+  /* ../lib/standard/string.nit:384 */
+  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:241 */
+    REGB2 = TAG_Bool(UNTAG_Int(REGB0)<=UNTAG_Int(REGB1));
+    /* ../lib/standard/string.nit:384 */
+    if (UNTAG_Bool(REGB2)) {
+      /* ../lib/standard/string.nit:385 */
+      REGB2 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
+      if (UNTAG_Bool(REGB2)) {
+      } else {
+        nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 385);
+      }
+      fra.me.REG[1] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
+      /* ../lib/standard/string.nit:970 */
+      REGB2 = TAG_Char(UNBOX_NativeString(fra.me.REG[1])[UNTAG_Int(REGB0)]);
+      /* ../lib/standard/kernel.nit:436 */
+      printf("%c", (unsigned char)UNTAG_Char(REGB2));;
+      /* ../lib/standard/string.nit:386 */
+      REGB2 = TAG_Int(1);
+      /* ../lib/standard/kernel.nit:245 */
+      REGB2 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB2));
+      /* ../lib/standard/string.nit:386 */
+      REGB0 = REGB2;
+    } else {
+      /* ../lib/standard/string.nit:384 */
+      goto label1;
+    }
+  }
+  label1: while(0);
+  stack_frame_head = fra.me.prev;
+  return;
+}
+static const char LOCATE_standard___string___String___from_substring[] = "string::String::from_substring";
+void standard___string___String___from_substring(val_t p0, val_t p1, val_t p2, val_t p3, int* init_table){
+  int itpos0 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_standard___string___String].i;
+  struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
+  val_t REGB0;
+  val_t REGB1;
+  val_t tmp;
+  if (init_table[itpos0]) return;
+  fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+  fra.me.file = LOCATE_standard___string;
+  fra.me.line = 394;
+  fra.me.meth = LOCATE_standard___string___String___from_substring;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 2;
+  fra.me.nitni_local_ref_head = NULL;
+  fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[1] = NIT_NULL;
+  fra.me.REG[0] = p0;
+  REGB0 = p1;
+  REGB1 = p2;
+  fra.me.REG[1] = p3;
+  /* ../lib/standard/string.nit:402 */
+  ATTR_standard___string___AbstractString____items(fra.me.REG[0]) = fra.me.REG[1];
+  /* ../lib/standard/string.nit:403 */
+  ATTR_standard___string___String____index_from(fra.me.REG[0]) = REGB0;
+  /* ../lib/standard/string.nit:404 */
+  ATTR_standard___string___String____index_to(fra.me.REG[0]) = REGB1;
+  /* ../lib/standard/kernel.nit:247 */
+  REGB0 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB0));
+  /* ../lib/standard/string.nit:405 */
+  REGB1 = TAG_Int(1);
+  /* ../lib/standard/kernel.nit:245 */
+  REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
+  /* ../lib/standard/string.nit:405 */
+  ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]) = REGB1;
   stack_frame_head = fra.me.prev;
   init_table[itpos0] = 1;
   return;
 }
-void standard___string___String___from_cstring(val_t p0, val_t p1, int* init_table){
+static const char LOCATE_standard___string___String___with_infos[] = "string::String::with_infos";
+void standard___string___String___with_infos(val_t p0, val_t p1, val_t p2, val_t p3, val_t p4, int* init_table){
   int itpos1 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_standard___string___String].i;
   struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
   val_t REGB0;
+  val_t REGB1;
+  val_t REGB2;
   val_t tmp;
   if (init_table[itpos1]) return;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 178;
-  fra.me.meth = LOCATE_standard___string___String___from_cstring;
+  fra.me.line = 408;
+  fra.me.meth = LOCATE_standard___string___String___with_infos;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
   fra.me.nitni_local_ref_head = NULL;
@@ -844,41 +2167,140 @@ void standard___string___String___from_cstring(val_t p0, val_t p1, int* init_tab
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
-  /* ../lib/standard/string.nit:181 */
-  REGB0 = CALL_standard___string___NativeString___cstring_length(fra.me.REG[1])(fra.me.REG[1]);
-  /* ../lib/standard/string.nit:182 */
+  REGB0 = p2;
+  REGB1 = p3;
+  REGB2 = p4;
+  /* ../lib/standard/string.nit:410 */
   ATTR_standard___string___AbstractString____items(fra.me.REG[0]) = fra.me.REG[1];
-  /* ../lib/standard/string.nit:183 */
+  /* ../lib/standard/string.nit:411 */
   ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]) = REGB0;
+  /* ../lib/standard/string.nit:412 */
+  ATTR_standard___string___String____index_from(fra.me.REG[0]) = REGB1;
+  /* ../lib/standard/string.nit:413 */
+  ATTR_standard___string___String____index_to(fra.me.REG[0]) = REGB2;
   stack_frame_head = fra.me.prev;
   init_table[itpos1] = 1;
   return;
 }
+static const char LOCATE_standard___string___String___to_cstring[] = "string::String::to_cstring";
 val_t standard___string___String___to_cstring(val_t p0){
-  struct {struct stack_frame_t me;} fra;
+  struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
   val_t REGB0;
+  val_t REGB1;
+  val_t REGB2;
+  val_t REGB3;
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 186;
+  fra.me.line = 416;
   fra.me.meth = LOCATE_standard___string___String___to_cstring;
   fra.me.has_broke = 0;
-  fra.me.REG_size = 1;
+  fra.me.REG_size = 3;
   fra.me.nitni_local_ref_head = NULL;
   fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[1] = NIT_NULL;
+  fra.me.REG[2] = NIT_NULL;
   fra.me.REG[0] = p0;
-  /* ../lib/standard/string.nit:189 */
-  REGB0 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
+  /* ../lib/standard/string.nit:419 */
+  REGB0 = TAG_Bool(ATTR_standard___string___String____index_from(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB0)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 189);
+    nit_abort("Uninitialized attribute %s", "_index_from", LOCATE_standard___string, 419);
+  }
+  REGB0 = ATTR_standard___string___String____index_from(fra.me.REG[0]);
+  REGB1 = TAG_Int(0);
+  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:244 */
+  REGB1 = TAG_Bool(UNTAG_Int(REGB0)>UNTAG_Int(REGB1));
+  /* ../lib/standard/string.nit:419 */
+  if (UNTAG_Bool(REGB1)) {
+    REGB1 = TAG_Bool(1);
+  } else {
+    REGB0 = TAG_Bool(ATTR_standard___string___String____index_to(fra.me.REG[0])!=NIT_NULL);
+    if (UNTAG_Bool(REGB0)) {
+    } else {
+      nit_abort("Uninitialized attribute %s", "_index_to", LOCATE_standard___string, 419);
+    }
+    REGB0 = ATTR_standard___string___String____index_to(fra.me.REG[0]);
+    fra.me.REG[1] = CALL_standard___string___AbstractString___items(fra.me.REG[0])(fra.me.REG[0]);
+    REGB2 = CALL_standard___string___NativeString___cstring_length(fra.me.REG[1])(fra.me.REG[1]);
+    REGB3 = TAG_Int(1);
+    /* ../lib/standard/kernel.nit:247 */
+    REGB3 = TAG_Int(UNTAG_Int(REGB2)-UNTAG_Int(REGB3));
+    /* ../lib/standard/string.nit:419 */
+    REGB2 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB3));
+    if (UNTAG_Bool(REGB2)) {
+    } else {
+      /* ../lib/standard/kernel.nit:237 */
+      REGB3 = TAG_Bool((REGB0)==(REGB3));
+      /* ../lib/standard/string.nit:419 */
+      REGB2 = REGB3;
+    }
+    REGB2 = TAG_Bool(!UNTAG_Bool(REGB2));
+    REGB1 = REGB2;
+  }
+  if (UNTAG_Bool(REGB1)) {
+    /* ../lib/standard/string.nit:420 */
+    REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+    if (UNTAG_Bool(REGB1)) {
+    } else {
+      nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string, 420);
+    }
+    REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
+    REGB2 = TAG_Int(1);
+    /* ../lib/standard/kernel.nit:245 */
+    REGB2 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB2));
+    /* ../lib/standard/string.nit:1007 */
+    fra.me.REG[1] = BOX_NativeString((char*)raw_alloc((UNTAG_Int(REGB2) * sizeof(char))));
+    /* ../lib/standard/string.nit:421 */
+    fra.me.REG[2] = CALL_standard___string___AbstractString___items(fra.me.REG[0])(fra.me.REG[0]);
+    REGB2 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+    if (UNTAG_Bool(REGB2)) {
+    } else {
+      nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string, 421);
+    }
+    REGB2 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
+    REGB1 = TAG_Bool(ATTR_standard___string___String____index_from(fra.me.REG[0])!=NIT_NULL);
+    if (UNTAG_Bool(REGB1)) {
+    } else {
+      nit_abort("Uninitialized attribute %s", "_index_from", LOCATE_standard___string, 421);
+    }
+    REGB1 = ATTR_standard___string___String____index_from(fra.me.REG[0]);
+    REGB3 = TAG_Int(0);
+    /* ../lib/standard/string.nit:972 */
+    (void)memcpy(UNBOX_NativeString(fra.me.REG[1])+UNTAG_Int(REGB3), UNBOX_NativeString(fra.me.REG[2])+UNTAG_Int(REGB1), UNTAG_Int(REGB2));;
+    /* ../lib/standard/collection/array.nit:24 */
+    REGB3 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+    if (UNTAG_Bool(REGB3)) {
+    } else {
+      nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
+    }
+    REGB3 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
+    /* ../lib/standard/string.nit:422 */
+    REGB1 = TAG_Char('\0');
+    /* ../lib/standard/string.nit:971 */
+    UNBOX_NativeString(fra.me.REG[1])[UNTAG_Int(REGB3)]=UNTAG_Char(REGB1);;
+    /* ../lib/standard/string.nit:423 */
+    goto label1;
+  }
+  /* ../lib/standard/string.nit:425 */
+  REGB1 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB1)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 425);
   }
   fra.me.REG[0] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
+  fra.me.REG[1] = fra.me.REG[0];
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
-  return fra.me.REG[0];
+  return fra.me.REG[1];
 }
+static const char LOCATE_standard___string___String_____eqeq[] = "string::String::(kernel::Object::==)";
 val_t standard___string___String_____eqeq(val_t p0, val_t p1){
   struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
   val_t REGB0;
@@ -887,10 +2309,11 @@ val_t standard___string___String_____eqeq(val_t p0, val_t p1){
   val_t REGB3;
   val_t REGB4;
   val_t REGB5;
+  val_t REGB6;
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 192;
+  fra.me.line = 428;
   fra.me.meth = LOCATE_standard___string___String_____eqeq;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
@@ -899,120 +2322,155 @@ val_t standard___string___String_____eqeq(val_t p0, val_t p1){
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
-  /* ../lib/standard/string.nit:194 */
+  /* ../lib/standard/string.nit:430 */
   REGB0 = TAG_Bool((fra.me.REG[1]!=NIT_NULL) && VAL_ISA(fra.me.REG[1], COLOR_standard___string___String, ID_standard___string___String)) /*cast String*/;
   REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
   if (UNTAG_Bool(REGB0)) {
-    REGB0 = TAG_Bool(true);
+    REGB0 = TAG_Bool(1);
   } else {
     REGB1 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
     REGB0 = REGB1;
   }
   if (UNTAG_Bool(REGB0)) {
-    REGB0 = TAG_Bool(false);
+    REGB0 = TAG_Bool(0);
     goto label1;
   }
-  /* ../lib/standard/collection/array.nit:24 */
-  REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
-  if (UNTAG_Bool(REGB1)) {
-  } else {
-    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
-  }
-  REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
-  /* ../lib/standard/string.nit:196 */
+  /* ../lib/standard/string.nit:432 */
+  REGB1 = CALL_standard___kernel___Object___object_id(fra.me.REG[0])(fra.me.REG[0]);
   REGB2 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
   if (UNTAG_Bool(REGB2)) {
-    nit_abort("Reciever is null", NULL, LOCATE_standard___string, 196);
-  }
-  /* ../lib/standard/collection/array.nit:24 */
-  REGB2 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
-  if (UNTAG_Bool(REGB2)) {
-  } else {
-    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
+    nit_abort("Reciever is null", NULL, LOCATE_standard___string, 432);
   }
-  REGB2 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]);
-  /* ../lib/standard/string.nit:196 */
-  REGB3 = TAG_Bool(IS_EQUAL_OO(REGB2,REGB1));
+  REGB2 = CALL_standard___kernel___Object___object_id(fra.me.REG[1])(fra.me.REG[1]);
+  REGB3 = TAG_Bool(IS_EQUAL_OO(REGB1,REGB2));
   if (UNTAG_Bool(REGB3)) {
   } else {
-    /* ../lib/standard/kernel.nit:227 */
-    REGB2 = TAG_Bool((REGB2)==(REGB1));
-    /* ../lib/standard/string.nit:196 */
+    /* ../lib/standard/kernel.nit:237 */
+    REGB2 = TAG_Bool((REGB1)==(REGB2));
+    /* ../lib/standard/string.nit:432 */
     REGB3 = REGB2;
   }
-  REGB3 = TAG_Bool(!UNTAG_Bool(REGB3));
   if (UNTAG_Bool(REGB3)) {
-    REGB3 = TAG_Bool(false);
+    REGB3 = TAG_Bool(1);
     REGB0 = REGB3;
     goto label1;
   }
-  /* ../lib/standard/string.nit:197 */
-  REGB3 = TAG_Int(0);
-  /* ../lib/standard/string.nit:198 */
-  REGB2 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
+  /* ../lib/standard/string.nit:434 */
+  REGB3 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB3)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string, 434);
+  }
+  REGB3 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
+  /* ../lib/standard/string.nit:436 */
+  REGB2 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
   if (UNTAG_Bool(REGB2)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 198);
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string, 436);
   }
-  fra.me.REG[0] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
-  /* ../lib/standard/string.nit:199 */
-  REGB2 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[1])!=NIT_NULL);
+  REGB2 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]);
+  REGB1 = TAG_Bool(IS_EQUAL_OO(REGB2,REGB3));
+  if (UNTAG_Bool(REGB1)) {
+  } else {
+    /* ../lib/standard/kernel.nit:237 */
+    REGB2 = TAG_Bool((REGB2)==(REGB3));
+    /* ../lib/standard/string.nit:436 */
+    REGB1 = REGB2;
+  }
+  REGB1 = TAG_Bool(!UNTAG_Bool(REGB1));
+  if (UNTAG_Bool(REGB1)) {
+    REGB1 = TAG_Bool(0);
+    REGB0 = REGB1;
+    goto label1;
+  }
+  /* ../lib/standard/string.nit:438 */
+  REGB1 = TAG_Bool(ATTR_standard___string___String____index_from(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB1)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_index_from", LOCATE_standard___string, 438);
+  }
+  REGB1 = ATTR_standard___string___String____index_from(fra.me.REG[0]);
+  /* ../lib/standard/string.nit:439 */
+  REGB2 = TAG_Bool(ATTR_standard___string___String____index_from(fra.me.REG[1])!=NIT_NULL);
   if (UNTAG_Bool(REGB2)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 199);
+    nit_abort("Uninitialized attribute %s", "_index_from", LOCATE_standard___string, 439);
+  }
+  REGB2 = ATTR_standard___string___String____index_from(fra.me.REG[1]);
+  /* ../lib/standard/kernel.nit:245 */
+  REGB3 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB3));
+  /* ../lib/standard/string.nit:443 */
+  REGB4 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[1])!=NIT_NULL);
+  if (UNTAG_Bool(REGB4)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 443);
   }
   fra.me.REG[1] = ATTR_standard___string___AbstractString____items(fra.me.REG[1]);
-  /* ../lib/standard/string.nit:200 */
+  /* ../lib/standard/string.nit:444 */
+  REGB4 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB4)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 444);
+  }
+  fra.me.REG[0] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
+  /* ../lib/standard/string.nit:446 */
   while(1) {
-    REGB2 = TAG_Bool(VAL_ISA(REGB1, VTCOLOR_standard___kernel___Comparable___OTHER(REGB3), VTID_standard___kernel___Comparable___OTHER(REGB3))) /*cast OTHER*/;
-    if (UNTAG_Bool(REGB2)) {
+    REGB4 = TAG_Bool(VAL_ISA(REGB3, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1), VTID_standard___kernel___Comparable___OTHER(REGB1))) /*cast OTHER*/;
+    if (UNTAG_Bool(REGB4)) {
     } else {
       nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
     }
-    /* ../lib/standard/kernel.nit:232 */
-    REGB2 = TAG_Bool(UNTAG_Int(REGB3)<UNTAG_Int(REGB1));
-    /* ../lib/standard/string.nit:200 */
-    if (UNTAG_Bool(REGB2)) {
-      /* ../lib/standard/string.nit:595 */
-      REGB2 = TAG_Char(UNBOX_NativeString(fra.me.REG[0])[UNTAG_Int(REGB3)]);
-      REGB4 = TAG_Char(UNBOX_NativeString(fra.me.REG[1])[UNTAG_Int(REGB3)]);
-      /* ../lib/standard/string.nit:201 */
-      REGB5 = TAG_Bool(IS_EQUAL_OO(REGB2,REGB4));
-      if (UNTAG_Bool(REGB5)) {
+    /* ../lib/standard/kernel.nit:242 */
+    REGB4 = TAG_Bool(UNTAG_Int(REGB1)<UNTAG_Int(REGB3));
+    /* ../lib/standard/string.nit:446 */
+    if (UNTAG_Bool(REGB4)) {
+      /* ../lib/standard/string.nit:970 */
+      REGB4 = TAG_Char(UNBOX_NativeString(fra.me.REG[0])[UNTAG_Int(REGB1)]);
+      REGB5 = TAG_Char(UNBOX_NativeString(fra.me.REG[1])[UNTAG_Int(REGB2)]);
+      /* ../lib/standard/string.nit:447 */
+      REGB6 = TAG_Bool(IS_EQUAL_OO(REGB4,REGB5));
+      if (UNTAG_Bool(REGB6)) {
       } else {
-        /* ../lib/standard/kernel.nit:378 */
-        REGB4 = TAG_Bool((REGB2)==(REGB4));
-        /* ../lib/standard/string.nit:201 */
-        REGB5 = REGB4;
+        /* ../lib/standard/kernel.nit:434 */
+        REGB5 = TAG_Bool((REGB4)==(REGB5));
+        /* ../lib/standard/string.nit:447 */
+        REGB6 = REGB5;
       }
-      REGB5 = TAG_Bool(!UNTAG_Bool(REGB5));
-      if (UNTAG_Bool(REGB5)) {
-        REGB5 = TAG_Bool(false);
-        REGB0 = REGB5;
+      REGB6 = TAG_Bool(!UNTAG_Bool(REGB6));
+      if (UNTAG_Bool(REGB6)) {
+        REGB6 = TAG_Bool(0);
+        REGB0 = REGB6;
         goto label1;
       }
-      /* ../lib/standard/string.nit:202 */
-      REGB5 = TAG_Int(1);
-      /* ../lib/standard/kernel.nit:235 */
-      REGB5 = TAG_Int(UNTAG_Int(REGB3)+UNTAG_Int(REGB5));
-      /* ../lib/standard/string.nit:202 */
-      REGB3 = REGB5;
+      /* ../lib/standard/string.nit:448 */
+      REGB6 = TAG_Int(1);
+      /* ../lib/standard/kernel.nit:245 */
+      REGB6 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB6));
+      /* ../lib/standard/string.nit:448 */
+      REGB1 = REGB6;
+      /* ../lib/standard/string.nit:449 */
+      REGB6 = TAG_Int(1);
+      /* ../lib/standard/kernel.nit:245 */
+      REGB6 = TAG_Int(UNTAG_Int(REGB2)+UNTAG_Int(REGB6));
+      /* ../lib/standard/string.nit:449 */
+      REGB2 = REGB6;
     } else {
-      /* ../lib/standard/string.nit:200 */
+      /* ../lib/standard/string.nit:446 */
       goto label2;
     }
   }
   label2: while(0);
-  /* ../lib/standard/string.nit:204 */
-  REGB3 = TAG_Bool(true);
-  REGB0 = REGB3;
+  /* ../lib/standard/string.nit:452 */
+  REGB2 = TAG_Bool(1);
+  REGB0 = REGB2;
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
   return REGB0;
 }
+static const char LOCATE_standard___string___String_____l[] = "string::String::(kernel::Comparable::<)";
 val_t standard___string___String_____l(val_t p0, val_t p1){
-  struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
+  struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
   val_t REGB0;
   val_t REGB1;
   val_t REGB2;
@@ -1020,16 +2478,21 @@ val_t standard___string___String_____l(val_t p0, val_t p1){
   val_t REGB4;
   val_t REGB5;
   val_t REGB6;
+  val_t REGB7;
+  val_t REGB8;
+  val_t REGB9;
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 207;
+  fra.me.line = 455;
   fra.me.meth = LOCATE_standard___string___String_____l;
   fra.me.has_broke = 0;
-  fra.me.REG_size = 2;
+  fra.me.REG_size = 4;
   fra.me.nitni_local_ref_head = NULL;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[1] = NIT_NULL;
+  fra.me.REG[2] = NIT_NULL;
+  fra.me.REG[3] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
   REGB0 = TAG_Bool(VAL_ISA(fra.me.REG[1], VTCOLOR_standard___kernel___Comparable___OTHER(fra.me.REG[0]), VTID_standard___kernel___Comparable___OTHER(fra.me.REG[0]))) /*cast OTHER*/;
@@ -1037,184 +2500,240 @@ val_t standard___string___String_____l(val_t p0, val_t p1){
   } else {
     nit_abort("Cast failed", NULL, LOCATE_standard___string, 0);
   }
-  /* ../lib/standard/string.nit:209 */
-  REGB0 = TAG_Int(0);
-  /* ../lib/standard/collection/array.nit:24 */
-  REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
-  if (UNTAG_Bool(REGB1)) {
+  /* ../lib/standard/string.nit:460 */
+  REGB0 = CALL_standard___kernel___Object___object_id(fra.me.REG[0])(fra.me.REG[0]);
+  REGB1 = CALL_standard___kernel___Object___object_id(fra.me.REG[1])(fra.me.REG[1]);
+  REGB2 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB1));
+  if (UNTAG_Bool(REGB2)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
+    /* ../lib/standard/kernel.nit:237 */
+    REGB1 = TAG_Bool((REGB0)==(REGB1));
+    /* ../lib/standard/string.nit:460 */
+    REGB2 = REGB1;
   }
-  REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
-  REGB2 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
   if (UNTAG_Bool(REGB2)) {
+    REGB2 = TAG_Bool(0);
+    goto label1;
+  }
+  /* ../lib/standard/string.nit:465 */
+  REGB1 = TAG_Bool(ATTR_standard___string___String____index_from(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB1)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
+    nit_abort("Uninitialized attribute %s", "_index_from", LOCATE_standard___string, 465);
   }
-  REGB2 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]);
-  /* ../lib/standard/string.nit:212 */
+  REGB1 = ATTR_standard___string___String____index_from(fra.me.REG[0]);
+  /* ../lib/standard/string.nit:466 */
+  REGB0 = TAG_Bool(ATTR_standard___string___String____index_from(fra.me.REG[1])!=NIT_NULL);
+  if (UNTAG_Bool(REGB0)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_index_from", LOCATE_standard___string, 466);
+  }
+  REGB0 = ATTR_standard___string___String____index_from(fra.me.REG[1]);
+  /* ../lib/standard/string.nit:468 */
   REGB3 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB3)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 212);
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 468);
   }
-  fra.me.REG[0] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
-  /* ../lib/standard/string.nit:213 */
+  fra.me.REG[2] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
+  /* ../lib/standard/string.nit:469 */
   REGB3 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[1])!=NIT_NULL);
   if (UNTAG_Bool(REGB3)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 213);
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 469);
   }
-  fra.me.REG[1] = ATTR_standard___string___AbstractString____items(fra.me.REG[1]);
-  /* ../lib/standard/string.nit:214 */
+  fra.me.REG[3] = ATTR_standard___string___AbstractString____items(fra.me.REG[1]);
+  /* ../lib/standard/string.nit:471 */
+  REGB3 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB3)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string, 471);
+  }
+  REGB3 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
+  /* ../lib/standard/string.nit:472 */
+  REGB4 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
+  if (UNTAG_Bool(REGB4)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string, 472);
+  }
+  REGB4 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]);
+  /* ../lib/standard/kernel.nit:245 */
+  REGB5 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB3));
+  /* ../lib/standard/string.nit:476 */
   while(1) {
-    REGB3 = TAG_Bool(VAL_ISA(REGB1, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
-    if (UNTAG_Bool(REGB3)) {
+    REGB6 = TAG_Bool(VAL_ISA(REGB5, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1), VTID_standard___kernel___Comparable___OTHER(REGB1))) /*cast OTHER*/;
+    if (UNTAG_Bool(REGB6)) {
     } else {
       nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
     }
-    /* ../lib/standard/kernel.nit:232 */
-    REGB3 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
-    /* ../lib/standard/string.nit:214 */
-    if (UNTAG_Bool(REGB3)) {
-      REGB3 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
-      if (UNTAG_Bool(REGB3)) {
-      } else {
-        nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
-      }
-      /* ../lib/standard/kernel.nit:232 */
-      REGB3 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB2));
-    } else {
-      /* ../lib/standard/string.nit:214 */
-      REGB4 = TAG_Bool(false);
-      REGB3 = REGB4;
-    }
-    if (UNTAG_Bool(REGB3)) {
-      /* ../lib/standard/string.nit:595 */
-      REGB3 = TAG_Char(UNBOX_NativeString(fra.me.REG[0])[UNTAG_Int(REGB0)]);
-      /* ../lib/standard/kernel.nit:413 */
-      REGB3 = TAG_Int((unsigned char)UNTAG_Char(REGB3));
-      /* ../lib/standard/string.nit:595 */
-      REGB4 = TAG_Char(UNBOX_NativeString(fra.me.REG[1])[UNTAG_Int(REGB0)]);
-      /* ../lib/standard/kernel.nit:413 */
-      REGB4 = TAG_Int((unsigned char)UNTAG_Char(REGB4));
-      REGB5 = TAG_Bool(VAL_ISA(REGB4, VTCOLOR_standard___kernel___Comparable___OTHER(REGB3), VTID_standard___kernel___Comparable___OTHER(REGB3))) /*cast OTHER*/;
-      if (UNTAG_Bool(REGB5)) {
+    /* ../lib/standard/kernel.nit:242 */
+    REGB6 = TAG_Bool(UNTAG_Int(REGB1)<UNTAG_Int(REGB5));
+    /* ../lib/standard/string.nit:476 */
+    if (UNTAG_Bool(REGB6)) {
+      /* ../lib/standard/string.nit:970 */
+      REGB6 = TAG_Char(UNBOX_NativeString(fra.me.REG[2])[UNTAG_Int(REGB1)]);
+      REGB7 = TAG_Char(UNBOX_NativeString(fra.me.REG[3])[UNTAG_Int(REGB0)]);
+      /* ../lib/standard/string.nit:480 */
+      REGB8 = TAG_Bool(IS_EQUAL_OO(REGB6,REGB7));
+      if (UNTAG_Bool(REGB8)) {
       } else {
-        nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
+        /* ../lib/standard/kernel.nit:434 */
+        REGB9 = TAG_Bool((REGB6)==(REGB7));
+        /* ../lib/standard/string.nit:480 */
+        REGB8 = REGB9;
       }
-      /* ../lib/standard/kernel.nit:232 */
-      REGB5 = TAG_Bool(UNTAG_Int(REGB3)<UNTAG_Int(REGB4));
-      /* ../lib/standard/string.nit:217 */
-      if (UNTAG_Bool(REGB5)) {
-        /* ../lib/standard/string.nit:218 */
-        REGB5 = TAG_Bool(true);
-        goto label1;
-      } else {
-        REGB6 = TAG_Bool(VAL_ISA(REGB3, VTCOLOR_standard___kernel___Comparable___OTHER(REGB4), VTID_standard___kernel___Comparable___OTHER(REGB4))) /*cast OTHER*/;
-        if (UNTAG_Bool(REGB6)) {
+      REGB8 = TAG_Bool(!UNTAG_Bool(REGB8));
+      if (UNTAG_Bool(REGB8)) {
+        REGB8 = TAG_Bool(VAL_ISA(REGB7, VTCOLOR_standard___kernel___Comparable___OTHER(REGB6), VTID_standard___kernel___Comparable___OTHER(REGB6))) /*cast OTHER*/;
+        if (UNTAG_Bool(REGB8)) {
         } else {
           nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
         }
-        /* ../lib/standard/kernel.nit:232 */
-        REGB3 = TAG_Bool(UNTAG_Int(REGB4)<UNTAG_Int(REGB3));
-        /* ../lib/standard/string.nit:219 */
-        if (UNTAG_Bool(REGB3)) {
-          /* ../lib/standard/string.nit:220 */
-          REGB3 = TAG_Bool(false);
-          REGB5 = REGB3;
+        /* ../lib/standard/kernel.nit:439 */
+        REGB7 = TAG_Bool(UNTAG_Char(REGB6)<UNTAG_Char(REGB7));
+        /* ../lib/standard/string.nit:481 */
+        if (UNTAG_Bool(REGB7)) {
+          REGB7 = TAG_Bool(1);
+          REGB2 = REGB7;
           goto label1;
         }
+        /* ../lib/standard/string.nit:482 */
+        REGB7 = TAG_Bool(0);
+        REGB2 = REGB7;
+        goto label1;
       }
-      /* ../lib/standard/string.nit:222 */
-      REGB3 = TAG_Int(1);
-      /* ../lib/standard/kernel.nit:235 */
-      REGB3 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB3));
-      /* ../lib/standard/string.nit:222 */
-      REGB0 = REGB3;
+      /* ../lib/standard/string.nit:485 */
+      REGB7 = TAG_Int(1);
+      /* ../lib/standard/kernel.nit:245 */
+      REGB7 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB7));
+      /* ../lib/standard/string.nit:485 */
+      REGB1 = REGB7;
+      /* ../lib/standard/string.nit:486 */
+      REGB7 = TAG_Int(1);
+      /* ../lib/standard/kernel.nit:245 */
+      REGB7 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB7));
+      /* ../lib/standard/string.nit:486 */
+      REGB0 = REGB7;
     } else {
-      /* ../lib/standard/string.nit:214 */
+      /* ../lib/standard/string.nit:476 */
       goto label2;
     }
   }
   label2: while(0);
-  REGB0 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1), VTID_standard___kernel___Comparable___OTHER(REGB1))) /*cast OTHER*/;
+  REGB0 = TAG_Bool(VAL_ISA(REGB4, VTCOLOR_standard___kernel___Comparable___OTHER(REGB3), VTID_standard___kernel___Comparable___OTHER(REGB3))) /*cast OTHER*/;
   if (UNTAG_Bool(REGB0)) {
   } else {
     nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
   }
-  /* ../lib/standard/kernel.nit:232 */
-  REGB2 = TAG_Bool(UNTAG_Int(REGB1)<UNTAG_Int(REGB2));
-  /* ../lib/standard/string.nit:224 */
-  if (UNTAG_Bool(REGB2)) {
-    /* ../lib/standard/string.nit:225 */
-    REGB2 = TAG_Bool(true);
-    REGB5 = REGB2;
-    goto label1;
-  } else {
-    /* ../lib/standard/string.nit:227 */
-    REGB2 = TAG_Bool(false);
-    REGB5 = REGB2;
-    goto label1;
-  }
+  /* ../lib/standard/kernel.nit:242 */
+  REGB4 = TAG_Bool(UNTAG_Int(REGB3)<UNTAG_Int(REGB4));
+  /* ../lib/standard/string.nit:489 */
+  REGB2 = REGB4;
+  goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
-  return REGB5;
+  return REGB2;
 }
+static const char LOCATE_standard___string___String_____plus[] = "string::String::+";
 val_t standard___string___String_____plus(val_t p0, val_t p1){
-  struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
+  struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
   val_t REGB0;
   val_t REGB1;
+  val_t REGB2;
+  val_t REGB3;
+  val_t REGB4;
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 231;
+  fra.me.line = 492;
   fra.me.meth = LOCATE_standard___string___String_____plus;
   fra.me.has_broke = 0;
-  fra.me.REG_size = 3;
+  fra.me.REG_size = 4;
   fra.me.nitni_local_ref_head = NULL;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[2] = NIT_NULL;
+  fra.me.REG[3] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
-  /* ../lib/standard/collection/array.nit:24 */
+  /* ../lib/standard/string.nit:497 */
   REGB0 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB0)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string, 497);
   }
   REGB0 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
+  /* ../lib/standard/string.nit:498 */
   REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
   if (UNTAG_Bool(REGB1)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string, 498);
   }
   REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]);
-  /* ../lib/standard/kernel.nit:235 */
-  REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
-  /* ../lib/standard/string.nit:234 */
-  fra.me.REG[2] = NEW_Buffer_standard___string___Buffer___with_capacity(REGB1);
-  /* ../lib/standard/string.nit:235 */
-  CALL_standard___collection___abstract_collection___Sequence___append(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[0]);
-  /* ../lib/standard/string.nit:236 */
-  CALL_standard___collection___abstract_collection___Sequence___append(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]);
-  /* ../lib/standard/string.nit:237 */
-  fra.me.REG[2] = CALL_standard___string___Object___to_s(fra.me.REG[2])(fra.me.REG[2]);
+  /* ../lib/standard/kernel.nit:245 */
+  REGB2 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
+  REGB3 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
+  /* ../lib/standard/string.nit:502 */
+  REGB4 = TAG_Int(1);
+  /* ../lib/standard/kernel.nit:245 */
+  REGB4 = TAG_Int(UNTAG_Int(REGB3)+UNTAG_Int(REGB4));
+  /* ../lib/standard/string.nit:1007 */
+  fra.me.REG[2] = BOX_NativeString((char*)raw_alloc((UNTAG_Int(REGB4) * sizeof(char))));
+  /* ../lib/standard/string.nit:504 */
+  REGB4 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB4)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 504);
+  }
+  fra.me.REG[3] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
+  REGB4 = TAG_Bool(ATTR_standard___string___String____index_from(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB4)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_index_from", LOCATE_standard___string, 504);
+  }
+  REGB4 = ATTR_standard___string___String____index_from(fra.me.REG[0]);
+  REGB3 = TAG_Int(0);
+  /* ../lib/standard/string.nit:972 */
+  (void)memcpy(UNBOX_NativeString(fra.me.REG[2])+UNTAG_Int(REGB3), UNBOX_NativeString(fra.me.REG[3])+UNTAG_Int(REGB4), UNTAG_Int(REGB0));;
+  /* ../lib/standard/string.nit:505 */
+  REGB3 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[1])!=NIT_NULL);
+  if (UNTAG_Bool(REGB3)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 505);
+  }
+  fra.me.REG[3] = ATTR_standard___string___AbstractString____items(fra.me.REG[1]);
+  REGB3 = TAG_Bool(ATTR_standard___string___String____index_from(fra.me.REG[1])!=NIT_NULL);
+  if (UNTAG_Bool(REGB3)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_index_from", LOCATE_standard___string, 505);
+  }
+  REGB3 = ATTR_standard___string___String____index_from(fra.me.REG[1]);
+  /* ../lib/standard/string.nit:972 */
+  (void)memcpy(UNBOX_NativeString(fra.me.REG[2])+UNTAG_Int(REGB0), UNBOX_NativeString(fra.me.REG[3])+UNTAG_Int(REGB3), UNTAG_Int(REGB1));;
+  /* ../lib/standard/string.nit:507 */
+  REGB0 = TAG_Char('\0');
+  /* ../lib/standard/string.nit:971 */
+  UNBOX_NativeString(fra.me.REG[2])[UNTAG_Int(REGB2)]=UNTAG_Char(REGB0);;
+  /* ../lib/standard/string.nit:509 */
+  fra.me.REG[2] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[2])(fra.me.REG[2], REGB2);
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
   return fra.me.REG[2];
 }
+static const char LOCATE_standard___string___String_____star[] = "string::String::*";
 val_t standard___string___String_____star(val_t p0, val_t p1){
   struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
   val_t REGB0;
   val_t REGB1;
   val_t REGB2;
+  val_t REGB3;
+  val_t REGB4;
+  val_t REGB5;
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 240;
+  fra.me.line = 512;
   fra.me.meth = LOCATE_standard___string___String_____star;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
@@ -1223,179 +2742,207 @@ val_t standard___string___String_____star(val_t p0, val_t p1){
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
   REGB0 = p1;
-  /* ../lib/standard/string.nit:243 */
+  /* ../lib/standard/string.nit:519 */
   REGB1 = TAG_Int(0);
   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:233 */
+  /* ../lib/standard/kernel.nit:243 */
   REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
-  /* ../lib/standard/string.nit:243 */
+  /* ../lib/standard/string.nit:519 */
   if (UNTAG_Bool(REGB1)) {
   } else {
-    nit_abort("Assert failed", NULL, LOCATE_standard___string, 243);
+    nit_abort("Assert failed", NULL, LOCATE_standard___string, 519);
   }
-  /* ../lib/standard/collection/array.nit:24 */
+  /* ../lib/standard/string.nit:521 */
   REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB1)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string, 521);
   }
   REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
-  /* ../lib/standard/kernel.nit:238 */
-  REGB1 = TAG_Int(UNTAG_Int(REGB1)*UNTAG_Int(REGB0));
-  /* ../lib/standard/string.nit:244 */
-  fra.me.REG[1] = NEW_Buffer_standard___string___Buffer___with_capacity(REGB1);
-  /* ../lib/standard/string.nit:245 */
+  /* ../lib/standard/kernel.nit:248 */
+  REGB2 = TAG_Int(UNTAG_Int(REGB1)*UNTAG_Int(REGB0));
+  /* ../lib/standard/string.nit:525 */
+  REGB3 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB3)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 525);
+  }
+  fra.me.REG[1] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
+  /* ../lib/standard/string.nit:527 */
+  REGB3 = TAG_Int(1);
+  /* ../lib/standard/kernel.nit:245 */
+  REGB3 = TAG_Int(UNTAG_Int(REGB2)+UNTAG_Int(REGB3));
+  /* ../lib/standard/string.nit:1007 */
+  fra.me.REG[0] = BOX_NativeString((char*)raw_alloc((UNTAG_Int(REGB3) * sizeof(char))));
+  /* ../lib/standard/string.nit:529 */
+  REGB3 = TAG_Char('\0');
+  /* ../lib/standard/string.nit:971 */
+  UNBOX_NativeString(fra.me.REG[0])[UNTAG_Int(REGB2)]=UNTAG_Char(REGB3);;
+  /* ../lib/standard/string.nit:531 */
+  REGB3 = TAG_Int(0);
+  /* ../lib/standard/string.nit:533 */
+  REGB4 = TAG_Int(1);
+  /* ../lib/standard/kernel.nit:393 */
   while(1) {
-    REGB1 = TAG_Int(0);
-    REGB2 = TAG_Bool(VAL_ISA(REGB1, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
-    if (UNTAG_Bool(REGB2)) {
+    REGB5 = TAG_Bool(VAL_ISA(REGB0, VTCOLOR_standard___kernel___Comparable___OTHER(REGB4), VTID_standard___kernel___Comparable___OTHER(REGB4))) /*cast OTHER*/;
+    if (UNTAG_Bool(REGB5)) {
     } else {
       nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
     }
-    /* ../lib/standard/kernel.nit:234 */
-    REGB1 = TAG_Bool(UNTAG_Int(REGB0)>UNTAG_Int(REGB1));
-    /* ../lib/standard/string.nit:245 */
-    if (UNTAG_Bool(REGB1)) {
-      /* ../lib/standard/string.nit:246 */
-      CALL_standard___collection___abstract_collection___Sequence___append(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[0]);
-      /* ../lib/standard/string.nit:247 */
-      REGB1 = TAG_Int(1);
-      /* ../lib/standard/kernel.nit:237 */
-      REGB1 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB1));
-      /* ../lib/standard/string.nit:247 */
-      REGB0 = REGB1;
+    /* ../lib/standard/kernel.nit:241 */
+    REGB5 = TAG_Bool(UNTAG_Int(REGB4)<=UNTAG_Int(REGB0));
+    /* ../lib/standard/kernel.nit:393 */
+    if (UNTAG_Bool(REGB5)) {
+      /* ../lib/standard/string.nit:534 */
+      REGB5 = TAG_Int(0);
+      /* ../lib/standard/string.nit:972 */
+      (void)memcpy(UNBOX_NativeString(fra.me.REG[0])+UNTAG_Int(REGB3), UNBOX_NativeString(fra.me.REG[1])+UNTAG_Int(REGB5), UNTAG_Int(REGB1));;
+      /* ../lib/standard/kernel.nit:245 */
+      REGB5 = TAG_Int(UNTAG_Int(REGB3)+UNTAG_Int(REGB1));
+      /* ../lib/standard/string.nit:535 */
+      REGB3 = REGB5;
+      /* ../lib/standard/kernel.nit:395 */
+      REGB5 = TAG_Int(1);
+      /* ../lib/standard/kernel.nit:245 */
+      REGB5 = TAG_Int(UNTAG_Int(REGB4)+UNTAG_Int(REGB5));
+      /* ../lib/standard/kernel.nit:395 */
+      REGB4 = REGB5;
     } else {
-      /* ../lib/standard/string.nit:245 */
+      /* ../lib/standard/kernel.nit:393 */
       goto label1;
     }
   }
   label1: while(0);
-  /* ../lib/standard/string.nit:249 */
-  fra.me.REG[1] = CALL_standard___string___Object___to_s(fra.me.REG[1])(fra.me.REG[1]);
+  /* ../lib/standard/string.nit:538 */
+  fra.me.REG[0] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[0])(fra.me.REG[0], REGB2);
   goto label2;
   label2: while(0);
   stack_frame_head = fra.me.prev;
-  return fra.me.REG[1];
+  return fra.me.REG[0];
 }
+static const char LOCATE_standard___string___String___to_s[] = "string::String::(string::Object::to_s)";
 val_t standard___string___String___to_s(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_standard___string;
-  fra.me.line = 252;
+  fra.me.line = 541;
   fra.me.meth = LOCATE_standard___string___String___to_s;
   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;
-  /* ../lib/standard/string.nit:252 */
+  /* ../lib/standard/string.nit:541 */
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
   return fra.me.REG[0];
 }
+static const char LOCATE_standard___string___String___hash[] = "string::String::(hash::Object::hash)";
 val_t standard___string___String___hash(val_t p0){
-  struct {struct stack_frame_t me;} fra;
+  struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
   val_t REGB0;
   val_t REGB1;
   val_t REGB2;
   val_t REGB3;
+  val_t REGB4;
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 254;
+  fra.me.line = 543;
   fra.me.meth = LOCATE_standard___string___String___hash;
   fra.me.has_broke = 0;
-  fra.me.REG_size = 1;
+  fra.me.REG_size = 2;
   fra.me.nitni_local_ref_head = NULL;
   fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
-  /* ../lib/standard/string.nit:257 */
+  /* ../lib/standard/string.nit:546 */
   REGB0 = TAG_Int(5381);
-  /* ../lib/standard/string.nit:258 */
+  /* ../lib/standard/string.nit:547 */
   REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB1)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string, 258);
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string, 547);
   }
   REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
   REGB2 = TAG_Int(1);
-  /* ../lib/standard/kernel.nit:237 */
+  /* ../lib/standard/kernel.nit:247 */
   REGB2 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB2));
-  /* ../lib/standard/string.nit:259 */
+  /* ../lib/standard/string.nit:549 */
   REGB1 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB1)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 259);
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 549);
   }
-  fra.me.REG[0] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
-  /* ../lib/standard/string.nit:260 */
+  fra.me.REG[1] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
+  /* ../lib/standard/string.nit:550 */
+  REGB1 = TAG_Bool(ATTR_standard___string___String____index_from(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB1)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_index_from", LOCATE_standard___string, 550);
+  }
+  REGB1 = ATTR_standard___string___String____index_from(fra.me.REG[0]);
+  /* ../lib/standard/kernel.nit:245 */
+  REGB3 = TAG_Int(UNTAG_Int(REGB2)+UNTAG_Int(REGB1));
+  /* ../lib/standard/string.nit:552 */
+  REGB2 = REGB3;
+  /* ../lib/standard/string.nit:554 */
   while(1) {
-    REGB1 = TAG_Int(0);
     REGB3 = TAG_Bool(VAL_ISA(REGB1, VTCOLOR_standard___kernel___Comparable___OTHER(REGB2), VTID_standard___kernel___Comparable___OTHER(REGB2))) /*cast OTHER*/;
     if (UNTAG_Bool(REGB3)) {
     } else {
       nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
     }
-    /* ../lib/standard/kernel.nit:233 */
-    REGB1 = TAG_Bool(UNTAG_Int(REGB2)>=UNTAG_Int(REGB1));
-    /* ../lib/standard/string.nit:260 */
-    if (UNTAG_Bool(REGB1)) {
-      /* ../lib/standard/string.nit:261 */
-      REGB1 = TAG_Int(32);
-      /* ../lib/standard/kernel.nit:238 */
-      REGB1 = TAG_Int(UNTAG_Int(REGB0)*UNTAG_Int(REGB1));
-      /* ../lib/standard/kernel.nit:235 */
-      REGB1 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB0));
-      /* ../lib/standard/string.nit:595 */
-      REGB3 = TAG_Char(UNBOX_NativeString(fra.me.REG[0])[UNTAG_Int(REGB2)]);
-      /* ../lib/standard/kernel.nit:413 */
-      REGB3 = TAG_Int((unsigned char)UNTAG_Char(REGB3));
-      /* ../lib/standard/kernel.nit:235 */
-      REGB3 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB3));
-      /* ../lib/standard/string.nit:261 */
-      REGB0 = REGB3;
-      /* ../lib/standard/string.nit:262 */
-      REGB3 = TAG_Int(1);
-      /* ../lib/standard/kernel.nit:237 */
-      REGB3 = TAG_Int(UNTAG_Int(REGB2)-UNTAG_Int(REGB3));
-      /* ../lib/standard/string.nit:262 */
-      REGB2 = REGB3;
+    /* ../lib/standard/kernel.nit:243 */
+    REGB3 = TAG_Bool(UNTAG_Int(REGB2)>=UNTAG_Int(REGB1));
+    /* ../lib/standard/string.nit:554 */
+    if (UNTAG_Bool(REGB3)) {
+      /* ../lib/standard/string.nit:555 */
+      REGB3 = TAG_Int(32);
+      /* ../lib/standard/kernel.nit:248 */
+      REGB3 = TAG_Int(UNTAG_Int(REGB0)*UNTAG_Int(REGB3));
+      /* ../lib/standard/kernel.nit:245 */
+      REGB3 = TAG_Int(UNTAG_Int(REGB3)+UNTAG_Int(REGB0));
+      /* ../lib/standard/string.nit:555 */
+      REGB4 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
+      if (UNTAG_Bool(REGB4)) {
+      } else {
+        nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 555);
+      }
+      fra.me.REG[1] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
+      /* ../lib/standard/string.nit:970 */
+      REGB4 = TAG_Char(UNBOX_NativeString(fra.me.REG[1])[UNTAG_Int(REGB2)]);
+      /* ../lib/standard/kernel.nit:471 */
+      REGB4 = TAG_Int((unsigned char)UNTAG_Char(REGB4));
+      /* ../lib/standard/kernel.nit:245 */
+      REGB4 = TAG_Int(UNTAG_Int(REGB3)+UNTAG_Int(REGB4));
+      /* ../lib/standard/string.nit:555 */
+      REGB0 = REGB4;
+      /* ../lib/standard/string.nit:556 */
+      REGB4 = TAG_Int(1);
+      /* ../lib/standard/kernel.nit:247 */
+      REGB4 = TAG_Int(UNTAG_Int(REGB2)-UNTAG_Int(REGB4));
+      /* ../lib/standard/string.nit:556 */
+      REGB2 = REGB4;
     } else {
-      /* ../lib/standard/string.nit:260 */
+      /* ../lib/standard/string.nit:554 */
       goto label1;
     }
   }
   label1: while(0);
-  /* ../lib/standard/string.nit:264 */
+  /* ../lib/standard/string.nit:559 */
   goto label2;
   label2: while(0);
   stack_frame_head = fra.me.prev;
   return REGB0;
 }
-val_t standard___string___String___to_f(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_standard___string;
-  fra.me.line = 268;
-  fra.me.meth = LOCATE_standard___string___String___to_f;
-  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;
-  /* ../lib/standard/string.nit:268 */
-  fra.me.REG[0] = String_to_f___out(fra.me.REG[0]);
-  ;
-  stack_frame_head = fra.me.prev;
-  return fra.me.REG[0];
-}
+static const char LOCATE_standard___string___Buffer_____braeq[] = "string::Buffer::(abstract_collection::Sequence::[]=)";
 void standard___string___Buffer_____braeq(val_t p0, val_t p1, val_t p2){
   struct {struct stack_frame_t me;} fra;
   val_t REGB0;
@@ -1405,7 +2952,7 @@ void standard___string___Buffer_____braeq(val_t p0, val_t p1, val_t p2){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 280;
+  fra.me.line = 572;
   fra.me.meth = LOCATE_standard___string___Buffer_____braeq;
   fra.me.has_broke = 0;
   fra.me.REG_size = 1;
@@ -1421,31 +2968,31 @@ void standard___string___Buffer_____braeq(val_t p0, val_t p1, val_t p2){
     nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
   }
   REGB2 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
-  /* ../lib/standard/string.nit:282 */
+  /* ../lib/standard/string.nit:574 */
   REGB3 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB2));
   if (UNTAG_Bool(REGB3)) {
   } else {
-    /* ../lib/standard/kernel.nit:227 */
+    /* ../lib/standard/kernel.nit:237 */
     REGB2 = TAG_Bool((REGB0)==(REGB2));
-    /* ../lib/standard/string.nit:282 */
+    /* ../lib/standard/string.nit:574 */
     REGB3 = REGB2;
   }
   if (UNTAG_Bool(REGB3)) {
-    /* ../lib/standard/string.nit:283 */
+    /* ../lib/standard/string.nit:575 */
     CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[0])(fra.me.REG[0], REGB1);
-    /* ../lib/standard/string.nit:284 */
+    /* ../lib/standard/string.nit:576 */
     goto label1;
   }
-  /* ../lib/standard/string.nit:286 */
+  /* ../lib/standard/string.nit:578 */
   REGB3 = TAG_Int(0);
   REGB2 = TAG_Bool(VAL_ISA(REGB3, 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:233 */
+  /* ../lib/standard/kernel.nit:243 */
   REGB3 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB3));
-  /* ../lib/standard/string.nit:286 */
+  /* ../lib/standard/string.nit:578 */
   if (UNTAG_Bool(REGB3)) {
     /* ../lib/standard/collection/array.nit:24 */
     REGB3 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
@@ -1459,30 +3006,31 @@ void standard___string___Buffer_____braeq(val_t p0, val_t p1, val_t p2){
     } else {
       nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
     }
-    /* ../lib/standard/kernel.nit:232 */
+    /* ../lib/standard/kernel.nit:242 */
     REGB3 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB3));
   } else {
-    /* ../lib/standard/string.nit:286 */
-    REGB2 = TAG_Bool(false);
+    /* ../lib/standard/string.nit:578 */
+    REGB2 = TAG_Bool(0);
     REGB3 = REGB2;
   }
   if (UNTAG_Bool(REGB3)) {
   } else {
-    nit_abort("Assert failed", NULL, LOCATE_standard___string, 286);
+    nit_abort("Assert failed", NULL, LOCATE_standard___string, 578);
   }
-  /* ../lib/standard/string.nit:287 */
+  /* ../lib/standard/string.nit:579 */
   REGB3 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB3)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 287);
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 579);
   }
   fra.me.REG[0] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
-  /* ../lib/standard/string.nit:596 */
+  /* ../lib/standard/string.nit:971 */
   UNBOX_NativeString(fra.me.REG[0])[UNTAG_Int(REGB0)]=UNTAG_Char(REGB1);;
   label1: while(0);
   stack_frame_head = fra.me.prev;
   return;
 }
+static const char LOCATE_standard___string___Buffer___add[] = "string::Buffer::(abstract_collection::SimpleCollection::add)";
 void standard___string___Buffer___add(val_t p0, val_t p1){
   struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
   val_t REGB0;
@@ -1492,7 +3040,7 @@ void standard___string___Buffer___add(val_t p0, val_t p1){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 290;
+  fra.me.line = 582;
   fra.me.meth = LOCATE_standard___string___Buffer___add;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
@@ -1501,11 +3049,11 @@ void standard___string___Buffer___add(val_t p0, val_t p1){
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
   REGB0 = p1;
-  /* ../lib/standard/string.nit:292 */
+  /* ../lib/standard/string.nit:584 */
   REGB1 = TAG_Bool(ATTR_standard___string___Buffer____capacity(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB1)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_capacity", LOCATE_standard___string, 292);
+    nit_abort("Uninitialized attribute %s", "_capacity", LOCATE_standard___string, 584);
   }
   REGB1 = ATTR_standard___string___Buffer____capacity(fra.me.REG[0]);
   /* ../lib/standard/collection/array.nit:24 */
@@ -1520,9 +3068,9 @@ void standard___string___Buffer___add(val_t p0, val_t p1){
   } else {
     nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
   }
-  /* ../lib/standard/kernel.nit:231 */
+  /* ../lib/standard/kernel.nit:241 */
   REGB2 = TAG_Bool(UNTAG_Int(REGB1)<=UNTAG_Int(REGB2));
-  /* ../lib/standard/string.nit:292 */
+  /* ../lib/standard/string.nit:584 */
   if (UNTAG_Bool(REGB2)) {
     /* ../lib/standard/collection/array.nit:24 */
     REGB2 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
@@ -1531,18 +3079,18 @@ void standard___string___Buffer___add(val_t p0, val_t p1){
       nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
     }
     REGB2 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
-    /* ../lib/standard/string.nit:292 */
+    /* ../lib/standard/string.nit:584 */
     REGB1 = TAG_Int(5);
-    /* ../lib/standard/kernel.nit:235 */
+    /* ../lib/standard/kernel.nit:245 */
     REGB1 = TAG_Int(UNTAG_Int(REGB2)+UNTAG_Int(REGB1));
-    /* ../lib/standard/string.nit:292 */
+    /* ../lib/standard/string.nit:584 */
     CALL_standard___collection___array___AbstractArray___enlarge(fra.me.REG[0])(fra.me.REG[0], REGB1);
   }
-  /* ../lib/standard/string.nit:293 */
+  /* ../lib/standard/string.nit:585 */
   REGB1 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB1)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 293);
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 585);
   }
   fra.me.REG[1] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
   /* ../lib/standard/collection/array.nit:24 */
@@ -1552,18 +3100,19 @@ void standard___string___Buffer___add(val_t p0, val_t p1){
     nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
   }
   REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
-  /* ../lib/standard/string.nit:596 */
+  /* ../lib/standard/string.nit:971 */
   UNBOX_NativeString(fra.me.REG[1])[UNTAG_Int(REGB1)]=UNTAG_Char(REGB0);;
-  /* ../lib/standard/string.nit:294 */
+  /* ../lib/standard/string.nit:586 */
   REGB0 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
   REGB1 = TAG_Int(1);
-  /* ../lib/standard/kernel.nit:235 */
+  /* ../lib/standard/kernel.nit:245 */
   REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
-  /* ../lib/standard/string.nit:294 */
+  /* ../lib/standard/string.nit:586 */
   ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]) = REGB1;
   stack_frame_head = fra.me.prev;
   return;
 }
+static const char LOCATE_standard___string___Buffer___enlarge[] = "string::Buffer::(array::AbstractArray::enlarge)";
 void standard___string___Buffer___enlarge(val_t p0, val_t p1){
   struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
   val_t REGB0;
@@ -1573,7 +3122,7 @@ void standard___string___Buffer___enlarge(val_t p0, val_t p1){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 297;
+  fra.me.line = 589;
   fra.me.meth = LOCATE_standard___string___Buffer___enlarge;
   fra.me.has_broke = 0;
   fra.me.REG_size = 3;
@@ -1583,11 +3132,11 @@ void standard___string___Buffer___enlarge(val_t p0, val_t p1){
   fra.me.REG[2] = NIT_NULL;
   fra.me.REG[0] = p0;
   REGB0 = p1;
-  /* ../lib/standard/string.nit:299 */
+  /* ../lib/standard/string.nit:591 */
   REGB1 = TAG_Bool(ATTR_standard___string___Buffer____capacity(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB1)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_capacity", LOCATE_standard___string, 299);
+    nit_abort("Uninitialized attribute %s", "_capacity", LOCATE_standard___string, 591);
   }
   REGB1 = ATTR_standard___string___Buffer____capacity(fra.me.REG[0]);
   REGB2 = TAG_Bool(VAL_ISA(REGB1, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
@@ -1595,48 +3144,48 @@ void standard___string___Buffer___enlarge(val_t p0, val_t p1){
   } else {
     nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
   }
-  /* ../lib/standard/kernel.nit:231 */
+  /* ../lib/standard/kernel.nit:241 */
   REGB2 = TAG_Bool(UNTAG_Int(REGB0)<=UNTAG_Int(REGB1));
-  /* ../lib/standard/string.nit:300 */
+  /* ../lib/standard/string.nit:592 */
   if (UNTAG_Bool(REGB2)) {
     goto label1;
   }
-  /* ../lib/standard/string.nit:301 */
+  /* ../lib/standard/string.nit:593 */
   while(1) {
     REGB2 = TAG_Bool(VAL_ISA(REGB0, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1), VTID_standard___kernel___Comparable___OTHER(REGB1))) /*cast OTHER*/;
     if (UNTAG_Bool(REGB2)) {
     } else {
       nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
     }
-    /* ../lib/standard/kernel.nit:231 */
+    /* ../lib/standard/kernel.nit:241 */
     REGB2 = TAG_Bool(UNTAG_Int(REGB1)<=UNTAG_Int(REGB0));
-    /* ../lib/standard/string.nit:301 */
+    /* ../lib/standard/string.nit:593 */
     if (UNTAG_Bool(REGB2)) {
       REGB2 = TAG_Int(2);
-      /* ../lib/standard/kernel.nit:238 */
+      /* ../lib/standard/kernel.nit:248 */
       REGB2 = TAG_Int(UNTAG_Int(REGB1)*UNTAG_Int(REGB2));
-      /* ../lib/standard/string.nit:301 */
+      /* ../lib/standard/string.nit:593 */
       REGB3 = TAG_Int(2);
-      /* ../lib/standard/kernel.nit:235 */
+      /* ../lib/standard/kernel.nit:245 */
       REGB3 = TAG_Int(UNTAG_Int(REGB2)+UNTAG_Int(REGB3));
-      /* ../lib/standard/string.nit:301 */
+      /* ../lib/standard/string.nit:593 */
       REGB1 = REGB3;
     } else {
       goto label2;
     }
   }
   label2: while(0);
-  /* ../lib/standard/string.nit:302 */
+  /* ../lib/standard/string.nit:594 */
   REGB0 = TAG_Int(1);
-  /* ../lib/standard/kernel.nit:235 */
+  /* ../lib/standard/kernel.nit:245 */
   REGB0 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB0));
-  /* ../lib/standard/string.nit:611 */
+  /* ../lib/standard/string.nit:1007 */
   fra.me.REG[1] = BOX_NativeString((char*)raw_alloc((UNTAG_Int(REGB0) * sizeof(char))));
-  /* ../lib/standard/string.nit:303 */
+  /* ../lib/standard/string.nit:595 */
   REGB0 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB0)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 303);
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 595);
   }
   fra.me.REG[2] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
   /* ../lib/standard/collection/array.nit:24 */
@@ -1646,21 +3195,22 @@ void standard___string___Buffer___enlarge(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[0]);
-  /* ../lib/standard/string.nit:303 */
+  /* ../lib/standard/string.nit:595 */
   REGB3 = TAG_Int(0);
   REGB2 = TAG_Int(0);
-  /* ../lib/standard/string.nit:597 */
+  /* ../lib/standard/string.nit:972 */
   (void)memcpy(UNBOX_NativeString(fra.me.REG[1])+UNTAG_Int(REGB2), UNBOX_NativeString(fra.me.REG[2])+UNTAG_Int(REGB3), UNTAG_Int(REGB0));;
-  /* ../lib/standard/string.nit:304 */
+  /* ../lib/standard/string.nit:596 */
   ATTR_standard___string___AbstractString____items(fra.me.REG[0]) = fra.me.REG[1];
-  /* ../lib/standard/string.nit:305 */
+  /* ../lib/standard/string.nit:597 */
   ATTR_standard___string___Buffer____capacity(fra.me.REG[0]) = REGB1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
   return;
 }
+static const char LOCATE_standard___string___Buffer___append[] = "string::Buffer::(abstract_collection::Sequence::append)";
 void standard___string___Buffer___append(val_t p0, val_t p1){
-  struct {struct stack_frame_t me; val_t MORE_REG[4];} fra;
+  struct {struct stack_frame_t me; val_t MORE_REG[5];} fra;
   val_t REGB0;
   val_t REGB1;
   val_t REGB2;
@@ -1668,22 +3218,23 @@ void standard___string___Buffer___append(val_t p0, val_t p1){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 308;
+  fra.me.line = 600;
   fra.me.meth = LOCATE_standard___string___Buffer___append;
   fra.me.has_broke = 0;
-  fra.me.REG_size = 5;
+  fra.me.REG_size = 6;
   fra.me.nitni_local_ref_head = NULL;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[2] = NIT_NULL;
   fra.me.REG[3] = NIT_NULL;
   fra.me.REG[4] = NIT_NULL;
+  fra.me.REG[5] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
-  /* ../lib/standard/string.nit:308 */
+  /* ../lib/standard/string.nit:600 */
   fra.me.REG[2] = fra.me.REG[0];
   fra.me.REG[3] = fra.me.REG[1];
-  /* ../lib/standard/string.nit:310 */
+  /* ../lib/standard/string.nit:602 */
   REGB0 = TAG_Bool(VAL_ISA(fra.me.REG[3], COLOR_standard___string___String, ID_standard___string___String)) /*cast String*/;
   if (UNTAG_Bool(REGB0)) {
     /* ../lib/standard/collection/array.nit:24 */
@@ -1693,74 +3244,77 @@ void standard___string___Buffer___append(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[3]);
-    /* ../lib/standard/string.nit:312 */
+    /* ../lib/standard/string.nit:604 */
     REGB1 = TAG_Bool(ATTR_standard___string___Buffer____capacity(fra.me.REG[2])!=NIT_NULL);
     if (UNTAG_Bool(REGB1)) {
     } else {
-      nit_abort("Uninitialized attribute %s", "_capacity", LOCATE_standard___string, 312);
+      nit_abort("Uninitialized attribute %s", "_capacity", LOCATE_standard___string, 604);
     }
     REGB1 = ATTR_standard___string___Buffer____capacity(fra.me.REG[2]);
-    /* ../lib/standard/collection/array.nit:24 */
     REGB2 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
     if (UNTAG_Bool(REGB2)) {
     } else {
-      nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
+      nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string, 604);
     }
     REGB2 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2]);
-    /* ../lib/standard/kernel.nit:235 */
+    /* ../lib/standard/kernel.nit:245 */
     REGB2 = TAG_Int(UNTAG_Int(REGB2)+UNTAG_Int(REGB0));
     REGB3 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1), VTID_standard___kernel___Comparable___OTHER(REGB1))) /*cast OTHER*/;
     if (UNTAG_Bool(REGB3)) {
     } else {
       nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
     }
-    /* ../lib/standard/kernel.nit:232 */
+    /* ../lib/standard/kernel.nit:242 */
     REGB2 = TAG_Bool(UNTAG_Int(REGB1)<UNTAG_Int(REGB2));
-    /* ../lib/standard/string.nit:312 */
+    /* ../lib/standard/string.nit:604 */
     if (UNTAG_Bool(REGB2)) {
-      /* ../lib/standard/collection/array.nit:24 */
       REGB2 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
       if (UNTAG_Bool(REGB2)) {
       } else {
-        nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
+        nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string, 604);
       }
       REGB2 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2]);
-      /* ../lib/standard/kernel.nit:235 */
+      /* ../lib/standard/kernel.nit:245 */
       REGB2 = TAG_Int(UNTAG_Int(REGB2)+UNTAG_Int(REGB0));
-      /* ../lib/standard/string.nit:312 */
+      /* ../lib/standard/string.nit:604 */
       CALL_standard___collection___array___AbstractArray___enlarge(fra.me.REG[2])(fra.me.REG[2], REGB2);
     }
-    /* ../lib/standard/string.nit:313 */
-    fra.me.REG[3] = CALL_standard___string___AbstractString___items(fra.me.REG[3])(fra.me.REG[3]);
+    /* ../lib/standard/string.nit:605 */
+    fra.me.REG[4] = CALL_standard___string___AbstractString___items(fra.me.REG[3])(fra.me.REG[3]);
     REGB2 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[2])!=NIT_NULL);
     if (UNTAG_Bool(REGB2)) {
     } else {
-      nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 313);
+      nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 605);
     }
-    fra.me.REG[4] = ATTR_standard___string___AbstractString____items(fra.me.REG[2]);
-    REGB2 = TAG_Int(0);
-    /* ../lib/standard/collection/array.nit:24 */
+    fra.me.REG[5] = ATTR_standard___string___AbstractString____items(fra.me.REG[2]);
+    REGB2 = TAG_Bool(ATTR_standard___string___String____index_from(fra.me.REG[3])!=NIT_NULL);
+    if (UNTAG_Bool(REGB2)) {
+    } else {
+      nit_abort("Uninitialized attribute %s", "_index_from", LOCATE_standard___string, 605);
+    }
+    REGB2 = ATTR_standard___string___String____index_from(fra.me.REG[3]);
     REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
     if (UNTAG_Bool(REGB1)) {
     } else {
-      nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
+      nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string, 605);
     }
     REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2]);
-    /* ../lib/standard/string.nit:597 */
-    (void)memcpy(UNBOX_NativeString(fra.me.REG[4])+UNTAG_Int(REGB1), UNBOX_NativeString(fra.me.REG[3])+UNTAG_Int(REGB2), UNTAG_Int(REGB0));;
-    /* ../lib/standard/string.nit:314 */
+    /* ../lib/standard/string.nit:972 */
+    (void)memcpy(UNBOX_NativeString(fra.me.REG[5])+UNTAG_Int(REGB1), UNBOX_NativeString(fra.me.REG[4])+UNTAG_Int(REGB2), UNTAG_Int(REGB0));;
+    /* ../lib/standard/string.nit:606 */
     REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2]);
-    /* ../lib/standard/kernel.nit:235 */
+    /* ../lib/standard/kernel.nit:245 */
     REGB0 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB0));
-    /* ../lib/standard/string.nit:314 */
+    /* ../lib/standard/string.nit:606 */
     ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2]) = REGB0;
   } else {
-    /* ../lib/standard/string.nit:316 */
+    /* ../lib/standard/string.nit:608 */
     CALL_SUPER_standard___string___Buffer___append(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
   }
   stack_frame_head = fra.me.prev;
   return;
 }
+static const char LOCATE_standard___string___Buffer___to_s[] = "string::Buffer::(string::Object::to_s)";
 val_t standard___string___Buffer___to_s(val_t p0){
   struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
   val_t REGB0;
@@ -1769,7 +3323,7 @@ val_t standard___string___Buffer___to_s(val_t p0){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 320;
+  fra.me.line = 612;
   fra.me.meth = LOCATE_standard___string___Buffer___to_s;
   fra.me.has_broke = 0;
   fra.me.REG_size = 3;
@@ -1785,22 +3339,22 @@ val_t standard___string___Buffer___to_s(val_t p0){
     nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
   }
   REGB0 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
-  /* ../lib/standard/string.nit:323 */
+  /* ../lib/standard/string.nit:615 */
   REGB1 = TAG_Int(1);
-  /* ../lib/standard/kernel.nit:235 */
+  /* ../lib/standard/kernel.nit:245 */
   REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
-  /* ../lib/standard/string.nit:611 */
+  /* ../lib/standard/string.nit:1007 */
   fra.me.REG[1] = BOX_NativeString((char*)raw_alloc((UNTAG_Int(REGB1) * sizeof(char))));
-  /* ../lib/standard/string.nit:324 */
+  /* ../lib/standard/string.nit:616 */
   REGB1 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB1)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 324);
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 616);
   }
   fra.me.REG[2] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
   REGB1 = TAG_Int(0);
   REGB2 = TAG_Int(0);
-  /* ../lib/standard/string.nit:597 */
+  /* ../lib/standard/string.nit:972 */
   (void)memcpy(UNBOX_NativeString(fra.me.REG[1])+UNTAG_Int(REGB2), UNBOX_NativeString(fra.me.REG[2])+UNTAG_Int(REGB1), UNTAG_Int(REGB0));;
   /* ../lib/standard/collection/array.nit:24 */
   REGB2 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
@@ -1809,9 +3363,9 @@ val_t standard___string___Buffer___to_s(val_t p0){
     nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
   }
   REGB2 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
-  /* ../lib/standard/string.nit:327 */
+  /* ../lib/standard/string.nit:619 */
   REGB1 = TAG_Char('\0');
-  /* ../lib/standard/string.nit:596 */
+  /* ../lib/standard/string.nit:971 */
   UNBOX_NativeString(fra.me.REG[1])[UNTAG_Int(REGB2)]=UNTAG_Char(REGB1);;
   /* ../lib/standard/collection/array.nit:24 */
   REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
@@ -1820,13 +3374,14 @@ val_t standard___string___Buffer___to_s(val_t p0){
     nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
   }
   REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
-  /* ../lib/standard/string.nit:329 */
-  fra.me.REG[1] = NEW_String_standard___string___String___with_native(fra.me.REG[1], REGB1);
+  /* ../lib/standard/string.nit:621 */
+  fra.me.REG[1] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[1])(fra.me.REG[1], REGB1);
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
   return fra.me.REG[1];
 }
+static const char LOCATE_standard___string___Buffer_____l[] = "string::Buffer::(kernel::Comparable::<)";
 val_t standard___string___Buffer_____l(val_t p0, val_t p1){
   struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
   val_t REGB0;
@@ -1839,7 +3394,7 @@ val_t standard___string___Buffer_____l(val_t p0, val_t p1){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 332;
+  fra.me.line = 624;
   fra.me.meth = LOCATE_standard___string___Buffer_____l;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
@@ -1853,7 +3408,7 @@ val_t standard___string___Buffer_____l(val_t p0, val_t p1){
   } else {
     nit_abort("Cast failed", NULL, LOCATE_standard___string, 0);
   }
-  /* ../lib/standard/string.nit:334 */
+  /* ../lib/standard/string.nit:626 */
   REGB0 = TAG_Int(0);
   /* ../lib/standard/collection/array.nit:24 */
   REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
@@ -1868,49 +3423,49 @@ val_t standard___string___Buffer_____l(val_t p0, val_t p1){
     nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
   }
   REGB2 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]);
-  /* ../lib/standard/string.nit:337 */
+  /* ../lib/standard/string.nit:629 */
   while(1) {
     REGB3 = TAG_Bool(VAL_ISA(REGB1, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
     if (UNTAG_Bool(REGB3)) {
     } else {
       nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
     }
-    /* ../lib/standard/kernel.nit:232 */
+    /* ../lib/standard/kernel.nit:242 */
     REGB3 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
-    /* ../lib/standard/string.nit:337 */
+    /* ../lib/standard/string.nit:629 */
     if (UNTAG_Bool(REGB3)) {
       REGB3 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
       if (UNTAG_Bool(REGB3)) {
       } else {
         nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
       }
-      /* ../lib/standard/kernel.nit:232 */
+      /* ../lib/standard/kernel.nit:242 */
       REGB3 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB2));
     } else {
-      /* ../lib/standard/string.nit:337 */
-      REGB4 = TAG_Bool(false);
+      /* ../lib/standard/string.nit:629 */
+      REGB4 = TAG_Bool(0);
       REGB3 = REGB4;
     }
     if (UNTAG_Bool(REGB3)) {
-      /* ../lib/standard/string.nit:338 */
+      /* ../lib/standard/string.nit:630 */
       REGB3 = CALL_standard___collection___abstract_collection___SequenceRead_____bra(fra.me.REG[0])(fra.me.REG[0], REGB0);
-      /* ../lib/standard/kernel.nit:413 */
+      /* ../lib/standard/kernel.nit:471 */
       REGB3 = TAG_Int((unsigned char)UNTAG_Char(REGB3));
-      /* ../lib/standard/string.nit:339 */
+      /* ../lib/standard/string.nit:631 */
       REGB4 = CALL_standard___collection___abstract_collection___SequenceRead_____bra(fra.me.REG[1])(fra.me.REG[1], REGB0);
-      /* ../lib/standard/kernel.nit:413 */
+      /* ../lib/standard/kernel.nit:471 */
       REGB4 = TAG_Int((unsigned char)UNTAG_Char(REGB4));
       REGB5 = TAG_Bool(VAL_ISA(REGB4, VTCOLOR_standard___kernel___Comparable___OTHER(REGB3), VTID_standard___kernel___Comparable___OTHER(REGB3))) /*cast OTHER*/;
       if (UNTAG_Bool(REGB5)) {
       } else {
         nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
       }
-      /* ../lib/standard/kernel.nit:232 */
+      /* ../lib/standard/kernel.nit:242 */
       REGB5 = TAG_Bool(UNTAG_Int(REGB3)<UNTAG_Int(REGB4));
-      /* ../lib/standard/string.nit:340 */
+      /* ../lib/standard/string.nit:632 */
       if (UNTAG_Bool(REGB5)) {
-        /* ../lib/standard/string.nit:341 */
-        REGB5 = TAG_Bool(true);
+        /* ../lib/standard/string.nit:633 */
+        REGB5 = TAG_Bool(1);
         goto label1;
       } else {
         REGB6 = TAG_Bool(VAL_ISA(REGB3, VTCOLOR_standard___kernel___Comparable___OTHER(REGB4), VTID_standard___kernel___Comparable___OTHER(REGB4))) /*cast OTHER*/;
@@ -1918,24 +3473,24 @@ val_t standard___string___Buffer_____l(val_t p0, val_t p1){
         } else {
           nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
         }
-        /* ../lib/standard/kernel.nit:232 */
+        /* ../lib/standard/kernel.nit:242 */
         REGB3 = TAG_Bool(UNTAG_Int(REGB4)<UNTAG_Int(REGB3));
-        /* ../lib/standard/string.nit:342 */
+        /* ../lib/standard/string.nit:634 */
         if (UNTAG_Bool(REGB3)) {
-          /* ../lib/standard/string.nit:343 */
-          REGB3 = TAG_Bool(false);
+          /* ../lib/standard/string.nit:635 */
+          REGB3 = TAG_Bool(0);
           REGB5 = REGB3;
           goto label1;
         }
       }
-      /* ../lib/standard/string.nit:345 */
+      /* ../lib/standard/string.nit:637 */
       REGB3 = TAG_Int(1);
-      /* ../lib/standard/kernel.nit:235 */
+      /* ../lib/standard/kernel.nit:245 */
       REGB3 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB3));
-      /* ../lib/standard/string.nit:345 */
+      /* ../lib/standard/string.nit:637 */
       REGB0 = REGB3;
     } else {
-      /* ../lib/standard/string.nit:337 */
+      /* ../lib/standard/string.nit:629 */
       goto label2;
     }
   }
@@ -1945,17 +3500,17 @@ val_t standard___string___Buffer_____l(val_t p0, val_t p1){
   } else {
     nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
   }
-  /* ../lib/standard/kernel.nit:232 */
+  /* ../lib/standard/kernel.nit:242 */
   REGB2 = TAG_Bool(UNTAG_Int(REGB1)<UNTAG_Int(REGB2));
-  /* ../lib/standard/string.nit:347 */
+  /* ../lib/standard/string.nit:639 */
   if (UNTAG_Bool(REGB2)) {
-    /* ../lib/standard/string.nit:348 */
-    REGB2 = TAG_Bool(true);
+    /* ../lib/standard/string.nit:640 */
+    REGB2 = TAG_Bool(1);
     REGB5 = REGB2;
     goto label1;
   } else {
-    /* ../lib/standard/string.nit:350 */
-    REGB2 = TAG_Bool(false);
+    /* ../lib/standard/string.nit:642 */
+    REGB2 = TAG_Bool(0);
     REGB5 = REGB2;
     goto label1;
   }
@@ -1963,6 +3518,7 @@ val_t standard___string___Buffer_____l(val_t p0, val_t p1){
   stack_frame_head = fra.me.prev;
   return REGB5;
 }
+static const char LOCATE_standard___string___Buffer___init[] = "string::Buffer::init";
 void standard___string___Buffer___init(val_t p0, int* init_table){
   int itpos2 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_standard___string___Buffer].i;
   struct {struct stack_frame_t me;} fra;
@@ -1971,23 +3527,24 @@ void standard___string___Buffer___init(val_t p0, int* init_table){
   if (init_table[itpos2]) return;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 354;
+  fra.me.line = 646;
   fra.me.meth = LOCATE_standard___string___Buffer___init;
   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;
-  /* ../lib/standard/string.nit:357 */
+  /* ../lib/standard/string.nit:649 */
   REGB0 = TAG_Int(5);
   CALL_standard___string___Buffer___with_capacity(fra.me.REG[0])(fra.me.REG[0], REGB0, init_table);
   stack_frame_head = fra.me.prev;
   init_table[itpos2] = 1;
   return;
 }
+static const char LOCATE_standard___string___Buffer___from[] = "string::Buffer::from";
 void standard___string___Buffer___from(val_t p0, val_t p1, int* init_table){
   int itpos3 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_standard___string___Buffer].i;
-  struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
+  struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
   val_t REGB0;
   val_t REGB1;
   val_t REGB2;
@@ -1995,14 +3552,15 @@ void standard___string___Buffer___from(val_t p0, val_t p1, int* init_table){
   if (init_table[itpos3]) return;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 360;
+  fra.me.line = 652;
   fra.me.meth = LOCATE_standard___string___Buffer___from;
   fra.me.has_broke = 0;
-  fra.me.REG_size = 3;
+  fra.me.REG_size = 4;
   fra.me.nitni_local_ref_head = NULL;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[2] = NIT_NULL;
+  fra.me.REG[3] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
   /* ../lib/standard/collection/array.nit:24 */
@@ -2012,11 +3570,11 @@ void standard___string___Buffer___from(val_t p0, val_t p1, int* init_table){
     nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
   }
   REGB0 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]);
-  /* ../lib/standard/string.nit:362 */
+  /* ../lib/standard/string.nit:654 */
   REGB1 = TAG_Int(1);
-  /* ../lib/standard/kernel.nit:235 */
+  /* ../lib/standard/kernel.nit:245 */
   REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
-  /* ../lib/standard/string.nit:362 */
+  /* ../lib/standard/string.nit:654 */
   ATTR_standard___string___Buffer____capacity(fra.me.REG[0]) = REGB1;
   /* ../lib/standard/collection/array.nit:24 */
   REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
@@ -2025,41 +3583,47 @@ void standard___string___Buffer___from(val_t p0, val_t p1, int* init_table){
     nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
   }
   REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]);
-  /* ../lib/standard/string.nit:363 */
+  /* ../lib/standard/string.nit:655 */
   ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]) = REGB1;
-  /* ../lib/standard/string.nit:364 */
+  /* ../lib/standard/string.nit:656 */
   REGB1 = TAG_Bool(ATTR_standard___string___Buffer____capacity(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB1)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_capacity", LOCATE_standard___string, 364);
+    nit_abort("Uninitialized attribute %s", "_capacity", LOCATE_standard___string, 656);
   }
   REGB1 = ATTR_standard___string___Buffer____capacity(fra.me.REG[0]);
-  /* ../lib/standard/string.nit:611 */
+  /* ../lib/standard/string.nit:1007 */
   fra.me.REG[2] = BOX_NativeString((char*)raw_alloc((UNTAG_Int(REGB1) * sizeof(char))));
-  /* ../lib/standard/string.nit:364 */
+  /* ../lib/standard/string.nit:656 */
   ATTR_standard___string___AbstractString____items(fra.me.REG[0]) = fra.me.REG[2];
-  /* ../lib/standard/string.nit:365 */
-  fra.me.REG[1] = CALL_standard___string___AbstractString___items(fra.me.REG[1])(fra.me.REG[1]);
+  /* ../lib/standard/string.nit:657 */
+  fra.me.REG[2] = CALL_standard___string___AbstractString___items(fra.me.REG[1])(fra.me.REG[1]);
   REGB1 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB1)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 365);
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 657);
   }
-  fra.me.REG[2] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
+  fra.me.REG[3] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
   REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB1)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string, 365);
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___string, 657);
   }
   REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
-  REGB0 = TAG_Int(0);
+  REGB0 = TAG_Bool(ATTR_standard___string___String____index_from(fra.me.REG[1])!=NIT_NULL);
+  if (UNTAG_Bool(REGB0)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_index_from", LOCATE_standard___string, 657);
+  }
+  REGB0 = ATTR_standard___string___String____index_from(fra.me.REG[1]);
   REGB2 = TAG_Int(0);
-  /* ../lib/standard/string.nit:597 */
-  (void)memcpy(UNBOX_NativeString(fra.me.REG[2])+UNTAG_Int(REGB2), UNBOX_NativeString(fra.me.REG[1])+UNTAG_Int(REGB0), UNTAG_Int(REGB1));;
+  /* ../lib/standard/string.nit:972 */
+  (void)memcpy(UNBOX_NativeString(fra.me.REG[3])+UNTAG_Int(REGB2), UNBOX_NativeString(fra.me.REG[2])+UNTAG_Int(REGB0), UNTAG_Int(REGB1));;
   stack_frame_head = fra.me.prev;
   init_table[itpos3] = 1;
   return;
 }
+static const char LOCATE_standard___string___Buffer___with_capacity[] = "string::Buffer::with_capacity";
 void standard___string___Buffer___with_capacity(val_t p0, val_t p1, int* init_table){
   int itpos4 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_standard___string___Buffer].i;
   struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
@@ -2070,7 +3634,7 @@ void standard___string___Buffer___with_capacity(val_t p0, val_t p1, int* init_ta
   if (init_table[itpos4]) return;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 368;
+  fra.me.line = 660;
   fra.me.meth = LOCATE_standard___string___Buffer___with_capacity;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
@@ -2079,37 +3643,38 @@ void standard___string___Buffer___with_capacity(val_t p0, val_t p1, int* init_ta
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
   REGB0 = p1;
-  /* ../lib/standard/string.nit:371 */
+  /* ../lib/standard/string.nit:663 */
   REGB1 = TAG_Int(0);
   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:233 */
+  /* ../lib/standard/kernel.nit:243 */
   REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
-  /* ../lib/standard/string.nit:371 */
+  /* ../lib/standard/string.nit:663 */
   if (UNTAG_Bool(REGB1)) {
   } else {
-    nit_abort("Assert failed", NULL, LOCATE_standard___string, 371);
+    nit_abort("Assert failed", NULL, LOCATE_standard___string, 663);
   }
-  /* ../lib/standard/string.nit:373 */
+  /* ../lib/standard/string.nit:665 */
   REGB1 = TAG_Int(1);
-  /* ../lib/standard/kernel.nit:235 */
+  /* ../lib/standard/kernel.nit:245 */
   REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
-  /* ../lib/standard/string.nit:611 */
+  /* ../lib/standard/string.nit:1007 */
   fra.me.REG[1] = BOX_NativeString((char*)raw_alloc((UNTAG_Int(REGB1) * sizeof(char))));
-  /* ../lib/standard/string.nit:373 */
+  /* ../lib/standard/string.nit:665 */
   ATTR_standard___string___AbstractString____items(fra.me.REG[0]) = fra.me.REG[1];
-  /* ../lib/standard/string.nit:374 */
+  /* ../lib/standard/string.nit:666 */
   ATTR_standard___string___Buffer____capacity(fra.me.REG[0]) = REGB0;
-  /* ../lib/standard/string.nit:375 */
+  /* ../lib/standard/string.nit:667 */
   REGB0 = TAG_Int(0);
   ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]) = REGB0;
   stack_frame_head = fra.me.prev;
   init_table[itpos4] = 1;
   return;
 }
+static const char LOCATE_standard___string___Buffer_____eqeq[] = "string::Buffer::(kernel::Object::==)";
 val_t standard___string___Buffer_____eqeq(val_t p0, val_t p1){
   struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
   val_t REGB0;
@@ -2121,7 +3686,7 @@ val_t standard___string___Buffer_____eqeq(val_t p0, val_t p1){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 378;
+  fra.me.line = 670;
   fra.me.meth = LOCATE_standard___string___Buffer_____eqeq;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
@@ -2130,17 +3695,17 @@ val_t standard___string___Buffer_____eqeq(val_t p0, val_t p1){
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
-  /* ../lib/standard/string.nit:380 */
+  /* ../lib/standard/string.nit:672 */
   REGB0 = TAG_Bool((fra.me.REG[1]!=NIT_NULL) && VAL_ISA(fra.me.REG[1], COLOR_standard___string___Buffer, ID_standard___string___Buffer)) /*cast Buffer*/;
   REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
   if (UNTAG_Bool(REGB0)) {
-    REGB0 = TAG_Bool(true);
+    REGB0 = TAG_Bool(1);
   } else {
     REGB1 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
     REGB0 = REGB1;
   }
   if (UNTAG_Bool(REGB0)) {
-    REGB0 = TAG_Bool(false);
+    REGB0 = TAG_Bool(0);
     goto label1;
   }
   /* ../lib/standard/collection/array.nit:24 */
@@ -2150,10 +3715,10 @@ val_t standard___string___Buffer_____eqeq(val_t p0, val_t p1){
     nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
   }
   REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
-  /* ../lib/standard/string.nit:382 */
+  /* ../lib/standard/string.nit:674 */
   REGB2 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
   if (UNTAG_Bool(REGB2)) {
-    nit_abort("Reciever is null", NULL, LOCATE_standard___string, 382);
+    nit_abort("Reciever is null", NULL, LOCATE_standard___string, 674);
   }
   /* ../lib/standard/collection/array.nit:24 */
   REGB2 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
@@ -2162,165 +3727,170 @@ val_t standard___string___Buffer_____eqeq(val_t p0, val_t p1){
     nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
   }
   REGB2 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[1]);
-  /* ../lib/standard/string.nit:382 */
+  /* ../lib/standard/string.nit:674 */
   REGB3 = TAG_Bool(IS_EQUAL_OO(REGB2,REGB1));
   if (UNTAG_Bool(REGB3)) {
   } else {
-    /* ../lib/standard/kernel.nit:227 */
+    /* ../lib/standard/kernel.nit:237 */
     REGB2 = TAG_Bool((REGB2)==(REGB1));
-    /* ../lib/standard/string.nit:382 */
+    /* ../lib/standard/string.nit:674 */
     REGB3 = REGB2;
   }
   REGB3 = TAG_Bool(!UNTAG_Bool(REGB3));
   if (UNTAG_Bool(REGB3)) {
-    REGB3 = TAG_Bool(false);
+    REGB3 = TAG_Bool(0);
     REGB0 = REGB3;
     goto label1;
   }
-  /* ../lib/standard/string.nit:383 */
+  /* ../lib/standard/string.nit:675 */
   REGB3 = TAG_Int(0);
-  /* ../lib/standard/string.nit:384 */
+  /* ../lib/standard/string.nit:676 */
   REGB2 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB2)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 384);
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 676);
   }
   fra.me.REG[0] = ATTR_standard___string___AbstractString____items(fra.me.REG[0]);
-  /* ../lib/standard/string.nit:385 */
+  /* ../lib/standard/string.nit:677 */
   REGB2 = TAG_Bool(ATTR_standard___string___AbstractString____items(fra.me.REG[1])!=NIT_NULL);
   if (UNTAG_Bool(REGB2)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 385);
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_standard___string, 677);
   }
   fra.me.REG[1] = ATTR_standard___string___AbstractString____items(fra.me.REG[1]);
-  /* ../lib/standard/string.nit:386 */
+  /* ../lib/standard/string.nit:678 */
   while(1) {
     REGB2 = TAG_Bool(VAL_ISA(REGB1, VTCOLOR_standard___kernel___Comparable___OTHER(REGB3), VTID_standard___kernel___Comparable___OTHER(REGB3))) /*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:242 */
     REGB2 = TAG_Bool(UNTAG_Int(REGB3)<UNTAG_Int(REGB1));
-    /* ../lib/standard/string.nit:386 */
+    /* ../lib/standard/string.nit:678 */
     if (UNTAG_Bool(REGB2)) {
-      /* ../lib/standard/string.nit:595 */
+      /* ../lib/standard/string.nit:970 */
       REGB2 = TAG_Char(UNBOX_NativeString(fra.me.REG[0])[UNTAG_Int(REGB3)]);
       REGB4 = TAG_Char(UNBOX_NativeString(fra.me.REG[1])[UNTAG_Int(REGB3)]);
-      /* ../lib/standard/string.nit:387 */
+      /* ../lib/standard/string.nit:679 */
       REGB5 = TAG_Bool(IS_EQUAL_OO(REGB2,REGB4));
       if (UNTAG_Bool(REGB5)) {
       } else {
-        /* ../lib/standard/kernel.nit:378 */
+        /* ../lib/standard/kernel.nit:434 */
         REGB4 = TAG_Bool((REGB2)==(REGB4));
-        /* ../lib/standard/string.nit:387 */
+        /* ../lib/standard/string.nit:679 */
         REGB5 = REGB4;
       }
       REGB5 = TAG_Bool(!UNTAG_Bool(REGB5));
       if (UNTAG_Bool(REGB5)) {
-        REGB5 = TAG_Bool(false);
+        REGB5 = TAG_Bool(0);
         REGB0 = REGB5;
         goto label1;
       }
-      /* ../lib/standard/string.nit:388 */
+      /* ../lib/standard/string.nit:680 */
       REGB5 = TAG_Int(1);
-      /* ../lib/standard/kernel.nit:235 */
+      /* ../lib/standard/kernel.nit:245 */
       REGB5 = TAG_Int(UNTAG_Int(REGB3)+UNTAG_Int(REGB5));
-      /* ../lib/standard/string.nit:388 */
+      /* ../lib/standard/string.nit:680 */
       REGB3 = REGB5;
     } else {
-      /* ../lib/standard/string.nit:386 */
+      /* ../lib/standard/string.nit:678 */
       goto label2;
     }
   }
   label2: while(0);
-  /* ../lib/standard/string.nit:390 */
-  REGB3 = TAG_Bool(true);
+  /* ../lib/standard/string.nit:682 */
+  REGB3 = TAG_Bool(1);
   REGB0 = REGB3;
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
   return REGB0;
 }
+static const char LOCATE_standard___string___Buffer___capacity[] = "string::Buffer::capacity";
 val_t standard___string___Buffer___capacity(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_standard___string;
-  fra.me.line = 393;
+  fra.me.line = 685;
   fra.me.meth = LOCATE_standard___string___Buffer___capacity;
   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;
-  /* ../lib/standard/string.nit:393 */
+  /* ../lib/standard/string.nit:685 */
   REGB0 = TAG_Bool(ATTR_standard___string___Buffer____capacity(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB0)) {
   } else {
-    nit_abort("Uninitialized attribute %s", "_capacity", LOCATE_standard___string, 393);
+    nit_abort("Uninitialized attribute %s", "_capacity", LOCATE_standard___string, 685);
   }
   REGB0 = ATTR_standard___string___Buffer____capacity(fra.me.REG[0]);
   stack_frame_head = fra.me.prev;
   return REGB0;
 }
+static const char LOCATE_standard___string___Object___to_s[] = "string::Object::to_s";
 val_t standard___string___Object___to_s(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_standard___string;
-  fra.me.line = 403;
+  fra.me.line = 693;
   fra.me.meth = LOCATE_standard___string___Object___to_s;
   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;
-  /* ../lib/standard/string.nit:404 */
+  /* ../lib/standard/string.nit:694 */
   fra.me.REG[0] = CALL_standard___string___Object___inspect(fra.me.REG[0])(fra.me.REG[0]);
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
   return fra.me.REG[0];
 }
+static const char LOCATE_standard___string___Object___native_class_name[] = "string::Object::native_class_name";
 val_t standard___string___Object___native_class_name(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_standard___string;
-  fra.me.line = 406;
+  fra.me.line = 696;
   fra.me.meth = LOCATE_standard___string___Object___native_class_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;
-  /* ../lib/standard/string.nit:406 */
+  /* ../lib/standard/string.nit:696 */
   fra.me.REG[0] = BOX_NativeString(VAL2VFT(fra.me.REG[0])[2].cname);;
   stack_frame_head = fra.me.prev;
   return fra.me.REG[0];
 }
+static const char LOCATE_standard___string___Object___class_name[] = "string::Object::class_name";
 val_t standard___string___Object___class_name(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_standard___string;
-  fra.me.line = 409;
+  fra.me.line = 699;
   fra.me.meth = LOCATE_standard___string___Object___class_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;
-  /* ../lib/standard/string.nit:411 */
+  /* ../lib/standard/string.nit:702 */
   fra.me.REG[0] = CALL_standard___string___Object___native_class_name(fra.me.REG[0])(fra.me.REG[0]);
-  fra.me.REG[0] = NEW_String_standard___string___String___from_cstring(fra.me.REG[0]);
+  fra.me.REG[0] = CALL_standard___string___Object___to_s(fra.me.REG[0])(fra.me.REG[0]);
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
   return fra.me.REG[0];
 }
+static const char LOCATE_standard___string___Object___inspect[] = "string::Object::inspect";
 val_t standard___string___Object___inspect(val_t p0){
   struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
   val_t REGB0;
@@ -2329,7 +3899,7 @@ val_t standard___string___Object___inspect(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_standard___string;
-  fra.me.line = 413;
+  fra.me.line = 704;
   fra.me.meth = LOCATE_standard___string___Object___inspect;
   fra.me.has_broke = 0;
   fra.me.REG_size = 3;
@@ -2338,13 +3908,13 @@ val_t standard___string___Object___inspect(val_t p0){
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[2] = NIT_NULL;
   fra.me.REG[0] = p0;
-  /* ../lib/standard/string.nit:417 */
+  /* ../lib/standard/string.nit:708 */
   REGB0 = TAG_Int(3);
   fra.me.REG[1] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0);
   if (!once_value_1) {
     fra.me.REG[2] = BOX_NativeString("<");
     REGB0 = TAG_Int(1);
-    fra.me.REG[2] = NEW_String_standard___string___String___with_native(fra.me.REG[2], REGB0);
+    fra.me.REG[2] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[2])(fra.me.REG[2], REGB0);
     once_value_1 = fra.me.REG[2];
     register_static_object(&once_value_1);
   } else fra.me.REG[2] = once_value_1;
@@ -2355,7 +3925,7 @@ val_t standard___string___Object___inspect(val_t p0){
   if (!once_value_2) {
     fra.me.REG[0] = BOX_NativeString(">");
     REGB0 = TAG_Int(1);
-    fra.me.REG[0] = NEW_String_standard___string___String___with_native(fra.me.REG[0], REGB0);
+    fra.me.REG[0] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[0])(fra.me.REG[0], REGB0);
     once_value_2 = fra.me.REG[0];
     register_static_object(&once_value_2);
   } else fra.me.REG[0] = once_value_2;
@@ -2367,6 +3937,7 @@ val_t standard___string___Object___inspect(val_t p0){
   stack_frame_head = fra.me.prev;
   return fra.me.REG[1];
 }
+static const char LOCATE_standard___string___Object___inspect_head[] = "string::Object::inspect_head";
 val_t standard___string___Object___inspect_head(val_t p0){
   struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
   val_t REGB0;
@@ -2376,7 +3947,7 @@ val_t standard___string___Object___inspect_head(val_t p0){
   static val_t once_value_3; /* Once value */
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 420;
+  fra.me.line = 711;
   fra.me.meth = LOCATE_standard___string___Object___inspect_head;
   fra.me.has_broke = 0;
   fra.me.REG_size = 3;
@@ -2385,13 +3956,13 @@ val_t standard___string___Object___inspect_head(val_t p0){
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[2] = NIT_NULL;
   fra.me.REG[0] = p0;
-  /* ../lib/standard/string.nit:424 */
+  /* ../lib/standard/string.nit:715 */
   REGB0 = TAG_Int(5);
   fra.me.REG[1] = NEW_Array_standard___collection___array___Array___with_capacity(REGB0);
   if (!once_value_1) {
     fra.me.REG[2] = BOX_NativeString("");
     REGB0 = TAG_Int(0);
-    fra.me.REG[2] = NEW_String_standard___string___String___with_native(fra.me.REG[2], REGB0);
+    fra.me.REG[2] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[2])(fra.me.REG[2], REGB0);
     once_value_1 = fra.me.REG[2];
     register_static_object(&once_value_1);
   } else fra.me.REG[2] = once_value_1;
@@ -2402,7 +3973,7 @@ val_t standard___string___Object___inspect_head(val_t p0){
   if (!once_value_2) {
     fra.me.REG[2] = BOX_NativeString(":#");
     REGB0 = TAG_Int(2);
-    fra.me.REG[2] = NEW_String_standard___string___String___with_native(fra.me.REG[2], REGB0);
+    fra.me.REG[2] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[2])(fra.me.REG[2], REGB0);
     once_value_2 = fra.me.REG[2];
     register_static_object(&once_value_2);
   } else fra.me.REG[2] = once_value_2;
@@ -2414,7 +3985,7 @@ val_t standard___string___Object___inspect_head(val_t p0){
   if (!once_value_3) {
     fra.me.REG[0] = BOX_NativeString("");
     REGB0 = TAG_Int(0);
-    fra.me.REG[0] = NEW_String_standard___string___String___with_native(fra.me.REG[0], REGB0);
+    fra.me.REG[0] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[0])(fra.me.REG[0], REGB0);
     once_value_3 = fra.me.REG[0];
     register_static_object(&once_value_3);
   } else fra.me.REG[0] = once_value_3;
@@ -2426,19 +3997,20 @@ val_t standard___string___Object___inspect_head(val_t p0){
   stack_frame_head = fra.me.prev;
   return fra.me.REG[1];
 }
+static const char LOCATE_standard___string___Object___args[] = "string::Object::args";
 val_t standard___string___Object___args(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_standard___string;
-  fra.me.line = 427;
+  fra.me.line = 718;
   fra.me.meth = LOCATE_standard___string___Object___args;
   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;
-  /* ../lib/standard/string.nit:429 */
+  /* ../lib/standard/string.nit:720 */
   fra.me.REG[0] = CALL_standard___kernel___Object___sys(fra.me.REG[0])(fra.me.REG[0]);
   fra.me.REG[0] = CALL_standard___string___Object___args(fra.me.REG[0])(fra.me.REG[0]);
   goto label1;
@@ -2446,6 +4018,7 @@ val_t standard___string___Object___args(val_t p0){
   stack_frame_head = fra.me.prev;
   return fra.me.REG[0];
 }
+static const char LOCATE_standard___string___Bool___to_s[] = "string::Bool::(string::Object::to_s)";
 val_t standard___string___Bool___to_s(val_t p0){
   struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
   val_t REGB0;
@@ -2456,7 +4029,7 @@ val_t standard___string___Bool___to_s(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_standard___string;
-  fra.me.line = 434;
+  fra.me.line = 725;
   fra.me.meth = LOCATE_standard___string___Bool___to_s;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
@@ -2464,14 +4037,14 @@ val_t standard___string___Bool___to_s(val_t p0){
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[1] = NIT_NULL;
   REGB0 = p0;
-  /* ../lib/standard/string.nit:436 */
+  /* ../lib/standard/string.nit:729 */
   if (UNTAG_Bool(REGB0)) {
-    /* ../lib/standard/string.nit:437 */
+    /* ../lib/standard/string.nit:730 */
     if (!once_value_1) {
       if (!once_value_2) {
         fra.me.REG[0] = BOX_NativeString("true");
         REGB0 = TAG_Int(4);
-        fra.me.REG[0] = NEW_String_standard___string___String___with_native(fra.me.REG[0], REGB0);
+        fra.me.REG[0] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[0])(fra.me.REG[0], REGB0);
         once_value_2 = fra.me.REG[0];
         register_static_object(&once_value_2);
       } else fra.me.REG[0] = once_value_2;
@@ -2482,12 +4055,12 @@ val_t standard___string___Bool___to_s(val_t p0){
     fra.me.REG[0] = fra.me.REG[0];
     goto label3;
   } else {
-    /* ../lib/standard/string.nit:439 */
+    /* ../lib/standard/string.nit:732 */
     if (!once_value_4) {
       if (!once_value_5) {
         fra.me.REG[1] = BOX_NativeString("false");
         REGB0 = TAG_Int(5);
-        fra.me.REG[1] = NEW_String_standard___string___String___with_native(fra.me.REG[1], REGB0);
+        fra.me.REG[1] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[1])(fra.me.REG[1], REGB0);
         once_value_5 = fra.me.REG[1];
         register_static_object(&once_value_5);
       } else fra.me.REG[1] = once_value_5;
@@ -2503,6 +4076,7 @@ val_t standard___string___Bool___to_s(val_t p0){
   stack_frame_head = fra.me.prev;
   return fra.me.REG[0];
 }
+static const char LOCATE_standard___string___Int___fill_buffer[] = "string::Int::fill_buffer";
 void standard___string___Int___fill_buffer(val_t p0, val_t p1, val_t p2, val_t p3){
   struct {struct stack_frame_t me;} fra;
   val_t REGB0;
@@ -2513,7 +4087,7 @@ void standard___string___Int___fill_buffer(val_t p0, val_t p1, val_t p2, val_t p
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 445;
+  fra.me.line = 738;
   fra.me.meth = LOCATE_standard___string___Int___fill_buffer;
   fra.me.has_broke = 0;
   fra.me.REG_size = 1;
@@ -2523,52 +4097,52 @@ void standard___string___Int___fill_buffer(val_t p0, val_t p1, val_t p2, val_t p
   fra.me.REG[0] = p1;
   REGB1 = p2;
   REGB2 = p3;
-  /* ../lib/standard/string.nit:451 */
+  /* ../lib/standard/string.nit:744 */
   REGB2 = TAG_Int(0);
   REGB3 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
   if (UNTAG_Bool(REGB3)) {
   } else {
     nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
   }
-  /* ../lib/standard/kernel.nit:232 */
+  /* ../lib/standard/kernel.nit:242 */
   REGB2 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB2));
-  /* ../lib/standard/string.nit:451 */
+  /* ../lib/standard/string.nit:744 */
   if (UNTAG_Bool(REGB2)) {
-    /* ../lib/standard/kernel.nit:236 */
+    /* ../lib/standard/kernel.nit:246 */
     REGB2 = TAG_Int(-UNTAG_Int(REGB0));
-    /* ../lib/standard/string.nit:453 */
+    /* ../lib/standard/string.nit:746 */
     REGB3 = TAG_Int(0);
     REGB4 = TAG_Char('-');
     CALL_standard___collection___abstract_collection___Sequence_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB3, REGB4);
   } else {
-    /* ../lib/standard/string.nit:454 */
+    /* ../lib/standard/string.nit:747 */
     REGB4 = TAG_Int(0);
     REGB3 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB4));
     if (UNTAG_Bool(REGB3)) {
     } else {
-      /* ../lib/standard/kernel.nit:227 */
+      /* ../lib/standard/kernel.nit:237 */
       REGB4 = TAG_Bool((REGB0)==(REGB4));
-      /* ../lib/standard/string.nit:454 */
+      /* ../lib/standard/string.nit:747 */
       REGB3 = REGB4;
     }
     if (UNTAG_Bool(REGB3)) {
-      /* ../lib/standard/string.nit:455 */
+      /* ../lib/standard/string.nit:748 */
       REGB3 = TAG_Int(0);
       REGB4 = TAG_Char('0');
       CALL_standard___collection___abstract_collection___Sequence_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB3, REGB4);
-      /* ../lib/standard/string.nit:456 */
+      /* ../lib/standard/string.nit:749 */
       goto label1;
     } else {
-      /* ../lib/standard/string.nit:458 */
+      /* ../lib/standard/string.nit:751 */
       REGB2 = REGB0;
     }
   }
-  /* ../lib/standard/string.nit:461 */
+  /* ../lib/standard/string.nit:754 */
   REGB0 = CALL_standard___kernel___Int___digit_count(REGB0)(REGB0, REGB1);
   REGB4 = TAG_Int(1);
-  /* ../lib/standard/kernel.nit:237 */
+  /* ../lib/standard/kernel.nit:247 */
   REGB4 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB4));
-  /* ../lib/standard/string.nit:462 */
+  /* ../lib/standard/string.nit:755 */
   while(1) {
     REGB0 = TAG_Int(0);
     REGB3 = TAG_Bool(VAL_ISA(REGB0, VTCOLOR_standard___kernel___Comparable___OTHER(REGB4), VTID_standard___kernel___Comparable___OTHER(REGB4))) /*cast OTHER*/;
@@ -2576,9 +4150,9 @@ void standard___string___Int___fill_buffer(val_t p0, val_t p1, val_t p2, val_t p
     } else {
       nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
     }
-    /* ../lib/standard/kernel.nit:233 */
+    /* ../lib/standard/kernel.nit:243 */
     REGB0 = TAG_Bool(UNTAG_Int(REGB4)>=UNTAG_Int(REGB0));
-    /* ../lib/standard/string.nit:462 */
+    /* ../lib/standard/string.nit:755 */
     if (UNTAG_Bool(REGB0)) {
       REGB0 = TAG_Int(0);
       REGB3 = TAG_Bool(VAL_ISA(REGB0, VTCOLOR_standard___kernel___Comparable___OTHER(REGB2), VTID_standard___kernel___Comparable___OTHER(REGB2))) /*cast OTHER*/;
@@ -2586,31 +4160,31 @@ void standard___string___Int___fill_buffer(val_t p0, val_t p1, val_t p2, val_t p
       } else {
         nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
       }
-      /* ../lib/standard/kernel.nit:234 */
+      /* ../lib/standard/kernel.nit:244 */
       REGB0 = TAG_Bool(UNTAG_Int(REGB2)>UNTAG_Int(REGB0));
     } else {
-      /* ../lib/standard/string.nit:462 */
-      REGB3 = TAG_Bool(false);
+      /* ../lib/standard/string.nit:755 */
+      REGB3 = TAG_Bool(0);
       REGB0 = REGB3;
     }
     if (UNTAG_Bool(REGB0)) {
-      /* ../lib/standard/kernel.nit:240 */
+      /* ../lib/standard/kernel.nit:250 */
       REGB0 = TAG_Int(UNTAG_Int(REGB2)%UNTAG_Int(REGB1));
-      /* ../lib/standard/string.nit:463 */
+      /* ../lib/standard/string.nit:756 */
       REGB0 = CALL_standard___kernel___Int___to_c(REGB0)(REGB0);
       CALL_standard___collection___abstract_collection___Sequence_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB4, REGB0);
-      /* ../lib/standard/kernel.nit:239 */
+      /* ../lib/standard/kernel.nit:249 */
       REGB0 = TAG_Int(UNTAG_Int(REGB2)/UNTAG_Int(REGB1));
-      /* ../lib/standard/string.nit:464 */
+      /* ../lib/standard/string.nit:757 */
       REGB2 = REGB0;
-      /* ../lib/standard/string.nit:465 */
+      /* ../lib/standard/string.nit:758 */
       REGB0 = TAG_Int(1);
-      /* ../lib/standard/kernel.nit:237 */
+      /* ../lib/standard/kernel.nit:247 */
       REGB0 = TAG_Int(UNTAG_Int(REGB4)-UNTAG_Int(REGB0));
-      /* ../lib/standard/string.nit:465 */
+      /* ../lib/standard/string.nit:758 */
       REGB4 = REGB0;
     } else {
-      /* ../lib/standard/string.nit:462 */
+      /* ../lib/standard/string.nit:755 */
       goto label2;
     }
   }
@@ -2619,30 +4193,54 @@ void standard___string___Int___fill_buffer(val_t p0, val_t p1, val_t p2, val_t p
   stack_frame_head = fra.me.prev;
   return;
 }
+static const char LOCATE_standard___string___Int___native_int_to_s[] = "string::Int::native_int_to_s";
+val_t standard___string___Int___native_int_to_s(val_t p0, val_t p1){
+  struct {struct stack_frame_t me;} fra;
+  val_t REGB0;
+  val_t REGB1;
+  val_t tmp;
+  fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+  fra.me.file = LOCATE_standard___string;
+  fra.me.line = 762;
+  fra.me.meth = LOCATE_standard___string___Int___native_int_to_s;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 1;
+  fra.me.nitni_local_ref_head = NULL;
+  fra.me.REG[0] = NIT_NULL;
+  REGB0 = p0;
+  REGB1 = p1;
+  /* ../lib/standard/string.nit:762 */
+  fra.me.REG[0] = Int_native_int_to_s___out(REGB0, REGB1);
+  stack_frame_head = fra.me.prev;
+  return fra.me.REG[0];
+}
+static const char LOCATE_standard___string___Int___to_s[] = "string::Int::(string::Object::to_s)";
 val_t standard___string___Int___to_s(val_t p0){
   struct {struct stack_frame_t me;} fra;
   val_t REGB0;
   val_t REGB1;
-  val_t REGB2;
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 469;
+  fra.me.line = 765;
   fra.me.meth = LOCATE_standard___string___Int___to_s;
   fra.me.has_broke = 0;
   fra.me.REG_size = 1;
   fra.me.nitni_local_ref_head = NULL;
   fra.me.REG[0] = NIT_NULL;
   REGB0 = p0;
-  /* ../lib/standard/string.nit:470 */
+  /* ../lib/standard/string.nit:770 */
   REGB1 = TAG_Int(10);
-  REGB2 = TAG_Bool(true);
-  fra.me.REG[0] = CALL_standard___string___Int___to_base(REGB0)(REGB0, REGB1, REGB2);
+  REGB1 = CALL_standard___kernel___Int___digit_count(REGB0)(REGB0, REGB1);
+  /* ../lib/standard/string.nit:771 */
+  fra.me.REG[0] = CALL_standard___string___Int___native_int_to_s(REGB0)(REGB0, REGB1);
+  fra.me.REG[0] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[0])(fra.me.REG[0], REGB1);
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
   return fra.me.REG[0];
 }
+static const char LOCATE_standard___string___Int___to_hex[] = "string::Int::to_hex";
 val_t standard___string___Int___to_hex(val_t p0){
   struct {struct stack_frame_t me;} fra;
   val_t REGB0;
@@ -2651,241 +4249,617 @@ val_t standard___string___Int___to_hex(val_t p0){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 472;
+  fra.me.line = 774;
   fra.me.meth = LOCATE_standard___string___Int___to_hex;
   fra.me.has_broke = 0;
   fra.me.REG_size = 1;
   fra.me.nitni_local_ref_head = NULL;
   fra.me.REG[0] = NIT_NULL;
   REGB0 = p0;
-  /* ../lib/standard/string.nit:473 */
+  /* ../lib/standard/string.nit:775 */
   REGB1 = TAG_Int(16);
-  REGB2 = TAG_Bool(false);
+  REGB2 = TAG_Bool(0);
   fra.me.REG[0] = CALL_standard___string___Int___to_base(REGB0)(REGB0, REGB1, REGB2);
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
   return fra.me.REG[0];
 }
-val_t standard___string___Int___to_base(val_t p0, val_t p1, val_t p2){
+static const char LOCATE_standard___string___Int___to_base[] = "string::Int::to_base";
+val_t standard___string___Int___to_base(val_t p0, val_t p1, val_t p2){
+  struct {struct stack_frame_t me;} fra;
+  val_t REGB0;
+  val_t REGB1;
+  val_t REGB2;
+  val_t REGB3;
+  val_t REGB4;
+  val_t tmp;
+  static val_t once_value_1; /* Once value */
+  fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+  fra.me.file = LOCATE_standard___string;
+  fra.me.line = 777;
+  fra.me.meth = LOCATE_standard___string___Int___to_base;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 1;
+  fra.me.nitni_local_ref_head = NULL;
+  fra.me.REG[0] = NIT_NULL;
+  REGB0 = p0;
+  REGB1 = p1;
+  REGB2 = p2;
+  /* ../lib/standard/string.nit:780 */
+  REGB3 = CALL_standard___kernel___Int___digit_count(REGB0)(REGB0, REGB1);
+  /* ../lib/standard/string.nit:781 */
+  if (!once_value_1) {
+    fra.me.REG[0] = BOX_NativeString(" ");
+    REGB4 = TAG_Int(1);
+    fra.me.REG[0] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[0])(fra.me.REG[0], REGB4);
+    once_value_1 = fra.me.REG[0];
+    register_static_object(&once_value_1);
+  } else fra.me.REG[0] = once_value_1;
+  fra.me.REG[0] = fra.me.REG[0];
+  fra.me.REG[0] = CALL_standard___string___String_____star(fra.me.REG[0])(fra.me.REG[0], REGB3);
+  fra.me.REG[0] = NEW_Buffer_standard___string___Buffer___from(fra.me.REG[0]);
+  /* ../lib/standard/string.nit:782 */
+  CALL_standard___string___Int___fill_buffer(REGB0)(REGB0, fra.me.REG[0], REGB1, REGB2);
+  /* ../lib/standard/string.nit:783 */
+  fra.me.REG[0] = CALL_standard___string___Object___to_s(fra.me.REG[0])(fra.me.REG[0]);
+  goto label2;
+  label2: while(0);
+  stack_frame_head = fra.me.prev;
+  return fra.me.REG[0];
+}
+static const char LOCATE_standard___string___Float___to_s[] = "string::Float::(string::Object::to_s)";
+val_t standard___string___Float___to_s(val_t p0){
+  struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
+  val_t REGB0;
+  val_t REGB1;
+  val_t REGB2;
+  val_t REGB3;
+  val_t REGB4;
+  val_t REGB5;
+  val_t REGB6;
+  val_t tmp;
+  fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+  fra.me.file = LOCATE_standard___string;
+  fra.me.line = 788;
+  fra.me.meth = LOCATE_standard___string___Float___to_s;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 3;
+  fra.me.nitni_local_ref_head = NULL;
+  fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[1] = NIT_NULL;
+  fra.me.REG[2] = NIT_NULL;
+  fra.me.REG[0] = p0;
+  /* ../lib/standard/string.nit:790 */
+  REGB0 = TAG_Int(3);
+  fra.me.REG[0] = CALL_standard___string___Float___to_precision(fra.me.REG[0])(fra.me.REG[0], REGB0);
+  /* ../lib/standard/collection/array.nit:24 */
+  REGB0 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB0)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
+  }
+  REGB0 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
+  /* ../lib/standard/string.nit:792 */
+  REGB1 = TAG_Int(0);
+  REGB2 = TAG_Int(1);
+  /* ../lib/standard/kernel.nit:247 */
+  REGB2 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB2));
+  /* ../lib/standard/kernel.nit:393 */
+  while(1) {
+    REGB3 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1), VTID_standard___kernel___Comparable___OTHER(REGB1))) /*cast OTHER*/;
+    if (UNTAG_Bool(REGB3)) {
+    } else {
+      nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
+    }
+    /* ../lib/standard/kernel.nit:241 */
+    REGB3 = TAG_Bool(UNTAG_Int(REGB1)<=UNTAG_Int(REGB2));
+    /* ../lib/standard/kernel.nit:393 */
+    if (UNTAG_Bool(REGB3)) {
+      /* ../lib/standard/string.nit:792 */
+      REGB3 = REGB1;
+      /* ../lib/standard/string.nit:793 */
+      REGB4 = TAG_Int(1);
+      /* ../lib/standard/kernel.nit:247 */
+      REGB4 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB4));
+      REGB3 = TAG_Int(UNTAG_Int(REGB4)-UNTAG_Int(REGB3));
+      /* ../lib/standard/string.nit:794 */
+      REGB4 = CALL_standard___collection___abstract_collection___SequenceRead_____bra(fra.me.REG[0])(fra.me.REG[0], REGB3);
+      /* ../lib/standard/string.nit:795 */
+      REGB5 = TAG_Char('0');
+      REGB6 = TAG_Bool(IS_EQUAL_OO(REGB4,REGB5));
+      if (UNTAG_Bool(REGB6)) {
+      } else {
+        /* ../lib/standard/kernel.nit:434 */
+        REGB5 = TAG_Bool((REGB4)==(REGB5));
+        /* ../lib/standard/string.nit:795 */
+        REGB6 = REGB5;
+      }
+      if (UNTAG_Bool(REGB6)) {
+        /* ../lib/standard/string.nit:796 */
+        goto label1;
+      } else {
+        /* ../lib/standard/string.nit:797 */
+        REGB6 = TAG_Char('.');
+        REGB5 = TAG_Bool(IS_EQUAL_OO(REGB4,REGB6));
+        if (UNTAG_Bool(REGB5)) {
+        } else {
+          /* ../lib/standard/kernel.nit:434 */
+          REGB6 = TAG_Bool((REGB4)==(REGB6));
+          /* ../lib/standard/string.nit:797 */
+          REGB5 = REGB6;
+        }
+        if (UNTAG_Bool(REGB5)) {
+          /* ../lib/standard/string.nit:798 */
+          REGB5 = TAG_Int(0);
+          REGB6 = TAG_Int(2);
+          /* ../lib/standard/kernel.nit:245 */
+          REGB6 = TAG_Int(UNTAG_Int(REGB3)+UNTAG_Int(REGB6));
+          /* ../lib/standard/string.nit:798 */
+          fra.me.REG[1] = CALL_standard___string___AbstractString___substring(fra.me.REG[0])(fra.me.REG[0], REGB5, REGB6);
+          goto label2;
+        } else {
+          /* ../lib/standard/string.nit:800 */
+          REGB6 = TAG_Int(0);
+          REGB5 = TAG_Int(1);
+          /* ../lib/standard/kernel.nit:245 */
+          REGB5 = TAG_Int(UNTAG_Int(REGB3)+UNTAG_Int(REGB5));
+          /* ../lib/standard/string.nit:800 */
+          fra.me.REG[2] = CALL_standard___string___AbstractString___substring(fra.me.REG[0])(fra.me.REG[0], REGB6, REGB5);
+          fra.me.REG[1] = fra.me.REG[2];
+          goto label2;
+        }
+      }
+      label1: while(0);
+      /* ../lib/standard/kernel.nit:395 */
+      REGB5 = TAG_Int(1);
+      /* ../lib/standard/kernel.nit:245 */
+      REGB5 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB5));
+      /* ../lib/standard/kernel.nit:395 */
+      REGB1 = REGB5;
+    } else {
+      /* ../lib/standard/kernel.nit:393 */
+      goto label3;
+    }
+  }
+  label3: while(0);
+  /* ../lib/standard/string.nit:803 */
+  fra.me.REG[1] = fra.me.REG[0];
+  goto label2;
+  label2: while(0);
+  stack_frame_head = fra.me.prev;
+  return fra.me.REG[1];
+}
+static const char LOCATE_standard___string___Float___to_precision[] = "string::Float::to_precision";
+val_t standard___string___Float___to_precision(val_t p0, val_t p1){
+  struct {struct stack_frame_t me; val_t MORE_REG[4];} fra;
+  val_t REGB0;
+  val_t REGB1;
+  val_t REGB2;
+  val_t REGB3;
+  val_t tmp;
+    static val_t once_value_3; /* Once value */
+    static val_t once_value_4; /* Once value */
+    static val_t once_value_5; /* Once value */
+    static val_t once_value_6; /* Once value */
+  fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+  fra.me.file = LOCATE_standard___string;
+  fra.me.line = 806;
+  fra.me.meth = LOCATE_standard___string___Float___to_precision;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 5;
+  fra.me.nitni_local_ref_head = NULL;
+  fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[1] = NIT_NULL;
+  fra.me.REG[2] = NIT_NULL;
+  fra.me.REG[3] = NIT_NULL;
+  fra.me.REG[4] = NIT_NULL;
+  fra.me.REG[0] = p0;
+  REGB0 = p1;
+  /* ../lib/standard/string.nit:809 */
+  REGB1 = TAG_Int(0);
+  REGB2 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB1));
+  if (UNTAG_Bool(REGB2)) {
+  } else {
+    /* ../lib/standard/kernel.nit:237 */
+    REGB1 = TAG_Bool((REGB0)==(REGB1));
+    /* ../lib/standard/string.nit:809 */
+    REGB2 = REGB1;
+  }
+  if (UNTAG_Bool(REGB2)) {
+    /* ../lib/standard/kernel.nit:220 */
+    REGB2 = TAG_Int((bigint)UNBOX_Float(fra.me.REG[0]));
+    /* ../lib/standard/string.nit:809 */
+    fra.me.REG[1] = CALL_standard___string___Object___to_s(REGB2)(REGB2);
+    goto label1;
+  }
+  /* ../lib/standard/string.nit:810 */
+  fra.me.REG[2] = fra.me.REG[0];
+  /* ../lib/standard/string.nit:811 */
+  REGB2 = TAG_Int(0);
+  /* ../lib/standard/kernel.nit:399 */
+  REGB1 = REGB0;
+  /* ../lib/standard/kernel.nit:404 */
+  while(1) {
+    REGB3 = TAG_Bool(VAL_ISA(REGB1, VTCOLOR_standard___kernel___Comparable___OTHER(REGB2), VTID_standard___kernel___Comparable___OTHER(REGB2))) /*cast OTHER*/;
+    if (UNTAG_Bool(REGB3)) {
+    } else {
+      nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
+    }
+    /* ../lib/standard/kernel.nit:242 */
+    REGB3 = TAG_Bool(UNTAG_Int(REGB2)<UNTAG_Int(REGB1));
+    /* ../lib/standard/kernel.nit:404 */
+    if (UNTAG_Bool(REGB3)) {
+      /* ../lib/standard/string.nit:811 */
+      fra.me.REG[3] = BOX_Float(10.0);
+      /* ../lib/standard/kernel.nit:217 */
+      fra.me.REG[3] = BOX_Float(UNBOX_Float(fra.me.REG[2])*UNBOX_Float(fra.me.REG[3]));
+      /* ../lib/standard/string.nit:811 */
+      fra.me.REG[2] = fra.me.REG[3];
+      /* ../lib/standard/kernel.nit:406 */
+      REGB3 = TAG_Int(1);
+      /* ../lib/standard/kernel.nit:245 */
+      REGB3 = TAG_Int(UNTAG_Int(REGB2)+UNTAG_Int(REGB3));
+      /* ../lib/standard/kernel.nit:406 */
+      REGB2 = REGB3;
+    } else {
+      /* ../lib/standard/kernel.nit:404 */
+      goto label2;
+    }
+  }
+  label2: while(0);
+  /* ../lib/standard/string.nit:812 */
+  fra.me.REG[3] = BOX_Float(0.0);
+  /* ../lib/standard/kernel.nit:213 */
+  REGB2 = TAG_Bool(UNBOX_Float(fra.me.REG[0])>UNBOX_Float(fra.me.REG[3]));
+  /* ../lib/standard/string.nit:812 */
+  if (UNTAG_Bool(REGB2)) {
+    /* ../lib/standard/string.nit:813 */
+    fra.me.REG[3] = BOX_Float(0.5);
+    /* ../lib/standard/kernel.nit:214 */
+    fra.me.REG[3] = BOX_Float(UNBOX_Float(fra.me.REG[2])+UNBOX_Float(fra.me.REG[3]));
+    /* ../lib/standard/string.nit:813 */
+    fra.me.REG[2] = fra.me.REG[3];
+  } else {
+    /* ../lib/standard/string.nit:815 */
+    fra.me.REG[3] = BOX_Float(0.5);
+    /* ../lib/standard/kernel.nit:216 */
+    fra.me.REG[3] = BOX_Float(UNBOX_Float(fra.me.REG[2])-UNBOX_Float(fra.me.REG[3]));
+    /* ../lib/standard/string.nit:815 */
+    fra.me.REG[2] = fra.me.REG[3];
+  }
+  /* ../lib/standard/kernel.nit:220 */
+  REGB2 = TAG_Int((bigint)UNBOX_Float(fra.me.REG[2]));
+  /* ../lib/standard/string.nit:818 */
+  REGB1 = TAG_Int(0);
+  REGB3 = TAG_Bool(IS_EQUAL_OO(REGB2,REGB1));
+  if (UNTAG_Bool(REGB3)) {
+  } else {
+    /* ../lib/standard/kernel.nit:237 */
+    REGB1 = TAG_Bool((REGB2)==(REGB1));
+    /* ../lib/standard/string.nit:818 */
+    REGB3 = REGB1;
+  }
+  if (UNTAG_Bool(REGB3)) {
+    if (!once_value_3) {
+      fra.me.REG[2] = BOX_NativeString("0.0");
+      REGB3 = TAG_Int(3);
+      fra.me.REG[2] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[2])(fra.me.REG[2], REGB3);
+      once_value_3 = fra.me.REG[2];
+      register_static_object(&once_value_3);
+    } else fra.me.REG[2] = once_value_3;
+    fra.me.REG[2] = fra.me.REG[2];
+    fra.me.REG[1] = fra.me.REG[2];
+    goto label1;
+  }
+  /* ../lib/standard/string.nit:819 */
+  fra.me.REG[2] = CALL_standard___string___Object___to_s(REGB2)(REGB2);
+  /* ../lib/standard/collection/array.nit:24 */
+  REGB2 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
+  if (UNTAG_Bool(REGB2)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
+  }
+  REGB2 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2]);
+  REGB3 = TAG_Bool(VAL_ISA(REGB0, VTCOLOR_standard___kernel___Comparable___OTHER(REGB2), VTID_standard___kernel___Comparable___OTHER(REGB2))) /*cast OTHER*/;
+  if (UNTAG_Bool(REGB3)) {
+  } else {
+    nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
+  }
+  /* ../lib/standard/kernel.nit:244 */
+  REGB3 = TAG_Bool(UNTAG_Int(REGB2)>UNTAG_Int(REGB0));
+  /* ../lib/standard/string.nit:821 */
+  if (UNTAG_Bool(REGB3)) {
+    /* ../lib/standard/string.nit:822 */
+    REGB3 = TAG_Int(0);
+    /* ../lib/standard/collection/array.nit:24 */
+    REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
+    if (UNTAG_Bool(REGB1)) {
+    } else {
+      nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
+    }
+    REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2]);
+    /* ../lib/standard/kernel.nit:247 */
+    REGB1 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB0));
+    /* ../lib/standard/string.nit:822 */
+    fra.me.REG[3] = CALL_standard___string___AbstractString___substring(fra.me.REG[2])(fra.me.REG[2], REGB3, REGB1);
+    /* ../lib/standard/collection/array.nit:24 */
+    REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
+    if (UNTAG_Bool(REGB1)) {
+    } else {
+      nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
+    }
+    REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2]);
+    /* ../lib/standard/kernel.nit:247 */
+    REGB1 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB0));
+    /* ../lib/standard/string.nit:823 */
+    fra.me.REG[0] = CALL_standard___string___AbstractString___substring(fra.me.REG[2])(fra.me.REG[2], REGB1, REGB0);
+    /* ../lib/standard/string.nit:824 */
+    if (!once_value_4) {
+      fra.me.REG[4] = BOX_NativeString(".");
+      REGB1 = TAG_Int(1);
+      fra.me.REG[4] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[4])(fra.me.REG[4], REGB1);
+      once_value_4 = fra.me.REG[4];
+      register_static_object(&once_value_4);
+    } else fra.me.REG[4] = once_value_4;
+    fra.me.REG[4] = fra.me.REG[4];
+    fra.me.REG[4] = CALL_standard___string___String_____plus(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[4]);
+    fra.me.REG[0] = CALL_standard___string___String_____plus(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[0]);
+    fra.me.REG[1] = fra.me.REG[0];
+    goto label1;
+  } else {
+    /* ../lib/standard/string.nit:826 */
+    if (!once_value_5) {
+      fra.me.REG[0] = BOX_NativeString("0.");
+      REGB1 = TAG_Int(2);
+      fra.me.REG[0] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[0])(fra.me.REG[0], REGB1);
+      once_value_5 = fra.me.REG[0];
+      register_static_object(&once_value_5);
+    } else fra.me.REG[0] = once_value_5;
+    fra.me.REG[0] = fra.me.REG[0];
+    if (!once_value_6) {
+      fra.me.REG[4] = BOX_NativeString("0");
+      REGB1 = TAG_Int(1);
+      fra.me.REG[4] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[4])(fra.me.REG[4], REGB1);
+      once_value_6 = fra.me.REG[4];
+      register_static_object(&once_value_6);
+    } else fra.me.REG[4] = once_value_6;
+    fra.me.REG[4] = fra.me.REG[4];
+    /* ../lib/standard/kernel.nit:247 */
+    REGB2 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB2));
+    /* ../lib/standard/string.nit:826 */
+    fra.me.REG[4] = CALL_standard___string___String_____star(fra.me.REG[4])(fra.me.REG[4], REGB2);
+    fra.me.REG[4] = CALL_standard___string___String_____plus(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[4]);
+    fra.me.REG[2] = CALL_standard___string___String_____plus(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[2]);
+    fra.me.REG[1] = fra.me.REG[2];
+    goto label1;
+  }
+  label1: while(0);
+  stack_frame_head = fra.me.prev;
+  return fra.me.REG[1];
+}
+static const char LOCATE_standard___string___Float___to_precision_native[] = "string::Float::to_precision_native";
+val_t standard___string___Float___to_precision_native(val_t p0, val_t p1){
+  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_standard___string;
+  fra.me.line = 830;
+  fra.me.meth = LOCATE_standard___string___Float___to_precision_native;
+  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;
+  REGB0 = p1;
+  /* ../lib/standard/string.nit:830 */
+  fra.me.REG[0] = Float_to_precision_native___out(fra.me.REG[0], REGB0);
+  ;
+  stack_frame_head = fra.me.prev;
+  return fra.me.REG[0];
+}
+static const char LOCATE_standard___string___Char___to_s[] = "string::Char::(string::Object::to_s)";
+val_t standard___string___Char___to_s(val_t p0){
   struct {struct stack_frame_t me;} fra;
   val_t REGB0;
   val_t REGB1;
-  val_t REGB2;
-  val_t REGB3;
-  val_t REGB4;
   val_t tmp;
-  static val_t once_value_1; /* Once value */
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 475;
-  fra.me.meth = LOCATE_standard___string___Int___to_base;
+  fra.me.line = 843;
+  fra.me.meth = LOCATE_standard___string___Char___to_s;
   fra.me.has_broke = 0;
   fra.me.REG_size = 1;
   fra.me.nitni_local_ref_head = NULL;
   fra.me.REG[0] = NIT_NULL;
   REGB0 = p0;
-  REGB1 = p1;
-  REGB2 = p2;
-  /* ../lib/standard/string.nit:478 */
-  REGB3 = CALL_standard___kernel___Int___digit_count(REGB0)(REGB0, REGB1);
-  /* ../lib/standard/string.nit:479 */
-  if (!once_value_1) {
-    fra.me.REG[0] = BOX_NativeString(" ");
-    REGB4 = TAG_Int(1);
-    fra.me.REG[0] = NEW_String_standard___string___String___with_native(fra.me.REG[0], REGB4);
-    once_value_1 = fra.me.REG[0];
-    register_static_object(&once_value_1);
-  } else fra.me.REG[0] = once_value_1;
-  fra.me.REG[0] = fra.me.REG[0];
-  fra.me.REG[0] = CALL_standard___string___String_____star(fra.me.REG[0])(fra.me.REG[0], REGB3);
-  fra.me.REG[0] = NEW_Buffer_standard___string___Buffer___from(fra.me.REG[0]);
-  /* ../lib/standard/string.nit:480 */
-  CALL_standard___string___Int___fill_buffer(REGB0)(REGB0, fra.me.REG[0], REGB1, REGB2);
-  /* ../lib/standard/string.nit:481 */
+  /* ../lib/standard/string.nit:846 */
+  REGB1 = TAG_Int(1);
+  fra.me.REG[0] = NEW_Buffer_standard___string___Buffer___with_capacity(REGB1);
+  /* ../lib/standard/string.nit:847 */
+  REGB1 = TAG_Int(0);
+  CALL_standard___collection___abstract_collection___Sequence_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB1, REGB0);
+  /* ../lib/standard/string.nit:848 */
   fra.me.REG[0] = CALL_standard___string___Object___to_s(fra.me.REG[0])(fra.me.REG[0]);
-  goto label2;
-  label2: while(0);
+  goto label1;
+  label1: while(0);
   stack_frame_head = fra.me.prev;
   return fra.me.REG[0];
 }
-val_t standard___string___Float___to_s(val_t p0){
+static const char LOCATE_standard___string___Char___is_numeric[] = "string::Char::is_numeric";
+val_t standard___string___Char___is_numeric(val_t p0){
   struct {struct stack_frame_t me;} fra;
   val_t REGB0;
+  val_t REGB1;
+  val_t REGB2;
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 486;
-  fra.me.meth = LOCATE_standard___string___Float___to_s;
+  fra.me.line = 851;
+  fra.me.meth = LOCATE_standard___string___Char___is_numeric;
   fra.me.has_broke = 0;
-  fra.me.REG_size = 1;
+  fra.me.REG_size = 0;
   fra.me.nitni_local_ref_head = NULL;
-  fra.me.REG[0] = NIT_NULL;
-  fra.me.REG[0] = p0;
-  /* ../lib/standard/string.nit:486 */
-  REGB0 = TAG_Int(6);
-  fra.me.REG[0] = CALL_standard___string___Float___to_precision(fra.me.REG[0])(fra.me.REG[0], REGB0);
+  REGB0 = p0;
+  /* ../lib/standard/string.nit:854 */
+  REGB1 = TAG_Char('0');
+  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:440 */
+  REGB1 = TAG_Bool(UNTAG_Char(REGB0)>=UNTAG_Char(REGB1));
+  /* ../lib/standard/string.nit:854 */
+  if (UNTAG_Bool(REGB1)) {
+    REGB1 = TAG_Char('9');
+    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:438 */
+    REGB1 = TAG_Bool(UNTAG_Char(REGB0)<=UNTAG_Char(REGB1));
+  } else {
+    /* ../lib/standard/string.nit:854 */
+    REGB0 = TAG_Bool(0);
+    REGB1 = REGB0;
+  }
+  if (UNTAG_Bool(REGB1)) {
+    /* ../lib/standard/string.nit:856 */
+    REGB1 = TAG_Bool(1);
+    goto label1;
+  }
+  /* ../lib/standard/string.nit:858 */
+  REGB0 = TAG_Bool(0);
+  REGB1 = REGB0;
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
-  return fra.me.REG[0];
+  return REGB1;
 }
-val_t standard___string___Float___to_precision(val_t p0, val_t p1){
-  struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
+static const char LOCATE_standard___string___Char___is_alpha[] = "string::Char::is_alpha";
+val_t standard___string___Char___is_alpha(val_t p0){
+  struct {struct stack_frame_t me;} fra;
   val_t REGB0;
   val_t REGB1;
   val_t REGB2;
   val_t REGB3;
   val_t tmp;
-  static val_t once_value_3; /* Once value */
-  static val_t once_value_4; /* Once value */
-  static val_t once_value_5; /* Once value */
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 488;
-  fra.me.meth = LOCATE_standard___string___Float___to_precision;
+  fra.me.line = 861;
+  fra.me.meth = LOCATE_standard___string___Char___is_alpha;
   fra.me.has_broke = 0;
-  fra.me.REG_size = 4;
+  fra.me.REG_size = 0;
   fra.me.nitni_local_ref_head = NULL;
-  fra.me.REG[0] = NIT_NULL;
-  fra.me.REG[1] = NIT_NULL;
-  fra.me.REG[2] = NIT_NULL;
-  fra.me.REG[3] = NIT_NULL;
-  fra.me.REG[0] = p0;
-  REGB0 = p1;
-  /* ../lib/standard/string.nit:491 */
-  REGB1 = TAG_Int(0);
-  REGB2 = TAG_Bool(IS_EQUAL_OO(REGB0,REGB1));
+  REGB0 = p0;
+  /* ../lib/standard/string.nit:864 */
+  REGB1 = TAG_Char('a');
+  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 {
-    /* ../lib/standard/kernel.nit:227 */
-    REGB1 = TAG_Bool((REGB0)==(REGB1));
-    /* ../lib/standard/string.nit:491 */
-    REGB2 = REGB1;
+    nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
   }
-  if (UNTAG_Bool(REGB2)) {
-    /* ../lib/standard/kernel.nit:216 */
-    REGB2 = TAG_Int((bigint)UNBOX_Float(fra.me.REG[0]));
-    /* ../lib/standard/string.nit:491 */
-    fra.me.REG[1] = CALL_standard___string___Object___to_s(REGB2)(REGB2);
-    goto label1;
+  /* ../lib/standard/kernel.nit:440 */
+  REGB1 = TAG_Bool(UNTAG_Char(REGB0)>=UNTAG_Char(REGB1));
+  /* ../lib/standard/string.nit:864 */
+  if (UNTAG_Bool(REGB1)) {
+    REGB1 = TAG_Char('z');
+    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:438 */
+    REGB1 = TAG_Bool(UNTAG_Char(REGB0)<=UNTAG_Char(REGB1));
+  } else {
+    /* ../lib/standard/string.nit:864 */
+    REGB2 = TAG_Bool(0);
+    REGB1 = REGB2;
   }
-  /* ../lib/standard/kernel.nit:216 */
-  REGB2 = TAG_Int((bigint)UNBOX_Float(fra.me.REG[0]));
-  /* ../lib/standard/string.nit:494 */
-  fra.me.REG[2] = BOX_Float(1.0);
-  /* ../lib/standard/string.nit:495 */
-  while(1) {
-    REGB1 = TAG_Int(0);
-    REGB3 = TAG_Bool(VAL_ISA(REGB1, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
+  if (UNTAG_Bool(REGB1)) {
+    REGB1 = TAG_Bool(1);
+  } else {
+    REGB2 = TAG_Char('A');
+    REGB3 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
     if (UNTAG_Bool(REGB3)) {
     } else {
       nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
     }
-    /* ../lib/standard/kernel.nit:234 */
-    REGB1 = TAG_Bool(UNTAG_Int(REGB0)>UNTAG_Int(REGB1));
-    /* ../lib/standard/string.nit:495 */
-    if (UNTAG_Bool(REGB1)) {
-      /* ../lib/standard/string.nit:496 */
-      fra.me.REG[3] = BOX_Float(10.0);
-      /* ../lib/standard/kernel.nit:213 */
-      fra.me.REG[3] = BOX_Float(UNBOX_Float(fra.me.REG[2])*UNBOX_Float(fra.me.REG[3]));
-      /* ../lib/standard/string.nit:496 */
-      fra.me.REG[2] = fra.me.REG[3];
-      /* ../lib/standard/string.nit:497 */
-      REGB1 = TAG_Int(1);
-      /* ../lib/standard/kernel.nit:237 */
-      REGB1 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB1));
-      /* ../lib/standard/string.nit:497 */
-      REGB0 = REGB1;
+    /* ../lib/standard/kernel.nit:440 */
+    REGB2 = TAG_Bool(UNTAG_Char(REGB0)>=UNTAG_Char(REGB2));
+    /* ../lib/standard/string.nit:864 */
+    if (UNTAG_Bool(REGB2)) {
+      REGB2 = TAG_Char('Z');
+      REGB3 = TAG_Bool(VAL_ISA(REGB2, VTCOLOR_standard___kernel___Comparable___OTHER(REGB0), VTID_standard___kernel___Comparable___OTHER(REGB0))) /*cast OTHER*/;
+      if (UNTAG_Bool(REGB3)) {
+      } else {
+        nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
+      }
+      /* ../lib/standard/kernel.nit:438 */
+      REGB2 = TAG_Bool(UNTAG_Char(REGB0)<=UNTAG_Char(REGB2));
     } else {
-      /* ../lib/standard/string.nit:495 */
-      goto label2;
+      /* ../lib/standard/string.nit:864 */
+      REGB0 = TAG_Bool(0);
+      REGB2 = REGB0;
     }
+    REGB1 = REGB2;
   }
-  label2: while(0);
-  /* ../lib/standard/kernel.nit:244 */
-  fra.me.REG[3] = BOX_Float((float)UNTAG_Int(REGB2));
-  /* ../lib/standard/kernel.nit:212 */
-  fra.me.REG[3] = BOX_Float(UNBOX_Float(fra.me.REG[0])-UNBOX_Float(fra.me.REG[3]));
-  /* ../lib/standard/kernel.nit:213 */
-  fra.me.REG[2] = BOX_Float(UNBOX_Float(fra.me.REG[3])*UNBOX_Float(fra.me.REG[2]));
-  /* ../lib/standard/kernel.nit:216 */
-  REGB0 = TAG_Int((bigint)UNBOX_Float(fra.me.REG[2]));
-  /* ../lib/standard/string.nit:500 */
-  REGB1 = TAG_Int(5);
-  fra.me.REG[2] = NEW_Array_standard___collection___array___Array___with_capacity(REGB1);
-  if (!once_value_3) {
-    fra.me.REG[3] = BOX_NativeString("");
-    REGB1 = TAG_Int(0);
-    fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB1);
-    once_value_3 = fra.me.REG[3];
-    register_static_object(&once_value_3);
-  } else fra.me.REG[3] = once_value_3;
-  fra.me.REG[3] = fra.me.REG[3];
-  CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]);
-  fra.me.REG[3] = CALL_standard___string___Object___to_s(REGB2)(REGB2);
-  CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]);
-  if (!once_value_4) {
-    fra.me.REG[3] = BOX_NativeString(".");
-    REGB2 = TAG_Int(1);
-    fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB2);
-    once_value_4 = fra.me.REG[3];
-    register_static_object(&once_value_4);
-  } else fra.me.REG[3] = once_value_4;
-  fra.me.REG[3] = fra.me.REG[3];
-  CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]);
-  fra.me.REG[3] = CALL_standard___string___Object___to_s(REGB0)(REGB0);
-  CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]);
-  if (!once_value_5) {
-    fra.me.REG[3] = BOX_NativeString("");
-    REGB0 = TAG_Int(0);
-    fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB0);
-    once_value_5 = fra.me.REG[3];
-    register_static_object(&once_value_5);
-  } else fra.me.REG[3] = once_value_5;
-  fra.me.REG[3] = fra.me.REG[3];
-  CALL_standard___collection___abstract_collection___SimpleCollection___add(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]);
-  fra.me.REG[2] = CALL_standard___string___Object___to_s(fra.me.REG[2])(fra.me.REG[2]);
-  fra.me.REG[1] = fra.me.REG[2];
+  if (UNTAG_Bool(REGB1)) {
+    REGB1 = TAG_Bool(1);
+    goto label1;
+  }
+  /* ../lib/standard/string.nit:865 */
+  REGB2 = TAG_Bool(0);
+  REGB1 = REGB2;
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
-  return fra.me.REG[1];
+  return REGB1;
 }
-val_t standard___string___Char___to_s(val_t p0){
+static const char LOCATE_standard___string___Char___is_alphanumeric[] = "string::Char::is_alphanumeric";
+val_t standard___string___Char___is_alphanumeric(val_t p0){
   struct {struct stack_frame_t me;} fra;
   val_t REGB0;
   val_t REGB1;
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 505;
-  fra.me.meth = LOCATE_standard___string___Char___to_s;
+  fra.me.line = 868;
+  fra.me.meth = LOCATE_standard___string___Char___is_alphanumeric;
   fra.me.has_broke = 0;
-  fra.me.REG_size = 1;
+  fra.me.REG_size = 0;
   fra.me.nitni_local_ref_head = NULL;
-  fra.me.REG[0] = NIT_NULL;
   REGB0 = p0;
-  /* ../lib/standard/string.nit:507 */
-  REGB1 = TAG_Int(1);
-  fra.me.REG[0] = NEW_Buffer_standard___string___Buffer___with_capacity(REGB1);
-  /* ../lib/standard/string.nit:508 */
-  REGB1 = TAG_Int(0);
-  CALL_standard___collection___abstract_collection___Sequence_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB1, REGB0);
-  /* ../lib/standard/string.nit:509 */
-  fra.me.REG[0] = CALL_standard___string___Object___to_s(fra.me.REG[0])(fra.me.REG[0]);
+  /* ../lib/standard/string.nit:871 */
+  REGB1 = CALL_standard___string___Char___is_numeric(REGB0)(REGB0);
+  if (UNTAG_Bool(REGB1)) {
+    REGB1 = TAG_Bool(1);
+  } else {
+    REGB0 = CALL_standard___string___Char___is_alpha(REGB0)(REGB0);
+    REGB1 = REGB0;
+  }
+  if (UNTAG_Bool(REGB1)) {
+    REGB1 = TAG_Bool(1);
+    goto label1;
+  }
+  /* ../lib/standard/string.nit:872 */
+  REGB0 = TAG_Bool(0);
+  REGB1 = REGB0;
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
-  return fra.me.REG[0];
+  return REGB1;
 }
+static const char LOCATE_standard___string___Collection___to_s[] = "string::Collection::(string::Object::to_s)";
 val_t standard___string___Collection___to_s(val_t p0){
   struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 514;
+  fra.me.line = 877;
   fra.me.meth = LOCATE_standard___string___Collection___to_s;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
@@ -2893,10 +4867,10 @@ val_t standard___string___Collection___to_s(val_t p0){
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
-  /* ../lib/standard/string.nit:517 */
+  /* ../lib/standard/string.nit:880 */
   fra.me.REG[1] = NEW_Buffer_standard___string___Buffer___init();
   CALL_standard___collection___abstract_collection___Collection___iterate(fra.me.REG[0])(fra.me.REG[0], (&(fra.me)), ((fun_t)OC_standard___string___Collection___to_s_1));
-  /* ../lib/standard/string.nit:519 */
+  /* ../lib/standard/string.nit:882 */
   fra.me.REG[1] = CALL_standard___string___Object___to_s(fra.me.REG[1])(fra.me.REG[1]);
   goto label2;
   label2: while(0);
@@ -2909,7 +4883,7 @@ val_t standard___string___Collection___to_s(val_t p0){
     val_t REGB1;
     fun_t CREG[1];
     val_t tmp;
-    /* ../lib/standard/string.nit:518 */
+    /* ../lib/standard/string.nit:881 */
     fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
     fra.me.file = LOCATE_standard___string;
     fra.me.line = 0;
@@ -2927,7 +4901,7 @@ val_t standard___string___Collection___to_s(val_t p0){
     } 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);
@@ -2938,7 +4912,7 @@ val_t standard___string___Collection___to_s(val_t p0){
     if (UNTAG_Bool(REGB0)) {
       REGB0 = TAG_Bool(fra.me.REG[0]==NIT_NULL);
       if (UNTAG_Bool(REGB0)) {
-        nit_abort("Reciever is null", NULL, LOCATE_standard___string, 518);
+        nit_abort("Reciever is null", NULL, LOCATE_standard___string, 881);
       }
       fra.me.REG[0] = CALL_standard___string___Object___to_s(fra.me.REG[0])(fra.me.REG[0]);
       CALL_standard___collection___abstract_collection___Sequence___append(closctx->REG[1])(closctx->REG[1], fra.me.REG[0]);
@@ -2946,6 +4920,7 @@ val_t standard___string___Collection___to_s(val_t p0){
     stack_frame_head = fra.me.prev;
     return;
   }
+static const char LOCATE_standard___string___Collection___join[] = "string::Collection::join";
 val_t standard___string___Collection___join(val_t p0, val_t p1){
   struct {struct stack_frame_t me; val_t MORE_REG[5];} fra;
   val_t REGB0;
@@ -2954,7 +4929,7 @@ val_t standard___string___Collection___join(val_t p0, val_t p1){
     static val_t once_value_1; /* Once value */
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 522;
+  fra.me.line = 885;
   fra.me.meth = LOCATE_standard___string___Collection___join;
   fra.me.has_broke = 0;
   fra.me.REG_size = 6;
@@ -2967,32 +4942,32 @@ val_t standard___string___Collection___join(val_t p0, val_t p1){
   fra.me.REG[5] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
-  /* ../lib/standard/string.nit:525 */
+  /* ../lib/standard/string.nit:891 */
   REGB0 = CALL_standard___collection___abstract_collection___Collection___is_empty(fra.me.REG[0])(fra.me.REG[0]);
   if (UNTAG_Bool(REGB0)) {
     if (!once_value_1) {
       fra.me.REG[2] = BOX_NativeString("");
       REGB0 = TAG_Int(0);
-      fra.me.REG[2] = NEW_String_standard___string___String___with_native(fra.me.REG[2], REGB0);
+      fra.me.REG[2] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[2])(fra.me.REG[2], REGB0);
       once_value_1 = fra.me.REG[2];
       register_static_object(&once_value_1);
     } else fra.me.REG[2] = once_value_1;
     fra.me.REG[2] = fra.me.REG[2];
     goto label2;
   }
-  /* ../lib/standard/string.nit:527 */
+  /* ../lib/standard/string.nit:893 */
   fra.me.REG[3] = NEW_Buffer_standard___string___Buffer___init();
-  /* ../lib/standard/string.nit:530 */
+  /* ../lib/standard/string.nit:896 */
   fra.me.REG[0] = CALL_standard___collection___abstract_collection___Collection___iterator(fra.me.REG[0])(fra.me.REG[0]);
-  /* ../lib/standard/string.nit:531 */
+  /* ../lib/standard/string.nit:897 */
   fra.me.REG[4] = CALL_standard___collection___abstract_collection___Iterator___item(fra.me.REG[0])(fra.me.REG[0]);
-  /* ../lib/standard/string.nit:532 */
+  /* ../lib/standard/string.nit:898 */
   REGB0 = TAG_Bool(fra.me.REG[4]==NIT_NULL);
   if (UNTAG_Bool(REGB0)) {
   } else {
     REGB1 = TAG_Bool(fra.me.REG[4]==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[4])(fra.me.REG[4], NIT_NULL);
@@ -3003,29 +4978,29 @@ val_t standard___string___Collection___join(val_t p0, val_t p1){
   if (UNTAG_Bool(REGB0)) {
     REGB0 = TAG_Bool(fra.me.REG[4]==NIT_NULL);
     if (UNTAG_Bool(REGB0)) {
-      nit_abort("Reciever is null", NULL, LOCATE_standard___string, 532);
+      nit_abort("Reciever is null", NULL, LOCATE_standard___string, 898);
     }
     fra.me.REG[5] = CALL_standard___string___Object___to_s(fra.me.REG[4])(fra.me.REG[4]);
     CALL_standard___collection___abstract_collection___Sequence___append(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[5]);
   }
-  /* ../lib/standard/string.nit:535 */
+  /* ../lib/standard/string.nit:901 */
   CALL_standard___collection___abstract_collection___Iterator___next(fra.me.REG[0])(fra.me.REG[0]);
-  /* ../lib/standard/string.nit:536 */
+  /* ../lib/standard/string.nit:902 */
   while(1) {
     REGB0 = CALL_standard___collection___abstract_collection___Iterator___is_ok(fra.me.REG[0])(fra.me.REG[0]);
     if (UNTAG_Bool(REGB0)) {
-      /* ../lib/standard/string.nit:537 */
+      /* ../lib/standard/string.nit:903 */
       CALL_standard___collection___abstract_collection___Sequence___append(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[1]);
-      /* ../lib/standard/string.nit:538 */
+      /* ../lib/standard/string.nit:904 */
       fra.me.REG[5] = CALL_standard___collection___abstract_collection___Iterator___item(fra.me.REG[0])(fra.me.REG[0]);
       fra.me.REG[4] = fra.me.REG[5];
-      /* ../lib/standard/string.nit:539 */
+      /* ../lib/standard/string.nit:905 */
       REGB0 = TAG_Bool(fra.me.REG[4]==NIT_NULL);
       if (UNTAG_Bool(REGB0)) {
       } else {
         REGB1 = TAG_Bool(fra.me.REG[4]==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[4])(fra.me.REG[4], NIT_NULL);
@@ -3036,20 +5011,20 @@ val_t standard___string___Collection___join(val_t p0, val_t p1){
       if (UNTAG_Bool(REGB0)) {
         REGB0 = TAG_Bool(fra.me.REG[4]==NIT_NULL);
         if (UNTAG_Bool(REGB0)) {
-          nit_abort("Reciever is null", NULL, LOCATE_standard___string, 539);
+          nit_abort("Reciever is null", NULL, LOCATE_standard___string, 905);
         }
         fra.me.REG[5] = CALL_standard___string___Object___to_s(fra.me.REG[4])(fra.me.REG[4]);
         CALL_standard___collection___abstract_collection___Sequence___append(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[5]);
       }
-      /* ../lib/standard/string.nit:540 */
+      /* ../lib/standard/string.nit:906 */
       CALL_standard___collection___abstract_collection___Iterator___next(fra.me.REG[0])(fra.me.REG[0]);
     } else {
-      /* ../lib/standard/string.nit:536 */
+      /* ../lib/standard/string.nit:902 */
       goto label3;
     }
   }
   label3: while(0);
-  /* ../lib/standard/string.nit:542 */
+  /* ../lib/standard/string.nit:908 */
   fra.me.REG[3] = CALL_standard___string___Object___to_s(fra.me.REG[3])(fra.me.REG[3]);
   fra.me.REG[2] = fra.me.REG[3];
   goto label2;
@@ -3057,6 +5032,7 @@ val_t standard___string___Collection___join(val_t p0, val_t p1){
   stack_frame_head = fra.me.prev;
   return fra.me.REG[2];
 }
+static const char LOCATE_standard___string___Array___to_s[] = "string::Array::(string::Object::to_s)";
 val_t standard___string___Array___to_s(val_t p0){
   struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
   val_t REGB0;
@@ -3067,7 +5043,7 @@ val_t standard___string___Array___to_s(val_t p0){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 547;
+  fra.me.line = 913;
   fra.me.meth = LOCATE_standard___string___Array___to_s;
   fra.me.has_broke = 0;
   fra.me.REG_size = 3;
@@ -3076,9 +5052,9 @@ val_t standard___string___Array___to_s(val_t p0){
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[2] = NIT_NULL;
   fra.me.REG[0] = p0;
-  /* ../lib/standard/string.nit:550 */
+  /* ../lib/standard/string.nit:916 */
   fra.me.REG[1] = NEW_Buffer_standard___string___Buffer___init();
-  /* ../lib/standard/string.nit:551 */
+  /* ../lib/standard/string.nit:917 */
   REGB0 = TAG_Int(0);
   /* ../lib/standard/collection/array.nit:24 */
   REGB1 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
@@ -3087,35 +5063,35 @@ val_t standard___string___Array___to_s(val_t p0){
     nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 24);
   }
   REGB1 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[0]);
-  /* ../lib/standard/string.nit:553 */
+  /* ../lib/standard/string.nit:919 */
   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:242 */
     REGB2 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
-    /* ../lib/standard/string.nit:553 */
+    /* ../lib/standard/string.nit:919 */
     if (UNTAG_Bool(REGB2)) {
-      /* ../lib/standard/collection/array.nit:278 */
+      /* ../lib/standard/collection/array.nit:279 */
       fra.me.REG[2] = fra.me.REG[0];
       REGB2 = REGB0;
-      /* ../lib/standard/collection/array.nit:280 */
+      /* ../lib/standard/collection/array.nit:281 */
       REGB3 = TAG_Int(0);
       REGB4 = TAG_Bool(VAL_ISA(REGB3, VTCOLOR_standard___kernel___Comparable___OTHER(REGB2), VTID_standard___kernel___Comparable___OTHER(REGB2))) /*cast OTHER*/;
       if (UNTAG_Bool(REGB4)) {
       } else {
         nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
       }
-      /* ../lib/standard/kernel.nit:233 */
+      /* ../lib/standard/kernel.nit:243 */
       REGB3 = TAG_Bool(UNTAG_Int(REGB2)>=UNTAG_Int(REGB3));
-      /* ../lib/standard/collection/array.nit:280 */
+      /* ../lib/standard/collection/array.nit:281 */
       if (UNTAG_Bool(REGB3)) {
         REGB3 = TAG_Bool(ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
         if (UNTAG_Bool(REGB3)) {
         } else {
-          nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 280);
+          nit_abort("Uninitialized attribute %s", "_length", LOCATE_standard___collection___array, 281);
         }
         REGB3 = ATTR_standard___collection___array___AbstractArrayRead____length(fra.me.REG[2]);
         REGB4 = TAG_Bool(VAL_ISA(REGB3, VTCOLOR_standard___kernel___Comparable___OTHER(REGB2), VTID_standard___kernel___Comparable___OTHER(REGB2))) /*cast OTHER*/;
@@ -3123,35 +5099,35 @@ val_t standard___string___Array___to_s(val_t p0){
         } else {
           nit_abort("Cast failed", NULL, LOCATE_standard___kernel, 0);
         }
-        /* ../lib/standard/kernel.nit:232 */
+        /* ../lib/standard/kernel.nit:242 */
         REGB3 = TAG_Bool(UNTAG_Int(REGB2)<UNTAG_Int(REGB3));
       } else {
-        /* ../lib/standard/collection/array.nit:280 */
-        REGB4 = TAG_Bool(false);
+        /* ../lib/standard/collection/array.nit:281 */
+        REGB4 = TAG_Bool(0);
         REGB3 = REGB4;
       }
       if (UNTAG_Bool(REGB3)) {
       } else {
-        nit_abort("Assert '%s' failed", "index", LOCATE_standard___collection___array, 280);
+        nit_abort("Assert '%s' failed", "index", LOCATE_standard___collection___array, 281);
       }
-      /* ../lib/standard/collection/array.nit:281 */
+      /* ../lib/standard/collection/array.nit:282 */
       fra.me.REG[2] = ATTR_standard___collection___array___Array____items(fra.me.REG[2]);
       REGB3 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
       if (UNTAG_Bool(REGB3)) {
-        nit_abort("Reciever is null", NULL, LOCATE_standard___collection___array, 281);
+        nit_abort("Reciever is null", NULL, LOCATE_standard___collection___array, 282);
       }
-      /* ../lib/standard/collection/array.nit:718 */
+      /* ../lib/standard/collection/array.nit:725 */
       fra.me.REG[2] = ((Nit_NativeArray)fra.me.REG[2])->val[UNTAG_Int(REGB2)];
-      /* ../lib/standard/collection/array.nit:281 */
+      /* ../lib/standard/collection/array.nit:282 */
       goto label1;
       label1: while(0);
-      /* ../lib/standard/string.nit:555 */
+      /* ../lib/standard/string.nit:921 */
       REGB2 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
       if (UNTAG_Bool(REGB2)) {
       } else {
         REGB3 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
         if (UNTAG_Bool(REGB3)) {
-          REGB3 = TAG_Bool(false);
+          REGB3 = TAG_Bool(0);
           REGB2 = REGB3;
         } else {
           REGB3 = CALL_standard___kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], NIT_NULL);
@@ -3162,30 +5138,31 @@ val_t standard___string___Array___to_s(val_t p0){
       if (UNTAG_Bool(REGB2)) {
         REGB2 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
         if (UNTAG_Bool(REGB2)) {
-          nit_abort("Reciever is null", NULL, LOCATE_standard___string, 555);
+          nit_abort("Reciever is null", NULL, LOCATE_standard___string, 921);
         }
         fra.me.REG[2] = CALL_standard___string___Object___to_s(fra.me.REG[2])(fra.me.REG[2]);
         CALL_standard___collection___abstract_collection___Sequence___append(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]);
       }
-      /* ../lib/standard/string.nit:556 */
+      /* ../lib/standard/string.nit:922 */
       REGB2 = TAG_Int(1);
-      /* ../lib/standard/kernel.nit:235 */
+      /* ../lib/standard/kernel.nit:245 */
       REGB2 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB2));
-      /* ../lib/standard/string.nit:556 */
+      /* ../lib/standard/string.nit:922 */
       REGB0 = REGB2;
     } else {
-      /* ../lib/standard/string.nit:553 */
+      /* ../lib/standard/string.nit:919 */
       goto label2;
     }
   }
   label2: while(0);
-  /* ../lib/standard/string.nit:558 */
+  /* ../lib/standard/string.nit:924 */
   fra.me.REG[1] = CALL_standard___string___Object___to_s(fra.me.REG[1])(fra.me.REG[1]);
   goto label3;
   label3: while(0);
   stack_frame_head = fra.me.prev;
   return fra.me.REG[1];
 }
+static const char LOCATE_standard___string___Map___join[] = "string::Map::join";
 val_t standard___string___Map___join(val_t p0, val_t p1, val_t p2){
   struct {struct stack_frame_t me; val_t MORE_REG[8];} fra;
   val_t REGB0;
@@ -3202,7 +5179,7 @@ val_t standard___string___Map___join(val_t p0, val_t p1, val_t p2){
         static val_t once_value_10; /* Once value */
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 563;
+  fra.me.line = 929;
   fra.me.meth = LOCATE_standard___string___Map___join;
   fra.me.has_broke = 0;
   fra.me.REG_size = 9;
@@ -3219,34 +5196,34 @@ val_t standard___string___Map___join(val_t p0, val_t p1, val_t p2){
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
   fra.me.REG[2] = p2;
-  /* ../lib/standard/string.nit:566 */
+  /* ../lib/standard/string.nit:939 */
   REGB0 = CALL_standard___collection___abstract_collection___MapRead___is_empty(fra.me.REG[0])(fra.me.REG[0]);
   if (UNTAG_Bool(REGB0)) {
     if (!once_value_1) {
       fra.me.REG[3] = BOX_NativeString("");
       REGB0 = TAG_Int(0);
-      fra.me.REG[3] = NEW_String_standard___string___String___with_native(fra.me.REG[3], REGB0);
+      fra.me.REG[3] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[3])(fra.me.REG[3], REGB0);
       once_value_1 = fra.me.REG[3];
       register_static_object(&once_value_1);
     } else fra.me.REG[3] = once_value_1;
     fra.me.REG[3] = fra.me.REG[3];
     goto label2;
   }
-  /* ../lib/standard/string.nit:568 */
+  /* ../lib/standard/string.nit:941 */
   fra.me.REG[4] = NEW_Buffer_standard___string___Buffer___init();
-  /* ../lib/standard/string.nit:571 */
+  /* ../lib/standard/string.nit:944 */
   fra.me.REG[0] = CALL_standard___collection___abstract_collection___MapRead___iterator(fra.me.REG[0])(fra.me.REG[0]);
-  /* ../lib/standard/string.nit:572 */
+  /* ../lib/standard/string.nit:945 */
   fra.me.REG[5] = CALL_standard___collection___abstract_collection___MapIterator___key(fra.me.REG[0])(fra.me.REG[0]);
-  /* ../lib/standard/string.nit:573 */
+  /* ../lib/standard/string.nit:946 */
   fra.me.REG[6] = CALL_standard___collection___abstract_collection___MapIterator___item(fra.me.REG[0])(fra.me.REG[0]);
-  /* ../lib/standard/string.nit:574 */
+  /* ../lib/standard/string.nit:947 */
   REGB0 = TAG_Bool(fra.me.REG[6]==NIT_NULL);
   if (UNTAG_Bool(REGB0)) {
   } else {
     REGB1 = TAG_Bool(fra.me.REG[6]==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[6])(fra.me.REG[6], NIT_NULL);
@@ -3260,7 +5237,7 @@ val_t standard___string___Map___join(val_t p0, val_t p1, val_t p2){
     if (!once_value_3) {
       fra.me.REG[8] = BOX_NativeString("");
       REGB0 = TAG_Int(0);
-      fra.me.REG[8] = NEW_String_standard___string___String___with_native(fra.me.REG[8], REGB0);
+      fra.me.REG[8] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[8])(fra.me.REG[8], REGB0);
       once_value_3 = fra.me.REG[8];
       register_static_object(&once_value_3);
     } else fra.me.REG[8] = once_value_3;
@@ -3271,7 +5248,7 @@ val_t standard___string___Map___join(val_t p0, val_t p1, val_t p2){
     if (!once_value_4) {
       fra.me.REG[8] = BOX_NativeString("");
       REGB0 = TAG_Int(0);
-      fra.me.REG[8] = NEW_String_standard___string___String___with_native(fra.me.REG[8], REGB0);
+      fra.me.REG[8] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[8])(fra.me.REG[8], REGB0);
       once_value_4 = fra.me.REG[8];
       register_static_object(&once_value_4);
     } else fra.me.REG[8] = once_value_4;
@@ -3281,7 +5258,7 @@ val_t standard___string___Map___join(val_t p0, val_t p1, val_t p2){
     if (!once_value_5) {
       fra.me.REG[8] = BOX_NativeString("");
       REGB0 = TAG_Int(0);
-      fra.me.REG[8] = NEW_String_standard___string___String___with_native(fra.me.REG[8], REGB0);
+      fra.me.REG[8] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[8])(fra.me.REG[8], REGB0);
       once_value_5 = fra.me.REG[8];
       register_static_object(&once_value_5);
     } else fra.me.REG[8] = once_value_5;
@@ -3292,7 +5269,7 @@ val_t standard___string___Map___join(val_t p0, val_t p1, val_t p2){
     if (!once_value_6) {
       fra.me.REG[8] = BOX_NativeString("");
       REGB0 = TAG_Int(0);
-      fra.me.REG[8] = NEW_String_standard___string___String___with_native(fra.me.REG[8], REGB0);
+      fra.me.REG[8] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[8])(fra.me.REG[8], REGB0);
       once_value_6 = fra.me.REG[8];
       register_static_object(&once_value_6);
     } else fra.me.REG[8] = once_value_6;
@@ -3301,27 +5278,27 @@ val_t standard___string___Map___join(val_t p0, val_t p1, val_t p2){
     fra.me.REG[7] = CALL_standard___string___Object___to_s(fra.me.REG[7])(fra.me.REG[7]);
     CALL_standard___collection___abstract_collection___Sequence___append(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[7]);
   }
-  /* ../lib/standard/string.nit:577 */
+  /* ../lib/standard/string.nit:950 */
   CALL_standard___collection___abstract_collection___MapIterator___next(fra.me.REG[0])(fra.me.REG[0]);
-  /* ../lib/standard/string.nit:578 */
+  /* ../lib/standard/string.nit:951 */
   while(1) {
     REGB0 = CALL_standard___collection___abstract_collection___MapIterator___is_ok(fra.me.REG[0])(fra.me.REG[0]);
     if (UNTAG_Bool(REGB0)) {
-      /* ../lib/standard/string.nit:579 */
+      /* ../lib/standard/string.nit:952 */
       CALL_standard___collection___abstract_collection___Sequence___append(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[1]);
-      /* ../lib/standard/string.nit:580 */
+      /* ../lib/standard/string.nit:953 */
       fra.me.REG[7] = CALL_standard___collection___abstract_collection___MapIterator___key(fra.me.REG[0])(fra.me.REG[0]);
       fra.me.REG[5] = fra.me.REG[7];
-      /* ../lib/standard/string.nit:581 */
+      /* ../lib/standard/string.nit:954 */
       fra.me.REG[7] = CALL_standard___collection___abstract_collection___MapIterator___item(fra.me.REG[0])(fra.me.REG[0]);
       fra.me.REG[6] = fra.me.REG[7];
-      /* ../lib/standard/string.nit:582 */
+      /* ../lib/standard/string.nit:955 */
       REGB0 = TAG_Bool(fra.me.REG[6]==NIT_NULL);
       if (UNTAG_Bool(REGB0)) {
       } else {
         REGB1 = TAG_Bool(fra.me.REG[6]==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[6])(fra.me.REG[6], NIT_NULL);
@@ -3335,7 +5312,7 @@ val_t standard___string___Map___join(val_t p0, val_t p1, val_t p2){
         if (!once_value_7) {
           fra.me.REG[8] = BOX_NativeString("");
           REGB0 = TAG_Int(0);
-          fra.me.REG[8] = NEW_String_standard___string___String___with_native(fra.me.REG[8], REGB0);
+          fra.me.REG[8] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[8])(fra.me.REG[8], REGB0);
           once_value_7 = fra.me.REG[8];
           register_static_object(&once_value_7);
         } else fra.me.REG[8] = once_value_7;
@@ -3346,7 +5323,7 @@ val_t standard___string___Map___join(val_t p0, val_t p1, val_t p2){
         if (!once_value_8) {
           fra.me.REG[8] = BOX_NativeString("");
           REGB0 = TAG_Int(0);
-          fra.me.REG[8] = NEW_String_standard___string___String___with_native(fra.me.REG[8], REGB0);
+          fra.me.REG[8] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[8])(fra.me.REG[8], REGB0);
           once_value_8 = fra.me.REG[8];
           register_static_object(&once_value_8);
         } else fra.me.REG[8] = once_value_8;
@@ -3356,7 +5333,7 @@ val_t standard___string___Map___join(val_t p0, val_t p1, val_t p2){
         if (!once_value_9) {
           fra.me.REG[8] = BOX_NativeString("");
           REGB0 = TAG_Int(0);
-          fra.me.REG[8] = NEW_String_standard___string___String___with_native(fra.me.REG[8], REGB0);
+          fra.me.REG[8] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[8])(fra.me.REG[8], REGB0);
           once_value_9 = fra.me.REG[8];
           register_static_object(&once_value_9);
         } else fra.me.REG[8] = once_value_9;
@@ -3367,7 +5344,7 @@ val_t standard___string___Map___join(val_t p0, val_t p1, val_t p2){
         if (!once_value_10) {
           fra.me.REG[8] = BOX_NativeString("");
           REGB0 = TAG_Int(0);
-          fra.me.REG[8] = NEW_String_standard___string___String___with_native(fra.me.REG[8], REGB0);
+          fra.me.REG[8] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[8])(fra.me.REG[8], REGB0);
           once_value_10 = fra.me.REG[8];
           register_static_object(&once_value_10);
         } else fra.me.REG[8] = once_value_10;
@@ -3376,15 +5353,15 @@ val_t standard___string___Map___join(val_t p0, val_t p1, val_t p2){
         fra.me.REG[7] = CALL_standard___string___Object___to_s(fra.me.REG[7])(fra.me.REG[7]);
         CALL_standard___collection___abstract_collection___Sequence___append(fra.me.REG[4])(fra.me.REG[4], fra.me.REG[7]);
       }
-      /* ../lib/standard/string.nit:583 */
+      /* ../lib/standard/string.nit:956 */
       CALL_standard___collection___abstract_collection___MapIterator___next(fra.me.REG[0])(fra.me.REG[0]);
     } else {
-      /* ../lib/standard/string.nit:578 */
+      /* ../lib/standard/string.nit:951 */
       goto label11;
     }
   }
   label11: while(0);
-  /* ../lib/standard/string.nit:585 */
+  /* ../lib/standard/string.nit:958 */
   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];
   goto label2;
@@ -3392,13 +5369,14 @@ val_t standard___string___Map___join(val_t p0, val_t p1, val_t p2){
   stack_frame_head = fra.me.prev;
   return fra.me.REG[3];
 }
+static const char LOCATE_standard___string___NativeString_____bra[] = "string::NativeString::[]";
 val_t standard___string___NativeString_____bra(val_t p0, val_t p1){
   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_standard___string;
-  fra.me.line = 595;
+  fra.me.line = 970;
   fra.me.meth = LOCATE_standard___string___NativeString_____bra;
   fra.me.has_broke = 0;
   fra.me.REG_size = 1;
@@ -3406,11 +5384,12 @@ val_t standard___string___NativeString_____bra(val_t p0, val_t p1){
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[0] = p0;
   REGB0 = p1;
-  /* ../lib/standard/string.nit:595 */
+  /* ../lib/standard/string.nit:970 */
   REGB0 = TAG_Char(UNBOX_NativeString(fra.me.REG[0])[UNTAG_Int(REGB0)]);
   stack_frame_head = fra.me.prev;
   return REGB0;
 }
+static const char LOCATE_standard___string___NativeString_____braeq[] = "string::NativeString::[]=";
 void standard___string___NativeString_____braeq(val_t p0, val_t p1, val_t p2){
   struct {struct stack_frame_t me;} fra;
   val_t REGB0;
@@ -3418,7 +5397,7 @@ void standard___string___NativeString_____braeq(val_t p0, val_t p1, val_t p2){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 596;
+  fra.me.line = 971;
   fra.me.meth = LOCATE_standard___string___NativeString_____braeq;
   fra.me.has_broke = 0;
   fra.me.REG_size = 1;
@@ -3427,11 +5406,12 @@ void standard___string___NativeString_____braeq(val_t p0, val_t p1, val_t p2){
   fra.me.REG[0] = p0;
   REGB0 = p1;
   REGB1 = p2;
-  /* ../lib/standard/string.nit:596 */
+  /* ../lib/standard/string.nit:971 */
   UNBOX_NativeString(fra.me.REG[0])[UNTAG_Int(REGB0)]=UNTAG_Char(REGB1);;
   stack_frame_head = fra.me.prev;
   return;
 }
+static const char LOCATE_standard___string___NativeString___copy_to[] = "string::NativeString::copy_to";
 void standard___string___NativeString___copy_to(val_t p0, val_t p1, val_t p2, val_t p3, val_t p4){
   struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
   val_t REGB0;
@@ -3440,7 +5420,7 @@ void standard___string___NativeString___copy_to(val_t p0, val_t p1, val_t p2, va
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 597;
+  fra.me.line = 972;
   fra.me.meth = LOCATE_standard___string___NativeString___copy_to;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
@@ -3452,11 +5432,12 @@ void standard___string___NativeString___copy_to(val_t p0, val_t p1, val_t p2, va
   REGB0 = p2;
   REGB1 = p3;
   REGB2 = p4;
-  /* ../lib/standard/string.nit:597 */
+  /* ../lib/standard/string.nit:972 */
   (void)memcpy(UNBOX_NativeString(fra.me.REG[1])+UNTAG_Int(REGB2), UNBOX_NativeString(fra.me.REG[0])+UNTAG_Int(REGB1), UNTAG_Int(REGB0));;
   stack_frame_head = fra.me.prev;
   return;
 }
+static const char LOCATE_standard___string___NativeString___cstring_length[] = "string::NativeString::cstring_length";
 val_t standard___string___NativeString___cstring_length(val_t p0){
   struct {struct stack_frame_t me;} fra;
   val_t REGB0;
@@ -3466,65 +5447,192 @@ val_t standard___string___NativeString___cstring_length(val_t p0){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 599;
+  fra.me.line = 974;
   fra.me.meth = LOCATE_standard___string___NativeString___cstring_length;
   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;
-  /* ../lib/standard/string.nit:602 */
+  /* ../lib/standard/string.nit:977 */
   REGB0 = TAG_Int(0);
-  /* ../lib/standard/string.nit:603 */
+  /* ../lib/standard/string.nit:978 */
   while(1) {
-    /* ../lib/standard/string.nit:595 */
+    /* ../lib/standard/string.nit:970 */
     REGB1 = TAG_Char(UNBOX_NativeString(fra.me.REG[0])[UNTAG_Int(REGB0)]);
-    /* ../lib/standard/string.nit:603 */
+    /* ../lib/standard/string.nit:978 */
     REGB2 = TAG_Char('\0');
     REGB3 = TAG_Bool(IS_EQUAL_OO(REGB1,REGB2));
     if (UNTAG_Bool(REGB3)) {
     } else {
-      /* ../lib/standard/kernel.nit:378 */
+      /* ../lib/standard/kernel.nit:434 */
       REGB2 = TAG_Bool((REGB1)==(REGB2));
-      /* ../lib/standard/string.nit:603 */
+      /* ../lib/standard/string.nit:978 */
       REGB3 = REGB2;
     }
     REGB3 = TAG_Bool(!UNTAG_Bool(REGB3));
     if (UNTAG_Bool(REGB3)) {
       REGB3 = TAG_Int(1);
-      /* ../lib/standard/kernel.nit:235 */
+      /* ../lib/standard/kernel.nit:245 */
       REGB3 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB3));
-      /* ../lib/standard/string.nit:603 */
+      /* ../lib/standard/string.nit:978 */
       REGB0 = REGB3;
     } else {
       goto label1;
     }
   }
   label1: while(0);
-  /* ../lib/standard/string.nit:604 */
+  /* ../lib/standard/string.nit:979 */
   goto label2;
   label2: while(0);
   stack_frame_head = fra.me.prev;
   return REGB0;
 }
+static const char LOCATE_standard___string___NativeString___atoi[] = "string::NativeString::atoi";
 val_t standard___string___NativeString___atoi(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_standard___string;
-  fra.me.line = 606;
+  fra.me.line = 981;
   fra.me.meth = LOCATE_standard___string___NativeString___atoi;
   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;
-  /* ../lib/standard/string.nit:606 */
+  /* ../lib/standard/string.nit:981 */
   REGB0 = TAG_Int(atoi(UNBOX_NativeString(fra.me.REG[0])));
   stack_frame_head = fra.me.prev;
   return REGB0;
 }
+static const char LOCATE_standard___string___NativeString___atof[] = "string::NativeString::atof";
+val_t standard___string___NativeString___atof(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_standard___string;
+  fra.me.line = 982;
+  fra.me.meth = LOCATE_standard___string___NativeString___atof;
+  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;
+  /* ../lib/standard/string.nit:982 */
+  fra.me.REG[0] = NativeString_atof___out(fra.me.REG[0]);
+  stack_frame_head = fra.me.prev;
+  return fra.me.REG[0];
+}
+static const char LOCATE_standard___string___NativeString___to_s[] = "string::NativeString::(string::Object::to_s)";
+val_t standard___string___NativeString___to_s(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_standard___string;
+  fra.me.line = 984;
+  fra.me.meth = LOCATE_standard___string___NativeString___to_s;
+  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;
+  /* ../lib/standard/string.nit:986 */
+  REGB0 = CALL_standard___string___NativeString___cstring_length(fra.me.REG[0])(fra.me.REG[0]);
+  fra.me.REG[0] = CALL_standard___string___NativeString___to_s_with_length(fra.me.REG[0])(fra.me.REG[0], REGB0);
+  goto label1;
+  label1: while(0);
+  stack_frame_head = fra.me.prev;
+  return fra.me.REG[0];
+}
+static const char LOCATE_standard___string___NativeString___to_s_with_length[] = "string::NativeString::to_s_with_length";
+val_t standard___string___NativeString___to_s_with_length(val_t p0, val_t p1){
+  struct {struct stack_frame_t me;} fra;
+  val_t REGB0;
+  val_t REGB1;
+  val_t REGB2;
+  val_t tmp;
+  fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+  fra.me.file = LOCATE_standard___string;
+  fra.me.line = 989;
+  fra.me.meth = LOCATE_standard___string___NativeString___to_s_with_length;
+  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;
+  REGB0 = p1;
+  /* ../lib/standard/string.nit:991 */
+  REGB1 = TAG_Int(0);
+  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:243 */
+  REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
+  /* ../lib/standard/string.nit:991 */
+  if (UNTAG_Bool(REGB1)) {
+  } else {
+    nit_abort("Assert failed", NULL, LOCATE_standard___string, 991);
+  }
+  /* ../lib/standard/string.nit:992 */
+  REGB1 = TAG_Int(0);
+  REGB2 = TAG_Int(1);
+  /* ../lib/standard/kernel.nit:247 */
+  REGB2 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB2));
+  /* ../lib/standard/string.nit:992 */
+  fra.me.REG[0] = NEW_String_standard___string___String___with_infos(fra.me.REG[0], REGB0, REGB1, REGB2);
+  goto label1;
+  label1: while(0);
+  stack_frame_head = fra.me.prev;
+  return fra.me.REG[0];
+}
+static const char LOCATE_standard___string___NativeString___to_s_with_copy[] = "string::NativeString::to_s_with_copy";
+val_t standard___string___NativeString___to_s_with_copy(val_t p0){
+  struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
+  val_t REGB0;
+  val_t REGB1;
+  val_t REGB2;
+  val_t tmp;
+  fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+  fra.me.file = LOCATE_standard___string;
+  fra.me.line = 995;
+  fra.me.meth = LOCATE_standard___string___NativeString___to_s_with_copy;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 2;
+  fra.me.nitni_local_ref_head = NULL;
+  fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[1] = NIT_NULL;
+  fra.me.REG[0] = p0;
+  /* ../lib/standard/string.nit:997 */
+  REGB0 = CALL_standard___string___NativeString___cstring_length(fra.me.REG[0])(fra.me.REG[0]);
+  /* ../lib/standard/string.nit:998 */
+  REGB1 = TAG_Int(1);
+  /* ../lib/standard/kernel.nit:245 */
+  REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
+  /* ../lib/standard/string.nit:1007 */
+  fra.me.REG[1] = BOX_NativeString((char*)raw_alloc((UNTAG_Int(REGB1) * sizeof(char))));
+  /* ../lib/standard/string.nit:999 */
+  REGB1 = TAG_Int(0);
+  REGB2 = TAG_Int(0);
+  /* ../lib/standard/string.nit:972 */
+  (void)memcpy(UNBOX_NativeString(fra.me.REG[1])+UNTAG_Int(REGB2), UNBOX_NativeString(fra.me.REG[0])+UNTAG_Int(REGB1), UNTAG_Int(REGB0));;
+  /* ../lib/standard/string.nit:1000 */
+  REGB2 = TAG_Int(0);
+  REGB1 = TAG_Int(1);
+  /* ../lib/standard/kernel.nit:247 */
+  REGB1 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB1));
+  /* ../lib/standard/string.nit:1000 */
+  fra.me.REG[1] = NEW_String_standard___string___String___with_infos(fra.me.REG[1], REGB0, REGB2, REGB1);
+  goto label1;
+  label1: while(0);
+  stack_frame_head = fra.me.prev;
+  return fra.me.REG[1];
+}
+static const char LOCATE_standard___string___NativeString___init[] = "string::NativeString::init";
 void standard___string___NativeString___init(val_t p0, int* init_table){
   int itpos5 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_standard___string___NativeString].i;
   struct {struct stack_frame_t me;} fra;
@@ -3541,13 +5649,14 @@ void standard___string___NativeString___init(val_t p0, int* init_table){
   init_table[itpos5] = 1;
   return;
 }
+static const char LOCATE_standard___string___StringCapable___calloc_string[] = "string::StringCapable::calloc_string";
 val_t standard___string___StringCapable___calloc_string(val_t p0, val_t p1){
   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_standard___string;
-  fra.me.line = 611;
+  fra.me.line = 1007;
   fra.me.meth = LOCATE_standard___string___StringCapable___calloc_string;
   fra.me.has_broke = 0;
   fra.me.REG_size = 1;
@@ -3555,11 +5664,12 @@ val_t standard___string___StringCapable___calloc_string(val_t p0, val_t p1){
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[0] = p0;
   REGB0 = p1;
-  /* ../lib/standard/string.nit:611 */
+  /* ../lib/standard/string.nit:1007 */
   fra.me.REG[0] = BOX_NativeString((char*)raw_alloc((UNTAG_Int(REGB0) * sizeof(char))));
   stack_frame_head = fra.me.prev;
   return fra.me.REG[0];
 }
+static const char LOCATE_standard___string___Sys___args[] = "string::Sys::(string::Object::args)";
 val_t standard___string___Sys___args(val_t p0){
   struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
   val_t REGB0;
@@ -3567,7 +5677,7 @@ val_t standard___string___Sys___args(val_t p0){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 617;
+  fra.me.line = 1013;
   fra.me.meth = LOCATE_standard___string___Sys___args;
   fra.me.has_broke = 0;
   fra.me.REG_size = 3;
@@ -3576,16 +5686,16 @@ val_t standard___string___Sys___args(val_t p0){
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[2] = NIT_NULL;
   fra.me.REG[0] = p0;
-  /* ../lib/standard/string.nit:617 */
+  /* ../lib/standard/string.nit:1013 */
   fra.me.REG[1] = fra.me.REG[0];
-  /* ../lib/standard/string.nit:619 */
+  /* ../lib/standard/string.nit:1015 */
   fra.me.REG[2] = ATTR_standard___string___Sys____args_cache(fra.me.REG[1]);
   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);
@@ -3595,40 +5705,44 @@ val_t standard___string___Sys___args(val_t p0){
   if (UNTAG_Bool(REGB0)) {
     CALL_standard___string___Sys___init_args(fra.me.REG[1])(fra.me.REG[1]);
   }
-  /* ../lib/standard/string.nit:620 */
+  /* ../lib/standard/string.nit:1016 */
   fra.me.REG[1] = ATTR_standard___string___Sys____args_cache(fra.me.REG[1]);
   REGB0 = TAG_Bool(fra.me.REG[1]!=NIT_NULL);
   if (UNTAG_Bool(REGB0)) {
   } else {
-    nit_abort("Cast failed", NULL, LOCATE_standard___string, 620);
+    nit_abort("Cast failed", NULL, LOCATE_standard___string, 1016);
   }
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
   return fra.me.REG[1];
 }
+static const char LOCATE_standard___string___Sys___program_name[] = "string::Sys::program_name";
 val_t standard___string___Sys___program_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_standard___string;
-  fra.me.line = 623;
+  fra.me.line = 1019;
   fra.me.meth = LOCATE_standard___string___Sys___program_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;
-  /* ../lib/standard/string.nit:626 */
+  /* ../lib/standard/string.nit:1022 */
   REGB0 = TAG_Int(0);
-  fra.me.REG[0] = CALL_standard___string___Sys___native_argv(fra.me.REG[0])(fra.me.REG[0], REGB0);
-  fra.me.REG[0] = NEW_String_standard___string___String___from_cstring(fra.me.REG[0]);
+  /* ../lib/standard/string.nit:1041 */
+  fra.me.REG[0] = BOX_NativeString(glob_argv[UNTAG_Int(REGB0)]);
+  /* ../lib/standard/string.nit:1022 */
+  fra.me.REG[0] = CALL_standard___string___Object___to_s(fra.me.REG[0])(fra.me.REG[0]);
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
   return fra.me.REG[0];
 }
+static const char LOCATE_standard___string___Sys___init_args[] = "string::Sys::init_args";
 void standard___string___Sys___init_args(val_t p0){
   struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
   val_t REGB0;
@@ -3637,7 +5751,7 @@ void standard___string___Sys___init_args(val_t p0){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_standard___string;
-  fra.me.line = 629;
+  fra.me.line = 1025;
   fra.me.meth = LOCATE_standard___string___Sys___init_args;
   fra.me.has_broke = 0;
   fra.me.REG_size = 3;
@@ -3646,74 +5760,77 @@ void standard___string___Sys___init_args(val_t p0){
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[2] = NIT_NULL;
   fra.me.REG[0] = p0;
-  /* ../lib/standard/string.nit:632 */
-  REGB0 = CALL_standard___string___Sys___native_argc(fra.me.REG[0])(fra.me.REG[0]);
-  /* ../lib/standard/string.nit:633 */
+  /* ../lib/standard/string.nit:1038 */
+  REGB0 = TAG_Int(glob_argc);
+  /* ../lib/standard/string.nit:1029 */
   REGB1 = TAG_Int(0);
   fra.me.REG[1] = NEW_Array_standard___collection___array___Array___with_capacity(REGB1);
-  /* ../lib/standard/string.nit:634 */
+  /* ../lib/standard/string.nit:1030 */
   REGB1 = TAG_Int(1);
-  /* ../lib/standard/string.nit:635 */
+  /* ../lib/standard/string.nit:1031 */
   while(1) {
     REGB2 = TAG_Bool(VAL_ISA(REGB0, VTCOLOR_standard___kernel___Comparable___OTHER(REGB1), VTID_standard___kernel___Comparable___OTHER(REGB1))) /*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:242 */
     REGB2 = TAG_Bool(UNTAG_Int(REGB1)<UNTAG_Int(REGB0));
-    /* ../lib/standard/string.nit:635 */
+    /* ../lib/standard/string.nit:1031 */
     if (UNTAG_Bool(REGB2)) {
-      /* ../lib/standard/string.nit:636 */
+      /* ../lib/standard/string.nit:1032 */
       REGB2 = TAG_Int(1);
-      /* ../lib/standard/kernel.nit:237 */
+      /* ../lib/standard/kernel.nit:247 */
       REGB2 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB2));
-      /* ../lib/standard/string.nit:636 */
-      fra.me.REG[2] = CALL_standard___string___Sys___native_argv(fra.me.REG[0])(fra.me.REG[0], REGB1);
-      fra.me.REG[2] = NEW_String_standard___string___String___from_cstring(fra.me.REG[2]);
+      /* ../lib/standard/string.nit:1041 */
+      fra.me.REG[2] = BOX_NativeString(glob_argv[UNTAG_Int(REGB1)]);
+      /* ../lib/standard/string.nit:1032 */
+      fra.me.REG[2] = CALL_standard___string___Object___to_s(fra.me.REG[2])(fra.me.REG[2]);
       CALL_standard___collection___abstract_collection___Sequence_____braeq(fra.me.REG[1])(fra.me.REG[1], REGB2, fra.me.REG[2]);
-      /* ../lib/standard/string.nit:637 */
+      /* ../lib/standard/string.nit:1033 */
       REGB2 = TAG_Int(1);
-      /* ../lib/standard/kernel.nit:235 */
+      /* ../lib/standard/kernel.nit:245 */
       REGB2 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB2));
-      /* ../lib/standard/string.nit:637 */
+      /* ../lib/standard/string.nit:1033 */
       REGB1 = REGB2;
     } else {
-      /* ../lib/standard/string.nit:635 */
+      /* ../lib/standard/string.nit:1031 */
       goto label1;
     }
   }
   label1: while(0);
-  /* ../lib/standard/string.nit:639 */
+  /* ../lib/standard/string.nit:1035 */
   ATTR_standard___string___Sys____args_cache(fra.me.REG[0]) = fra.me.REG[1];
   stack_frame_head = fra.me.prev;
   return;
 }
+static const char LOCATE_standard___string___Sys___native_argc[] = "string::Sys::native_argc";
 val_t standard___string___Sys___native_argc(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_standard___string;
-  fra.me.line = 642;
+  fra.me.line = 1038;
   fra.me.meth = LOCATE_standard___string___Sys___native_argc;
   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;
-  /* ../lib/standard/string.nit:642 */
-  REGB0 = Sys_native_argc___out(fra.me.REG[0]);
+  /* ../lib/standard/string.nit:1038 */
+  REGB0 = TAG_Int(glob_argc);
   stack_frame_head = fra.me.prev;
   return REGB0;
 }
+static const char LOCATE_standard___string___Sys___native_argv[] = "string::Sys::native_argv";
 val_t standard___string___Sys___native_argv(val_t p0, val_t p1){
   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_standard___string;
-  fra.me.line = 644;
+  fra.me.line = 1041;
   fra.me.meth = LOCATE_standard___string___Sys___native_argv;
   fra.me.has_broke = 0;
   fra.me.REG_size = 1;
@@ -3721,8 +5838,8 @@ val_t standard___string___Sys___native_argv(val_t p0, val_t p1){
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[0] = p0;
   REGB0 = p1;
-  /* ../lib/standard/string.nit:644 */
-  fra.me.REG[0] = Sys_native_argv___out(fra.me.REG[0], REGB0);
+  /* ../lib/standard/string.nit:1041 */
+  fra.me.REG[0] = BOX_NativeString(glob_argv[UNTAG_Int(REGB0)]);
   stack_frame_head = fra.me.prev;
   return fra.me.REG[0];
 }