c_src: update

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

diff --git a/c_src/array._sep.c b/c_src/array._sep.c
index 4508ab7..e593de6 100644 (file)
--- a/c_src/array._sep.c
+++ b/c_src/array._sep.c
@@ -1,214 +1,27 @@
 /* This C file is generated by NIT to compile module array. */
 #include "array._sep.h"
-val_t array___AbstractArrayRead_____eqeq(val_t p0, val_t p1){
-  struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
+val_t array___AbstractArrayRead___length(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;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 128;
-  fra.me.meth = LOCATE_array___AbstractArrayRead_____eqeq;
+  fra.me.line = 23;
+  fra.me.meth = LOCATE_array___AbstractArrayRead___length;
   fra.me.has_broke = 0;
-  fra.me.REG_size = 4;
+  fra.me.REG_size = 1;
   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((fra.me.REG[1]!=NIT_NULL) && VAL_ISA(fra.me.REG[1], COLOR_AbstractArray, ID_AbstractArray)) /*cast AbstractArray[E]*/;
-  REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
-  /* ./../lib/standard//collection//array.nit:131 */
-  if (UNTAG_Bool(REGB0)) {
-    REGB0 = TAG_Bool(true);
-  } else {
-    REGB1 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
-    REGB0 = REGB1;
-  }
-  if (UNTAG_Bool(REGB0)) {
-    REGB0 = TAG_Bool(false);
-    goto label1;
-  }
-  REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
   /* ./../lib/standard//collection//array.nit:23 */
-  if (UNTAG_Bool(REGB1)) {
-  } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_length");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 23);
-    nit_exit(1);
-  }
-  REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
-  REGB2 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:133 */
-  if (UNTAG_Bool(REGB2)) {
-    fprintf(stderr, "Reciever is null");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 133);
-    nit_exit(1);
-  }
-  REGB2 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:23 */
-  if (UNTAG_Bool(REGB2)) {
-  } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_length");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 23);
-    nit_exit(1);
-  }
-  REGB2 = ATTR_array___AbstractArrayRead____length(fra.me.REG[1]);
-  REGB3 = TAG_Bool(IS_EQUAL_OO(REGB2,REGB1));
-  /* ./../lib/standard//collection//array.nit:133 */
-  if (UNTAG_Bool(REGB3)) {
+  REGB0 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB0)) {
   } else {
-    REGB2 = TAG_Bool((REGB2)==(REGB1));
-    REGB3 = REGB2;
-  /* ./../lib/standard//collection//array.nit:133 */
-  }
-  REGB3 = TAG_Bool(!UNTAG_Bool(REGB3));
-  if (UNTAG_Bool(REGB3)) {
-    REGB3 = TAG_Bool(false);
-    REGB0 = REGB3;
-    goto label1;
-  }
-  REGB3 = TAG_Int(0);
-  /* ./../lib/standard//collection//array.nit:135 */
-  while(1) {
-    REGB2 = TAG_Bool(UNTAG_Int(REGB3)<UNTAG_Int(REGB1));
-    /* ./../lib/standard//collection//array.nit:135 */
-    if (UNTAG_Bool(REGB2)) {
-      fra.me.REG[2] = CALL_abstract_collection___MapRead_____bra(fra.me.REG[0])(fra.me.REG[0], REGB3);
-      REGB2 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
-      /* ./../lib/standard//collection//array.nit:136 */
-      if (UNTAG_Bool(REGB2)) {
-        fprintf(stderr, "Reciever is null");
-        fprintf(stderr, " (%s:%d)\n", LOCATE_array, 136);
-        nit_exit(1);
-      }
-      fra.me.REG[3] = CALL_abstract_collection___MapRead_____bra(fra.me.REG[1])(fra.me.REG[1], REGB3);
-      REGB2 = TAG_Bool(IS_EQUAL_NN(fra.me.REG[2],fra.me.REG[3]));
-      if (UNTAG_Bool(REGB2)) {
-      } else {
-        REGB4 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
-        if (UNTAG_Bool(REGB4)) {
-          REGB4 = TAG_Bool(false);
-          REGB2 = REGB4;
-        } else {
-          REGB4 = CALL_kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]);
-          REGB2 = REGB4;
-        }
-      }
-      REGB2 = TAG_Bool(!UNTAG_Bool(REGB2));
-      if (UNTAG_Bool(REGB2)) {
-        REGB2 = TAG_Bool(false);
-        REGB0 = REGB2;
-        goto label1;
-      }
-      REGB2 = TAG_Int(1);
-      REGB2 = TAG_Int(UNTAG_Int(REGB3)+UNTAG_Int(REGB2));
-      REGB3 = REGB2;
-    /* ./../lib/standard//collection//array.nit:137 */
-    } else {
-      /* ./../lib/standard//collection//array.nit:135 */
-      goto label2;
-    }
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
   }
-  label2: while(0);
-  REGB3 = TAG_Bool(true);
-  REGB0 = REGB3;
-  /* ./../lib/standard//collection//array.nit:139 */
-  goto label1;
-  label1: while(0);
+  REGB0 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
   stack_frame_head = fra.me.prev;
   return REGB0;
 }
-void array___AbstractArrayRead___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 REGB3;
-  val_t tmp;
-  fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
-  fra.me.file = LOCATE_array;
-  fra.me.line = 115;
-  fra.me.meth = LOCATE_array___AbstractArrayRead___output;
-  fra.me.has_broke = 0;
-  fra.me.REG_size = 2;
-  fra.me.REG[0] = NIT_NULL;
-  fra.me.REG[1] = NIT_NULL;
-  fra.me.REG[0] = p0;
-  REGB0 = TAG_Int(0);
-  REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:23 */
-  if (UNTAG_Bool(REGB1)) {
-  } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_length");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 23);
-    nit_exit(1);
-  }
-  REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
-  /* ./../lib/standard//collection//array.nit:119 */
-  while(1) {
-    REGB2 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
-    /* ./../lib/standard//collection//array.nit:119 */
-    if (UNTAG_Bool(REGB2)) {
-      fra.me.REG[1] = CALL_abstract_collection___MapRead_____bra(fra.me.REG[0])(fra.me.REG[0], REGB0);
-      REGB2 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
-      /* ./../lib/standard//collection//array.nit:121 */
-      if (UNTAG_Bool(REGB2)) {
-      } else {
-        REGB3 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
-        if (UNTAG_Bool(REGB3)) {
-          REGB3 = TAG_Bool(false);
-          REGB2 = REGB3;
-        } else {
-          REGB3 = CALL_kernel___Object_____eqeq(fra.me.REG[1])(fra.me.REG[1], NIT_NULL);
-          REGB2 = REGB3;
-        }
-      }
-      REGB2 = TAG_Bool(!UNTAG_Bool(REGB2));
-      if (UNTAG_Bool(REGB2)) {
-        REGB2 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
-        if (UNTAG_Bool(REGB2)) {
-          fprintf(stderr, "Reciever is null");
-          fprintf(stderr, " (%s:%d)\n", LOCATE_array, 121);
-          nit_exit(1);
-        }
-        CALL_kernel___Object___output(fra.me.REG[1])(fra.me.REG[1]);
-      }
-      REGB2 = TAG_Int(1);
-      REGB2 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB2));
-      REGB0 = REGB2;
-    /* ./../lib/standard//collection//array.nit:122 */
-    } else {
-      /* ./../lib/standard//collection//array.nit:119 */
-      goto label1;
-    }
-  }
-  label1: while(0);
-  stack_frame_head = fra.me.prev;
-  return;
-}
-val_t array___AbstractArrayRead___iterator(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_array;
-  fra.me.line = 126;
-  fra.me.meth = LOCATE_array___AbstractArrayRead___iterator;
-  fra.me.has_broke = 0;
-  fra.me.REG_size = 1;
-  fra.me.REG[0] = NIT_NULL;
-  fra.me.REG[0] = p0;
-  fra.me.REG[0] = NEW_ArrayIterator_array___ArrayIterator___init(fra.me.REG[0]);
-  /* ./../lib/standard//collection//array.nit:126 */
-  goto label1;
-  label1: while(0);
-  stack_frame_head = fra.me.prev;
-  return fra.me.REG[0];
-}
 val_t array___AbstractArrayRead___is_empty(val_t p0){
   struct {struct stack_frame_t me;} fra;
   val_t REGB0;
@@ -223,52 +36,27 @@ val_t array___AbstractArrayRead___is_empty(val_t p0){
   fra.me.REG_size = 1;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[0] = p0;
-  REGB0 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
   /* ./../lib/standard//collection//array.nit:26 */
+  REGB0 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_length");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 26);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 26);
   }
   REGB0 = ATTR_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:207 */
     REGB1 = TAG_Bool((REGB0)==(REGB1));
+    /* ./../lib/standard//collection//array.nit:26 */
     REGB2 = REGB1;
-  /* ./../lib/standard//collection//array.nit:26 */
   }
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
   return REGB2;
 }
-val_t array___AbstractArrayRead___length(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_array;
-  fra.me.line = 23;
-  fra.me.meth = LOCATE_array___AbstractArrayRead___length;
-  fra.me.has_broke = 0;
-  fra.me.REG_size = 1;
-  fra.me.REG[0] = NIT_NULL;
-  fra.me.REG[0] = p0;
-  REGB0 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:23 */
-  if (UNTAG_Bool(REGB0)) {
-  } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_length");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 23);
-    nit_exit(1);
-  }
-  REGB0 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
-  stack_frame_head = fra.me.prev;
-  return REGB0;
-}
 val_t array___AbstractArrayRead___has(val_t p0, val_t p1){
   struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
   val_t REGB0;
@@ -287,24 +75,24 @@ val_t array___AbstractArrayRead___has(val_t p0, val_t p1){
   fra.me.REG[2] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
+  /* ./../lib/standard//collection//array.nit:30 */
   REGB0 = TAG_Int(0);
-  REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
   /* ./../lib/standard//collection//array.nit:23 */
+  REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB1)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_length");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 23);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
   }
   REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
   /* ./../lib/standard//collection//array.nit:32 */
   while(1) {
+    /* ./../lib/standard//kernel.nit:212 */
     REGB2 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
     /* ./../lib/standard//collection//array.nit:32 */
     if (UNTAG_Bool(REGB2)) {
+      /* ./../lib/standard//collection//array.nit:33 */
       fra.me.REG[2] = CALL_abstract_collection___MapRead_____bra(fra.me.REG[0])(fra.me.REG[0], REGB0);
       REGB2 = TAG_Bool(IS_EQUAL_NN(fra.me.REG[2],fra.me.REG[1]));
-      /* ./../lib/standard//collection//array.nit:33 */
       if (UNTAG_Bool(REGB2)) {
       } else {
         REGB3 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
@@ -320,19 +108,21 @@ val_t array___AbstractArrayRead___has(val_t p0, val_t p1){
         REGB2 = TAG_Bool(true);
         goto label1;
       }
+      /* ./../lib/standard//collection//array.nit:34 */
       REGB3 = TAG_Int(1);
+      /* ./../lib/standard//kernel.nit:215 */
       REGB3 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB3));
+      /* ./../lib/standard//collection//array.nit:34 */
       REGB0 = REGB3;
-    /* ./../lib/standard//collection//array.nit:34 */
     } else {
       /* ./../lib/standard//collection//array.nit:32 */
       goto label2;
     }
   }
   label2: while(0);
+  /* ./../lib/standard//collection//array.nit:36 */
   REGB0 = TAG_Bool(false);
   REGB2 = REGB0;
-  /* ./../lib/standard//collection//array.nit:36 */
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
@@ -356,24 +146,24 @@ val_t array___AbstractArrayRead___has_only(val_t p0, val_t p1){
   fra.me.REG[2] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
+  /* ./../lib/standard//collection//array.nit:41 */
   REGB0 = TAG_Int(0);
-  REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
   /* ./../lib/standard//collection//array.nit:23 */
+  REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB1)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_length");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 23);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
   }
   REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
   /* ./../lib/standard//collection//array.nit:43 */
   while(1) {
+    /* ./../lib/standard//kernel.nit:212 */
     REGB2 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
     /* ./../lib/standard//collection//array.nit:43 */
     if (UNTAG_Bool(REGB2)) {
+      /* ./../lib/standard//collection//array.nit:44 */
       fra.me.REG[2] = CALL_abstract_collection___MapRead_____bra(fra.me.REG[0])(fra.me.REG[0], REGB0);
       REGB2 = TAG_Bool(IS_EQUAL_NN(fra.me.REG[2],fra.me.REG[1]));
-      /* ./../lib/standard//collection//array.nit:44 */
       if (UNTAG_Bool(REGB2)) {
       } else {
         REGB3 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
@@ -390,24 +180,65 @@ val_t array___AbstractArrayRead___has_only(val_t p0, val_t p1){
         REGB2 = TAG_Bool(false);
         goto label1;
       }
+      /* ./../lib/standard//collection//array.nit:45 */
       REGB3 = TAG_Int(1);
+      /* ./../lib/standard//kernel.nit:215 */
       REGB3 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB3));
+      /* ./../lib/standard//collection//array.nit:45 */
       REGB0 = REGB3;
-    /* ./../lib/standard//collection//array.nit:45 */
     } else {
       /* ./../lib/standard//collection//array.nit:43 */
       goto label2;
     }
   }
   label2: while(0);
+  /* ./../lib/standard//collection//array.nit:47 */
   REGB0 = TAG_Bool(true);
   REGB2 = REGB0;
-  /* ./../lib/standard//collection//array.nit:47 */
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
   return REGB2;
 }
+val_t array___AbstractArrayRead___has_key(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_array;
+  fra.me.line = 50;
+  fra.me.meth = LOCATE_array___AbstractArrayRead___has_key;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 1;
+  fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[0] = p0;
+  REGB0 = p1;
+  /* ./../lib/standard//collection//array.nit:50 */
+  REGB1 = TAG_Int(0);
+  /* ./../lib/standard//kernel.nit:213 */
+  REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
+  /* ./../lib/standard//collection//array.nit:50 */
+  if (UNTAG_Bool(REGB1)) {
+    /* ./../lib/standard//collection//array.nit:23 */
+    REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+    if (UNTAG_Bool(REGB1)) {
+    } else {
+      nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
+    }
+    REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
+    /* ./../lib/standard//kernel.nit:212 */
+    REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
+  } else {
+    /* ./../lib/standard//collection//array.nit:50 */
+    REGB0 = TAG_Bool(false);
+    REGB1 = REGB0;
+  }
+  goto label1;
+  label1: while(0);
+  stack_frame_head = fra.me.prev;
+  return REGB1;
+}
 val_t array___AbstractArrayRead___count(val_t p0, val_t p1){
   struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
   val_t REGB0;
@@ -427,25 +258,26 @@ val_t array___AbstractArrayRead___count(val_t p0, val_t p1){
   fra.me.REG[2] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
+  /* ./../lib/standard//collection//array.nit:54 */
   REGB0 = TAG_Int(0);
+  /* ./../lib/standard//collection//array.nit:55 */
   REGB1 = TAG_Int(0);
-  REGB2 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
   /* ./../lib/standard//collection//array.nit:23 */
+  REGB2 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB2)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_length");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 23);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
   }
   REGB2 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
   /* ./../lib/standard//collection//array.nit:57 */
   while(1) {
+    /* ./../lib/standard//kernel.nit:212 */
     REGB3 = TAG_Bool(UNTAG_Int(REGB1)<UNTAG_Int(REGB2));
     /* ./../lib/standard//collection//array.nit:57 */
     if (UNTAG_Bool(REGB3)) {
+      /* ./../lib/standard//collection//array.nit:58 */
       fra.me.REG[2] = CALL_abstract_collection___MapRead_____bra(fra.me.REG[0])(fra.me.REG[0], REGB1);
       REGB3 = TAG_Bool(IS_EQUAL_NN(fra.me.REG[2],fra.me.REG[1]));
-      /* ./../lib/standard//collection//array.nit:58 */
       if (UNTAG_Bool(REGB3)) {
       } else {
         REGB4 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
@@ -459,14 +291,17 @@ val_t array___AbstractArrayRead___count(val_t p0, val_t p1){
       }
       if (UNTAG_Bool(REGB3)) {
         REGB3 = TAG_Int(1);
+        /* ./../lib/standard//kernel.nit:215 */
         REGB3 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB3));
+        /* ./../lib/standard//collection//array.nit:58 */
         REGB0 = REGB3;
-      /* ./../lib/standard//collection//array.nit:58 */
       }
+      /* ./../lib/standard//collection//array.nit:59 */
       REGB3 = TAG_Int(1);
+      /* ./../lib/standard//kernel.nit:215 */
       REGB3 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB3));
+      /* ./../lib/standard//collection//array.nit:59 */
       REGB1 = REGB3;
-    /* ./../lib/standard//collection//array.nit:59 */
     } else {
       /* ./../lib/standard//collection//array.nit:57 */
       goto label1;
@@ -479,44 +314,6 @@ val_t array___AbstractArrayRead___count(val_t p0, val_t p1){
   stack_frame_head = fra.me.prev;
   return REGB0;
 }
-val_t array___AbstractArrayRead___has_key(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_array;
-  fra.me.line = 50;
-  fra.me.meth = LOCATE_array___AbstractArrayRead___has_key;
-  fra.me.has_broke = 0;
-  fra.me.REG_size = 1;
-  fra.me.REG[0] = NIT_NULL;
-  fra.me.REG[0] = p0;
-  REGB0 = p1;
-  REGB1 = TAG_Int(0);
-  REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
-  /* ./../lib/standard//collection//array.nit:50 */
-  if (UNTAG_Bool(REGB1)) {
-    REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
-    /* ./../lib/standard//collection//array.nit:23 */
-    if (UNTAG_Bool(REGB1)) {
-    } else {
-      fprintf(stderr, "Uninitialized attribute %s", "_length");
-      fprintf(stderr, " (%s:%d)\n", LOCATE_array, 23);
-      nit_exit(1);
-    }
-    REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
-    REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
-  /* ./../lib/standard//collection//array.nit:50 */
-  } else {
-    REGB0 = TAG_Bool(false);
-    REGB1 = REGB0;
-  }
-  goto label1;
-  label1: while(0);
-  stack_frame_head = fra.me.prev;
-  return REGB1;
-}
 val_t array___AbstractArrayRead___index_of(val_t p0, val_t p1){
   struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
   val_t REGB0;
@@ -531,9 +328,9 @@ val_t array___AbstractArrayRead___index_of(val_t p0, val_t p1){
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
+  /* ./../lib/standard//collection//array.nit:64 */
   REGB0 = TAG_Int(0);
   REGB0 = CALL_array___AbstractArrayRead___index_of_from(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], REGB0);
-  /* ./../lib/standard//collection//array.nit:64 */
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
@@ -554,19 +351,19 @@ val_t array___AbstractArrayRead___last_index_of(val_t p0, val_t p1){
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
-  REGB0 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
   /* ./../lib/standard//collection//array.nit:23 */
+  REGB0 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_length");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 23);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
   }
   REGB0 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
+  /* ./../lib/standard//collection//array.nit:66 */
   REGB1 = TAG_Int(1);
+  /* ./../lib/standard//kernel.nit:217 */
   REGB1 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB1));
-  REGB1 = CALL_array___AbstractArrayRead___last_index_of_from(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], REGB1);
   /* ./../lib/standard//collection//array.nit:66 */
+  REGB1 = CALL_array___AbstractArrayRead___last_index_of_from(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], REGB1);
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
@@ -591,23 +388,22 @@ val_t array___AbstractArrayRead___index_of_from(val_t p0, val_t p1, val_t p2){
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
   REGB0 = p2;
-  REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
   /* ./../lib/standard//collection//array.nit:23 */
+  REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB1)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_length");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 23);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
   }
   REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
   /* ./../lib/standard//collection//array.nit:72 */
   while(1) {
+    /* ./../lib/standard//kernel.nit:212 */
     REGB2 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
     /* ./../lib/standard//collection//array.nit:72 */
     if (UNTAG_Bool(REGB2)) {
+      /* ./../lib/standard//collection//array.nit:73 */
       fra.me.REG[2] = CALL_abstract_collection___MapRead_____bra(fra.me.REG[0])(fra.me.REG[0], REGB0);
       REGB2 = TAG_Bool(IS_EQUAL_NN(fra.me.REG[2],fra.me.REG[1]));
-      /* ./../lib/standard//collection//array.nit:73 */
       if (UNTAG_Bool(REGB2)) {
       } else {
         REGB3 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
@@ -620,24 +416,28 @@ val_t array___AbstractArrayRead___index_of_from(val_t p0, val_t p1, val_t p2){
         }
       }
       if (UNTAG_Bool(REGB2)) {
-        REGB2 = REGB0;
         /* ./../lib/standard//collection//array.nit:74 */
+        REGB2 = REGB0;
         goto label1;
       }
+      /* ./../lib/standard//collection//array.nit:76 */
       REGB3 = TAG_Int(1);
+      /* ./../lib/standard//kernel.nit:215 */
       REGB3 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB3));
+      /* ./../lib/standard//collection//array.nit:76 */
       REGB0 = REGB3;
-    /* ./../lib/standard//collection//array.nit:76 */
     } else {
       /* ./../lib/standard//collection//array.nit:72 */
       goto label2;
     }
   }
   label2: while(0);
+  /* ./../lib/standard//collection//array.nit:78 */
   REGB0 = TAG_Int(1);
+  /* ./../lib/standard//kernel.nit:216 */
   REGB0 = TAG_Int(-UNTAG_Int(REGB0));
-  REGB2 = REGB0;
   /* ./../lib/standard//collection//array.nit:78 */
+  REGB2 = REGB0;
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
@@ -664,12 +464,13 @@ val_t array___AbstractArrayRead___last_index_of_from(val_t p0, val_t p1, val_t p
   /* ./../lib/standard//collection//array.nit:84 */
   while(1) {
     REGB1 = TAG_Int(0);
+    /* ./../lib/standard//kernel.nit:213 */
     REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
     /* ./../lib/standard//collection//array.nit:84 */
     if (UNTAG_Bool(REGB1)) {
+      /* ./../lib/standard//collection//array.nit:85 */
       fra.me.REG[2] = CALL_abstract_collection___MapRead_____bra(fra.me.REG[0])(fra.me.REG[0], REGB0);
       REGB1 = TAG_Bool(IS_EQUAL_NN(fra.me.REG[2],fra.me.REG[1]));
-      /* ./../lib/standard//collection//array.nit:85 */
       if (UNTAG_Bool(REGB1)) {
       } else {
         REGB2 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
@@ -682,14 +483,16 @@ val_t array___AbstractArrayRead___last_index_of_from(val_t p0, val_t p1, val_t p
         }
       }
       if (UNTAG_Bool(REGB1)) {
-        REGB1 = REGB0;
         /* ./../lib/standard//collection//array.nit:86 */
+        REGB1 = REGB0;
         goto label1;
       } else {
+        /* ./../lib/standard//collection//array.nit:88 */
         REGB2 = TAG_Int(1);
+        /* ./../lib/standard//kernel.nit:217 */
         REGB2 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB2));
+        /* ./../lib/standard//collection//array.nit:88 */
         REGB0 = REGB2;
-      /* ./../lib/standard//collection//array.nit:88 */
       }
     } else {
       /* ./../lib/standard//collection//array.nit:84 */
@@ -697,10 +500,12 @@ val_t array___AbstractArrayRead___last_index_of_from(val_t p0, val_t p1, val_t p
     }
   }
   label2: while(0);
+  /* ./../lib/standard//collection//array.nit:91 */
   REGB0 = TAG_Int(1);
+  /* ./../lib/standard//kernel.nit:216 */
   REGB0 = TAG_Int(-UNTAG_Int(REGB0));
-  REGB1 = REGB0;
   /* ./../lib/standard//collection//array.nit:91 */
+  REGB1 = REGB0;
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
@@ -721,28 +526,31 @@ val_t array___AbstractArrayRead___reversed(val_t p0){
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[2] = NIT_NULL;
   fra.me.REG[0] = p0;
-  REGB0 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
   /* ./../lib/standard//collection//array.nit:96 */
+  REGB0 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_length");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 96);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 96);
   }
   REGB0 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
+  /* ./../lib/standard//collection//array.nit:97 */
   fra.me.REG[1] = NEW_Array_array___Array___with_capacity(REGB0);
   /* ./../lib/standard//collection//array.nit:98 */
   while(1) {
     REGB1 = TAG_Int(0);
+    /* ./../lib/standard//kernel.nit:214 */
     REGB1 = TAG_Bool(UNTAG_Int(REGB0)>UNTAG_Int(REGB1));
     /* ./../lib/standard//collection//array.nit:98 */
     if (UNTAG_Bool(REGB1)) {
+      /* ./../lib/standard//collection//array.nit:99 */
       REGB1 = TAG_Int(1);
+      /* ./../lib/standard//kernel.nit:217 */
       REGB1 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB1));
+      /* ./../lib/standard//collection//array.nit:99 */
       REGB0 = REGB1;
-      fra.me.REG[2] = CALL_abstract_collection___MapRead_____bra(fra.me.REG[0])(fra.me.REG[0], REGB0);
       /* ./../lib/standard//collection//array.nit:100 */
-      array___Array___add(fra.me.REG[1], fra.me.REG[2]);
+      fra.me.REG[2] = CALL_abstract_collection___MapRead_____bra(fra.me.REG[0])(fra.me.REG[0], REGB0);
+      CALL_abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]);
     } else {
       /* ./../lib/standard//collection//array.nit:98 */
       goto label1;
@@ -780,16 +588,21 @@ void array___AbstractArrayRead___copy_to(val_t p0, val_t p1, val_t p2, val_t p3,
   /* ./../lib/standard//collection//array.nit:109 */
   while(1) {
     REGB3 = TAG_Int(0);
+    /* ./../lib/standard//kernel.nit:214 */
     REGB3 = TAG_Bool(UNTAG_Int(REGB1)>UNTAG_Int(REGB3));
     /* ./../lib/standard//collection//array.nit:109 */
     if (UNTAG_Bool(REGB3)) {
+      /* ./../lib/standard//collection//array.nit:110 */
       REGB3 = TAG_Int(1);
+      /* ./../lib/standard//kernel.nit:217 */
       REGB3 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB3));
+      /* ./../lib/standard//collection//array.nit:110 */
       REGB1 = REGB3;
+      /* ./../lib/standard//kernel.nit:215 */
       REGB3 = TAG_Int(UNTAG_Int(REGB2)+UNTAG_Int(REGB1));
       REGB4 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
-      fra.me.REG[2] = CALL_abstract_collection___MapRead_____bra(fra.me.REG[0])(fra.me.REG[0], REGB4);
       /* ./../lib/standard//collection//array.nit:111 */
+      fra.me.REG[2] = CALL_abstract_collection___MapRead_____bra(fra.me.REG[0])(fra.me.REG[0], REGB4);
       CALL_abstract_collection___Map_____braeq(fra.me.REG[1])(fra.me.REG[1], REGB3, fra.me.REG[2]);
     } else {
       /* ./../lib/standard//collection//array.nit:109 */
@@ -800,187 +613,239 @@ void array___AbstractArrayRead___copy_to(val_t p0, val_t p1, val_t p2, val_t p3,
   stack_frame_head = fra.me.prev;
   return;
 }
-void array___AbstractArrayRead___init(val_t p0, int* init_table){
-  int itpos0 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_AbstractArrayRead].i;
-  struct {struct stack_frame_t me;} fra;
-  val_t tmp;
-  if (init_table[itpos0]) return;
-  fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
-  fra.me.file = LOCATE_array;
-  fra.me.line = 0;
-  fra.me.meth = LOCATE_array___AbstractArrayRead___init;
-  fra.me.has_broke = 0;
-  fra.me.REG_size = 0;
-  stack_frame_head = fra.me.prev;
-  init_table[itpos0] = 1;
-  return;
-}
-void array___AbstractArray___clear(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_array;
-  fra.me.line = 192;
-  fra.me.meth = LOCATE_array___AbstractArray___clear;
-  fra.me.has_broke = 0;
-  fra.me.REG_size = 1;
-  fra.me.REG[0] = NIT_NULL;
-  fra.me.REG[0] = p0;
-  REGB0 = TAG_Int(0);
-  /* ./../lib/standard//collection//array.nit:192 */
-  ATTR_array___AbstractArrayRead____length(fra.me.REG[0]) = REGB0;
-  stack_frame_head = fra.me.prev;
-  return;
-}
-void array___AbstractArray___remove(val_t p0, val_t p1){
+void array___AbstractArrayRead___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 REGB3;
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 194;
-  fra.me.meth = LOCATE_array___AbstractArray___remove;
+  fra.me.line = 115;
+  fra.me.meth = LOCATE_array___AbstractArrayRead___output;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
-  fra.me.REG[1] = p1;
-  REGB0 = CALL_abstract_collection___SequenceRead___index_of(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
-  /* ./../lib/standard//collection//array.nit:194 */
-  CALL_abstract_collection___Map___remove_at(fra.me.REG[0])(fra.me.REG[0], REGB0);
+  /* ./../lib/standard//collection//array.nit:117 */
+  REGB0 = TAG_Int(0);
+  /* ./../lib/standard//collection//array.nit:23 */
+  REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB1)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
+  }
+  REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
+  /* ./../lib/standard//collection//array.nit:119 */
+  while(1) {
+    /* ./../lib/standard//kernel.nit:212 */
+    REGB2 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
+    /* ./../lib/standard//collection//array.nit:119 */
+    if (UNTAG_Bool(REGB2)) {
+      /* ./../lib/standard//collection//array.nit:120 */
+      fra.me.REG[1] = CALL_abstract_collection___MapRead_____bra(fra.me.REG[0])(fra.me.REG[0], REGB0);
+      /* ./../lib/standard//collection//array.nit:121 */
+      REGB2 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
+      if (UNTAG_Bool(REGB2)) {
+      } else {
+        REGB3 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
+        if (UNTAG_Bool(REGB3)) {
+          REGB3 = TAG_Bool(false);
+          REGB2 = REGB3;
+        } else {
+          REGB3 = CALL_kernel___Object_____eqeq(fra.me.REG[1])(fra.me.REG[1], NIT_NULL);
+          REGB2 = REGB3;
+        }
+      }
+      REGB2 = TAG_Bool(!UNTAG_Bool(REGB2));
+      if (UNTAG_Bool(REGB2)) {
+        REGB2 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
+        if (UNTAG_Bool(REGB2)) {
+          nit_abort("Reciever is null", NULL, LOCATE_array, 121);
+        }
+        CALL_kernel___Object___output(fra.me.REG[1])(fra.me.REG[1]);
+      }
+      /* ./../lib/standard//collection//array.nit:122 */
+      REGB2 = TAG_Int(1);
+      /* ./../lib/standard//kernel.nit:215 */
+      REGB2 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB2));
+      /* ./../lib/standard//collection//array.nit:122 */
+      REGB0 = REGB2;
+    } else {
+      /* ./../lib/standard//collection//array.nit:119 */
+      goto label1;
+    }
+  }
+  label1: while(0);
   stack_frame_head = fra.me.prev;
   return;
 }
-void array___AbstractArray___remove_all(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 array___AbstractArrayRead___iterator(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_array;
-  fra.me.line = 196;
-  fra.me.meth = LOCATE_array___AbstractArray___remove_all;
+  fra.me.line = 126;
+  fra.me.meth = LOCATE_array___AbstractArrayRead___iterator;
   fra.me.has_broke = 0;
-  fra.me.REG_size = 2;
+  fra.me.REG_size = 1;
   fra.me.REG[0] = NIT_NULL;
-  fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
-  fra.me.REG[1] = p1;
-  REGB0 = CALL_abstract_collection___SequenceRead___index_of(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
-  /* ./../lib/standard//collection//array.nit:199 */
-  while(1) {
-    REGB1 = TAG_Int(0);
-    REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
-    /* ./../lib/standard//collection//array.nit:199 */
-    if (UNTAG_Bool(REGB1)) {
-      /* ./../lib/standard//collection//array.nit:200 */
-      CALL_abstract_collection___Map___remove_at(fra.me.REG[0])(fra.me.REG[0], REGB0);
-      REGB1 = CALL_array___AbstractArrayRead___index_of_from(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], REGB0);
-      REGB0 = REGB1;
-    /* ./../lib/standard//collection//array.nit:201 */
-    } else {
-      /* ./../lib/standard//collection//array.nit:199 */
-      goto label1;
-    }
-  }
+  /* ./../lib/standard//collection//array.nit:126 */
+  fra.me.REG[0] = NEW_ArrayIterator_array___ArrayIterator___init(fra.me.REG[0]);
+  goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
-  return;
+  return fra.me.REG[0];
 }
-void array___AbstractArray___remove_at(val_t p0, val_t p1){
-  struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
+val_t array___AbstractArrayRead_____eqeq(val_t p0, val_t p1){
+  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_array;
-  fra.me.line = 205;
-  fra.me.meth = LOCATE_array___AbstractArray___remove_at;
+  fra.me.line = 128;
+  fra.me.meth = LOCATE_array___AbstractArrayRead_____eqeq;
   fra.me.has_broke = 0;
-  fra.me.REG_size = 2;
+  fra.me.REG_size = 4;
   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;
-  REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+  fra.me.REG[1] = p1;
+  /* ./../lib/standard//collection//array.nit:131 */
+  REGB0 = TAG_Bool((fra.me.REG[1]!=NIT_NULL) && VAL_ISA(fra.me.REG[1], COLOR_AbstractArray, ID_AbstractArray)) /*cast AbstractArray[E]*/;
+  REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
+  if (UNTAG_Bool(REGB0)) {
+    REGB0 = TAG_Bool(true);
+  } else {
+    REGB1 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
+    REGB0 = REGB1;
+  }
+  if (UNTAG_Bool(REGB0)) {
+    REGB0 = TAG_Bool(false);
+    goto label1;
+  }
   /* ./../lib/standard//collection//array.nit:23 */
+  REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB1)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_length");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 23);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
   }
   REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
-  REGB2 = TAG_Int(0);
-  REGB2 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB2));
-  /* ./../lib/standard//collection//array.nit:208 */
+  /* ./../lib/standard//collection//array.nit:133 */
+  REGB2 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
+  if (UNTAG_Bool(REGB2)) {
+    nit_abort("Reciever is null", NULL, LOCATE_array, 133);
+  }
+  /* ./../lib/standard//collection//array.nit:23 */
+  REGB2 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
   if (UNTAG_Bool(REGB2)) {
-    REGB2 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
-  /* ./../lib/standard//collection//array.nit:208 */
   } else {
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
+  }
+  REGB2 = ATTR_array___AbstractArrayRead____length(fra.me.REG[1]);
+  /* ./../lib/standard//collection//array.nit:133 */
+  REGB3 = TAG_Bool(IS_EQUAL_OO(REGB2,REGB1));
+  if (UNTAG_Bool(REGB3)) {
+  } else {
+    /* ./../lib/standard//kernel.nit:207 */
+    REGB2 = TAG_Bool((REGB2)==(REGB1));
+    /* ./../lib/standard//collection//array.nit:133 */
+    REGB3 = REGB2;
+  }
+  REGB3 = TAG_Bool(!UNTAG_Bool(REGB3));
+  if (UNTAG_Bool(REGB3)) {
     REGB3 = TAG_Bool(false);
-    REGB2 = REGB3;
+    REGB0 = REGB3;
+    goto label1;
   }
-  if (UNTAG_Bool(REGB2)) {
-    REGB2 = TAG_Int(1);
-    REGB2 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB2));
-    /* ./../lib/standard//collection//array.nit:210 */
-    while(1) {
-      REGB0 = TAG_Bool(UNTAG_Int(REGB2)<UNTAG_Int(REGB1));
-      /* ./../lib/standard//collection//array.nit:210 */
-      if (UNTAG_Bool(REGB0)) {
-        REGB0 = TAG_Int(1);
-        REGB0 = TAG_Int(UNTAG_Int(REGB2)-UNTAG_Int(REGB0));
-        fra.me.REG[1] = CALL_abstract_collection___MapRead_____bra(fra.me.REG[0])(fra.me.REG[0], REGB2);
-        /* ./../lib/standard//collection//array.nit:211 */
-        CALL_abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB0, fra.me.REG[1]);
-        REGB0 = TAG_Int(1);
-        REGB0 = TAG_Int(UNTAG_Int(REGB2)+UNTAG_Int(REGB0));
-        REGB2 = REGB0;
-      /* ./../lib/standard//collection//array.nit:212 */
+  /* ./../lib/standard//collection//array.nit:134 */
+  REGB3 = TAG_Int(0);
+  /* ./../lib/standard//collection//array.nit:135 */
+  while(1) {
+    /* ./../lib/standard//kernel.nit:212 */
+    REGB2 = TAG_Bool(UNTAG_Int(REGB3)<UNTAG_Int(REGB1));
+    /* ./../lib/standard//collection//array.nit:135 */
+    if (UNTAG_Bool(REGB2)) {
+      /* ./../lib/standard//collection//array.nit:136 */
+      fra.me.REG[2] = CALL_abstract_collection___MapRead_____bra(fra.me.REG[0])(fra.me.REG[0], REGB3);
+      REGB2 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
+      if (UNTAG_Bool(REGB2)) {
+        nit_abort("Reciever is null", NULL, LOCATE_array, 136);
+      }
+      fra.me.REG[3] = CALL_abstract_collection___MapRead_____bra(fra.me.REG[1])(fra.me.REG[1], REGB3);
+      REGB2 = TAG_Bool(IS_EQUAL_NN(fra.me.REG[2],fra.me.REG[3]));
+      if (UNTAG_Bool(REGB2)) {
       } else {
-        /* ./../lib/standard//collection//array.nit:210 */
+        REGB4 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
+        if (UNTAG_Bool(REGB4)) {
+          REGB4 = TAG_Bool(false);
+          REGB2 = REGB4;
+        } else {
+          REGB4 = CALL_kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[3]);
+          REGB2 = REGB4;
+        }
+      }
+      REGB2 = TAG_Bool(!UNTAG_Bool(REGB2));
+      if (UNTAG_Bool(REGB2)) {
+        REGB2 = TAG_Bool(false);
+        REGB0 = REGB2;
         goto label1;
       }
+      /* ./../lib/standard//collection//array.nit:137 */
+      REGB2 = TAG_Int(1);
+      /* ./../lib/standard//kernel.nit:215 */
+      REGB2 = TAG_Int(UNTAG_Int(REGB3)+UNTAG_Int(REGB2));
+      /* ./../lib/standard//collection//array.nit:137 */
+      REGB3 = REGB2;
+    } else {
+      /* ./../lib/standard//collection//array.nit:135 */
+      goto label2;
     }
-    label1: while(0);
-    REGB2 = TAG_Int(1);
-    REGB2 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB2));
-    /* ./../lib/standard//collection//array.nit:214 */
-    ATTR_array___AbstractArrayRead____length(fra.me.REG[0]) = REGB2;
   }
+  label2: while(0);
+  /* ./../lib/standard//collection//array.nit:139 */
+  REGB3 = TAG_Bool(true);
+  REGB0 = REGB3;
+  goto label1;
+  label1: while(0);
+  stack_frame_head = fra.me.prev;
+  return REGB0;
+}
+void array___AbstractArrayRead___init(val_t p0, int* init_table){
+  int itpos0 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_AbstractArrayRead].i;
+  struct {struct stack_frame_t me;} fra;
+  val_t tmp;
+  if (init_table[itpos0]) return;
+  fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+  fra.me.file = LOCATE_array;
+  fra.me.line = 0;
+  fra.me.meth = LOCATE_array___AbstractArrayRead___init;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 0;
   stack_frame_head = fra.me.prev;
+  init_table[itpos0] = 1;
   return;
 }
-void array___AbstractArray___add(val_t p0, val_t p1){
-  struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
-  val_t REGB0;
+void array___AbstractArray___enlarge(val_t p0, val_t p1){
+  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_array;
-  fra.me.line = 190;
-  fra.me.meth = LOCATE_array___AbstractArray___add;
+  fra.me.line = 147;
+  fra.me.meth = LOCATE_array___AbstractArray___enlarge;
   fra.me.has_broke = 0;
-  fra.me.REG_size = 2;
-  fra.me.REG[0] = NIT_NULL;
-  fra.me.REG[1] = NIT_NULL;
-  fra.me.REG[0] = p0;
-  fra.me.REG[1] = p1;
-  REGB0 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:23 */
-  if (UNTAG_Bool(REGB0)) {
-  } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_length");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 23);
-    nit_exit(1);
-  }
-  REGB0 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
-  /* ./../lib/standard//collection//array.nit:190 */
-  CALL_abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB0, fra.me.REG[1]);
+  fra.me.REG_size = 0;
+  /* ./../lib/standard//collection//array.nit:147 */
+  nit_abort("Deferred method called", NULL, LOCATE_array, 147);
   stack_frame_head = fra.me.prev;
   return;
 }
@@ -1016,18 +881,19 @@ val_t array___AbstractArray___pop(val_t p0){
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
+  /* ./../lib/standard//collection//array.nit:153 */
   REGB0 = CALL_abstract_collection___Collection___is_empty(fra.me.REG[0])(fra.me.REG[0]);
   REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
-  /* ./../lib/standard//collection//array.nit:153 */
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Assert %s  failed", "'not_empty'");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 153);
-    nit_exit(1);
+    nit_abort("Assert %s  failed", "'not_empty'", LOCATE_array, 153);
   }
+  /* ./../lib/standard//collection//array.nit:154 */
   fra.me.REG[1] = CALL_abstract_collection___SequenceRead___last(fra.me.REG[0])(fra.me.REG[0]);
+  /* ./../lib/standard//collection//array.nit:155 */
   REGB0 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
   REGB1 = TAG_Int(1);
+  /* ./../lib/standard//kernel.nit:217 */
   REGB1 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB1));
   /* ./../lib/standard//collection//array.nit:155 */
   ATTR_array___AbstractArrayRead____length(fra.me.REG[0]) = REGB1;
@@ -1037,60 +903,6 @@ val_t array___AbstractArray___pop(val_t p0){
   stack_frame_head = fra.me.prev;
   return fra.me.REG[1];
 }
-void array___AbstractArray___unshift(val_t p0, val_t p1){
-  struct {struct stack_frame_t me; val_t MORE_REG[2];} 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_array;
-  fra.me.line = 173;
-  fra.me.meth = LOCATE_array___AbstractArray___unshift;
-  fra.me.has_broke = 0;
-  fra.me.REG_size = 3;
-  fra.me.REG[0] = NIT_NULL;
-  fra.me.REG[1] = NIT_NULL;
-  fra.me.REG[2] = NIT_NULL;
-  fra.me.REG[0] = p0;
-  fra.me.REG[1] = p1;
-  REGB0 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:23 */
-  if (UNTAG_Bool(REGB0)) {
-  } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_length");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 23);
-    nit_exit(1);
-  }
-  REGB0 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
-  REGB1 = TAG_Int(1);
-  REGB1 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB1));
-  /* ./../lib/standard//collection//array.nit:176 */
-  while(1) {
-    REGB0 = TAG_Int(0);
-    REGB0 = TAG_Bool(UNTAG_Int(REGB1)>UNTAG_Int(REGB0));
-    /* ./../lib/standard//collection//array.nit:176 */
-    if (UNTAG_Bool(REGB0)) {
-      REGB0 = TAG_Int(1);
-      REGB0 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB0));
-      fra.me.REG[2] = CALL_abstract_collection___MapRead_____bra(fra.me.REG[0])(fra.me.REG[0], REGB1);
-      /* ./../lib/standard//collection//array.nit:177 */
-      CALL_abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB0, fra.me.REG[2]);
-      REGB0 = TAG_Int(1);
-      REGB0 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB0));
-      REGB1 = REGB0;
-    /* ./../lib/standard//collection//array.nit:178 */
-    } else {
-      /* ./../lib/standard//collection//array.nit:176 */
-      goto label1;
-    }
-  }
-  label1: while(0);
-  REGB1 = TAG_Int(0);
-  /* ./../lib/standard//collection//array.nit:180 */
-  CALL_abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB1, fra.me.REG[1]);
-  stack_frame_head = fra.me.prev;
-  return;
-}
 val_t array___AbstractArray___shift(val_t p0){
   struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
   val_t REGB0;
@@ -1107,47 +919,52 @@ val_t array___AbstractArray___shift(val_t p0){
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[2] = NIT_NULL;
   fra.me.REG[0] = p0;
+  /* ./../lib/standard//collection//array.nit:161 */
   REGB0 = CALL_abstract_collection___Collection___is_empty(fra.me.REG[0])(fra.me.REG[0]);
   REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
-  /* ./../lib/standard//collection//array.nit:161 */
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Assert %s  failed", "'not_empty'");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 161);
-    nit_exit(1);
+    nit_abort("Assert %s  failed", "'not_empty'", LOCATE_array, 161);
   }
+  /* ./../lib/standard//collection//array.nit:162 */
   fra.me.REG[1] = CALL_abstract_collection___Collection___first(fra.me.REG[0])(fra.me.REG[0]);
+  /* ./../lib/standard//collection//array.nit:163 */
   REGB0 = TAG_Int(1);
-  REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
   /* ./../lib/standard//collection//array.nit:23 */
+  REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB1)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_length");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 23);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
   }
   REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
   /* ./../lib/standard//collection//array.nit:165 */
   while(1) {
+    /* ./../lib/standard//kernel.nit:212 */
     REGB2 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
     /* ./../lib/standard//collection//array.nit:165 */
     if (UNTAG_Bool(REGB2)) {
+      /* ./../lib/standard//collection//array.nit:166 */
       REGB2 = TAG_Int(1);
+      /* ./../lib/standard//kernel.nit:217 */
       REGB2 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB2));
-      fra.me.REG[2] = CALL_abstract_collection___MapRead_____bra(fra.me.REG[0])(fra.me.REG[0], REGB0);
       /* ./../lib/standard//collection//array.nit:166 */
+      fra.me.REG[2] = CALL_abstract_collection___MapRead_____bra(fra.me.REG[0])(fra.me.REG[0], REGB0);
       CALL_abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB2, fra.me.REG[2]);
+      /* ./../lib/standard//collection//array.nit:167 */
       REGB2 = TAG_Int(1);
+      /* ./../lib/standard//kernel.nit:215 */
       REGB2 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB2));
+      /* ./../lib/standard//collection//array.nit:167 */
       REGB0 = REGB2;
-    /* ./../lib/standard//collection//array.nit:167 */
     } else {
       /* ./../lib/standard//collection//array.nit:165 */
       goto label1;
     }
   }
   label1: while(0);
+  /* ./../lib/standard//collection//array.nit:169 */
   REGB0 = TAG_Int(1);
+  /* ./../lib/standard//kernel.nit:217 */
   REGB0 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB0));
   /* ./../lib/standard//collection//array.nit:169 */
   ATTR_array___AbstractArrayRead____length(fra.me.REG[0]) = REGB0;
@@ -1157,19 +974,62 @@ val_t array___AbstractArray___shift(val_t p0){
   stack_frame_head = fra.me.prev;
   return fra.me.REG[1];
 }
-void array___AbstractArray___enlarge(val_t p0, val_t p1){
-  struct {struct stack_frame_t me;} fra;
+void array___AbstractArray___unshift(val_t p0, val_t p1){
+  struct {struct stack_frame_t me; val_t MORE_REG[2];} 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_array;
-  fra.me.line = 147;
-  fra.me.meth = LOCATE_array___AbstractArray___enlarge;
+  fra.me.line = 173;
+  fra.me.meth = LOCATE_array___AbstractArray___unshift;
   fra.me.has_broke = 0;
-  fra.me.REG_size = 0;
-  /* ./../lib/standard//collection//array.nit:147 */
-  fprintf(stderr, "Deferred method called");
-  fprintf(stderr, " (%s:%d)\n", LOCATE_array, 147);
-  nit_exit(1);
+  fra.me.REG_size = 3;
+  fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[1] = NIT_NULL;
+  fra.me.REG[2] = NIT_NULL;
+  fra.me.REG[0] = p0;
+  fra.me.REG[1] = p1;
+  /* ./../lib/standard//collection//array.nit:23 */
+  REGB0 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB0)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
+  }
+  REGB0 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
+  /* ./../lib/standard//collection//array.nit:175 */
+  REGB1 = TAG_Int(1);
+  /* ./../lib/standard//kernel.nit:217 */
+  REGB1 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB1));
+  /* ./../lib/standard//collection//array.nit:176 */
+  while(1) {
+    REGB0 = TAG_Int(0);
+    /* ./../lib/standard//kernel.nit:214 */
+    REGB0 = TAG_Bool(UNTAG_Int(REGB1)>UNTAG_Int(REGB0));
+    /* ./../lib/standard//collection//array.nit:176 */
+    if (UNTAG_Bool(REGB0)) {
+      /* ./../lib/standard//collection//array.nit:177 */
+      REGB0 = TAG_Int(1);
+      /* ./../lib/standard//kernel.nit:215 */
+      REGB0 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB0));
+      /* ./../lib/standard//collection//array.nit:177 */
+      fra.me.REG[2] = CALL_abstract_collection___MapRead_____bra(fra.me.REG[0])(fra.me.REG[0], REGB1);
+      CALL_abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB0, fra.me.REG[2]);
+      /* ./../lib/standard//collection//array.nit:178 */
+      REGB0 = TAG_Int(1);
+      /* ./../lib/standard//kernel.nit:217 */
+      REGB0 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB0));
+      /* ./../lib/standard//collection//array.nit:178 */
+      REGB1 = REGB0;
+    } else {
+      /* ./../lib/standard//collection//array.nit:176 */
+      goto label1;
+    }
+  }
+  label1: while(0);
+  /* ./../lib/standard//collection//array.nit:180 */
+  REGB1 = TAG_Int(0);
+  CALL_abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB1, fra.me.REG[1]);
   stack_frame_head = fra.me.prev;
   return;
 }
@@ -1190,30 +1050,31 @@ void array___AbstractArray___insert(val_t p0, val_t p1, val_t p2){
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
   REGB0 = p2;
-  REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
   /* ./../lib/standard//collection//array.nit:23 */
+  REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB1)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_length");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 23);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
   }
   REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
+  /* ./../lib/standard//collection//array.nit:185 */
   REGB2 = TAG_Int(1);
+  /* ./../lib/standard//kernel.nit:215 */
   REGB2 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB2));
   /* ./../lib/standard//collection//array.nit:185 */
   CALL_array___AbstractArray___enlarge(fra.me.REG[0])(fra.me.REG[0], REGB2);
-  REGB2 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
   /* ./../lib/standard//collection//array.nit:23 */
+  REGB2 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB2)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_length");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 23);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
   }
   REGB2 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
+  /* ./../lib/standard//kernel.nit:217 */
   REGB2 = TAG_Int(UNTAG_Int(REGB2)-UNTAG_Int(REGB0));
+  /* ./../lib/standard//collection//array.nit:186 */
   REGB1 = TAG_Int(1);
+  /* ./../lib/standard//kernel.nit:215 */
   REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
   /* ./../lib/standard//collection//array.nit:186 */
   CALL_array___AbstractArrayRead___copy_to(fra.me.REG[0])(fra.me.REG[0], REGB0, REGB2, fra.me.REG[0], REGB1);
@@ -1222,69 +1083,317 @@ void array___AbstractArray___insert(val_t p0, val_t p1, val_t p2){
   stack_frame_head = fra.me.prev;
   return;
 }
-val_t array___Array_____bra(val_t p0, val_t p1){
-  struct {struct stack_frame_t me;} fra;
+void array___AbstractArray___add(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;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 231;
-  fra.me.meth = LOCATE_array___Array_____bra;
+  fra.me.line = 190;
+  fra.me.meth = LOCATE_array___AbstractArray___add;
   fra.me.has_broke = 0;
-  fra.me.REG_size = 1;
+  fra.me.REG_size = 2;
   fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
-  REGB0 = p1;
-  REGB1 = TAG_Int(0);
-  REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
-  /* ./../lib/standard//collection//array.nit:233 */
-  if (UNTAG_Bool(REGB1)) {
-    REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
-    if (UNTAG_Bool(REGB1)) {
-    } else {
-      fprintf(stderr, "Uninitialized attribute %s", "_length");
-      fprintf(stderr, " (%s:%d)\n", LOCATE_array, 233);
-      nit_exit(1);
-    }
-    REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
-    REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
-  /* ./../lib/standard//collection//array.nit:233 */
-  } else {
-    REGB2 = TAG_Bool(false);
-    REGB1 = REGB2;
-  }
-  if (UNTAG_Bool(REGB1)) {
+  fra.me.REG[1] = p1;
+  /* ./../lib/standard//collection//array.nit:23 */
+  REGB0 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Assert %s  failed", "'index'");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 233);
-    nit_exit(1);
-  }
-  fra.me.REG[0] = ATTR_array___Array____items(fra.me.REG[0]);
-  REGB1 = TAG_Bool(fra.me.REG[0]==NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:234 */
-  if (UNTAG_Bool(REGB1)) {
-    fprintf(stderr, "Reciever is null");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 234);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
   }
-  fra.me.REG[0] = ((Nit_NativeArray)fra.me.REG[0])->val[UNTAG_Int(REGB0)];
-  /* ./../lib/standard//collection//array.nit:234 */
-  goto label1;
-  label1: while(0);
+  REGB0 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
+  /* ./../lib/standard//collection//array.nit:190 */
+  CALL_abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB0, fra.me.REG[1]);
   stack_frame_head = fra.me.prev;
-  return fra.me.REG[0];
+  return;
 }
-void array___Array_____braeq(val_t p0, val_t p1, val_t p2){
-  struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
-  val_t REGB0;
+void array___AbstractArray___clear(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_array;
+  fra.me.line = 192;
+  fra.me.meth = LOCATE_array___AbstractArray___clear;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 1;
+  fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[0] = p0;
+  /* ./../lib/standard//collection//array.nit:192 */
+  REGB0 = TAG_Int(0);
+  ATTR_array___AbstractArrayRead____length(fra.me.REG[0]) = REGB0;
+  stack_frame_head = fra.me.prev;
+  return;
+}
+void array___AbstractArray___remove(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_array;
+  fra.me.line = 194;
+  fra.me.meth = LOCATE_array___AbstractArray___remove;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 2;
+  fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[1] = NIT_NULL;
+  fra.me.REG[0] = p0;
+  fra.me.REG[1] = p1;
+  /* ./../lib/standard//collection//array.nit:194 */
+  REGB0 = CALL_abstract_collection___SequenceRead___index_of(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
+  CALL_abstract_collection___Map___remove_at(fra.me.REG[0])(fra.me.REG[0], REGB0);
+  stack_frame_head = fra.me.prev;
+  return;
+}
+void array___AbstractArray___remove_all(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 tmp;
+  fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+  fra.me.file = LOCATE_array;
+  fra.me.line = 196;
+  fra.me.meth = LOCATE_array___AbstractArray___remove_all;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 2;
+  fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[1] = NIT_NULL;
+  fra.me.REG[0] = p0;
+  fra.me.REG[1] = p1;
+  /* ./../lib/standard//collection//array.nit:198 */
+  REGB0 = CALL_abstract_collection___SequenceRead___index_of(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
+  /* ./../lib/standard//collection//array.nit:199 */
+  while(1) {
+    REGB1 = TAG_Int(0);
+    /* ./../lib/standard//kernel.nit:213 */
+    REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
+    /* ./../lib/standard//collection//array.nit:199 */
+    if (UNTAG_Bool(REGB1)) {
+      /* ./../lib/standard//collection//array.nit:200 */
+      CALL_abstract_collection___Map___remove_at(fra.me.REG[0])(fra.me.REG[0], REGB0);
+      /* ./../lib/standard//collection//array.nit:201 */
+      REGB1 = CALL_array___AbstractArrayRead___index_of_from(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], REGB0);
+      REGB0 = REGB1;
+    } else {
+      /* ./../lib/standard//collection//array.nit:199 */
+      goto label1;
+    }
+  }
+  label1: while(0);
+  stack_frame_head = fra.me.prev;
+  return;
+}
+void array___AbstractArray___remove_at(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;
+  fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+  fra.me.file = LOCATE_array;
+  fra.me.line = 205;
+  fra.me.meth = LOCATE_array___AbstractArray___remove_at;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 2;
+  fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[1] = NIT_NULL;
+  fra.me.REG[0] = p0;
+  REGB0 = p1;
+  /* ./../lib/standard//collection//array.nit:23 */
+  REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB1)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
+  }
+  REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
+  /* ./../lib/standard//collection//array.nit:208 */
+  REGB2 = TAG_Int(0);
+  /* ./../lib/standard//kernel.nit:213 */
+  REGB2 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB2));
+  /* ./../lib/standard//collection//array.nit:208 */
+  if (UNTAG_Bool(REGB2)) {
+    /* ./../lib/standard//kernel.nit:212 */
+    REGB2 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
+  } else {
+    /* ./../lib/standard//collection//array.nit:208 */
+    REGB3 = TAG_Bool(false);
+    REGB2 = REGB3;
+  }
+  if (UNTAG_Bool(REGB2)) {
+    /* ./../lib/standard//collection//array.nit:209 */
+    REGB2 = TAG_Int(1);
+    /* ./../lib/standard//kernel.nit:215 */
+    REGB2 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB2));
+    /* ./../lib/standard//collection//array.nit:210 */
+    while(1) {
+      /* ./../lib/standard//kernel.nit:212 */
+      REGB0 = TAG_Bool(UNTAG_Int(REGB2)<UNTAG_Int(REGB1));
+      /* ./../lib/standard//collection//array.nit:210 */
+      if (UNTAG_Bool(REGB0)) {
+        /* ./../lib/standard//collection//array.nit:211 */
+        REGB0 = TAG_Int(1);
+        /* ./../lib/standard//kernel.nit:217 */
+        REGB0 = TAG_Int(UNTAG_Int(REGB2)-UNTAG_Int(REGB0));
+        /* ./../lib/standard//collection//array.nit:211 */
+        fra.me.REG[1] = CALL_abstract_collection___MapRead_____bra(fra.me.REG[0])(fra.me.REG[0], REGB2);
+        CALL_abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB0, fra.me.REG[1]);
+        /* ./../lib/standard//collection//array.nit:212 */
+        REGB0 = TAG_Int(1);
+        /* ./../lib/standard//kernel.nit:215 */
+        REGB0 = TAG_Int(UNTAG_Int(REGB2)+UNTAG_Int(REGB0));
+        /* ./../lib/standard//collection//array.nit:212 */
+        REGB2 = REGB0;
+      } else {
+        /* ./../lib/standard//collection//array.nit:210 */
+        goto label1;
+      }
+    }
+    label1: while(0);
+    /* ./../lib/standard//collection//array.nit:214 */
+    REGB2 = TAG_Int(1);
+    /* ./../lib/standard//kernel.nit:217 */
+    REGB2 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB2));
+    /* ./../lib/standard//collection//array.nit:214 */
+    ATTR_array___AbstractArrayRead____length(fra.me.REG[0]) = REGB2;
+  }
+  stack_frame_head = fra.me.prev;
+  return;
+}
+void array___Array___iterate(val_t p0, struct stack_frame_t *closctx_param, fun_t clos_fun0){
+  struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
+  val_t REGB0;
+  val_t REGB1;
+  fun_t CREG[1];
+  val_t tmp;
+  fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+  fra.me.file = LOCATE_array;
+  fra.me.line = 231;
+  fra.me.meth = LOCATE_array___Array___iterate;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 3;
+  fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[1] = NIT_NULL;
+  fra.me.REG[2] = NIT_NULL;
+  fra.me.closure_ctx = closctx_param;
+  fra.me.closure_funs = CREG;
+  fra.me.REG[0] = p0;
+  CREG[0] = clos_fun0;
+  /* ./../lib/standard//collection//array.nit:234 */
+  REGB0 = TAG_Int(0);
+  /* ./../lib/standard//collection//array.nit:235 */
+  REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB1)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 235);
+  }
+  REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
+  /* ./../lib/standard//collection//array.nit:236 */
+  fra.me.REG[1] = ATTR_array___Array____items(fra.me.REG[0]);
+  /* ./../lib/standard//collection//array.nit:237 */
+  while(1) {
+    /* ./../lib/standard//collection//array.nit:23 */
+    REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+    if (UNTAG_Bool(REGB1)) {
+    } else {
+      nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
+    }
+    REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
+    /* ./../lib/standard//kernel.nit:212 */
+    REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
+    /* ./../lib/standard//collection//array.nit:237 */
+    if (UNTAG_Bool(REGB1)) {
+      /* ./../lib/standard//collection//array.nit:238 */
+      REGB1 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
+      if (UNTAG_Bool(REGB1)) {
+        nit_abort("Reciever is null", NULL, LOCATE_array, 238);
+      }
+      /* ./../lib/standard//collection//array.nit:654 */
+      fra.me.REG[2] = ((Nit_NativeArray)fra.me.REG[1])->val[UNTAG_Int(REGB0)];
+      /* ./../lib/standard//collection//array.nit:238 */
+      ((void (*)(struct stack_frame_t *, val_t))(CREG[0]))(closctx_param, fra.me.REG[2]);
+      if (closctx_param->has_broke) {
+        goto label1;
+      }
+      /* ./../lib/standard//collection//array.nit:239 */
+      REGB1 = TAG_Int(1);
+      /* ./../lib/standard//kernel.nit:215 */
+      REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
+      /* ./../lib/standard//collection//array.nit:239 */
+      REGB0 = REGB1;
+    } else {
+      /* ./../lib/standard//collection//array.nit:237 */
+      goto label2;
+    }
+  }
+  label2: while(0);
+  label1: while(0);
+  stack_frame_head = fra.me.prev;
+  return;
+}
+val_t array___Array_____bra(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_array;
+  fra.me.line = 243;
+  fra.me.meth = LOCATE_array___Array_____bra;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 1;
+  fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[0] = p0;
+  REGB0 = p1;
+  /* ./../lib/standard//collection//array.nit:245 */
+  REGB1 = TAG_Int(0);
+  /* ./../lib/standard//kernel.nit:213 */
+  REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
+  /* ./../lib/standard//collection//array.nit:245 */
+  if (UNTAG_Bool(REGB1)) {
+    REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+    if (UNTAG_Bool(REGB1)) {
+    } else {
+      nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 245);
+    }
+    REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
+    /* ./../lib/standard//kernel.nit:212 */
+    REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
+  } else {
+    /* ./../lib/standard//collection//array.nit:245 */
+    REGB2 = TAG_Bool(false);
+    REGB1 = REGB2;
+  }
+  if (UNTAG_Bool(REGB1)) {
+  } else {
+    nit_abort("Assert %s  failed", "'index'", LOCATE_array, 245);
+  }
+  /* ./../lib/standard//collection//array.nit:246 */
+  fra.me.REG[0] = ATTR_array___Array____items(fra.me.REG[0]);
+  REGB1 = TAG_Bool(fra.me.REG[0]==NIT_NULL);
+  if (UNTAG_Bool(REGB1)) {
+    nit_abort("Reciever is null", NULL, LOCATE_array, 246);
+  }
+  /* ./../lib/standard//collection//array.nit:654 */
+  fra.me.REG[0] = ((Nit_NativeArray)fra.me.REG[0])->val[UNTAG_Int(REGB0)];
+  /* ./../lib/standard//collection//array.nit:246 */
+  goto label1;
+  label1: while(0);
+  stack_frame_head = fra.me.prev;
+  return fra.me.REG[0];
+}
+void array___Array_____braeq(val_t p0, val_t p1, val_t p2){
+  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_array;
-  fra.me.line = 237;
+  fra.me.line = 249;
   fra.me.meth = LOCATE_array___Array_____braeq;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
@@ -1293,75 +1402,75 @@ void array___Array_____braeq(val_t p0, val_t p1, val_t p2){
   fra.me.REG[0] = p0;
   REGB0 = p1;
   fra.me.REG[1] = p2;
+  /* ./../lib/standard//collection//array.nit:251 */
   REGB1 = TAG_Int(0);
+  /* ./../lib/standard//kernel.nit:213 */
   REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
-  /* ./../lib/standard//collection//array.nit:239 */
+  /* ./../lib/standard//collection//array.nit:251 */
   if (UNTAG_Bool(REGB1)) {
     REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
     if (UNTAG_Bool(REGB1)) {
     } else {
-      fprintf(stderr, "Uninitialized attribute %s", "_length");
-      fprintf(stderr, " (%s:%d)\n", LOCATE_array, 239);
-      nit_exit(1);
+      nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 251);
     }
     REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
     REGB2 = TAG_Int(1);
+    /* ./../lib/standard//kernel.nit:215 */
     REGB2 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB2));
+    /* ./../lib/standard//kernel.nit:212 */
     REGB2 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB2));
-  /* ./../lib/standard//collection//array.nit:239 */
   } else {
+    /* ./../lib/standard//collection//array.nit:251 */
     REGB1 = TAG_Bool(false);
     REGB2 = REGB1;
   }
   if (UNTAG_Bool(REGB2)) {
   } else {
-    fprintf(stderr, "Assert %s  failed", "'index'");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 239);
-    nit_exit(1);
+    nit_abort("Assert %s  failed", "'index'", LOCATE_array, 251);
   }
+  /* ./../lib/standard//collection//array.nit:252 */
   REGB2 = TAG_Bool(ATTR_array___Array____capacity(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:240 */
   if (UNTAG_Bool(REGB2)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_capacity");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 240);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_capacity", LOCATE_array, 252);
   }
   REGB2 = ATTR_array___Array____capacity(fra.me.REG[0]);
+  /* ./../lib/standard//kernel.nit:211 */
   REGB2 = TAG_Bool(UNTAG_Int(REGB2)<=UNTAG_Int(REGB0));
-  /* ./../lib/standard//collection//array.nit:240 */
+  /* ./../lib/standard//collection//array.nit:252 */
   if (UNTAG_Bool(REGB2)) {
+    /* ./../lib/standard//collection//array.nit:253 */
     REGB2 = TAG_Int(1);
+    /* ./../lib/standard//kernel.nit:215 */
     REGB2 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB2));
-    /* ./../lib/standard//collection//array.nit:241 */
+    /* ./../lib/standard//collection//array.nit:253 */
     CALL_array___AbstractArray___enlarge(fra.me.REG[0])(fra.me.REG[0], REGB2);
   }
+  /* ./../lib/standard//collection//array.nit:255 */
   REGB2 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:243 */
   if (UNTAG_Bool(REGB2)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_length");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 243);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 255);
   }
   REGB2 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
+  /* ./../lib/standard//kernel.nit:211 */
   REGB2 = TAG_Bool(UNTAG_Int(REGB2)<=UNTAG_Int(REGB0));
-  /* ./../lib/standard//collection//array.nit:243 */
+  /* ./../lib/standard//collection//array.nit:255 */
   if (UNTAG_Bool(REGB2)) {
+    /* ./../lib/standard//collection//array.nit:256 */
     REGB2 = TAG_Int(1);
+    /* ./../lib/standard//kernel.nit:215 */
     REGB2 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB2));
-    /* ./../lib/standard//collection//array.nit:244 */
+    /* ./../lib/standard//collection//array.nit:256 */
     ATTR_array___AbstractArrayRead____length(fra.me.REG[0]) = REGB2;
   }
+  /* ./../lib/standard//collection//array.nit:258 */
   fra.me.REG[0] = ATTR_array___Array____items(fra.me.REG[0]);
   REGB2 = TAG_Bool(fra.me.REG[0]==NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:246 */
   if (UNTAG_Bool(REGB2)) {
-    fprintf(stderr, "Reciever is null");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 246);
-    nit_exit(1);
+    nit_abort("Reciever is null", NULL, LOCATE_array, 258);
   }
-  /* ./../lib/standard//collection//array.nit:591 */
+  /* ./../lib/standard//collection//array.nit:655 */
   ((Nit_NativeArray)fra.me.REG[0])->val[UNTAG_Int(REGB0)]=fra.me.REG[1];
   stack_frame_head = fra.me.prev;
   return;
@@ -1373,7 +1482,7 @@ void array___Array___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_array;
-  fra.me.line = 249;
+  fra.me.line = 261;
   fra.me.meth = LOCATE_array___Array___add;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
@@ -1381,45 +1490,44 @@ void array___Array___add(val_t p0, val_t p1){
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
+  /* ./../lib/standard//collection//array.nit:263 */
   REGB0 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:251 */
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_length");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 251);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 263);
   }
   REGB0 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
+  /* ./../lib/standard//collection//array.nit:264 */
   REGB1 = TAG_Bool(ATTR_array___Array____capacity(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:252 */
   if (UNTAG_Bool(REGB1)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_capacity");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 252);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_capacity", LOCATE_array, 264);
   }
   REGB1 = ATTR_array___Array____capacity(fra.me.REG[0]);
+  /* ./../lib/standard//kernel.nit:211 */
   REGB1 = TAG_Bool(UNTAG_Int(REGB1)<=UNTAG_Int(REGB0));
-  /* ./../lib/standard//collection//array.nit:252 */
+  /* ./../lib/standard//collection//array.nit:264 */
   if (UNTAG_Bool(REGB1)) {
+    /* ./../lib/standard//collection//array.nit:265 */
     REGB1 = TAG_Int(1);
+    /* ./../lib/standard//kernel.nit:215 */
     REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
-    /* ./../lib/standard//collection//array.nit:253 */
+    /* ./../lib/standard//collection//array.nit:265 */
     CALL_array___AbstractArray___enlarge(fra.me.REG[0])(fra.me.REG[0], REGB1);
   }
+  /* ./../lib/standard//collection//array.nit:267 */
   REGB1 = TAG_Int(1);
+  /* ./../lib/standard//kernel.nit:215 */
   REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
-  /* ./../lib/standard//collection//array.nit:255 */
+  /* ./../lib/standard//collection//array.nit:267 */
   ATTR_array___AbstractArrayRead____length(fra.me.REG[0]) = REGB1;
+  /* ./../lib/standard//collection//array.nit:268 */
   fra.me.REG[0] = ATTR_array___Array____items(fra.me.REG[0]);
   REGB1 = TAG_Bool(fra.me.REG[0]==NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:256 */
   if (UNTAG_Bool(REGB1)) {
-    fprintf(stderr, "Reciever is null");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 256);
-    nit_exit(1);
+    nit_abort("Reciever is null", NULL, LOCATE_array, 268);
   }
-  /* ./../lib/standard//collection//array.nit:591 */
+  /* ./../lib/standard//collection//array.nit:655 */
   ((Nit_NativeArray)fra.me.REG[0])->val[UNTAG_Int(REGB0)]=fra.me.REG[1];
   stack_frame_head = fra.me.prev;
   return;
@@ -1433,7 +1541,7 @@ void array___Array___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_array;
-  fra.me.line = 259;
+  fra.me.line = 271;
   fra.me.meth = LOCATE_array___Array___enlarge;
   fra.me.has_broke = 0;
   fra.me.REG_size = 3;
@@ -1442,71 +1550,70 @@ void array___Array___enlarge(val_t p0, val_t p1){
   fra.me.REG[2] = NIT_NULL;
   fra.me.REG[0] = p0;
   REGB0 = p1;
+  /* ./../lib/standard//collection//array.nit:273 */
   REGB1 = TAG_Bool(ATTR_array___Array____capacity(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:261 */
   if (UNTAG_Bool(REGB1)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_capacity");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 261);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_capacity", LOCATE_array, 273);
   }
   REGB1 = ATTR_array___Array____capacity(fra.me.REG[0]);
+  /* ./../lib/standard//kernel.nit:211 */
   REGB2 = TAG_Bool(UNTAG_Int(REGB0)<=UNTAG_Int(REGB1));
-  /* ./../lib/standard//collection//array.nit:262 */
+  /* ./../lib/standard//collection//array.nit:274 */
   if (UNTAG_Bool(REGB2)) {
     goto label1;
   }
-  /* ./../lib/standard//collection//array.nit:263 */
+  /* ./../lib/standard//collection//array.nit:275 */
   while(1) {
+    /* ./../lib/standard//kernel.nit:211 */
     REGB2 = TAG_Bool(UNTAG_Int(REGB1)<=UNTAG_Int(REGB0));
-    /* ./../lib/standard//collection//array.nit:263 */
+    /* ./../lib/standard//collection//array.nit:275 */
     if (UNTAG_Bool(REGB2)) {
       REGB2 = TAG_Int(2);
+      /* ./../lib/standard//kernel.nit:218 */
       REGB2 = TAG_Int(UNTAG_Int(REGB1)*UNTAG_Int(REGB2));
+      /* ./../lib/standard//collection//array.nit:275 */
       REGB3 = TAG_Int(2);
+      /* ./../lib/standard//kernel.nit:215 */
       REGB3 = TAG_Int(UNTAG_Int(REGB2)+UNTAG_Int(REGB3));
+      /* ./../lib/standard//collection//array.nit:275 */
       REGB1 = REGB3;
-    /* ./../lib/standard//collection//array.nit:263 */
     } else {
       goto label2;
     }
   }
   label2: while(0);
+  /* ./../lib/standard//collection//array.nit:648 */
   fra.me.REG[1] = NEW_NativeArray(UNTAG_Int(REGB1), sizeof(val_t));
+  /* ./../lib/standard//collection//array.nit:277 */
   REGB0 = TAG_Bool(ATTR_array___Array____capacity(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:265 */
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_capacity");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 265);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_capacity", LOCATE_array, 277);
   }
   REGB0 = ATTR_array___Array____capacity(fra.me.REG[0]);
   REGB3 = TAG_Int(0);
+  /* ./../lib/standard//kernel.nit:214 */
   REGB3 = TAG_Bool(UNTAG_Int(REGB0)>UNTAG_Int(REGB3));
-  /* ./../lib/standard//collection//array.nit:265 */
+  /* ./../lib/standard//collection//array.nit:277 */
   if (UNTAG_Bool(REGB3)) {
     fra.me.REG[2] = ATTR_array___Array____items(fra.me.REG[0]);
     REGB3 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
     if (UNTAG_Bool(REGB3)) {
     } else {
-      fprintf(stderr, "Uninitialized attribute %s", "_length");
-      fprintf(stderr, " (%s:%d)\n", LOCATE_array, 265);
-      nit_exit(1);
+      nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 277);
     }
     REGB3 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
     REGB0 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
     if (UNTAG_Bool(REGB0)) {
-      fprintf(stderr, "Reciever is null");
-      fprintf(stderr, " (%s:%d)\n", LOCATE_array, 265);
-      nit_exit(1);
+      nit_abort("Reciever is null", NULL, LOCATE_array, 277);
     }
-    /* ./../lib/standard//collection//array.nit:592 */
+    /* ./../lib/standard//collection//array.nit:656 */
     (void)memcpy(((Nit_NativeArray )fra.me.REG[1])->val, ((Nit_NativeArray)fra.me.REG[2])->val, UNTAG_Int(REGB3)*sizeof(val_t));
   }
-  /* ./../lib/standard//collection//array.nit:266 */
+  /* ./../lib/standard//collection//array.nit:278 */
   ATTR_array___Array____items(fra.me.REG[0]) = fra.me.REG[1];
-  /* ./../lib/standard//collection//array.nit:267 */
+  /* ./../lib/standard//collection//array.nit:279 */
   ATTR_array___Array____capacity(fra.me.REG[0]) = REGB1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
@@ -1520,17 +1627,17 @@ void array___Array___init(val_t p0, int* init_table){
   if (init_table[itpos1]) return;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 270;
+  fra.me.line = 282;
   fra.me.meth = LOCATE_array___Array___init;
   fra.me.has_broke = 0;
   fra.me.REG_size = 1;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[0] = p0;
+  /* ./../lib/standard//collection//array.nit:285 */
   REGB0 = TAG_Int(0);
-  /* ./../lib/standard//collection//array.nit:273 */
   ATTR_array___Array____capacity(fra.me.REG[0]) = REGB0;
+  /* ./../lib/standard//collection//array.nit:286 */
   REGB0 = TAG_Int(0);
-  /* ./../lib/standard//collection//array.nit:274 */
   ATTR_array___AbstractArrayRead____length(fra.me.REG[0]) = REGB0;
   stack_frame_head = fra.me.prev;
   init_table[itpos1] = 1;
@@ -1544,7 +1651,7 @@ void array___Array___with_items(val_t p0, val_t p1, int* init_table){
   if (init_table[itpos2]) return;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 277;
+  fra.me.line = 289;
   fra.me.meth = LOCATE_array___Array___with_items;
   fra.me.has_broke = 0;
   fra.me.REG_size = 3;
@@ -1553,37 +1660,31 @@ void array___Array___with_items(val_t p0, val_t p1, int* init_table){
   fra.me.REG[2] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
+  /* ./../lib/standard//collection//array.nit:289 */
   REGB0 = TAG_Bool((fra.me.REG[1]!=NIT_NULL) && VAL_ISA(fra.me.REG[1], COLOR_Array, ID_Array)) /*cast Array[E]*/;
-  /* ./../lib/standard//collection//array.nit:277 */
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Cast failed");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 277);
-    nit_exit(1);
+    nit_abort("Cast failed", NULL, LOCATE_array, 289);
   }
+  /* ./../lib/standard//collection//array.nit:292 */
   fra.me.REG[2] = ATTR_array___Array____items(fra.me.REG[1]);
-  /* ./../lib/standard//collection//array.nit:280 */
   ATTR_array___Array____items(fra.me.REG[0]) = fra.me.REG[2];
+  /* ./../lib/standard//collection//array.nit:293 */
   REGB0 = TAG_Bool(ATTR_array___Array____capacity(fra.me.REG[1])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:281 */
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_capacity");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 281);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_capacity", LOCATE_array, 293);
   }
   REGB0 = ATTR_array___Array____capacity(fra.me.REG[1]);
   ATTR_array___Array____capacity(fra.me.REG[0]) = REGB0;
-  REGB0 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
   /* ./../lib/standard//collection//array.nit:23 */
+  REGB0 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_length");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 23);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
   }
   REGB0 = ATTR_array___AbstractArrayRead____length(fra.me.REG[1]);
-  /* ./../lib/standard//collection//array.nit:282 */
+  /* ./../lib/standard//collection//array.nit:294 */
   ATTR_array___AbstractArrayRead____length(fra.me.REG[0]) = REGB0;
   stack_frame_head = fra.me.prev;
   init_table[itpos2] = 1;
@@ -1598,7 +1699,7 @@ void array___Array___with_capacity(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_array;
-  fra.me.line = 285;
+  fra.me.line = 297;
   fra.me.meth = LOCATE_array___Array___with_capacity;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
@@ -1606,22 +1707,23 @@ void array___Array___with_capacity(val_t p0, val_t p1, int* init_table){
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
   REGB0 = p1;
+  /* ./../lib/standard//collection//array.nit:300 */
   REGB1 = TAG_Int(0);
+  /* ./../lib/standard//kernel.nit:213 */
   REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
-  /* ./../lib/standard//collection//array.nit:288 */
+  /* ./../lib/standard//collection//array.nit:300 */
   if (UNTAG_Bool(REGB1)) {
   } else {
-    fprintf(stderr, "Assert %s  failed", "'positive'");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 288);
-    nit_exit(1);
+    nit_abort("Assert %s  failed", "'positive'", LOCATE_array, 300);
   }
+  /* ./../lib/standard//collection//array.nit:648 */
   fra.me.REG[1] = NEW_NativeArray(UNTAG_Int(REGB0), sizeof(val_t));
-  /* ./../lib/standard//collection//array.nit:289 */
+  /* ./../lib/standard//collection//array.nit:301 */
   ATTR_array___Array____items(fra.me.REG[0]) = fra.me.REG[1];
-  /* ./../lib/standard//collection//array.nit:290 */
+  /* ./../lib/standard//collection//array.nit:302 */
   ATTR_array___Array____capacity(fra.me.REG[0]) = REGB0;
+  /* ./../lib/standard//collection//array.nit:303 */
   REGB0 = TAG_Int(0);
-  /* ./../lib/standard//collection//array.nit:291 */
   ATTR_array___AbstractArrayRead____length(fra.me.REG[0]) = REGB0;
   stack_frame_head = fra.me.prev;
   init_table[itpos3] = 1;
@@ -1637,7 +1739,7 @@ void array___Array___filled_with(val_t p0, val_t p1, val_t p2, int* init_table){
   if (init_table[itpos4]) return;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 294;
+  fra.me.line = 306;
   fra.me.meth = LOCATE_array___Array___filled_with;
   fra.me.has_broke = 0;
   fra.me.REG_size = 3;
@@ -1647,36 +1749,41 @@ void array___Array___filled_with(val_t p0, val_t p1, val_t p2, int* init_table){
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
   REGB0 = p2;
+  /* ./../lib/standard//collection//array.nit:309 */
   REGB1 = TAG_Int(0);
+  /* ./../lib/standard//kernel.nit:213 */
   REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
-  /* ./../lib/standard//collection//array.nit:297 */
+  /* ./../lib/standard//collection//array.nit:309 */
   if (UNTAG_Bool(REGB1)) {
   } else {
-    fprintf(stderr, "Assert %s  failed", "'positive'");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 297);
-    nit_exit(1);
+    nit_abort("Assert %s  failed", "'positive'", LOCATE_array, 309);
   }
+  /* ./../lib/standard//collection//array.nit:648 */
   fra.me.REG[2] = NEW_NativeArray(UNTAG_Int(REGB0), sizeof(val_t));
-  /* ./../lib/standard//collection//array.nit:298 */
+  /* ./../lib/standard//collection//array.nit:310 */
   ATTR_array___Array____items(fra.me.REG[0]) = fra.me.REG[2];
-  /* ./../lib/standard//collection//array.nit:299 */
+  /* ./../lib/standard//collection//array.nit:311 */
   ATTR_array___Array____capacity(fra.me.REG[0]) = REGB0;
-  /* ./../lib/standard//collection//array.nit:300 */
+  /* ./../lib/standard//collection//array.nit:312 */
   ATTR_array___AbstractArrayRead____length(fra.me.REG[0]) = REGB0;
+  /* ./../lib/standard//collection//array.nit:313 */
   REGB1 = TAG_Int(0);
-  /* ./../lib/standard//collection//array.nit:302 */
+  /* ./../lib/standard//collection//array.nit:314 */
   while(1) {
+    /* ./../lib/standard//kernel.nit:212 */
     REGB2 = TAG_Bool(UNTAG_Int(REGB1)<UNTAG_Int(REGB0));
-    /* ./../lib/standard//collection//array.nit:302 */
+    /* ./../lib/standard//collection//array.nit:314 */
     if (UNTAG_Bool(REGB2)) {
-      /* ./../lib/standard//collection//array.nit:303 */
+      /* ./../lib/standard//collection//array.nit:315 */
       CALL_abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB1, fra.me.REG[1]);
+      /* ./../lib/standard//collection//array.nit:316 */
       REGB2 = TAG_Int(1);
+      /* ./../lib/standard//kernel.nit:215 */
       REGB2 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB2));
+      /* ./../lib/standard//collection//array.nit:316 */
       REGB1 = REGB2;
-    /* ./../lib/standard//collection//array.nit:304 */
     } else {
-      /* ./../lib/standard//collection//array.nit:302 */
+      /* ./../lib/standard//collection//array.nit:314 */
       goto label1;
     }
   }
@@ -1694,7 +1801,7 @@ void array___Array___with_native(val_t p0, val_t p1, val_t p2, int* init_table){
   if (init_table[itpos5]) return;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 308;
+  fra.me.line = 320;
   fra.me.meth = LOCATE_array___Array___with_native;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
@@ -1703,20 +1810,20 @@ void array___Array___with_native(val_t p0, val_t p1, val_t p2, int* init_table){
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
   REGB0 = p2;
+  /* ./../lib/standard//collection//array.nit:323 */
   REGB1 = TAG_Int(0);
+  /* ./../lib/standard//kernel.nit:213 */
   REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
-  /* ./../lib/standard//collection//array.nit:311 */
+  /* ./../lib/standard//collection//array.nit:323 */
   if (UNTAG_Bool(REGB1)) {
   } else {
-    fprintf(stderr, "Assert %s  failed", "'positive'");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 311);
-    nit_exit(1);
+    nit_abort("Assert %s  failed", "'positive'", LOCATE_array, 323);
   }
-  /* ./../lib/standard//collection//array.nit:312 */
+  /* ./../lib/standard//collection//array.nit:324 */
   ATTR_array___Array____items(fra.me.REG[0]) = fra.me.REG[1];
-  /* ./../lib/standard//collection//array.nit:313 */
+  /* ./../lib/standard//collection//array.nit:325 */
   ATTR_array___Array____capacity(fra.me.REG[0]) = REGB0;
-  /* ./../lib/standard//collection//array.nit:314 */
+  /* ./../lib/standard//collection//array.nit:326 */
   ATTR_array___AbstractArrayRead____length(fra.me.REG[0]) = REGB0;
   stack_frame_head = fra.me.prev;
   init_table[itpos5] = 1;
@@ -1728,54 +1835,763 @@ val_t array___Array___intern_items(val_t p0){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 320;
+  fra.me.line = 332;
   fra.me.meth = LOCATE_array___Array___intern_items;
   fra.me.has_broke = 0;
   fra.me.REG_size = 1;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[0] = p0;
+  /* ./../lib/standard//collection//array.nit:334 */
   fra.me.REG[0] = ATTR_array___Array____items(fra.me.REG[0]);
   REGB0 = TAG_Bool(fra.me.REG[0]!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:322 */
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Cast failed");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 322);
-    nit_exit(1);
+    nit_abort("Cast failed", NULL, LOCATE_array, 334);
   }
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
   return fra.me.REG[0];
 }
+void array___Array___sort(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;
+  fun_t CREG[1];
+  val_t tmp;
+  fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+  fra.me.file = LOCATE_array;
+  fra.me.line = 339;
+  fra.me.meth = LOCATE_array___Array___sort;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 1;
+  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;
+  /* ./../lib/standard//collection//array.nit:343 */
+  REGB0 = TAG_Int(0);
+  /* ./../lib/standard//collection//array.nit:23 */
+  REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB1)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
+  }
+  REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
+  /* ./../lib/standard//collection//array.nit:343 */
+  REGB2 = TAG_Int(1);
+  /* ./../lib/standard//kernel.nit:217 */
+  REGB2 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB2));
+  CALL_array___Array___sub_sort(fra.me.REG[0])(fra.me.REG[0], REGB0, REGB2, (&(fra.me)), ((fun_t)OC_array___Array___sort_1));
+  switch ((&(fra.me))->has_broke) {
+    case 0: break;
+    case 1: (&(fra.me))->has_broke = 0; goto label3;
+  }
+  label3: while(0);
+  stack_frame_head = fra.me.prev;
+  return;
+}
+  val_t OC_array___Array___sort_1(struct stack_frame_t *closctx, val_t p0, val_t p1){
+    struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
+    val_t REGB0;
+    val_t tmp;
+    /* ./../lib/standard//collection//array.nit:343 */
+    fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+    fra.me.file = LOCATE_array;
+    fra.me.line = 343;
+    fra.me.meth = LOCATE_array___Array___sort;
+    fra.me.has_broke = 0;
+    fra.me.REG_size = 2;
+    fra.me.REG[0] = NIT_NULL;
+    fra.me.REG[1] = NIT_NULL;
+    fra.me.REG[0] = p0;
+    fra.me.REG[1] = p1;
+    REGB0 = ((val_t (*)(struct stack_frame_t *, val_t, val_t))(closctx->closure_funs[0]))(closctx->closure_ctx, fra.me.REG[0], fra.me.REG[1]);
+    if (closctx->closure_ctx->has_broke) {
+      closctx->has_broke = 1;
+      goto label2;
+    }
+    goto label2;
+    label2: while(0);
+    stack_frame_head = fra.me.prev;
+    return REGB0;
+  }
+void array___Array___sub_sort(val_t p0, val_t p1, val_t p2, struct stack_frame_t *closctx_param, fun_t clos_fun0){
+  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;
+  fun_t CREG[1];
+  val_t tmp;
+  fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+  fra.me.file = LOCATE_array;
+  fra.me.line = 346;
+  fra.me.meth = LOCATE_array___Array___sub_sort;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 4;
+  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.closure_ctx = closctx_param;
+  fra.me.closure_funs = CREG;
+  fra.me.REG[0] = p0;
+  REGB0 = p1;
+  REGB1 = p2;
+  CREG[0] = clos_fun0;
+  /* ./../lib/standard//kernel.nit:213 */
+  REGB2 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
+  /* ./../lib/standard//collection//array.nit:350 */
+  if (UNTAG_Bool(REGB2)) {
+    /* ./../lib/standard//collection//array.nit:351 */
+    goto label1;
+  } else {
+    /* ./../lib/standard//collection//array.nit:352 */
+    REGB2 = TAG_Int(7);
+    /* ./../lib/standard//kernel.nit:215 */
+    REGB2 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB2));
+    /* ./../lib/standard//kernel.nit:212 */
+    REGB2 = TAG_Bool(UNTAG_Int(REGB2)<UNTAG_Int(REGB1));
+    /* ./../lib/standard//collection//array.nit:352 */
+    if (UNTAG_Bool(REGB2)) {
+      /* ./../lib/standard//collection//array.nit:243 */
+      fra.me.REG[1] = fra.me.REG[0];
+      REGB2 = REGB0;
+      /* ./../lib/standard//collection//array.nit:245 */
+      REGB3 = TAG_Int(0);
+      /* ./../lib/standard//kernel.nit:213 */
+      REGB3 = TAG_Bool(UNTAG_Int(REGB2)>=UNTAG_Int(REGB3));
+      /* ./../lib/standard//collection//array.nit:245 */
+      if (UNTAG_Bool(REGB3)) {
+        REGB3 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
+        if (UNTAG_Bool(REGB3)) {
+        } else {
+          nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 245);
+        }
+        REGB3 = ATTR_array___AbstractArrayRead____length(fra.me.REG[1]);
+        /* ./../lib/standard//kernel.nit:212 */
+        REGB3 = TAG_Bool(UNTAG_Int(REGB2)<UNTAG_Int(REGB3));
+      } else {
+        /* ./../lib/standard//collection//array.nit:245 */
+        REGB4 = TAG_Bool(false);
+        REGB3 = REGB4;
+      }
+      if (UNTAG_Bool(REGB3)) {
+      } else {
+        nit_abort("Assert %s  failed", "'index'", LOCATE_array, 245);
+      }
+      /* ./../lib/standard//collection//array.nit:246 */
+      fra.me.REG[1] = ATTR_array___Array____items(fra.me.REG[1]);
+      REGB3 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
+      if (UNTAG_Bool(REGB3)) {
+        nit_abort("Reciever is null", NULL, LOCATE_array, 246);
+      }
+      /* ./../lib/standard//collection//array.nit:654 */
+      fra.me.REG[1] = ((Nit_NativeArray)fra.me.REG[1])->val[UNTAG_Int(REGB2)];
+      /* ./../lib/standard//collection//array.nit:246 */
+      goto label2;
+      label2: while(0);
+      /* ./../lib/standard//collection//array.nit:354 */
+      REGB2 = REGB0;
+      /* ./../lib/standard//collection//array.nit:355 */
+      REGB3 = REGB1;
+      /* ./../lib/standard//collection//array.nit:356 */
+      while(1) {
+        /* ./../lib/standard//kernel.nit:214 */
+        REGB4 = TAG_Bool(UNTAG_Int(REGB3)>UNTAG_Int(REGB2));
+        /* ./../lib/standard//collection//array.nit:356 */
+        if (UNTAG_Bool(REGB4)) {
+          /* ./../lib/standard//collection//array.nit:357 */
+          while(1) {
+            /* ./../lib/standard//kernel.nit:211 */
+            REGB4 = TAG_Bool(UNTAG_Int(REGB2)<=UNTAG_Int(REGB1));
+            /* ./../lib/standard//collection//array.nit:357 */
+            if (UNTAG_Bool(REGB4)) {
+              /* ./../lib/standard//collection//array.nit:243 */
+              fra.me.REG[2] = fra.me.REG[0];
+              REGB4 = REGB2;
+              /* ./../lib/standard//collection//array.nit:245 */
+              REGB5 = TAG_Int(0);
+              /* ./../lib/standard//kernel.nit:213 */
+              REGB5 = TAG_Bool(UNTAG_Int(REGB4)>=UNTAG_Int(REGB5));
+              /* ./../lib/standard//collection//array.nit:245 */
+              if (UNTAG_Bool(REGB5)) {
+               REGB5 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
+               if (UNTAG_Bool(REGB5)) {
+               } else {
+               nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 245);
+               }
+               REGB5 = ATTR_array___AbstractArrayRead____length(fra.me.REG[2]);
+               /* ./../lib/standard//kernel.nit:212 */
+               REGB5 = TAG_Bool(UNTAG_Int(REGB4)<UNTAG_Int(REGB5));
+              } else {
+               /* ./../lib/standard//collection//array.nit:245 */
+               REGB6 = TAG_Bool(false);
+               REGB5 = REGB6;
+              }
+              if (UNTAG_Bool(REGB5)) {
+              } else {
+               nit_abort("Assert %s  failed", "'index'", LOCATE_array, 245);
+              }
+              /* ./../lib/standard//collection//array.nit:246 */
+              fra.me.REG[2] = ATTR_array___Array____items(fra.me.REG[2]);
+              REGB5 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
+              if (UNTAG_Bool(REGB5)) {
+               nit_abort("Reciever is null", NULL, LOCATE_array, 246);
+              }
+              /* ./../lib/standard//collection//array.nit:654 */
+              fra.me.REG[2] = ((Nit_NativeArray)fra.me.REG[2])->val[UNTAG_Int(REGB4)];
+              /* ./../lib/standard//collection//array.nit:246 */
+              goto label3;
+              label3: while(0);
+              /* ./../lib/standard//collection//array.nit:357 */
+              REGB4 = ((val_t (*)(struct stack_frame_t *, val_t, val_t))(CREG[0]))(closctx_param, fra.me.REG[2], fra.me.REG[1]);
+              if (closctx_param->has_broke) {
+               goto label1;
+              }
+              REGB5 = TAG_Int(0);
+              /* ./../lib/standard//kernel.nit:211 */
+              REGB5 = TAG_Bool(UNTAG_Int(REGB4)<=UNTAG_Int(REGB5));
+            } else {
+              /* ./../lib/standard//collection//array.nit:357 */
+              REGB4 = TAG_Bool(false);
+              REGB5 = REGB4;
+            }
+            if (UNTAG_Bool(REGB5)) {
+              REGB5 = TAG_Int(1);
+              /* ./../lib/standard//kernel.nit:215 */
+              REGB5 = TAG_Int(UNTAG_Int(REGB2)+UNTAG_Int(REGB5));
+              /* ./../lib/standard//collection//array.nit:357 */
+              REGB2 = REGB5;
+            } else {
+              goto label4;
+            }
+          }
+          label4: while(0);
+          /* ./../lib/standard//collection//array.nit:358 */
+          while(1) {
+            /* ./../lib/standard//kernel.nit:214 */
+            REGB5 = TAG_Bool(UNTAG_Int(REGB3)>UNTAG_Int(REGB2));
+            /* ./../lib/standard//collection//array.nit:358 */
+            if (UNTAG_Bool(REGB5)) {
+              /* ./../lib/standard//collection//array.nit:243 */
+              fra.me.REG[2] = fra.me.REG[0];
+              REGB5 = REGB3;
+              /* ./../lib/standard//collection//array.nit:245 */
+              REGB4 = TAG_Int(0);
+              /* ./../lib/standard//kernel.nit:213 */
+              REGB4 = TAG_Bool(UNTAG_Int(REGB5)>=UNTAG_Int(REGB4));
+              /* ./../lib/standard//collection//array.nit:245 */
+              if (UNTAG_Bool(REGB4)) {
+               REGB4 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
+               if (UNTAG_Bool(REGB4)) {
+               } else {
+               nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 245);
+               }
+               REGB4 = ATTR_array___AbstractArrayRead____length(fra.me.REG[2]);
+               /* ./../lib/standard//kernel.nit:212 */
+               REGB4 = TAG_Bool(UNTAG_Int(REGB5)<UNTAG_Int(REGB4));
+              } else {
+               /* ./../lib/standard//collection//array.nit:245 */
+               REGB6 = TAG_Bool(false);
+               REGB4 = REGB6;
+              }
+              if (UNTAG_Bool(REGB4)) {
+              } else {
+               nit_abort("Assert %s  failed", "'index'", LOCATE_array, 245);
+              }
+              /* ./../lib/standard//collection//array.nit:246 */
+              fra.me.REG[2] = ATTR_array___Array____items(fra.me.REG[2]);
+              REGB4 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
+              if (UNTAG_Bool(REGB4)) {
+               nit_abort("Reciever is null", NULL, LOCATE_array, 246);
+              }
+              /* ./../lib/standard//collection//array.nit:654 */
+              fra.me.REG[2] = ((Nit_NativeArray)fra.me.REG[2])->val[UNTAG_Int(REGB5)];
+              /* ./../lib/standard//collection//array.nit:246 */
+              goto label5;
+              label5: while(0);
+              /* ./../lib/standard//collection//array.nit:358 */
+              REGB5 = ((val_t (*)(struct stack_frame_t *, val_t, val_t))(CREG[0]))(closctx_param, fra.me.REG[2], fra.me.REG[1]);
+              if (closctx_param->has_broke) {
+               goto label1;
+              }
+              REGB4 = TAG_Int(0);
+              /* ./../lib/standard//kernel.nit:213 */
+              REGB4 = TAG_Bool(UNTAG_Int(REGB5)>=UNTAG_Int(REGB4));
+            } else {
+              /* ./../lib/standard//collection//array.nit:358 */
+              REGB5 = TAG_Bool(false);
+              REGB4 = REGB5;
+            }
+            if (UNTAG_Bool(REGB4)) {
+              REGB4 = TAG_Int(1);
+              /* ./../lib/standard//kernel.nit:217 */
+              REGB4 = TAG_Int(UNTAG_Int(REGB3)-UNTAG_Int(REGB4));
+              /* ./../lib/standard//collection//array.nit:358 */
+              REGB3 = REGB4;
+            } else {
+              goto label6;
+            }
+          }
+          label6: while(0);
+          /* ./../lib/standard//kernel.nit:214 */
+          REGB4 = TAG_Bool(UNTAG_Int(REGB3)>UNTAG_Int(REGB2));
+          /* ./../lib/standard//collection//array.nit:359 */
+          if (UNTAG_Bool(REGB4)) {
+            /* ./../lib/standard//collection//array.nit:243 */
+            fra.me.REG[2] = fra.me.REG[0];
+            REGB4 = REGB2;
+            /* ./../lib/standard//collection//array.nit:245 */
+            REGB5 = TAG_Int(0);
+            /* ./../lib/standard//kernel.nit:213 */
+            REGB5 = TAG_Bool(UNTAG_Int(REGB4)>=UNTAG_Int(REGB5));
+            /* ./../lib/standard//collection//array.nit:245 */
+            if (UNTAG_Bool(REGB5)) {
+              REGB5 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
+              if (UNTAG_Bool(REGB5)) {
+              } else {
+               nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 245);
+              }
+              REGB5 = ATTR_array___AbstractArrayRead____length(fra.me.REG[2]);
+              /* ./../lib/standard//kernel.nit:212 */
+              REGB5 = TAG_Bool(UNTAG_Int(REGB4)<UNTAG_Int(REGB5));
+            } else {
+              /* ./../lib/standard//collection//array.nit:245 */
+              REGB6 = TAG_Bool(false);
+              REGB5 = REGB6;
+            }
+            if (UNTAG_Bool(REGB5)) {
+            } else {
+              nit_abort("Assert %s  failed", "'index'", LOCATE_array, 245);
+            }
+            /* ./../lib/standard//collection//array.nit:246 */
+            fra.me.REG[2] = ATTR_array___Array____items(fra.me.REG[2]);
+            REGB5 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
+            if (UNTAG_Bool(REGB5)) {
+              nit_abort("Reciever is null", NULL, LOCATE_array, 246);
+            }
+            /* ./../lib/standard//collection//array.nit:654 */
+            fra.me.REG[2] = ((Nit_NativeArray)fra.me.REG[2])->val[UNTAG_Int(REGB4)];
+            /* ./../lib/standard//collection//array.nit:246 */
+            goto label7;
+            label7: while(0);
+            /* ./../lib/standard//collection//array.nit:243 */
+            fra.me.REG[3] = fra.me.REG[0];
+            REGB4 = REGB3;
+            /* ./../lib/standard//collection//array.nit:245 */
+            REGB5 = TAG_Int(0);
+            /* ./../lib/standard//kernel.nit:213 */
+            REGB5 = TAG_Bool(UNTAG_Int(REGB4)>=UNTAG_Int(REGB5));
+            /* ./../lib/standard//collection//array.nit:245 */
+            if (UNTAG_Bool(REGB5)) {
+              REGB5 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[3])!=NIT_NULL);
+              if (UNTAG_Bool(REGB5)) {
+              } else {
+               nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 245);
+              }
+              REGB5 = ATTR_array___AbstractArrayRead____length(fra.me.REG[3]);
+              /* ./../lib/standard//kernel.nit:212 */
+              REGB5 = TAG_Bool(UNTAG_Int(REGB4)<UNTAG_Int(REGB5));
+            } else {
+              /* ./../lib/standard//collection//array.nit:245 */
+              REGB6 = TAG_Bool(false);
+              REGB5 = REGB6;
+            }
+            if (UNTAG_Bool(REGB5)) {
+            } else {
+              nit_abort("Assert %s  failed", "'index'", LOCATE_array, 245);
+            }
+            /* ./../lib/standard//collection//array.nit:246 */
+            fra.me.REG[3] = ATTR_array___Array____items(fra.me.REG[3]);
+            REGB5 = TAG_Bool(fra.me.REG[3]==NIT_NULL);
+            if (UNTAG_Bool(REGB5)) {
+              nit_abort("Reciever is null", NULL, LOCATE_array, 246);
+            }
+            /* ./../lib/standard//collection//array.nit:654 */
+            fra.me.REG[3] = ((Nit_NativeArray)fra.me.REG[3])->val[UNTAG_Int(REGB4)];
+            /* ./../lib/standard//collection//array.nit:246 */
+            goto label8;
+            label8: while(0);
+            /* ./../lib/standard//collection//array.nit:361 */
+            CALL_abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB2, fra.me.REG[3]);
+            /* ./../lib/standard//collection//array.nit:362 */
+            CALL_abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB3, fra.me.REG[2]);
+          }
+        } else {
+          /* ./../lib/standard//collection//array.nit:356 */
+          goto label9;
+        }
+      }
+      label9: while(0);
+      /* ./../lib/standard//collection//array.nit:365 */
+      REGB3 = TAG_Int(1);
+      /* ./../lib/standard//kernel.nit:217 */
+      REGB3 = TAG_Int(UNTAG_Int(REGB2)-UNTAG_Int(REGB3));
+      /* ./../lib/standard//collection//array.nit:243 */
+      fra.me.REG[2] = fra.me.REG[0];
+      /* ./../lib/standard//collection//array.nit:245 */
+      REGB4 = TAG_Int(0);
+      /* ./../lib/standard//kernel.nit:213 */
+      REGB4 = TAG_Bool(UNTAG_Int(REGB3)>=UNTAG_Int(REGB4));
+      /* ./../lib/standard//collection//array.nit:245 */
+      if (UNTAG_Bool(REGB4)) {
+        REGB4 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
+        if (UNTAG_Bool(REGB4)) {
+        } else {
+          nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 245);
+        }
+        REGB4 = ATTR_array___AbstractArrayRead____length(fra.me.REG[2]);
+        /* ./../lib/standard//kernel.nit:212 */
+        REGB4 = TAG_Bool(UNTAG_Int(REGB3)<UNTAG_Int(REGB4));
+      } else {
+        /* ./../lib/standard//collection//array.nit:245 */
+        REGB5 = TAG_Bool(false);
+        REGB4 = REGB5;
+      }
+      if (UNTAG_Bool(REGB4)) {
+      } else {
+        nit_abort("Assert %s  failed", "'index'", LOCATE_array, 245);
+      }
+      /* ./../lib/standard//collection//array.nit:246 */
+      fra.me.REG[2] = ATTR_array___Array____items(fra.me.REG[2]);
+      REGB4 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
+      if (UNTAG_Bool(REGB4)) {
+        nit_abort("Reciever is null", NULL, LOCATE_array, 246);
+      }
+      /* ./../lib/standard//collection//array.nit:654 */
+      fra.me.REG[2] = ((Nit_NativeArray)fra.me.REG[2])->val[UNTAG_Int(REGB3)];
+      /* ./../lib/standard//collection//array.nit:246 */
+      goto label10;
+      label10: while(0);
+      /* ./../lib/standard//collection//array.nit:365 */
+      CALL_abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB0, fra.me.REG[2]);
+      /* ./../lib/standard//collection//array.nit:366 */
+      REGB3 = TAG_Int(1);
+      /* ./../lib/standard//kernel.nit:217 */
+      REGB3 = TAG_Int(UNTAG_Int(REGB2)-UNTAG_Int(REGB3));
+      /* ./../lib/standard//collection//array.nit:366 */
+      CALL_abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB3, fra.me.REG[1]);
+      /* ./../lib/standard//collection//array.nit:367 */
+      REGB3 = TAG_Int(2);
+      /* ./../lib/standard//kernel.nit:217 */
+      REGB3 = TAG_Int(UNTAG_Int(REGB2)-UNTAG_Int(REGB3));
+      CALL_array___Array___sub_sort(fra.me.REG[0])(fra.me.REG[0], REGB0, REGB3, (&(fra.me)), ((fun_t)OC_array___Array___sub_sort_11));
+      switch ((&(fra.me))->has_broke) {
+        case 0: break;
+        case 1: (&(fra.me))->has_broke = 0; goto label1;
+      }
+      CALL_array___Array___sub_sort(fra.me.REG[0])(fra.me.REG[0], REGB2, REGB1, (&(fra.me)), ((fun_t)OC_array___Array___sub_sort_13));
+      switch ((&(fra.me))->has_broke) {
+        case 0: break;
+        case 1: (&(fra.me))->has_broke = 0; goto label1;
+      }
+    } else {
+      /* ./../lib/standard//collection//array.nit:371 */
+      while(1) {
+        /* ./../lib/standard//kernel.nit:212 */
+        REGB2 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
+        /* ./../lib/standard//collection//array.nit:371 */
+        if (UNTAG_Bool(REGB2)) {
+          /* ./../lib/standard//collection//array.nit:372 */
+          REGB2 = REGB0;
+          /* ./../lib/standard//collection//array.nit:243 */
+          fra.me.REG[1] = fra.me.REG[0];
+          REGB3 = REGB0;
+          /* ./../lib/standard//collection//array.nit:245 */
+          REGB4 = TAG_Int(0);
+          /* ./../lib/standard//kernel.nit:213 */
+          REGB4 = TAG_Bool(UNTAG_Int(REGB3)>=UNTAG_Int(REGB4));
+          /* ./../lib/standard//collection//array.nit:245 */
+          if (UNTAG_Bool(REGB4)) {
+            REGB4 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
+            if (UNTAG_Bool(REGB4)) {
+            } else {
+              nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 245);
+            }
+            REGB4 = ATTR_array___AbstractArrayRead____length(fra.me.REG[1]);
+            /* ./../lib/standard//kernel.nit:212 */
+            REGB4 = TAG_Bool(UNTAG_Int(REGB3)<UNTAG_Int(REGB4));
+          } else {
+            /* ./../lib/standard//collection//array.nit:245 */
+            REGB5 = TAG_Bool(false);
+            REGB4 = REGB5;
+          }
+          if (UNTAG_Bool(REGB4)) {
+          } else {
+            nit_abort("Assert %s  failed", "'index'", LOCATE_array, 245);
+          }
+          /* ./../lib/standard//collection//array.nit:246 */
+          fra.me.REG[1] = ATTR_array___Array____items(fra.me.REG[1]);
+          REGB4 = TAG_Bool(fra.me.REG[1]==NIT_NULL);
+          if (UNTAG_Bool(REGB4)) {
+            nit_abort("Reciever is null", NULL, LOCATE_array, 246);
+          }
+          /* ./../lib/standard//collection//array.nit:654 */
+          fra.me.REG[1] = ((Nit_NativeArray)fra.me.REG[1])->val[UNTAG_Int(REGB3)];
+          /* ./../lib/standard//collection//array.nit:246 */
+          goto label15;
+          label15: while(0);
+          /* ./../lib/standard//collection//array.nit:374 */
+          REGB3 = REGB0;
+          /* ./../lib/standard//collection//array.nit:375 */
+          while(1) {
+            /* ./../lib/standard//kernel.nit:211 */
+            REGB4 = TAG_Bool(UNTAG_Int(REGB3)<=UNTAG_Int(REGB1));
+            /* ./../lib/standard//collection//array.nit:375 */
+            if (UNTAG_Bool(REGB4)) {
+              /* ./../lib/standard//collection//array.nit:243 */
+              fra.me.REG[2] = fra.me.REG[0];
+              REGB4 = REGB3;
+              /* ./../lib/standard//collection//array.nit:245 */
+              REGB5 = TAG_Int(0);
+              /* ./../lib/standard//kernel.nit:213 */
+              REGB5 = TAG_Bool(UNTAG_Int(REGB4)>=UNTAG_Int(REGB5));
+              /* ./../lib/standard//collection//array.nit:245 */
+              if (UNTAG_Bool(REGB5)) {
+               REGB5 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
+               if (UNTAG_Bool(REGB5)) {
+               } else {
+               nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 245);
+               }
+               REGB5 = ATTR_array___AbstractArrayRead____length(fra.me.REG[2]);
+               /* ./../lib/standard//kernel.nit:212 */
+               REGB5 = TAG_Bool(UNTAG_Int(REGB4)<UNTAG_Int(REGB5));
+              } else {
+               /* ./../lib/standard//collection//array.nit:245 */
+               REGB6 = TAG_Bool(false);
+               REGB5 = REGB6;
+              }
+              if (UNTAG_Bool(REGB5)) {
+              } else {
+               nit_abort("Assert %s  failed", "'index'", LOCATE_array, 245);
+              }
+              /* ./../lib/standard//collection//array.nit:246 */
+              fra.me.REG[2] = ATTR_array___Array____items(fra.me.REG[2]);
+              REGB5 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
+              if (UNTAG_Bool(REGB5)) {
+               nit_abort("Reciever is null", NULL, LOCATE_array, 246);
+              }
+              /* ./../lib/standard//collection//array.nit:654 */
+              fra.me.REG[2] = ((Nit_NativeArray)fra.me.REG[2])->val[UNTAG_Int(REGB4)];
+              /* ./../lib/standard//collection//array.nit:246 */
+              goto label16;
+              label16: while(0);
+              /* ./../lib/standard//collection//array.nit:376 */
+              REGB4 = ((val_t (*)(struct stack_frame_t *, val_t, val_t))(CREG[0]))(closctx_param, fra.me.REG[1], fra.me.REG[2]);
+              if (closctx_param->has_broke) {
+               goto label1;
+              }
+              REGB5 = TAG_Int(0);
+              /* ./../lib/standard//kernel.nit:214 */
+              REGB5 = TAG_Bool(UNTAG_Int(REGB4)>UNTAG_Int(REGB5));
+              /* ./../lib/standard//collection//array.nit:376 */
+              if (UNTAG_Bool(REGB5)) {
+               /* ./../lib/standard//collection//array.nit:377 */
+               REGB2 = REGB3;
+               /* ./../lib/standard//collection//array.nit:243 */
+               fra.me.REG[2] = fra.me.REG[0];
+               REGB5 = REGB3;
+               /* ./../lib/standard//collection//array.nit:245 */
+               REGB4 = TAG_Int(0);
+               /* ./../lib/standard//kernel.nit:213 */
+               REGB4 = TAG_Bool(UNTAG_Int(REGB5)>=UNTAG_Int(REGB4));
+               /* ./../lib/standard//collection//array.nit:245 */
+               if (UNTAG_Bool(REGB4)) {
+               REGB4 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
+               if (UNTAG_Bool(REGB4)) {
+               } else {
+               nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 245);
+               }
+               REGB4 = ATTR_array___AbstractArrayRead____length(fra.me.REG[2]);
+               /* ./../lib/standard//kernel.nit:212 */
+               REGB4 = TAG_Bool(UNTAG_Int(REGB5)<UNTAG_Int(REGB4));
+               } else {
+               /* ./../lib/standard//collection//array.nit:245 */
+               REGB6 = TAG_Bool(false);
+               REGB4 = REGB6;
+               }
+               if (UNTAG_Bool(REGB4)) {
+               } else {
+               nit_abort("Assert %s  failed", "'index'", LOCATE_array, 245);
+               }
+               /* ./../lib/standard//collection//array.nit:246 */
+               fra.me.REG[2] = ATTR_array___Array____items(fra.me.REG[2]);
+               REGB4 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
+               if (UNTAG_Bool(REGB4)) {
+               nit_abort("Reciever is null", NULL, LOCATE_array, 246);
+               }
+               /* ./../lib/standard//collection//array.nit:654 */
+               fra.me.REG[2] = ((Nit_NativeArray)fra.me.REG[2])->val[UNTAG_Int(REGB5)];
+               /* ./../lib/standard//collection//array.nit:246 */
+               goto label17;
+               label17: while(0);
+               /* ./../lib/standard//collection//array.nit:378 */
+               fra.me.REG[1] = fra.me.REG[2];
+              }
+              /* ./../lib/standard//collection//array.nit:380 */
+              REGB5 = TAG_Int(1);
+              /* ./../lib/standard//kernel.nit:215 */
+              REGB5 = TAG_Int(UNTAG_Int(REGB3)+UNTAG_Int(REGB5));
+              /* ./../lib/standard//collection//array.nit:380 */
+              REGB3 = REGB5;
+            } else {
+              /* ./../lib/standard//collection//array.nit:375 */
+              goto label18;
+            }
+          }
+          label18: while(0);
+          /* ./../lib/standard//collection//array.nit:382 */
+          REGB3 = TAG_Bool(IS_EQUAL_OO(REGB2,REGB0));
+          if (UNTAG_Bool(REGB3)) {
+          } else {
+            /* ./../lib/standard//kernel.nit:207 */
+            REGB5 = TAG_Bool((REGB2)==(REGB0));
+            /* ./../lib/standard//collection//array.nit:382 */
+            REGB3 = REGB5;
+          }
+          REGB3 = TAG_Bool(!UNTAG_Bool(REGB3));
+          if (UNTAG_Bool(REGB3)) {
+            /* ./../lib/standard//collection//array.nit:243 */
+            fra.me.REG[2] = fra.me.REG[0];
+            REGB3 = REGB0;
+            /* ./../lib/standard//collection//array.nit:245 */
+            REGB5 = TAG_Int(0);
+            /* ./../lib/standard//kernel.nit:213 */
+            REGB5 = TAG_Bool(UNTAG_Int(REGB3)>=UNTAG_Int(REGB5));
+            /* ./../lib/standard//collection//array.nit:245 */
+            if (UNTAG_Bool(REGB5)) {
+              REGB5 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
+              if (UNTAG_Bool(REGB5)) {
+              } else {
+               nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 245);
+              }
+              REGB5 = ATTR_array___AbstractArrayRead____length(fra.me.REG[2]);
+              /* ./../lib/standard//kernel.nit:212 */
+              REGB5 = TAG_Bool(UNTAG_Int(REGB3)<UNTAG_Int(REGB5));
+            } else {
+              /* ./../lib/standard//collection//array.nit:245 */
+              REGB4 = TAG_Bool(false);
+              REGB5 = REGB4;
+            }
+            if (UNTAG_Bool(REGB5)) {
+            } else {
+              nit_abort("Assert %s  failed", "'index'", LOCATE_array, 245);
+            }
+            /* ./../lib/standard//collection//array.nit:246 */
+            fra.me.REG[2] = ATTR_array___Array____items(fra.me.REG[2]);
+            REGB5 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
+            if (UNTAG_Bool(REGB5)) {
+              nit_abort("Reciever is null", NULL, LOCATE_array, 246);
+            }
+            /* ./../lib/standard//collection//array.nit:654 */
+            fra.me.REG[2] = ((Nit_NativeArray)fra.me.REG[2])->val[UNTAG_Int(REGB3)];
+            /* ./../lib/standard//collection//array.nit:246 */
+            goto label19;
+            label19: while(0);
+            /* ./../lib/standard//collection//array.nit:383 */
+            CALL_abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB2, fra.me.REG[2]);
+            /* ./../lib/standard//collection//array.nit:384 */
+            CALL_abstract_collection___Map_____braeq(fra.me.REG[0])(fra.me.REG[0], REGB0, fra.me.REG[1]);
+          }
+          /* ./../lib/standard//collection//array.nit:386 */
+          REGB2 = TAG_Int(1);
+          /* ./../lib/standard//kernel.nit:215 */
+          REGB2 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB2));
+          /* ./../lib/standard//collection//array.nit:386 */
+          REGB0 = REGB2;
+        } else {
+          /* ./../lib/standard//collection//array.nit:371 */
+          goto label20;
+        }
+      }
+      label20: while(0);
+    }
+  }
+  label1: while(0);
+  stack_frame_head = fra.me.prev;
+  return;
+}
+      val_t OC_array___Array___sub_sort_11(struct stack_frame_t *closctx, val_t p0, val_t p1){
+        struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
+        val_t REGB0;
+        val_t tmp;
+        /* ./../lib/standard//collection//array.nit:367 */
+        fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+        fra.me.file = LOCATE_array;
+        fra.me.line = 367;
+        fra.me.meth = LOCATE_array___Array___sub_sort;
+        fra.me.has_broke = 0;
+        fra.me.REG_size = 2;
+        fra.me.REG[0] = NIT_NULL;
+        fra.me.REG[1] = NIT_NULL;
+        fra.me.REG[0] = p0;
+        fra.me.REG[1] = p1;
+        REGB0 = ((val_t (*)(struct stack_frame_t *, val_t, val_t))(closctx->closure_funs[0]))(closctx->closure_ctx, fra.me.REG[0], fra.me.REG[1]);
+        if (closctx->closure_ctx->has_broke) {
+          closctx->has_broke = 1;
+          goto label12;
+        }
+        goto label12;
+        label12: while(0);
+        stack_frame_head = fra.me.prev;
+        return REGB0;
+      }
+      val_t OC_array___Array___sub_sort_13(struct stack_frame_t *closctx, val_t p0, val_t p1){
+        struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
+        val_t REGB0;
+        val_t tmp;
+        /* ./../lib/standard//collection//array.nit:368 */
+        fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+        fra.me.file = LOCATE_array;
+        fra.me.line = 368;
+        fra.me.meth = LOCATE_array___Array___sub_sort;
+        fra.me.has_broke = 0;
+        fra.me.REG_size = 2;
+        fra.me.REG[0] = NIT_NULL;
+        fra.me.REG[1] = NIT_NULL;
+        fra.me.REG[0] = p0;
+        fra.me.REG[1] = p1;
+        REGB0 = ((val_t (*)(struct stack_frame_t *, val_t, val_t))(closctx->closure_funs[0]))(closctx->closure_ctx, fra.me.REG[0], fra.me.REG[1]);
+        if (closctx->closure_ctx->has_broke) {
+          closctx->has_broke = 1;
+          goto label14;
+        }
+        goto label14;
+        label14: while(0);
+        stack_frame_head = fra.me.prev;
+        return REGB0;
+      }
 val_t array___ArrayIterator___item(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_array;
-  fra.me.line = 331;
+  fra.me.line = 395;
   fra.me.meth = LOCATE_array___ArrayIterator___item;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
+  /* ./../lib/standard//collection//array.nit:395 */
   REGB0 = TAG_Bool(ATTR_array___ArrayIterator____array(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:331 */
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_array");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 331);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_array", LOCATE_array, 395);
   }
   fra.me.REG[1] = ATTR_array___ArrayIterator____array(fra.me.REG[0]);
   REGB0 = TAG_Bool(ATTR_array___ArrayIterator____index(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_index");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 331);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_index", LOCATE_array, 395);
   }
   REGB0 = ATTR_array___ArrayIterator____index(fra.me.REG[0]);
   fra.me.REG[1] = CALL_abstract_collection___MapRead_____bra(fra.me.REG[1])(fra.me.REG[1], REGB0);
@@ -1784,27 +2600,6 @@ val_t array___ArrayIterator___item(val_t p0){
   stack_frame_head = fra.me.prev;
   return fra.me.REG[1];
 }
-void array___ArrayIterator___next(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_array;
-  fra.me.line = 337;
-  fra.me.meth = LOCATE_array___ArrayIterator___next;
-  fra.me.has_broke = 0;
-  fra.me.REG_size = 1;
-  fra.me.REG[0] = NIT_NULL;
-  fra.me.REG[0] = p0;
-  REGB0 = ATTR_array___ArrayIterator____index(fra.me.REG[0]);
-  REGB1 = TAG_Int(1);
-  REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
-  /* ./../lib/standard//collection//array.nit:337 */
-  ATTR_array___ArrayIterator____index(fra.me.REG[0]) = REGB1;
-  stack_frame_head = fra.me.prev;
-  return;
-}
 val_t array___ArrayIterator___is_ok(val_t p0){
   struct {struct stack_frame_t me;} fra;
   val_t REGB0;
@@ -1812,68 +2607,62 @@ val_t array___ArrayIterator___is_ok(val_t p0){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 335;
+  fra.me.line = 399;
   fra.me.meth = LOCATE_array___ArrayIterator___is_ok;
   fra.me.has_broke = 0;
   fra.me.REG_size = 1;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[0] = p0;
+  /* ./../lib/standard//collection//array.nit:399 */
   REGB0 = TAG_Bool(ATTR_array___ArrayIterator____index(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:335 */
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_index");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 335);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_index", LOCATE_array, 399);
   }
   REGB0 = ATTR_array___ArrayIterator____index(fra.me.REG[0]);
   REGB1 = TAG_Bool(ATTR_array___ArrayIterator____array(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB1)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_array");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 335);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_array", LOCATE_array, 399);
   }
   fra.me.REG[0] = ATTR_array___ArrayIterator____array(fra.me.REG[0]);
-  REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
   /* ./../lib/standard//collection//array.nit:23 */
+  REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB1)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_length");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 23);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
   }
   REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
+  /* ./../lib/standard//kernel.nit:212 */
   REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
-  /* ./../lib/standard//collection//array.nit:335 */
+  /* ./../lib/standard//collection//array.nit:399 */
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
   return REGB1;
 }
-val_t array___ArrayIterator___index(val_t p0){
+void array___ArrayIterator___next(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_array;
-  fra.me.line = 345;
-  fra.me.meth = LOCATE_array___ArrayIterator___index;
+  fra.me.line = 401;
+  fra.me.meth = LOCATE_array___ArrayIterator___next;
   fra.me.has_broke = 0;
   fra.me.REG_size = 1;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[0] = p0;
-  REGB0 = TAG_Bool(ATTR_array___ArrayIterator____index(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:345 */
-  if (UNTAG_Bool(REGB0)) {
-  } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_index");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 345);
-    nit_exit(1);
-  }
+  /* ./../lib/standard//collection//array.nit:401 */
   REGB0 = ATTR_array___ArrayIterator____index(fra.me.REG[0]);
+  REGB1 = TAG_Int(1);
+  /* ./../lib/standard//kernel.nit:215 */
+  REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
+  /* ./../lib/standard//collection//array.nit:401 */
+  ATTR_array___ArrayIterator____index(fra.me.REG[0]) = REGB1;
   stack_frame_head = fra.me.prev;
-  return REGB0;
+  return;
 }
 void array___ArrayIterator___init(val_t p0, val_t p1, int* init_table){
   int itpos6 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_ArrayIterator].i;
@@ -1883,7 +2672,7 @@ void array___ArrayIterator___init(val_t p0, val_t p1, int* init_table){
   if (init_table[itpos6]) return;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 339;
+  fra.me.line = 403;
   fra.me.meth = LOCATE_array___ArrayIterator___init;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
@@ -1891,130 +2680,152 @@ void array___ArrayIterator___init(val_t p0, val_t p1, int* init_table){
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
-  /* ./../lib/standard//collection//array.nit:341 */
+  /* ./../lib/standard//collection//array.nit:405 */
   ATTR_array___ArrayIterator____array(fra.me.REG[0]) = fra.me.REG[1];
+  /* ./../lib/standard//collection//array.nit:406 */
   REGB0 = TAG_Int(0);
-  /* ./../lib/standard//collection//array.nit:342 */
   ATTR_array___ArrayIterator____index(fra.me.REG[0]) = REGB0;
   stack_frame_head = fra.me.prev;
   init_table[itpos6] = 1;
   return;
 }
-val_t array___ArraySet___iterator(val_t p0){
+val_t array___ArrayIterator___index(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_array;
-  fra.me.line = 381;
-  fra.me.meth = LOCATE_array___ArraySet___iterator;
+  fra.me.line = 409;
+  fra.me.meth = LOCATE_array___ArrayIterator___index;
   fra.me.has_broke = 0;
   fra.me.REG_size = 1;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[0] = p0;
-  REGB0 = TAG_Bool(ATTR_array___ArraySet____array(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:381 */
+  /* ./../lib/standard//collection//array.nit:409 */
+  REGB0 = TAG_Bool(ATTR_array___ArrayIterator____index(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_array");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 381);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_index", LOCATE_array, 409);
   }
-  fra.me.REG[0] = ATTR_array___ArraySet____array(fra.me.REG[0]);
-  fra.me.REG[0] = CALL_abstract_collection___Collection___iterator(fra.me.REG[0])(fra.me.REG[0]);
-  fra.me.REG[0] = NEW_ArraySetIterator_array___ArraySetIterator___init(fra.me.REG[0]);
-  goto label1;
-  label1: while(0);
+  REGB0 = ATTR_array___ArrayIterator____index(fra.me.REG[0]);
   stack_frame_head = fra.me.prev;
-  return fra.me.REG[0];
+  return REGB0;
 }
-val_t array___ArraySet___is_empty(val_t p0){
-  struct {struct stack_frame_t me;} fra;
+val_t array___ArraySet___has(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_array;
-  fra.me.line = 361;
-  fra.me.meth = LOCATE_array___ArraySet___is_empty;
+  fra.me.line = 421;
+  fra.me.meth = LOCATE_array___ArraySet___has;
   fra.me.has_broke = 0;
-  fra.me.REG_size = 1;
+  fra.me.REG_size = 2;
   fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
+  fra.me.REG[1] = p1;
+  /* ./../lib/standard//collection//array.nit:421 */
   REGB0 = TAG_Bool(ATTR_array___ArraySet____array(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:361 */
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_array");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 361);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_array", LOCATE_array, 421);
   }
   fra.me.REG[0] = ATTR_array___ArraySet____array(fra.me.REG[0]);
-  REGB0 = CALL_abstract_collection___Collection___is_empty(fra.me.REG[0])(fra.me.REG[0]);
+  REGB0 = CALL_abstract_collection___Collection___has(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
   return REGB0;
 }
-val_t array___ArraySet___length(val_t p0){
-  struct {struct stack_frame_t me;} fra;
+void array___ArraySet___add(val_t p0, val_t p1){
+  struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
   val_t REGB0;
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 363;
-  fra.me.meth = LOCATE_array___ArraySet___length;
+  fra.me.line = 423;
+  fra.me.meth = LOCATE_array___ArraySet___add;
   fra.me.has_broke = 0;
-  fra.me.REG_size = 1;
+  fra.me.REG_size = 3;
   fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[1] = NIT_NULL;
+  fra.me.REG[2] = NIT_NULL;
   fra.me.REG[0] = p0;
+  fra.me.REG[1] = p1;
+  /* ./../lib/standard//collection//array.nit:423 */
   REGB0 = TAG_Bool(ATTR_array___ArraySet____array(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:363 */
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_array");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 363);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_array", LOCATE_array, 423);
   }
-  fra.me.REG[0] = ATTR_array___ArraySet____array(fra.me.REG[0]);
-  REGB0 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:23 */
+  fra.me.REG[2] = ATTR_array___ArraySet____array(fra.me.REG[0]);
+  REGB0 = CALL_abstract_collection___Collection___has(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]);
+  REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
+  if (UNTAG_Bool(REGB0)) {
+    REGB0 = TAG_Bool(ATTR_array___ArraySet____array(fra.me.REG[0])!=NIT_NULL);
+    if (UNTAG_Bool(REGB0)) {
+    } else {
+      nit_abort("Uninitialized attribute %s", "_array", LOCATE_array, 423);
+    }
+    fra.me.REG[0] = ATTR_array___ArraySet____array(fra.me.REG[0]);
+    CALL_abstract_collection___SimpleCollection___add(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
+  }
+  stack_frame_head = fra.me.prev;
+  return;
+}
+val_t array___ArraySet___is_empty(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_array;
+  fra.me.line = 425;
+  fra.me.meth = LOCATE_array___ArraySet___is_empty;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 1;
+  fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[0] = p0;
+  /* ./../lib/standard//collection//array.nit:425 */
+  REGB0 = TAG_Bool(ATTR_array___ArraySet____array(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_length");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 23);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_array", LOCATE_array, 425);
   }
-  REGB0 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
-  /* ./../lib/standard//collection//array.nit:363 */
+  fra.me.REG[0] = ATTR_array___ArraySet____array(fra.me.REG[0]);
+  REGB0 = CALL_abstract_collection___Collection___is_empty(fra.me.REG[0])(fra.me.REG[0]);
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
   return REGB0;
 }
-val_t array___ArraySet___has(val_t p0, val_t p1){
-  struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
+val_t array___ArraySet___length(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_array;
-  fra.me.line = 357;
-  fra.me.meth = LOCATE_array___ArraySet___has;
+  fra.me.line = 427;
+  fra.me.meth = LOCATE_array___ArraySet___length;
   fra.me.has_broke = 0;
-  fra.me.REG_size = 2;
+  fra.me.REG_size = 1;
   fra.me.REG[0] = NIT_NULL;
-  fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
-  fra.me.REG[1] = p1;
+  /* ./../lib/standard//collection//array.nit:427 */
   REGB0 = TAG_Bool(ATTR_array___ArraySet____array(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:357 */
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_array");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 357);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_array", LOCATE_array, 427);
   }
   fra.me.REG[0] = ATTR_array___ArraySet____array(fra.me.REG[0]);
-  REGB0 = CALL_abstract_collection___Collection___has(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
+  /* ./../lib/standard//collection//array.nit:23 */
+  REGB0 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB0)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
+  }
+  REGB0 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
+  /* ./../lib/standard//collection//array.nit:427 */
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
@@ -2027,47 +2838,41 @@ val_t array___ArraySet___first(val_t p0){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 365;
+  fra.me.line = 429;
   fra.me.meth = LOCATE_array___ArraySet___first;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
+  /* ./../lib/standard//collection//array.nit:431 */
   REGB0 = TAG_Bool(ATTR_array___ArraySet____array(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:367 */
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_array");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 367);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_array", LOCATE_array, 431);
   }
   fra.me.REG[1] = ATTR_array___ArraySet____array(fra.me.REG[0]);
-  REGB0 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
   /* ./../lib/standard//collection//array.nit:23 */
+  REGB0 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[1])!=NIT_NULL);
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_length");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 23);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
   }
   REGB0 = ATTR_array___AbstractArrayRead____length(fra.me.REG[1]);
+  /* ./../lib/standard//collection//array.nit:431 */
   REGB1 = TAG_Int(0);
+  /* ./../lib/standard//kernel.nit:214 */
   REGB1 = TAG_Bool(UNTAG_Int(REGB0)>UNTAG_Int(REGB1));
-  /* ./../lib/standard//collection//array.nit:367 */
+  /* ./../lib/standard//collection//array.nit:431 */
   if (UNTAG_Bool(REGB1)) {
   } else {
-    fprintf(stderr, "Assert failed");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 367);
-    nit_exit(1);
+    nit_abort("Assert failed", NULL, LOCATE_array, 431);
   }
+  /* ./../lib/standard//collection//array.nit:432 */
   REGB1 = TAG_Bool(ATTR_array___ArraySet____array(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:368 */
   if (UNTAG_Bool(REGB1)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_array");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 368);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_array", LOCATE_array, 432);
   }
   fra.me.REG[0] = ATTR_array___ArraySet____array(fra.me.REG[0]);
   fra.me.REG[0] = CALL_abstract_collection___Collection___first(fra.me.REG[0])(fra.me.REG[0]);
@@ -2076,39 +2881,14 @@ val_t array___ArraySet___first(val_t p0){
   stack_frame_head = fra.me.prev;
   return fra.me.REG[0];
 }
-void array___ArraySet___clear(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_array;
-  fra.me.line = 379;
-  fra.me.meth = LOCATE_array___ArraySet___clear;
-  fra.me.has_broke = 0;
-  fra.me.REG_size = 1;
-  fra.me.REG[0] = NIT_NULL;
-  fra.me.REG[0] = p0;
-  REGB0 = TAG_Bool(ATTR_array___ArraySet____array(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:379 */
-  if (UNTAG_Bool(REGB0)) {
-  } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_array");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 379);
-    nit_exit(1);
-  }
-  fra.me.REG[0] = ATTR_array___ArraySet____array(fra.me.REG[0]);
-  CALL_abstract_collection___RemovableCollection___clear(fra.me.REG[0])(fra.me.REG[0]);
-  stack_frame_head = fra.me.prev;
-  return;
-}
-void array___ArraySet___remove(val_t p0, val_t p1){
-  struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
+void array___ArraySet___remove(val_t p0, val_t p1){
+  struct {struct stack_frame_t me; val_t MORE_REG[2];} 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_array;
-  fra.me.line = 371;
+  fra.me.line = 435;
   fra.me.meth = LOCATE_array___ArraySet___remove;
   fra.me.has_broke = 0;
   fra.me.REG_size = 3;
@@ -2117,19 +2897,19 @@ void array___ArraySet___remove(val_t p0, val_t p1){
   fra.me.REG[2] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
+  /* ./../lib/standard//collection//array.nit:437 */
   REGB0 = TAG_Bool(ATTR_array___ArraySet____array(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:373 */
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_array");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 373);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_array", LOCATE_array, 437);
   }
   fra.me.REG[2] = ATTR_array___ArraySet____array(fra.me.REG[0]);
   REGB0 = CALL_abstract_collection___SequenceRead___index_of(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]);
+  /* ./../lib/standard//collection//array.nit:438 */
   REGB1 = TAG_Int(0);
+  /* ./../lib/standard//kernel.nit:213 */
   REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
-  /* ./../lib/standard//collection//array.nit:374 */
+  /* ./../lib/standard//collection//array.nit:438 */
   if (UNTAG_Bool(REGB1)) {
     CALL_array___ArraySet___remove_at(fra.me.REG[0])(fra.me.REG[0], REGB0);
   }
@@ -2141,7 +2921,7 @@ void array___ArraySet___remove_all(val_t p0, val_t p1){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 377;
+  fra.me.line = 441;
   fra.me.meth = LOCATE_array___ArraySet___remove_all;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
@@ -2149,50 +2929,59 @@ void array___ArraySet___remove_all(val_t p0, val_t p1){
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
-  /* ./../lib/standard//collection//array.nit:377 */
+  /* ./../lib/standard//collection//array.nit:441 */
   CALL_abstract_collection___RemovableCollection___remove(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
   stack_frame_head = fra.me.prev;
   return;
 }
-void array___ArraySet___add(val_t p0, val_t p1){
-  struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
+void array___ArraySet___clear(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_array;
-  fra.me.line = 359;
-  fra.me.meth = LOCATE_array___ArraySet___add;
+  fra.me.line = 443;
+  fra.me.meth = LOCATE_array___ArraySet___clear;
   fra.me.has_broke = 0;
-  fra.me.REG_size = 3;
+  fra.me.REG_size = 1;
   fra.me.REG[0] = NIT_NULL;
-  fra.me.REG[1] = NIT_NULL;
-  fra.me.REG[2] = NIT_NULL;
   fra.me.REG[0] = p0;
-  fra.me.REG[1] = p1;
+  /* ./../lib/standard//collection//array.nit:443 */
   REGB0 = TAG_Bool(ATTR_array___ArraySet____array(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:359 */
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_array");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 359);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_array", LOCATE_array, 443);
   }
-  fra.me.REG[2] = ATTR_array___ArraySet____array(fra.me.REG[0]);
-  REGB0 = CALL_abstract_collection___Collection___has(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]);
-  REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
+  fra.me.REG[0] = ATTR_array___ArraySet____array(fra.me.REG[0]);
+  CALL_abstract_collection___RemovableCollection___clear(fra.me.REG[0])(fra.me.REG[0]);
+  stack_frame_head = fra.me.prev;
+  return;
+}
+val_t array___ArraySet___iterator(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_array;
+  fra.me.line = 445;
+  fra.me.meth = LOCATE_array___ArraySet___iterator;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 1;
+  fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[0] = p0;
+  /* ./../lib/standard//collection//array.nit:445 */
+  REGB0 = TAG_Bool(ATTR_array___ArraySet____array(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB0)) {
-    REGB0 = TAG_Bool(ATTR_array___ArraySet____array(fra.me.REG[0])!=NIT_NULL);
-    if (UNTAG_Bool(REGB0)) {
-    } else {
-      fprintf(stderr, "Uninitialized attribute %s", "_array");
-      fprintf(stderr, " (%s:%d)\n", LOCATE_array, 359);
-      nit_exit(1);
-    }
-    fra.me.REG[0] = ATTR_array___ArraySet____array(fra.me.REG[0]);
-    array___Array___add(fra.me.REG[0], fra.me.REG[1]);
+  } else {
+    nit_abort("Uninitialized attribute %s", "_array", LOCATE_array, 445);
   }
+  fra.me.REG[0] = ATTR_array___ArraySet____array(fra.me.REG[0]);
+  fra.me.REG[0] = CALL_abstract_collection___Collection___iterator(fra.me.REG[0])(fra.me.REG[0]);
+  fra.me.REG[0] = NEW_ArraySetIterator_array___ArraySetIterator___init(fra.me.REG[0]);
+  goto label1;
+  label1: while(0);
   stack_frame_head = fra.me.prev;
-  return;
+  return fra.me.REG[0];
 }
 void array___ArraySet___enlarge(val_t p0, val_t p1){
   struct {struct stack_frame_t me;} fra;
@@ -2201,20 +2990,18 @@ void array___ArraySet___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_array;
-  fra.me.line = 383;
+  fra.me.line = 447;
   fra.me.meth = LOCATE_array___ArraySet___enlarge;
   fra.me.has_broke = 0;
   fra.me.REG_size = 1;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[0] = p0;
   REGB0 = p1;
+  /* ./../lib/standard//collection//array.nit:448 */
   REGB1 = TAG_Bool(ATTR_array___ArraySet____array(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:384 */
   if (UNTAG_Bool(REGB1)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_array");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 384);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_array", LOCATE_array, 448);
   }
   fra.me.REG[0] = ATTR_array___ArraySet____array(fra.me.REG[0]);
   CALL_array___AbstractArray___enlarge(fra.me.REG[0])(fra.me.REG[0], REGB0);
@@ -2228,7 +3015,7 @@ void array___ArraySet___remove_at(val_t p0, val_t p1){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 386;
+  fra.me.line = 450;
   fra.me.meth = LOCATE_array___ArraySet___remove_at;
   fra.me.has_broke = 0;
   fra.me.REG_size = 3;
@@ -2237,32 +3024,26 @@ void array___ArraySet___remove_at(val_t p0, val_t p1){
   fra.me.REG[2] = NIT_NULL;
   fra.me.REG[0] = p0;
   REGB0 = p1;
+  /* ./../lib/standard//collection//array.nit:452 */
   REGB1 = TAG_Bool(ATTR_array___ArraySet____array(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:388 */
   if (UNTAG_Bool(REGB1)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_array");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 388);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_array", LOCATE_array, 452);
   }
   fra.me.REG[1] = ATTR_array___ArraySet____array(fra.me.REG[0]);
   REGB1 = TAG_Bool(ATTR_array___ArraySet____array(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB1)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_array");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 388);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_array", LOCATE_array, 452);
   }
   fra.me.REG[2] = ATTR_array___ArraySet____array(fra.me.REG[0]);
   fra.me.REG[2] = CALL_abstract_collection___SequenceRead___last(fra.me.REG[2])(fra.me.REG[2]);
   CALL_abstract_collection___Map_____braeq(fra.me.REG[1])(fra.me.REG[1], REGB0, fra.me.REG[2]);
+  /* ./../lib/standard//collection//array.nit:453 */
   REGB0 = TAG_Bool(ATTR_array___ArraySet____array(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:389 */
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_array");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 389);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_array", LOCATE_array, 453);
   }
   fra.me.REG[0] = ATTR_array___ArraySet____array(fra.me.REG[0]);
   CALL_abstract_collection___Sequence___pop(fra.me.REG[0])(fra.me.REG[0]);
@@ -2276,15 +3057,15 @@ void array___ArraySet___init(val_t p0, int* init_table){
   if (init_table[itpos7]) return;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 392;
+  fra.me.line = 456;
   fra.me.meth = LOCATE_array___ArraySet___init;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
+  /* ./../lib/standard//collection//array.nit:457 */
   fra.me.REG[1] = NEW_Array_array___Array___init();
-  /* ./../lib/standard//collection//array.nit:393 */
   ATTR_array___ArraySet____array(fra.me.REG[0]) = fra.me.REG[1];
   stack_frame_head = fra.me.prev;
   init_table[itpos7] = 1;
@@ -2298,7 +3079,7 @@ void array___ArraySet___with_capacity(val_t p0, val_t p1, int* init_table){
   if (init_table[itpos8]) return;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 395;
+  fra.me.line = 459;
   fra.me.meth = LOCATE_array___ArraySet___with_capacity;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
@@ -2306,39 +3087,37 @@ void array___ArraySet___with_capacity(val_t p0, val_t p1, int* init_table){
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
   REGB0 = p1;
+  /* ./../lib/standard//collection//array.nit:460 */
   fra.me.REG[1] = NEW_Array_array___Array___with_capacity(REGB0);
-  /* ./../lib/standard//collection//array.nit:396 */
   ATTR_array___ArraySet____array(fra.me.REG[0]) = fra.me.REG[1];
   stack_frame_head = fra.me.prev;
   init_table[itpos8] = 1;
   return;
 }
-val_t array___ArraySetIterator___item(val_t p0){
+val_t array___ArraySetIterator___is_ok(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_array;
-  fra.me.line = 407;
-  fra.me.meth = LOCATE_array___ArraySetIterator___item;
+  fra.me.line = 467;
+  fra.me.meth = LOCATE_array___ArraySetIterator___is_ok;
   fra.me.has_broke = 0;
   fra.me.REG_size = 1;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[0] = p0;
+  /* ./../lib/standard//collection//array.nit:467 */
   REGB0 = TAG_Bool(ATTR_array___ArraySetIterator____iter(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:407 */
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_iter");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 407);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_iter", LOCATE_array, 467);
   }
   fra.me.REG[0] = ATTR_array___ArraySetIterator____iter(fra.me.REG[0]);
-  fra.me.REG[0] = CALL_abstract_collection___Iterator___item(fra.me.REG[0])(fra.me.REG[0]);
+  REGB0 = CALL_abstract_collection___Iterator___is_ok(fra.me.REG[0])(fra.me.REG[0]);
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
-  return fra.me.REG[0];
+  return REGB0;
 }
 void array___ArraySetIterator___next(val_t p0){
   struct {struct stack_frame_t me;} fra;
@@ -2346,51 +3125,47 @@ void array___ArraySetIterator___next(val_t p0){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 405;
+  fra.me.line = 469;
   fra.me.meth = LOCATE_array___ArraySetIterator___next;
   fra.me.has_broke = 0;
   fra.me.REG_size = 1;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[0] = p0;
+  /* ./../lib/standard//collection//array.nit:469 */
   REGB0 = TAG_Bool(ATTR_array___ArraySetIterator____iter(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:405 */
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_iter");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 405);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_iter", LOCATE_array, 469);
   }
   fra.me.REG[0] = ATTR_array___ArraySetIterator____iter(fra.me.REG[0]);
   CALL_abstract_collection___Iterator___next(fra.me.REG[0])(fra.me.REG[0]);
   stack_frame_head = fra.me.prev;
   return;
 }
-val_t array___ArraySetIterator___is_ok(val_t p0){
+val_t array___ArraySetIterator___item(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_array;
-  fra.me.line = 403;
-  fra.me.meth = LOCATE_array___ArraySetIterator___is_ok;
+  fra.me.line = 471;
+  fra.me.meth = LOCATE_array___ArraySetIterator___item;
   fra.me.has_broke = 0;
   fra.me.REG_size = 1;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[0] = p0;
+  /* ./../lib/standard//collection//array.nit:471 */
   REGB0 = TAG_Bool(ATTR_array___ArraySetIterator____iter(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:403 */
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_iter");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 403);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_iter", LOCATE_array, 471);
   }
   fra.me.REG[0] = ATTR_array___ArraySetIterator____iter(fra.me.REG[0]);
-  REGB0 = CALL_abstract_collection___Iterator___is_ok(fra.me.REG[0])(fra.me.REG[0]);
+  fra.me.REG[0] = CALL_abstract_collection___Iterator___item(fra.me.REG[0])(fra.me.REG[0]);
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
-  return REGB0;
+  return fra.me.REG[0];
 }
 void array___ArraySetIterator___init(val_t p0, val_t p1, int* init_table){
   int itpos9 = VAL2OBJ(p0)->vft[INIT_TABLE_POS_ArraySetIterator].i;
@@ -2399,7 +3174,7 @@ void array___ArraySetIterator___init(val_t p0, val_t p1, int* init_table){
   if (init_table[itpos9]) return;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 409;
+  fra.me.line = 473;
   fra.me.meth = LOCATE_array___ArraySetIterator___init;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
@@ -2407,347 +3182,605 @@ void array___ArraySetIterator___init(val_t p0, val_t p1, int* init_table){
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
-  /* ./../lib/standard//collection//array.nit:409 */
+  /* ./../lib/standard//collection//array.nit:473 */
   ATTR_array___ArraySetIterator____iter(fra.me.REG[0]) = fra.me.REG[1];
   stack_frame_head = fra.me.prev;
   init_table[itpos9] = 1;
   return;
 }
-val_t array___ArrayMap___iterator(val_t p0){
-  struct {struct stack_frame_t me;} fra;
+val_t array___ArrayMap_____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 tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 471;
-  fra.me.meth = LOCATE_array___ArrayMap___iterator;
+  fra.me.line = 483;
+  fra.me.meth = LOCATE_array___ArrayMap_____bra;
   fra.me.has_broke = 0;
-  fra.me.REG_size = 1;
+  fra.me.REG_size = 2;
   fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
-  REGB0 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:471 */
-  if (UNTAG_Bool(REGB0)) {
+  fra.me.REG[1] = p1;
+  /* ./../lib/standard//collection//array.nit:486 */
+  REGB0 = CALL_array___ArrayMap___index(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
+  /* ./../lib/standard//collection//array.nit:487 */
+  REGB1 = TAG_Int(0);
+  /* ./../lib/standard//kernel.nit:213 */
+  REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
+  /* ./../lib/standard//collection//array.nit:487 */
+  if (UNTAG_Bool(REGB1)) {
+    /* ./../lib/standard//collection//array.nit:488 */
+    REGB1 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
+    if (UNTAG_Bool(REGB1)) {
+    } else {
+      nit_abort("Uninitialized attribute %s", "_items", LOCATE_array, 488);
+    }
+    fra.me.REG[0] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
+    /* ./../lib/standard//collection//array.nit:245 */
+    REGB1 = TAG_Int(0);
+    /* ./../lib/standard//kernel.nit:213 */
+    REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
+    /* ./../lib/standard//collection//array.nit:245 */
+    if (UNTAG_Bool(REGB1)) {
+      REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+      if (UNTAG_Bool(REGB1)) {
+      } else {
+        nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 245);
+      }
+      REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
+      /* ./../lib/standard//kernel.nit:212 */
+      REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
+    } else {
+      /* ./../lib/standard//collection//array.nit:245 */
+      REGB2 = TAG_Bool(false);
+      REGB1 = REGB2;
+    }
+    if (UNTAG_Bool(REGB1)) {
+    } else {
+      nit_abort("Assert %s  failed", "'index'", LOCATE_array, 245);
+    }
+    /* ./../lib/standard//collection//array.nit:246 */
+    fra.me.REG[0] = ATTR_array___Array____items(fra.me.REG[0]);
+    REGB1 = TAG_Bool(fra.me.REG[0]==NIT_NULL);
+    if (UNTAG_Bool(REGB1)) {
+      nit_abort("Reciever is null", NULL, LOCATE_array, 246);
+    }
+    /* ./../lib/standard//collection//array.nit:654 */
+    fra.me.REG[0] = ((Nit_NativeArray)fra.me.REG[0])->val[UNTAG_Int(REGB0)];
+    /* ./../lib/standard//collection//array.nit:246 */
+    goto label1;
+    label1: while(0);
+    /* ./../lib/standard//collection//array.nit:488 */
+    REGB0 = TAG_Bool(fra.me.REG[0]==NIT_NULL);
+    if (UNTAG_Bool(REGB0)) {
+      nit_abort("Reciever is null", NULL, LOCATE_array, 488);
+    }
+    fra.me.REG[0] = CALL_abstract_collection___Couple___second(fra.me.REG[0])(fra.me.REG[0]);
+    goto label2;
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_items");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 471);
-    nit_exit(1);
+    /* ./../lib/standard//collection//array.nit:490 */
+    nit_abort("Aborted", NULL, LOCATE_array, 490);
   }
-  fra.me.REG[0] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
-  fra.me.REG[0] = CALL_abstract_collection___Collection___iterator(fra.me.REG[0])(fra.me.REG[0]);
-  fra.me.REG[0] = NEW_CoupleMapIterator_abstract_collection___CoupleMapIterator___init(fra.me.REG[0]);
-  goto label1;
-  label1: while(0);
+  label2: while(0);
   stack_frame_head = fra.me.prev;
   return fra.me.REG[0];
 }
-val_t array___ArrayMap___is_empty(val_t p0){
-  struct {struct stack_frame_t me;} fra;
+void array___ArrayMap_____braeq(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 tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 473;
-  fra.me.meth = LOCATE_array___ArrayMap___is_empty;
+  fra.me.line = 494;
+  fra.me.meth = LOCATE_array___ArrayMap_____braeq;
   fra.me.has_broke = 0;
-  fra.me.REG_size = 1;
+  fra.me.REG_size = 4;
   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 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:473 */
-  if (UNTAG_Bool(REGB0)) {
+  fra.me.REG[1] = p1;
+  fra.me.REG[2] = p2;
+  /* ./../lib/standard//collection//array.nit:497 */
+  REGB0 = CALL_array___ArrayMap___index(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
+  /* ./../lib/standard//collection//array.nit:498 */
+  REGB1 = TAG_Int(0);
+  /* ./../lib/standard//kernel.nit:213 */
+  REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
+  /* ./../lib/standard//collection//array.nit:498 */
+  if (UNTAG_Bool(REGB1)) {
+    /* ./../lib/standard//collection//array.nit:499 */
+    REGB1 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
+    if (UNTAG_Bool(REGB1)) {
+    } else {
+      nit_abort("Uninitialized attribute %s", "_items", LOCATE_array, 499);
+    }
+    fra.me.REG[3] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
+    /* ./../lib/standard//collection//array.nit:245 */
+    REGB1 = TAG_Int(0);
+    /* ./../lib/standard//kernel.nit:213 */
+    REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
+    /* ./../lib/standard//collection//array.nit:245 */
+    if (UNTAG_Bool(REGB1)) {
+      REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[3])!=NIT_NULL);
+      if (UNTAG_Bool(REGB1)) {
+      } else {
+        nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 245);
+      }
+      REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[3]);
+      /* ./../lib/standard//kernel.nit:212 */
+      REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
+    } else {
+      /* ./../lib/standard//collection//array.nit:245 */
+      REGB2 = TAG_Bool(false);
+      REGB1 = REGB2;
+    }
+    if (UNTAG_Bool(REGB1)) {
+    } else {
+      nit_abort("Assert %s  failed", "'index'", LOCATE_array, 245);
+    }
+    /* ./../lib/standard//collection//array.nit:246 */
+    fra.me.REG[3] = ATTR_array___Array____items(fra.me.REG[3]);
+    REGB1 = TAG_Bool(fra.me.REG[3]==NIT_NULL);
+    if (UNTAG_Bool(REGB1)) {
+      nit_abort("Reciever is null", NULL, LOCATE_array, 246);
+    }
+    /* ./../lib/standard//collection//array.nit:654 */
+    fra.me.REG[3] = ((Nit_NativeArray)fra.me.REG[3])->val[UNTAG_Int(REGB0)];
+    /* ./../lib/standard//collection//array.nit:246 */
+    goto label1;
+    label1: while(0);
+    /* ./../lib/standard//collection//array.nit:499 */
+    REGB0 = TAG_Bool(fra.me.REG[3]==NIT_NULL);
+    if (UNTAG_Bool(REGB0)) {
+      nit_abort("Reciever is null", NULL, LOCATE_array, 499);
+    }
+    CALL_abstract_collection___Couple___second__eq(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[2]);
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_items");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 473);
-    nit_exit(1);
+    /* ./../lib/standard//collection//array.nit:501 */
+    REGB0 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
+    if (UNTAG_Bool(REGB0)) {
+    } else {
+      nit_abort("Uninitialized attribute %s", "_items", LOCATE_array, 501);
+    }
+    fra.me.REG[0] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
+    fra.me.REG[2] = NEW_Couple_abstract_collection___Couple___init(fra.me.REG[1], fra.me.REG[2]);
+    CALL_abstract_collection___Sequence___push(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[2]);
   }
-  fra.me.REG[0] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
-  REGB0 = CALL_abstract_collection___Collection___is_empty(fra.me.REG[0])(fra.me.REG[0]);
-  goto label1;
-  label1: while(0);
   stack_frame_head = fra.me.prev;
-  return REGB0;
+  return;
 }
-val_t array___ArrayMap___length(val_t p0){
-  struct {struct stack_frame_t me;} fra;
+val_t array___ArrayMap___has_key(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 tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 458;
-  fra.me.meth = LOCATE_array___ArrayMap___length;
+  fra.me.line = 505;
+  fra.me.meth = LOCATE_array___ArrayMap___has_key;
   fra.me.has_broke = 0;
-  fra.me.REG_size = 1;
+  fra.me.REG_size = 2;
   fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
-  REGB0 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:459 */
-  if (UNTAG_Bool(REGB0)) {
-  } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_items");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 459);
-    nit_exit(1);
-  }
-  fra.me.REG[0] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
-  REGB0 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:23 */
-  if (UNTAG_Bool(REGB0)) {
-  } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_length");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 23);
-    nit_exit(1);
-  }
-  REGB0 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
-  /* ./../lib/standard//collection//array.nit:459 */
+  fra.me.REG[1] = p1;
+  /* ./../lib/standard//collection//array.nit:506 */
+  REGB0 = CALL_array___ArrayMap___index(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
+  REGB1 = TAG_Int(0);
+  /* ./../lib/standard//kernel.nit:213 */
+  REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
+  /* ./../lib/standard//collection//array.nit:506 */
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
-  return REGB0;
+  return REGB1;
 }
 val_t array___ArrayMap___has(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 tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 444;
+  fra.me.line = 508;
   fra.me.meth = LOCATE_array___ArrayMap___has;
   fra.me.has_broke = 0;
-  fra.me.REG_size = 3;
+  fra.me.REG_size = 4;
   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:511 */
   REGB0 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:447 */
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_items");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 447);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_array, 511);
   }
   fra.me.REG[0] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
-  fra.me.REG[0] = CALL_abstract_collection___Collection___iterator(fra.me.REG[0])(fra.me.REG[0]);
+  /* ./../lib/standard//collection//array.nit:234 */
+  REGB0 = TAG_Int(0);
+  /* ./../lib/standard//collection//array.nit:235 */
+  REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB1)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 235);
+  }
+  REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
+  /* ./../lib/standard//collection//array.nit:236 */
+  fra.me.REG[2] = ATTR_array___Array____items(fra.me.REG[0]);
+  /* ./../lib/standard//collection//array.nit:237 */
   while(1) {
-    REGB0 = CALL_abstract_collection___Iterator___is_ok(fra.me.REG[0])(fra.me.REG[0]);
-    if (UNTAG_Bool(REGB0)) {
-      fra.me.REG[2] = CALL_abstract_collection___Iterator___item(fra.me.REG[0])(fra.me.REG[0]);
-      fra.me.REG[2] = CALL_abstract_collection___Couple___second(fra.me.REG[2])(fra.me.REG[2]);
-      REGB0 = TAG_Bool(IS_EQUAL_NN(fra.me.REG[2],fra.me.REG[1]));
-      if (UNTAG_Bool(REGB0)) {
+    /* ./../lib/standard//collection//array.nit:23 */
+    REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+    if (UNTAG_Bool(REGB1)) {
+    } else {
+      nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
+    }
+    REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
+    /* ./../lib/standard//kernel.nit:212 */
+    REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
+    /* ./../lib/standard//collection//array.nit:237 */
+    if (UNTAG_Bool(REGB1)) {
+      /* ./../lib/standard//collection//array.nit:238 */
+      REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
+      if (UNTAG_Bool(REGB1)) {
+        nit_abort("Reciever is null", NULL, LOCATE_array, 238);
+      }
+      /* ./../lib/standard//collection//array.nit:654 */
+      fra.me.REG[3] = ((Nit_NativeArray)fra.me.REG[2])->val[UNTAG_Int(REGB0)];
+      /* ./../lib/standard//collection//array.nit:511 */
+      fra.me.REG[3] = CALL_abstract_collection___Couple___second(fra.me.REG[3])(fra.me.REG[3]);
+      REGB1 = TAG_Bool(IS_EQUAL_NN(fra.me.REG[3],fra.me.REG[1]));
+      if (UNTAG_Bool(REGB1)) {
       } else {
-        REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
-        if (UNTAG_Bool(REGB1)) {
-          REGB1 = TAG_Bool(false);
-          REGB0 = REGB1;
+        REGB2 = TAG_Bool(fra.me.REG[3]==NIT_NULL);
+        if (UNTAG_Bool(REGB2)) {
+          REGB2 = TAG_Bool(false);
+          REGB1 = REGB2;
         } else {
-          REGB1 = CALL_kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]);
-          REGB0 = REGB1;
+          REGB2 = CALL_kernel___Object_____eqeq(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[1]);
+          REGB1 = REGB2;
         }
       }
-      if (UNTAG_Bool(REGB0)) {
-        REGB0 = TAG_Bool(true);
+      if (UNTAG_Bool(REGB1)) {
+        REGB1 = TAG_Bool(true);
         goto label1;
       }
+      /* ./../lib/standard//collection//array.nit:239 */
+      REGB2 = TAG_Int(1);
+      /* ./../lib/standard//kernel.nit:215 */
+      REGB2 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB2));
+      /* ./../lib/standard//collection//array.nit:239 */
+      REGB0 = REGB2;
     } else {
+      /* ./../lib/standard//collection//array.nit:237 */
       goto label2;
     }
-    CALL_abstract_collection___Iterator___next(fra.me.REG[0])(fra.me.REG[0]);
   }
   label2: while(0);
-  REGB1 = TAG_Bool(false);
-  REGB0 = REGB1;
-  /* ./../lib/standard//collection//array.nit:448 */
+  /* ./../lib/standard//collection//array.nit:512 */
+  REGB0 = TAG_Bool(false);
+  REGB1 = REGB0;
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
-  return REGB0;
+  return REGB1;
 }
 val_t array___ArrayMap___has_only(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 tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 451;
+  fra.me.line = 515;
   fra.me.meth = LOCATE_array___ArrayMap___has_only;
   fra.me.has_broke = 0;
-  fra.me.REG_size = 3;
+  fra.me.REG_size = 4;
   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:518 */
   REGB0 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:454 */
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_items");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 454);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_array, 518);
   }
   fra.me.REG[0] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
-  fra.me.REG[0] = CALL_abstract_collection___Collection___iterator(fra.me.REG[0])(fra.me.REG[0]);
+  /* ./../lib/standard//collection//array.nit:234 */
+  REGB0 = TAG_Int(0);
+  /* ./../lib/standard//collection//array.nit:235 */
+  REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB1)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 235);
+  }
+  REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
+  /* ./../lib/standard//collection//array.nit:236 */
+  fra.me.REG[2] = ATTR_array___Array____items(fra.me.REG[0]);
+  /* ./../lib/standard//collection//array.nit:237 */
   while(1) {
-    REGB0 = CALL_abstract_collection___Iterator___is_ok(fra.me.REG[0])(fra.me.REG[0]);
-    if (UNTAG_Bool(REGB0)) {
-      fra.me.REG[2] = CALL_abstract_collection___Iterator___item(fra.me.REG[0])(fra.me.REG[0]);
-      fra.me.REG[2] = CALL_abstract_collection___Couple___second(fra.me.REG[2])(fra.me.REG[2]);
-      REGB0 = TAG_Bool(IS_EQUAL_NN(fra.me.REG[2],fra.me.REG[1]));
-      if (UNTAG_Bool(REGB0)) {
+    /* ./../lib/standard//collection//array.nit:23 */
+    REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+    if (UNTAG_Bool(REGB1)) {
+    } else {
+      nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
+    }
+    REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
+    /* ./../lib/standard//kernel.nit:212 */
+    REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
+    /* ./../lib/standard//collection//array.nit:237 */
+    if (UNTAG_Bool(REGB1)) {
+      /* ./../lib/standard//collection//array.nit:238 */
+      REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
+      if (UNTAG_Bool(REGB1)) {
+        nit_abort("Reciever is null", NULL, LOCATE_array, 238);
+      }
+      /* ./../lib/standard//collection//array.nit:654 */
+      fra.me.REG[3] = ((Nit_NativeArray)fra.me.REG[2])->val[UNTAG_Int(REGB0)];
+      /* ./../lib/standard//collection//array.nit:518 */
+      fra.me.REG[3] = CALL_abstract_collection___Couple___second(fra.me.REG[3])(fra.me.REG[3]);
+      REGB1 = TAG_Bool(IS_EQUAL_NN(fra.me.REG[3],fra.me.REG[1]));
+      if (UNTAG_Bool(REGB1)) {
       } else {
-        REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
-        if (UNTAG_Bool(REGB1)) {
-          REGB1 = TAG_Bool(false);
-          REGB0 = REGB1;
+        REGB2 = TAG_Bool(fra.me.REG[3]==NIT_NULL);
+        if (UNTAG_Bool(REGB2)) {
+          REGB2 = TAG_Bool(false);
+          REGB1 = REGB2;
         } else {
-          REGB1 = CALL_kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]);
-          REGB0 = REGB1;
+          REGB2 = CALL_kernel___Object_____eqeq(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[1]);
+          REGB1 = REGB2;
         }
       }
-      REGB0 = TAG_Bool(!UNTAG_Bool(REGB0));
-      if (UNTAG_Bool(REGB0)) {
-        REGB0 = TAG_Bool(false);
+      REGB1 = TAG_Bool(!UNTAG_Bool(REGB1));
+      if (UNTAG_Bool(REGB1)) {
+        REGB1 = TAG_Bool(false);
         goto label1;
       }
+      /* ./../lib/standard//collection//array.nit:239 */
+      REGB2 = TAG_Int(1);
+      /* ./../lib/standard//kernel.nit:215 */
+      REGB2 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB2));
+      /* ./../lib/standard//collection//array.nit:239 */
+      REGB0 = REGB2;
     } else {
+      /* ./../lib/standard//collection//array.nit:237 */
       goto label2;
     }
-    CALL_abstract_collection___Iterator___next(fra.me.REG[0])(fra.me.REG[0]);
   }
   label2: while(0);
-  REGB1 = TAG_Bool(true);
-  REGB0 = REGB1;
-  /* ./../lib/standard//collection//array.nit:455 */
+  /* ./../lib/standard//collection//array.nit:519 */
+  REGB0 = TAG_Bool(true);
+  REGB1 = REGB0;
+  goto label1;
+  label1: while(0);
+  stack_frame_head = fra.me.prev;
+  return REGB1;
+}
+val_t array___ArrayMap___length(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_array;
+  fra.me.line = 522;
+  fra.me.meth = LOCATE_array___ArrayMap___length;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 1;
+  fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[0] = p0;
+  /* ./../lib/standard//collection//array.nit:523 */
+  REGB0 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB0)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_array, 523);
+  }
+  fra.me.REG[0] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
+  /* ./../lib/standard//collection//array.nit:23 */
+  REGB0 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB0)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
+  }
+  REGB0 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
+  /* ./../lib/standard//collection//array.nit:523 */
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
   return REGB0;
 }
+val_t array___ArrayMap___first(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_array;
+  fra.me.line = 525;
+  fra.me.meth = LOCATE_array___ArrayMap___first;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 1;
+  fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[0] = p0;
+  /* ./../lib/standard//collection//array.nit:525 */
+  REGB0 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB0)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_array, 525);
+  }
+  fra.me.REG[0] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
+  fra.me.REG[0] = CALL_abstract_collection___Collection___first(fra.me.REG[0])(fra.me.REG[0]);
+  REGB0 = TAG_Bool(fra.me.REG[0]==NIT_NULL);
+  if (UNTAG_Bool(REGB0)) {
+    nit_abort("Reciever is null", NULL, LOCATE_array, 525);
+  }
+  fra.me.REG[0] = CALL_abstract_collection___Couple___second(fra.me.REG[0])(fra.me.REG[0]);
+  goto label1;
+  label1: while(0);
+  stack_frame_head = fra.me.prev;
+  return fra.me.REG[0];
+}
 val_t array___ArrayMap___count(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 tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 463;
+  fra.me.line = 527;
   fra.me.meth = LOCATE_array___ArrayMap___count;
   fra.me.has_broke = 0;
-  fra.me.REG_size = 3;
+  fra.me.REG_size = 4;
   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:530 */
   REGB0 = TAG_Int(0);
+  /* ./../lib/standard//collection//array.nit:531 */
   REGB1 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:467 */
   if (UNTAG_Bool(REGB1)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_items");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 467);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_array, 531);
   }
   fra.me.REG[0] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
-  fra.me.REG[0] = CALL_abstract_collection___Collection___iterator(fra.me.REG[0])(fra.me.REG[0]);
+  /* ./../lib/standard//collection//array.nit:234 */
+  REGB1 = TAG_Int(0);
+  /* ./../lib/standard//collection//array.nit:235 */
+  REGB2 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB2)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 235);
+  }
+  REGB2 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
+  /* ./../lib/standard//collection//array.nit:236 */
+  fra.me.REG[2] = ATTR_array___Array____items(fra.me.REG[0]);
+  /* ./../lib/standard//collection//array.nit:237 */
   while(1) {
-    REGB1 = CALL_abstract_collection___Iterator___is_ok(fra.me.REG[0])(fra.me.REG[0]);
-    if (UNTAG_Bool(REGB1)) {
-      fra.me.REG[2] = CALL_abstract_collection___Iterator___item(fra.me.REG[0])(fra.me.REG[0]);
-      fra.me.REG[2] = CALL_abstract_collection___Couple___second(fra.me.REG[2])(fra.me.REG[2]);
-      REGB1 = TAG_Bool(IS_EQUAL_NN(fra.me.REG[2],fra.me.REG[1]));
-      if (UNTAG_Bool(REGB1)) {
+    /* ./../lib/standard//collection//array.nit:23 */
+    REGB2 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
+    if (UNTAG_Bool(REGB2)) {
+    } else {
+      nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
+    }
+    REGB2 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
+    /* ./../lib/standard//kernel.nit:212 */
+    REGB2 = TAG_Bool(UNTAG_Int(REGB1)<UNTAG_Int(REGB2));
+    /* ./../lib/standard//collection//array.nit:237 */
+    if (UNTAG_Bool(REGB2)) {
+      /* ./../lib/standard//collection//array.nit:238 */
+      REGB2 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
+      if (UNTAG_Bool(REGB2)) {
+        nit_abort("Reciever is null", NULL, LOCATE_array, 238);
+      }
+      /* ./../lib/standard//collection//array.nit:654 */
+      fra.me.REG[3] = ((Nit_NativeArray)fra.me.REG[2])->val[UNTAG_Int(REGB1)];
+      /* ./../lib/standard//collection//array.nit:531 */
+      fra.me.REG[3] = CALL_abstract_collection___Couple___second(fra.me.REG[3])(fra.me.REG[3]);
+      REGB2 = TAG_Bool(IS_EQUAL_NN(fra.me.REG[3],fra.me.REG[1]));
+      if (UNTAG_Bool(REGB2)) {
       } else {
-        REGB2 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
-        if (UNTAG_Bool(REGB2)) {
-          REGB2 = TAG_Bool(false);
-          REGB1 = REGB2;
+        REGB3 = TAG_Bool(fra.me.REG[3]==NIT_NULL);
+        if (UNTAG_Bool(REGB3)) {
+          REGB3 = TAG_Bool(false);
+          REGB2 = REGB3;
         } else {
-          REGB2 = CALL_kernel___Object_____eqeq(fra.me.REG[2])(fra.me.REG[2], fra.me.REG[1]);
-          REGB1 = REGB2;
+          REGB3 = CALL_kernel___Object_____eqeq(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[1]);
+          REGB2 = REGB3;
         }
       }
-      if (UNTAG_Bool(REGB1)) {
-        REGB1 = TAG_Int(1);
-        REGB1 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB1));
-        REGB0 = REGB1;
-      /* ./../lib/standard//collection//array.nit:467 */
+      if (UNTAG_Bool(REGB2)) {
+        REGB2 = TAG_Int(1);
+        /* ./../lib/standard//kernel.nit:215 */
+        REGB2 = TAG_Int(UNTAG_Int(REGB0)+UNTAG_Int(REGB2));
+        /* ./../lib/standard//collection//array.nit:531 */
+        REGB0 = REGB2;
       }
+      /* ./../lib/standard//collection//array.nit:239 */
+      REGB2 = TAG_Int(1);
+      /* ./../lib/standard//kernel.nit:215 */
+      REGB2 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB2));
+      /* ./../lib/standard//collection//array.nit:239 */
+      REGB1 = REGB2;
     } else {
+      /* ./../lib/standard//collection//array.nit:237 */
       goto label1;
     }
-    CALL_abstract_collection___Iterator___next(fra.me.REG[0])(fra.me.REG[0]);
   }
   label1: while(0);
-  /* ./../lib/standard//collection//array.nit:468 */
+  /* ./../lib/standard//collection//array.nit:532 */
   goto label2;
   label2: while(0);
   stack_frame_head = fra.me.prev;
   return REGB0;
 }
-val_t array___ArrayMap___first(val_t p0){
+val_t array___ArrayMap___iterator(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_array;
-  fra.me.line = 461;
-  fra.me.meth = LOCATE_array___ArrayMap___first;
+  fra.me.line = 535;
+  fra.me.meth = LOCATE_array___ArrayMap___iterator;
   fra.me.has_broke = 0;
   fra.me.REG_size = 1;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[0] = p0;
+  /* ./../lib/standard//collection//array.nit:535 */
   REGB0 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:461 */
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_items");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 461);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_array, 535);
   }
   fra.me.REG[0] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
-  fra.me.REG[0] = CALL_abstract_collection___Collection___first(fra.me.REG[0])(fra.me.REG[0]);
-  REGB0 = TAG_Bool(fra.me.REG[0]==NIT_NULL);
-  if (UNTAG_Bool(REGB0)) {
-    fprintf(stderr, "Reciever is null");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 461);
-    nit_exit(1);
-  }
-  fra.me.REG[0] = CALL_abstract_collection___Couple___first(fra.me.REG[0])(fra.me.REG[0]);
+  fra.me.REG[0] = CALL_abstract_collection___Collection___iterator(fra.me.REG[0])(fra.me.REG[0]);
+  fra.me.REG[0] = NEW_CoupleMapIterator_abstract_collection___CoupleMapIterator___init(fra.me.REG[0]);
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
   return fra.me.REG[0];
 }
-void array___ArrayMap___clear(val_t p0){
+val_t array___ArrayMap___is_empty(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_array;
-  fra.me.line = 504;
-  fra.me.meth = LOCATE_array___ArrayMap___clear;
+  fra.me.line = 537;
+  fra.me.meth = LOCATE_array___ArrayMap___is_empty;
   fra.me.has_broke = 0;
   fra.me.REG_size = 1;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[0] = p0;
+  /* ./../lib/standard//collection//array.nit:537 */
   REGB0 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:504 */
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_items");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 504);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_array, 537);
   }
   fra.me.REG[0] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
-  CALL_abstract_collection___RemovableCollection___clear(fra.me.REG[0])(fra.me.REG[0]);
+  REGB0 = CALL_abstract_collection___Collection___is_empty(fra.me.REG[0])(fra.me.REG[0]);
+  goto label1;
+  label1: while(0);
   stack_frame_head = fra.me.prev;
-  return;
+  return REGB0;
 }
 void array___ArrayMap___remove(val_t p0, val_t p1){
   struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
@@ -2758,7 +3791,7 @@ void array___ArrayMap___remove(val_t p0, val_t p1){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 475;
+  fra.me.line = 539;
   fra.me.meth = LOCATE_array___ArrayMap___remove;
   fra.me.has_broke = 0;
   fra.me.REG_size = 3;
@@ -2767,84 +3800,78 @@ void array___ArrayMap___remove(val_t p0, val_t p1){
   fra.me.REG[2] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
+  /* ./../lib/standard//collection//array.nit:541 */
   REGB0 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:477 */
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_items");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 477);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_array, 541);
   }
   fra.me.REG[2] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
-  REGB0 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
   /* ./../lib/standard//collection//array.nit:23 */
+  REGB0 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_length");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 23);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
   }
   REGB0 = ATTR_array___AbstractArrayRead____length(fra.me.REG[2]);
+  /* ./../lib/standard//collection//array.nit:541 */
   REGB1 = TAG_Int(1);
+  /* ./../lib/standard//kernel.nit:217 */
   REGB1 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB1));
-  /* ./../lib/standard//collection//array.nit:478 */
+  /* ./../lib/standard//collection//array.nit:542 */
   while(1) {
     REGB0 = TAG_Int(0);
+    /* ./../lib/standard//kernel.nit:213 */
     REGB0 = TAG_Bool(UNTAG_Int(REGB1)>=UNTAG_Int(REGB0));
-    /* ./../lib/standard//collection//array.nit:478 */
+    /* ./../lib/standard//collection//array.nit:542 */
     if (UNTAG_Bool(REGB0)) {
+      /* ./../lib/standard//collection//array.nit:543 */
       REGB0 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
-      /* ./../lib/standard//collection//array.nit:479 */
       if (UNTAG_Bool(REGB0)) {
       } else {
-        fprintf(stderr, "Uninitialized attribute %s", "_items");
-        fprintf(stderr, " (%s:%d)\n", LOCATE_array, 479);
-        nit_exit(1);
+        nit_abort("Uninitialized attribute %s", "_items", LOCATE_array, 543);
       }
       fra.me.REG[2] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
+      /* ./../lib/standard//collection//array.nit:243 */
       REGB0 = REGB1;
+      /* ./../lib/standard//collection//array.nit:245 */
       REGB2 = TAG_Int(0);
+      /* ./../lib/standard//kernel.nit:213 */
       REGB2 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB2));
-      /* ./../lib/standard//collection//array.nit:233 */
+      /* ./../lib/standard//collection//array.nit:245 */
       if (UNTAG_Bool(REGB2)) {
         REGB2 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
         if (UNTAG_Bool(REGB2)) {
         } else {
-          fprintf(stderr, "Uninitialized attribute %s", "_length");
-          fprintf(stderr, " (%s:%d)\n", LOCATE_array, 233);
-          nit_exit(1);
+          nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 245);
         }
         REGB2 = ATTR_array___AbstractArrayRead____length(fra.me.REG[2]);
+        /* ./../lib/standard//kernel.nit:212 */
         REGB2 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB2));
-      /* ./../lib/standard//collection//array.nit:233 */
       } else {
+        /* ./../lib/standard//collection//array.nit:245 */
         REGB3 = TAG_Bool(false);
         REGB2 = REGB3;
       }
       if (UNTAG_Bool(REGB2)) {
       } else {
-        fprintf(stderr, "Assert %s  failed", "'index'");
-        fprintf(stderr, " (%s:%d)\n", LOCATE_array, 233);
-        nit_exit(1);
+        nit_abort("Assert %s  failed", "'index'", LOCATE_array, 245);
       }
+      /* ./../lib/standard//collection//array.nit:246 */
       fra.me.REG[2] = ATTR_array___Array____items(fra.me.REG[2]);
       REGB2 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
-      /* ./../lib/standard//collection//array.nit:234 */
       if (UNTAG_Bool(REGB2)) {
-        fprintf(stderr, "Reciever is null");
-        fprintf(stderr, " (%s:%d)\n", LOCATE_array, 234);
-        nit_exit(1);
+        nit_abort("Reciever is null", NULL, LOCATE_array, 246);
       }
+      /* ./../lib/standard//collection//array.nit:654 */
       fra.me.REG[2] = ((Nit_NativeArray)fra.me.REG[2])->val[UNTAG_Int(REGB0)];
-      /* ./../lib/standard//collection//array.nit:234 */
+      /* ./../lib/standard//collection//array.nit:246 */
       goto label1;
       label1: while(0);
+      /* ./../lib/standard//collection//array.nit:543 */
       REGB0 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
-      /* ./../lib/standard//collection//array.nit:479 */
       if (UNTAG_Bool(REGB0)) {
-        fprintf(stderr, "Reciever is null");
-        fprintf(stderr, " (%s:%d)\n", LOCATE_array, 479);
-        nit_exit(1);
+        nit_abort("Reciever is null", NULL, LOCATE_array, 543);
       }
       fra.me.REG[2] = CALL_abstract_collection___Couple___second(fra.me.REG[2])(fra.me.REG[2]);
       REGB0 = TAG_Bool(IS_EQUAL_NN(fra.me.REG[2],fra.me.REG[1]));
@@ -2860,17 +3887,19 @@ void array___ArrayMap___remove(val_t p0, val_t p1){
         }
       }
       if (UNTAG_Bool(REGB0)) {
-        /* ./../lib/standard//collection//array.nit:480 */
+        /* ./../lib/standard//collection//array.nit:544 */
         CALL_array___ArrayMap___remove_at_index(fra.me.REG[0])(fra.me.REG[0], REGB1);
-        /* ./../lib/standard//collection//array.nit:481 */
+        /* ./../lib/standard//collection//array.nit:545 */
         goto label2;
       }
+      /* ./../lib/standard//collection//array.nit:547 */
       REGB0 = TAG_Int(1);
+      /* ./../lib/standard//kernel.nit:217 */
       REGB0 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB0));
+      /* ./../lib/standard//collection//array.nit:547 */
       REGB1 = REGB0;
-    /* ./../lib/standard//collection//array.nit:483 */
     } else {
-      /* ./../lib/standard//collection//array.nit:478 */
+      /* ./../lib/standard//collection//array.nit:542 */
       goto label3;
     }
   }
@@ -2888,7 +3917,7 @@ void array___ArrayMap___remove_all(val_t p0, val_t p1){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 487;
+  fra.me.line = 551;
   fra.me.meth = LOCATE_array___ArrayMap___remove_all;
   fra.me.has_broke = 0;
   fra.me.REG_size = 3;
@@ -2897,84 +3926,78 @@ void array___ArrayMap___remove_all(val_t p0, val_t p1){
   fra.me.REG[2] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
+  /* ./../lib/standard//collection//array.nit:553 */
   REGB0 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:489 */
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_items");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 489);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_array, 553);
   }
   fra.me.REG[2] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
-  REGB0 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
   /* ./../lib/standard//collection//array.nit:23 */
+  REGB0 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_length");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 23);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
   }
   REGB0 = ATTR_array___AbstractArrayRead____length(fra.me.REG[2]);
+  /* ./../lib/standard//collection//array.nit:553 */
   REGB1 = TAG_Int(1);
+  /* ./../lib/standard//kernel.nit:217 */
   REGB1 = TAG_Int(UNTAG_Int(REGB0)-UNTAG_Int(REGB1));
-  /* ./../lib/standard//collection//array.nit:490 */
+  /* ./../lib/standard//collection//array.nit:554 */
   while(1) {
     REGB0 = TAG_Int(0);
+    /* ./../lib/standard//kernel.nit:213 */
     REGB0 = TAG_Bool(UNTAG_Int(REGB1)>=UNTAG_Int(REGB0));
-    /* ./../lib/standard//collection//array.nit:490 */
+    /* ./../lib/standard//collection//array.nit:554 */
     if (UNTAG_Bool(REGB0)) {
+      /* ./../lib/standard//collection//array.nit:555 */
       REGB0 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
-      /* ./../lib/standard//collection//array.nit:491 */
       if (UNTAG_Bool(REGB0)) {
       } else {
-        fprintf(stderr, "Uninitialized attribute %s", "_items");
-        fprintf(stderr, " (%s:%d)\n", LOCATE_array, 491);
-        nit_exit(1);
+        nit_abort("Uninitialized attribute %s", "_items", LOCATE_array, 555);
       }
       fra.me.REG[2] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
+      /* ./../lib/standard//collection//array.nit:243 */
       REGB0 = REGB1;
+      /* ./../lib/standard//collection//array.nit:245 */
       REGB2 = TAG_Int(0);
+      /* ./../lib/standard//kernel.nit:213 */
       REGB2 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB2));
-      /* ./../lib/standard//collection//array.nit:233 */
+      /* ./../lib/standard//collection//array.nit:245 */
       if (UNTAG_Bool(REGB2)) {
         REGB2 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
         if (UNTAG_Bool(REGB2)) {
         } else {
-          fprintf(stderr, "Uninitialized attribute %s", "_length");
-          fprintf(stderr, " (%s:%d)\n", LOCATE_array, 233);
-          nit_exit(1);
+          nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 245);
         }
         REGB2 = ATTR_array___AbstractArrayRead____length(fra.me.REG[2]);
+        /* ./../lib/standard//kernel.nit:212 */
         REGB2 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB2));
-      /* ./../lib/standard//collection//array.nit:233 */
       } else {
+        /* ./../lib/standard//collection//array.nit:245 */
         REGB3 = TAG_Bool(false);
         REGB2 = REGB3;
       }
       if (UNTAG_Bool(REGB2)) {
       } else {
-        fprintf(stderr, "Assert %s  failed", "'index'");
-        fprintf(stderr, " (%s:%d)\n", LOCATE_array, 233);
-        nit_exit(1);
+        nit_abort("Assert %s  failed", "'index'", LOCATE_array, 245);
       }
+      /* ./../lib/standard//collection//array.nit:246 */
       fra.me.REG[2] = ATTR_array___Array____items(fra.me.REG[2]);
       REGB2 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
-      /* ./../lib/standard//collection//array.nit:234 */
       if (UNTAG_Bool(REGB2)) {
-        fprintf(stderr, "Reciever is null");
-        fprintf(stderr, " (%s:%d)\n", LOCATE_array, 234);
-        nit_exit(1);
+        nit_abort("Reciever is null", NULL, LOCATE_array, 246);
       }
+      /* ./../lib/standard//collection//array.nit:654 */
       fra.me.REG[2] = ((Nit_NativeArray)fra.me.REG[2])->val[UNTAG_Int(REGB0)];
-      /* ./../lib/standard//collection//array.nit:234 */
+      /* ./../lib/standard//collection//array.nit:246 */
       goto label1;
       label1: while(0);
+      /* ./../lib/standard//collection//array.nit:555 */
       REGB0 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
-      /* ./../lib/standard//collection//array.nit:491 */
       if (UNTAG_Bool(REGB0)) {
-        fprintf(stderr, "Reciever is null");
-        fprintf(stderr, " (%s:%d)\n", LOCATE_array, 491);
-        nit_exit(1);
+        nit_abort("Reciever is null", NULL, LOCATE_array, 555);
       }
       fra.me.REG[2] = CALL_abstract_collection___Couple___second(fra.me.REG[2])(fra.me.REG[2]);
       REGB0 = TAG_Bool(IS_EQUAL_NN(fra.me.REG[2],fra.me.REG[1]));
@@ -2990,15 +4013,17 @@ void array___ArrayMap___remove_all(val_t p0, val_t p1){
         }
       }
       if (UNTAG_Bool(REGB0)) {
-        /* ./../lib/standard//collection//array.nit:492 */
+        /* ./../lib/standard//collection//array.nit:556 */
         CALL_array___ArrayMap___remove_at_index(fra.me.REG[0])(fra.me.REG[0], REGB1);
       }
+      /* ./../lib/standard//collection//array.nit:558 */
       REGB0 = TAG_Int(1);
+      /* ./../lib/standard//kernel.nit:217 */
       REGB0 = TAG_Int(UNTAG_Int(REGB1)-UNTAG_Int(REGB0));
+      /* ./../lib/standard//collection//array.nit:558 */
       REGB1 = REGB0;
-    /* ./../lib/standard//collection//array.nit:494 */
     } else {
-      /* ./../lib/standard//collection//array.nit:490 */
+      /* ./../lib/standard//collection//array.nit:554 */
       goto label2;
     }
   }
@@ -3006,230 +4031,79 @@ void array___ArrayMap___remove_all(val_t p0, val_t p1){
   stack_frame_head = fra.me.prev;
   return;
 }
-val_t array___ArrayMap_____bra(val_t p0, val_t p1){
+void array___ArrayMap___remove_at(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;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 419;
-  fra.me.meth = LOCATE_array___ArrayMap_____bra;
+  fra.me.line = 562;
+  fra.me.meth = LOCATE_array___ArrayMap___remove_at;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
+  /* ./../lib/standard//collection//array.nit:564 */
   REGB0 = CALL_array___ArrayMap___index(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
+  /* ./../lib/standard//collection//array.nit:565 */
   REGB1 = TAG_Int(0);
+  /* ./../lib/standard//kernel.nit:213 */
   REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
-  /* ./../lib/standard//collection//array.nit:423 */
+  /* ./../lib/standard//collection//array.nit:565 */
   if (UNTAG_Bool(REGB1)) {
-    REGB1 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
-    /* ./../lib/standard//collection//array.nit:424 */
-    if (UNTAG_Bool(REGB1)) {
-    } else {
-      fprintf(stderr, "Uninitialized attribute %s", "_items");
-      fprintf(stderr, " (%s:%d)\n", LOCATE_array, 424);
-      nit_exit(1);
-    }
-    fra.me.REG[0] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
-    REGB1 = TAG_Int(0);
-    REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
-    /* ./../lib/standard//collection//array.nit:233 */
-    if (UNTAG_Bool(REGB1)) {
-      REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
-      if (UNTAG_Bool(REGB1)) {
-      } else {
-        fprintf(stderr, "Uninitialized attribute %s", "_length");
-        fprintf(stderr, " (%s:%d)\n", LOCATE_array, 233);
-        nit_exit(1);
-      }
-      REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
-      REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
-    /* ./../lib/standard//collection//array.nit:233 */
-    } else {
-      REGB2 = TAG_Bool(false);
-      REGB1 = REGB2;
-    }
-    if (UNTAG_Bool(REGB1)) {
-    } else {
-      fprintf(stderr, "Assert %s  failed", "'index'");
-      fprintf(stderr, " (%s:%d)\n", LOCATE_array, 233);
-      nit_exit(1);
-    }
-    fra.me.REG[0] = ATTR_array___Array____items(fra.me.REG[0]);
-    REGB1 = TAG_Bool(fra.me.REG[0]==NIT_NULL);
-    /* ./../lib/standard//collection//array.nit:234 */
-    if (UNTAG_Bool(REGB1)) {
-      fprintf(stderr, "Reciever is null");
-      fprintf(stderr, " (%s:%d)\n", LOCATE_array, 234);
-      nit_exit(1);
-    }
-    fra.me.REG[0] = ((Nit_NativeArray)fra.me.REG[0])->val[UNTAG_Int(REGB0)];
-    /* ./../lib/standard//collection//array.nit:234 */
-    goto label1;
-    label1: while(0);
-    REGB0 = TAG_Bool(fra.me.REG[0]==NIT_NULL);
-    /* ./../lib/standard//collection//array.nit:424 */
-    if (UNTAG_Bool(REGB0)) {
-      fprintf(stderr, "Reciever is null");
-      fprintf(stderr, " (%s:%d)\n", LOCATE_array, 424);
-      nit_exit(1);
-    }
-    fra.me.REG[0] = CALL_abstract_collection___Couple___second(fra.me.REG[0])(fra.me.REG[0]);
-    goto label2;
-  } else {
-    /* ./../lib/standard//collection//array.nit:426 */
-    fprintf(stderr, "Aborted");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 426);
-    nit_exit(1);
+    CALL_array___ArrayMap___remove_at_index(fra.me.REG[0])(fra.me.REG[0], REGB0);
   }
-  label2: while(0);
-  stack_frame_head = fra.me.prev;
-  return fra.me.REG[0];
-}
-val_t array___ArrayMap___has_key(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 tmp;
-  fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
-  fra.me.file = LOCATE_array;
-  fra.me.line = 441;
-  fra.me.meth = LOCATE_array___ArrayMap___has_key;
-  fra.me.has_broke = 0;
-  fra.me.REG_size = 2;
-  fra.me.REG[0] = NIT_NULL;
-  fra.me.REG[1] = NIT_NULL;
-  fra.me.REG[0] = p0;
-  fra.me.REG[1] = p1;
-  REGB0 = CALL_array___ArrayMap___index(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
-  REGB1 = TAG_Int(0);
-  REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
-  /* ./../lib/standard//collection//array.nit:442 */
-  goto label1;
-  label1: while(0);
   stack_frame_head = fra.me.prev;
-  return REGB1;
+  return;
 }
-void array___ArrayMap_____braeq(val_t p0, val_t p1, val_t p2){
-  struct {struct stack_frame_t me; val_t MORE_REG[3];} fra;
+void array___ArrayMap___clear(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_array;
-  fra.me.line = 430;
-  fra.me.meth = LOCATE_array___ArrayMap_____braeq;
+  fra.me.line = 568;
+  fra.me.meth = LOCATE_array___ArrayMap___clear;
   fra.me.has_broke = 0;
-  fra.me.REG_size = 4;
+  fra.me.REG_size = 1;
   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;
-  fra.me.REG[2] = p2;
-  REGB0 = CALL_array___ArrayMap___index(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
-  REGB1 = TAG_Int(0);
-  REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
-  /* ./../lib/standard//collection//array.nit:434 */
-  if (UNTAG_Bool(REGB1)) {
-    REGB1 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
-    /* ./../lib/standard//collection//array.nit:435 */
-    if (UNTAG_Bool(REGB1)) {
-    } else {
-      fprintf(stderr, "Uninitialized attribute %s", "_items");
-      fprintf(stderr, " (%s:%d)\n", LOCATE_array, 435);
-      nit_exit(1);
-    }
-    fra.me.REG[3] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
-    REGB1 = TAG_Int(0);
-    REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
-    /* ./../lib/standard//collection//array.nit:233 */
-    if (UNTAG_Bool(REGB1)) {
-      REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[3])!=NIT_NULL);
-      if (UNTAG_Bool(REGB1)) {
-      } else {
-        fprintf(stderr, "Uninitialized attribute %s", "_length");
-        fprintf(stderr, " (%s:%d)\n", LOCATE_array, 233);
-        nit_exit(1);
-      }
-      REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[3]);
-      REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
-    /* ./../lib/standard//collection//array.nit:233 */
-    } else {
-      REGB2 = TAG_Bool(false);
-      REGB1 = REGB2;
-    }
-    if (UNTAG_Bool(REGB1)) {
-    } else {
-      fprintf(stderr, "Assert %s  failed", "'index'");
-      fprintf(stderr, " (%s:%d)\n", LOCATE_array, 233);
-      nit_exit(1);
-    }
-    fra.me.REG[3] = ATTR_array___Array____items(fra.me.REG[3]);
-    REGB1 = TAG_Bool(fra.me.REG[3]==NIT_NULL);
-    /* ./../lib/standard//collection//array.nit:234 */
-    if (UNTAG_Bool(REGB1)) {
-      fprintf(stderr, "Reciever is null");
-      fprintf(stderr, " (%s:%d)\n", LOCATE_array, 234);
-      nit_exit(1);
-    }
-    fra.me.REG[3] = ((Nit_NativeArray)fra.me.REG[3])->val[UNTAG_Int(REGB0)];
-    /* ./../lib/standard//collection//array.nit:234 */
-    goto label1;
-    label1: while(0);
-    REGB0 = TAG_Bool(fra.me.REG[3]==NIT_NULL);
-    /* ./../lib/standard//collection//array.nit:435 */
-    if (UNTAG_Bool(REGB0)) {
-      fprintf(stderr, "Reciever is null");
-      fprintf(stderr, " (%s:%d)\n", LOCATE_array, 435);
-      nit_exit(1);
-    }
-    CALL_abstract_collection___Couple___second__eq(fra.me.REG[3])(fra.me.REG[3], fra.me.REG[2]);
+  /* ./../lib/standard//collection//array.nit:568 */
+  REGB0 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB0)) {
   } else {
-    REGB0 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
-    /* ./../lib/standard//collection//array.nit:437 */
-    if (UNTAG_Bool(REGB0)) {
-    } else {
-      fprintf(stderr, "Uninitialized attribute %s", "_items");
-      fprintf(stderr, " (%s:%d)\n", LOCATE_array, 437);
-      nit_exit(1);
-    }
-    fra.me.REG[0] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
-    fra.me.REG[2] = NEW_Couple_abstract_collection___Couple___init(fra.me.REG[1], fra.me.REG[2]);
-    CALL_abstract_collection___Sequence___push(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[2]);
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_array, 568);
   }
+  fra.me.REG[0] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
+  CALL_abstract_collection___RemovableCollection___clear(fra.me.REG[0])(fra.me.REG[0]);
   stack_frame_head = fra.me.prev;
   return;
 }
-void array___ArrayMap___remove_at(val_t p0, val_t p1){
-  struct {struct stack_frame_t me; val_t MORE_REG[1];} fra;
+void array___ArrayMap___enlarge(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_array;
-  fra.me.line = 498;
-  fra.me.meth = LOCATE_array___ArrayMap___remove_at;
+  fra.me.line = 570;
+  fra.me.meth = LOCATE_array___ArrayMap___enlarge;
   fra.me.has_broke = 0;
-  fra.me.REG_size = 2;
+  fra.me.REG_size = 1;
   fra.me.REG[0] = NIT_NULL;
-  fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
-  fra.me.REG[1] = p1;
-  REGB0 = CALL_array___ArrayMap___index(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
-  REGB1 = TAG_Int(0);
-  REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
-  /* ./../lib/standard//collection//array.nit:501 */
+  REGB0 = p1;
+  /* ./../lib/standard//collection//array.nit:571 */
+  REGB1 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB1)) {
-    CALL_array___ArrayMap___remove_at_index(fra.me.REG[0])(fra.me.REG[0], REGB0);
+  } else {
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_array, 571);
   }
+  fra.me.REG[0] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
+  CALL_array___AbstractArray___enlarge(fra.me.REG[0])(fra.me.REG[0], REGB0);
   stack_frame_head = fra.me.prev;
   return;
 }
@@ -3241,7 +4115,7 @@ val_t array___ArrayMap___couple_at(val_t p0, val_t p1){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 509;
+  fra.me.line = 573;
   fra.me.meth = LOCATE_array___ArrayMap___couple_at;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
@@ -3249,94 +4123,66 @@ val_t array___ArrayMap___couple_at(val_t p0, val_t p1){
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
+  /* ./../lib/standard//collection//array.nit:575 */
   REGB0 = CALL_array___ArrayMap___index(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
+  /* ./../lib/standard//collection//array.nit:576 */
   REGB1 = TAG_Int(0);
+  /* ./../lib/standard//kernel.nit:213 */
   REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
-  /* ./../lib/standard//collection//array.nit:512 */
+  /* ./../lib/standard//collection//array.nit:576 */
   if (UNTAG_Bool(REGB1)) {
+    /* ./../lib/standard//collection//array.nit:577 */
     REGB1 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
-    /* ./../lib/standard//collection//array.nit:513 */
     if (UNTAG_Bool(REGB1)) {
     } else {
-      fprintf(stderr, "Uninitialized attribute %s", "_items");
-      fprintf(stderr, " (%s:%d)\n", LOCATE_array, 513);
-      nit_exit(1);
+      nit_abort("Uninitialized attribute %s", "_items", LOCATE_array, 577);
     }
     fra.me.REG[0] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
+    /* ./../lib/standard//collection//array.nit:245 */
     REGB1 = TAG_Int(0);
+    /* ./../lib/standard//kernel.nit:213 */
     REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
-    /* ./../lib/standard//collection//array.nit:233 */
+    /* ./../lib/standard//collection//array.nit:245 */
     if (UNTAG_Bool(REGB1)) {
       REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[0])!=NIT_NULL);
       if (UNTAG_Bool(REGB1)) {
       } else {
-        fprintf(stderr, "Uninitialized attribute %s", "_length");
-        fprintf(stderr, " (%s:%d)\n", LOCATE_array, 233);
-        nit_exit(1);
+        nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 245);
       }
       REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[0]);
+      /* ./../lib/standard//kernel.nit:212 */
       REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
-    /* ./../lib/standard//collection//array.nit:233 */
     } else {
+      /* ./../lib/standard//collection//array.nit:245 */
       REGB2 = TAG_Bool(false);
       REGB1 = REGB2;
     }
     if (UNTAG_Bool(REGB1)) {
     } else {
-      fprintf(stderr, "Assert %s  failed", "'index'");
-      fprintf(stderr, " (%s:%d)\n", LOCATE_array, 233);
-      nit_exit(1);
+      nit_abort("Assert %s  failed", "'index'", LOCATE_array, 245);
     }
+    /* ./../lib/standard//collection//array.nit:246 */
     fra.me.REG[0] = ATTR_array___Array____items(fra.me.REG[0]);
     REGB1 = TAG_Bool(fra.me.REG[0]==NIT_NULL);
-    /* ./../lib/standard//collection//array.nit:234 */
     if (UNTAG_Bool(REGB1)) {
-      fprintf(stderr, "Reciever is null");
-      fprintf(stderr, " (%s:%d)\n", LOCATE_array, 234);
-      nit_exit(1);
+      nit_abort("Reciever is null", NULL, LOCATE_array, 246);
     }
+    /* ./../lib/standard//collection//array.nit:654 */
     fra.me.REG[0] = ((Nit_NativeArray)fra.me.REG[0])->val[UNTAG_Int(REGB0)];
-    /* ./../lib/standard//collection//array.nit:234 */
+    /* ./../lib/standard//collection//array.nit:246 */
     goto label1;
     label1: while(0);
-    /* ./../lib/standard//collection//array.nit:513 */
+    /* ./../lib/standard//collection//array.nit:577 */
     goto label2;
   } else {
+    /* ./../lib/standard//collection//array.nit:579 */
     fra.me.REG[0] = NIT_NULL;
-    /* ./../lib/standard//collection//array.nit:515 */
     goto label2;
   }
   label2: while(0);
   stack_frame_head = fra.me.prev;
   return fra.me.REG[0];
 }
-void array___ArrayMap___enlarge(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_array;
-  fra.me.line = 506;
-  fra.me.meth = LOCATE_array___ArrayMap___enlarge;
-  fra.me.has_broke = 0;
-  fra.me.REG_size = 1;
-  fra.me.REG[0] = NIT_NULL;
-  fra.me.REG[0] = p0;
-  REGB0 = p1;
-  REGB1 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:507 */
-  if (UNTAG_Bool(REGB1)) {
-  } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_items");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 507);
-    nit_exit(1);
-  }
-  fra.me.REG[0] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
-  CALL_array___AbstractArray___enlarge(fra.me.REG[0])(fra.me.REG[0], REGB0);
-  stack_frame_head = fra.me.prev;
-  return;
-}
 void array___ArrayMap___remove_at_index(val_t p0, val_t p1){
   struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
   val_t REGB0;
@@ -3344,7 +4190,7 @@ void array___ArrayMap___remove_at_index(val_t p0, val_t p1){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 522;
+  fra.me.line = 586;
   fra.me.meth = LOCATE_array___ArrayMap___remove_at_index;
   fra.me.has_broke = 0;
   fra.me.REG_size = 3;
@@ -3353,32 +4199,26 @@ void array___ArrayMap___remove_at_index(val_t p0, val_t p1){
   fra.me.REG[2] = NIT_NULL;
   fra.me.REG[0] = p0;
   REGB0 = p1;
+  /* ./../lib/standard//collection//array.nit:589 */
   REGB1 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:525 */
   if (UNTAG_Bool(REGB1)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_items");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 525);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_array, 589);
   }
   fra.me.REG[1] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
   REGB1 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
   if (UNTAG_Bool(REGB1)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_items");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 525);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_array, 589);
   }
   fra.me.REG[2] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
   fra.me.REG[2] = CALL_abstract_collection___SequenceRead___last(fra.me.REG[2])(fra.me.REG[2]);
   CALL_abstract_collection___Map_____braeq(fra.me.REG[1])(fra.me.REG[1], REGB0, fra.me.REG[2]);
+  /* ./../lib/standard//collection//array.nit:590 */
   REGB0 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:526 */
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_items");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 526);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_array, 590);
   }
   fra.me.REG[0] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
   CALL_abstract_collection___Sequence___pop(fra.me.REG[0])(fra.me.REG[0]);
@@ -3395,7 +4235,7 @@ val_t array___ArrayMap___index(val_t p0, val_t p1){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 532;
+  fra.me.line = 596;
   fra.me.meth = LOCATE_array___ArrayMap___index;
   fra.me.has_broke = 0;
   fra.me.REG_size = 3;
@@ -3404,90 +4244,80 @@ val_t array___ArrayMap___index(val_t p0, val_t p1){
   fra.me.REG[2] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
+  /* ./../lib/standard//collection//array.nit:600 */
   REGB0 = TAG_Bool(ATTR_array___ArrayMap____last_index(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:536 */
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_last_index");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 536);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_last_index", LOCATE_array, 600);
   }
   REGB0 = ATTR_array___ArrayMap____last_index(fra.me.REG[0]);
+  /* ./../lib/standard//collection//array.nit:601 */
   REGB1 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
-  /* ./../lib/standard//collection//array.nit:537 */
   if (UNTAG_Bool(REGB1)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_items");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 537);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_items", LOCATE_array, 601);
   }
   fra.me.REG[2] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
-  REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
   /* ./../lib/standard//collection//array.nit:23 */
+  REGB1 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
   if (UNTAG_Bool(REGB1)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_length");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_array, 23);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
   }
   REGB1 = ATTR_array___AbstractArrayRead____length(fra.me.REG[2]);
+  /* ./../lib/standard//kernel.nit:212 */
   REGB1 = TAG_Bool(UNTAG_Int(REGB0)<UNTAG_Int(REGB1));
-  /* ./../lib/standard//collection//array.nit:537 */
+  /* ./../lib/standard//collection//array.nit:601 */
   if (UNTAG_Bool(REGB1)) {
     REGB1 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
     if (UNTAG_Bool(REGB1)) {
     } else {
-      fprintf(stderr, "Uninitialized attribute %s", "_items");
-      fprintf(stderr, " (%s:%d)\n", LOCATE_array, 537);
-      nit_exit(1);
+      nit_abort("Uninitialized attribute %s", "_items", LOCATE_array, 601);
     }
     fra.me.REG[2] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
+    /* ./../lib/standard//collection//array.nit:243 */
     REGB1 = REGB0;
+    /* ./../lib/standard//collection//array.nit:245 */
     REGB2 = TAG_Int(0);
+    /* ./../lib/standard//kernel.nit:213 */
     REGB2 = TAG_Bool(UNTAG_Int(REGB1)>=UNTAG_Int(REGB2));
-    /* ./../lib/standard//collection//array.nit:233 */
+    /* ./../lib/standard//collection//array.nit:245 */
     if (UNTAG_Bool(REGB2)) {
       REGB2 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
       if (UNTAG_Bool(REGB2)) {
       } else {
-        fprintf(stderr, "Uninitialized attribute %s", "_length");
-        fprintf(stderr, " (%s:%d)\n", LOCATE_array, 233);
-        nit_exit(1);
+        nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 245);
       }
       REGB2 = ATTR_array___AbstractArrayRead____length(fra.me.REG[2]);
+      /* ./../lib/standard//kernel.nit:212 */
       REGB2 = TAG_Bool(UNTAG_Int(REGB1)<UNTAG_Int(REGB2));
-    /* ./../lib/standard//collection//array.nit:233 */
     } else {
+      /* ./../lib/standard//collection//array.nit:245 */
       REGB3 = TAG_Bool(false);
       REGB2 = REGB3;
     }
     if (UNTAG_Bool(REGB2)) {
     } else {
-      fprintf(stderr, "Assert %s  failed", "'index'");
-      fprintf(stderr, " (%s:%d)\n", LOCATE_array, 233);
-      nit_exit(1);
+      nit_abort("Assert %s  failed", "'index'", LOCATE_array, 245);
     }
+    /* ./../lib/standard//collection//array.nit:246 */
     fra.me.REG[2] = ATTR_array___Array____items(fra.me.REG[2]);
     REGB2 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
-    /* ./../lib/standard//collection//array.nit:234 */
     if (UNTAG_Bool(REGB2)) {
-      fprintf(stderr, "Reciever is null");
-      fprintf(stderr, " (%s:%d)\n", LOCATE_array, 234);
-      nit_exit(1);
+      nit_abort("Reciever is null", NULL, LOCATE_array, 246);
     }
+    /* ./../lib/standard//collection//array.nit:654 */
     fra.me.REG[2] = ((Nit_NativeArray)fra.me.REG[2])->val[UNTAG_Int(REGB1)];
-    /* ./../lib/standard//collection//array.nit:234 */
+    /* ./../lib/standard//collection//array.nit:246 */
     goto label1;
     label1: while(0);
+    /* ./../lib/standard//collection//array.nit:601 */
     REGB1 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
-    /* ./../lib/standard//collection//array.nit:537 */
     if (UNTAG_Bool(REGB1)) {
-      fprintf(stderr, "Reciever is null");
-      fprintf(stderr, " (%s:%d)\n", LOCATE_array, 537);
-      nit_exit(1);
+      nit_abort("Reciever is null", NULL, LOCATE_array, 601);
     }
     fra.me.REG[2] = CALL_abstract_collection___Couple___first(fra.me.REG[2])(fra.me.REG[2]);
-    REGB1 = TAG_Bool(IS_EQUAL_NN(fra.me.REG[2],fra.me.REG[1]));
+    REGB1 = TAG_Bool(IS_EQUAL_ON(fra.me.REG[1],fra.me.REG[2]));
     if (UNTAG_Bool(REGB1)) {
     } else {
       REGB2 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
@@ -3506,84 +4336,77 @@ val_t array___ArrayMap___index(val_t p0, val_t p1){
   if (UNTAG_Bool(REGB1)) {
     goto label2;
   }
+  /* ./../lib/standard//collection//array.nit:603 */
   REGB1 = TAG_Int(0);
-  /* ./../lib/standard//collection//array.nit:540 */
+  /* ./../lib/standard//collection//array.nit:604 */
   while(1) {
     REGB2 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
     if (UNTAG_Bool(REGB2)) {
     } else {
-      fprintf(stderr, "Uninitialized attribute %s", "_items");
-      fprintf(stderr, " (%s:%d)\n", LOCATE_array, 540);
-      nit_exit(1);
+      nit_abort("Uninitialized attribute %s", "_items", LOCATE_array, 604);
     }
     fra.me.REG[2] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
-    REGB2 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
     /* ./../lib/standard//collection//array.nit:23 */
+    REGB2 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
     if (UNTAG_Bool(REGB2)) {
     } else {
-      fprintf(stderr, "Uninitialized attribute %s", "_length");
-      fprintf(stderr, " (%s:%d)\n", LOCATE_array, 23);
-      nit_exit(1);
+      nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 23);
     }
     REGB2 = ATTR_array___AbstractArrayRead____length(fra.me.REG[2]);
+    /* ./../lib/standard//kernel.nit:212 */
     REGB2 = TAG_Bool(UNTAG_Int(REGB1)<UNTAG_Int(REGB2));
-    /* ./../lib/standard//collection//array.nit:540 */
+    /* ./../lib/standard//collection//array.nit:604 */
     if (UNTAG_Bool(REGB2)) {
+      /* ./../lib/standard//collection//array.nit:605 */
       REGB2 = TAG_Bool(ATTR_array___ArrayMap____items(fra.me.REG[0])!=NIT_NULL);
-      /* ./../lib/standard//collection//array.nit:541 */
       if (UNTAG_Bool(REGB2)) {
       } else {
-        fprintf(stderr, "Uninitialized attribute %s", "_items");
-        fprintf(stderr, " (%s:%d)\n", LOCATE_array, 541);
-        nit_exit(1);
+        nit_abort("Uninitialized attribute %s", "_items", LOCATE_array, 605);
       }
       fra.me.REG[2] = ATTR_array___ArrayMap____items(fra.me.REG[0]);
+      /* ./../lib/standard//collection//array.nit:243 */
       REGB2 = REGB1;
+      /* ./../lib/standard//collection//array.nit:245 */
       REGB3 = TAG_Int(0);
+      /* ./../lib/standard//kernel.nit:213 */
       REGB3 = TAG_Bool(UNTAG_Int(REGB2)>=UNTAG_Int(REGB3));
-      /* ./../lib/standard//collection//array.nit:233 */
+      /* ./../lib/standard//collection//array.nit:245 */
       if (UNTAG_Bool(REGB3)) {
         REGB3 = TAG_Bool(ATTR_array___AbstractArrayRead____length(fra.me.REG[2])!=NIT_NULL);
         if (UNTAG_Bool(REGB3)) {
         } else {
-          fprintf(stderr, "Uninitialized attribute %s", "_length");
-          fprintf(stderr, " (%s:%d)\n", LOCATE_array, 233);
-          nit_exit(1);
+          nit_abort("Uninitialized attribute %s", "_length", LOCATE_array, 245);
         }
         REGB3 = ATTR_array___AbstractArrayRead____length(fra.me.REG[2]);
+        /* ./../lib/standard//kernel.nit:212 */
         REGB3 = TAG_Bool(UNTAG_Int(REGB2)<UNTAG_Int(REGB3));
-      /* ./../lib/standard//collection//array.nit:233 */
       } else {
+        /* ./../lib/standard//collection//array.nit:245 */
         REGB4 = TAG_Bool(false);
         REGB3 = REGB4;
       }
       if (UNTAG_Bool(REGB3)) {
       } else {
-        fprintf(stderr, "Assert %s  failed", "'index'");
-        fprintf(stderr, " (%s:%d)\n", LOCATE_array, 233);
-        nit_exit(1);
+        nit_abort("Assert %s  failed", "'index'", LOCATE_array, 245);
       }
+      /* ./../lib/standard//collection//array.nit:246 */
       fra.me.REG[2] = ATTR_array___Array____items(fra.me.REG[2]);
       REGB3 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
-      /* ./../lib/standard//collection//array.nit:234 */
       if (UNTAG_Bool(REGB3)) {
-        fprintf(stderr, "Reciever is null");
-        fprintf(stderr, " (%s:%d)\n", LOCATE_array, 234);
-        nit_exit(1);
+        nit_abort("Reciever is null", NULL, LOCATE_array, 246);
       }
+      /* ./../lib/standard//collection//array.nit:654 */
       fra.me.REG[2] = ((Nit_NativeArray)fra.me.REG[2])->val[UNTAG_Int(REGB2)];
-      /* ./../lib/standard//collection//array.nit:234 */
+      /* ./../lib/standard//collection//array.nit:246 */
       goto label3;
       label3: while(0);
+      /* ./../lib/standard//collection//array.nit:605 */
       REGB2 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
-      /* ./../lib/standard//collection//array.nit:541 */
       if (UNTAG_Bool(REGB2)) {
-        fprintf(stderr, "Reciever is null");
-        fprintf(stderr, " (%s:%d)\n", LOCATE_array, 541);
-        nit_exit(1);
+        nit_abort("Reciever is null", NULL, LOCATE_array, 605);
       }
       fra.me.REG[2] = CALL_abstract_collection___Couple___first(fra.me.REG[2])(fra.me.REG[2]);
-      REGB2 = TAG_Bool(IS_EQUAL_NN(fra.me.REG[2],fra.me.REG[1]));
+      REGB2 = TAG_Bool(IS_EQUAL_ON(fra.me.REG[1],fra.me.REG[2]));
       if (UNTAG_Bool(REGB2)) {
       } else {
         REGB3 = TAG_Bool(fra.me.REG[2]==NIT_NULL);
@@ -3596,26 +4419,30 @@ val_t array___ArrayMap___index(val_t p0, val_t p1){
         }
       }
       if (UNTAG_Bool(REGB2)) {
-        /* ./../lib/standard//collection//array.nit:542 */
+        /* ./../lib/standard//collection//array.nit:606 */
         ATTR_array___ArrayMap____last_index(fra.me.REG[0]) = REGB1;
+        /* ./../lib/standard//collection//array.nit:607 */
         REGB0 = REGB1;
-        /* ./../lib/standard//collection//array.nit:543 */
         goto label2;
       }
+      /* ./../lib/standard//collection//array.nit:609 */
       REGB2 = TAG_Int(1);
+      /* ./../lib/standard//kernel.nit:215 */
       REGB2 = TAG_Int(UNTAG_Int(REGB1)+UNTAG_Int(REGB2));
+      /* ./../lib/standard//collection//array.nit:609 */
       REGB1 = REGB2;
-    /* ./../lib/standard//collection//array.nit:545 */
     } else {
-      /* ./../lib/standard//collection//array.nit:540 */
+      /* ./../lib/standard//collection//array.nit:604 */
       goto label4;
     }
   }
   label4: while(0);
+  /* ./../lib/standard//collection//array.nit:611 */
   REGB1 = TAG_Int(1);
+  /* ./../lib/standard//kernel.nit:216 */
   REGB1 = TAG_Int(-UNTAG_Int(REGB1));
+  /* ./../lib/standard//collection//array.nit:611 */
   REGB0 = REGB1;
-  /* ./../lib/standard//collection//array.nit:547 */
   goto label2;
   label2: while(0);
   stack_frame_head = fra.me.prev;
@@ -3628,15 +4455,15 @@ void array___ArrayMap___init(val_t p0, int* init_table){
   if (init_table[itpos10]) return;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 550;
+  fra.me.line = 614;
   fra.me.meth = LOCATE_array___ArrayMap___init;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
+  /* ./../lib/standard//collection//array.nit:617 */
   fra.me.REG[1] = NEW_Array_array___Array___init();
-  /* ./../lib/standard//collection//array.nit:553 */
   ATTR_array___ArrayMap____items(fra.me.REG[0]) = fra.me.REG[1];
   stack_frame_head = fra.me.prev;
   init_table[itpos10] = 1;
@@ -3648,7 +4475,7 @@ val_t array___Iterator___to_a(val_t p0){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 560;
+  fra.me.line = 624;
   fra.me.meth = LOCATE_array___Iterator___to_a;
   fra.me.has_broke = 0;
   fra.me.REG_size = 3;
@@ -3656,23 +4483,24 @@ val_t array___Iterator___to_a(val_t p0){
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[2] = NIT_NULL;
   fra.me.REG[0] = p0;
+  /* ./../lib/standard//collection//array.nit:627 */
   fra.me.REG[1] = NEW_Array_array___Array___init();
-  /* ./../lib/standard//collection//array.nit:564 */
+  /* ./../lib/standard//collection//array.nit:628 */
   while(1) {
     REGB0 = CALL_abstract_collection___Iterator___is_ok(fra.me.REG[0])(fra.me.REG[0]);
     if (UNTAG_Bool(REGB0)) {
+      /* ./../lib/standard//collection//array.nit:629 */
       fra.me.REG[2] = CALL_abstract_collection___Iterator___item(fra.me.REG[0])(fra.me.REG[0]);
-      /* ./../lib/standard//collection//array.nit:565 */
-      array___Array___add(fra.me.REG[1], fra.me.REG[2]);
-      /* ./../lib/standard//collection//array.nit:566 */
+      CALL_abstract_collection___SimpleCollection___add(fra.me.REG[1])(fra.me.REG[1], fra.me.REG[2]);
+      /* ./../lib/standard//collection//array.nit:630 */
       CALL_abstract_collection___Iterator___next(fra.me.REG[0])(fra.me.REG[0]);
     } else {
-      /* ./../lib/standard//collection//array.nit:564 */
+      /* ./../lib/standard//collection//array.nit:628 */
       goto label1;
     }
   }
   label1: while(0);
-  /* ./../lib/standard//collection//array.nit:568 */
+  /* ./../lib/standard//collection//array.nit:632 */
   goto label2;
   label2: while(0);
   stack_frame_head = fra.me.prev;
@@ -3683,15 +4511,15 @@ val_t array___Collection___to_a(val_t p0){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 573;
+  fra.me.line = 637;
   fra.me.meth = LOCATE_array___Collection___to_a;
   fra.me.has_broke = 0;
   fra.me.REG_size = 1;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[0] = p0;
+  /* ./../lib/standard//collection//array.nit:640 */
   fra.me.REG[0] = CALL_abstract_collection___Collection___iterator(fra.me.REG[0])(fra.me.REG[0]);
   fra.me.REG[0] = CALL_array___Iterator___to_a(fra.me.REG[0])(fra.me.REG[0]);
-  /* ./../lib/standard//collection//array.nit:576 */
   goto label1;
   label1: while(0);
   stack_frame_head = fra.me.prev;
@@ -3703,14 +4531,15 @@ val_t array___ArrayCapable___calloc_array(val_t p0, val_t p1){
   val_t tmp;
   fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
   fra.me.file = LOCATE_array;
-  fra.me.line = 584;
+  fra.me.line = 648;
   fra.me.meth = LOCATE_array___ArrayCapable___calloc_array;
   fra.me.has_broke = 0;
   fra.me.REG_size = 1;
   fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[0] = p0;
   REGB0 = p1;
+  /* ./../lib/standard//collection//array.nit:648 */
   fra.me.REG[0] = NEW_NativeArray(UNTAG_Int(REGB0), sizeof(val_t));
-  /* ./../lib/standard//collection//array.nit:584 */
   stack_frame_head = fra.me.prev;
   return fra.me.REG[0];
 }
@@ -3720,15 +4549,15 @@ val_t array___NativeArray_____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_array;
-  fra.me.line = 590;
+  fra.me.line = 654;
   fra.me.meth = LOCATE_array___NativeArray_____bra;
   fra.me.has_broke = 0;
   fra.me.REG_size = 1;
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[0] = p0;
   REGB0 = p1;
+  /* ./../lib/standard//collection//array.nit:654 */
   fra.me.REG[0] = ((Nit_NativeArray)fra.me.REG[0])->val[UNTAG_Int(REGB0)];
-  /* ./../lib/standard//collection//array.nit:590 */
   stack_frame_head = fra.me.prev;
   return fra.me.REG[0];
 }
@@ -3738,7 +4567,7 @@ void array___NativeArray_____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_array;
-  fra.me.line = 591;
+  fra.me.line = 655;
   fra.me.meth = LOCATE_array___NativeArray_____braeq;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
@@ -3747,7 +4576,7 @@ void array___NativeArray_____braeq(val_t p0, val_t p1, val_t p2){
   fra.me.REG[0] = p0;
   REGB0 = p1;
   fra.me.REG[1] = p2;
-  /* ./../lib/standard//collection//array.nit:591 */
+  /* ./../lib/standard//collection//array.nit:655 */
   ((Nit_NativeArray)fra.me.REG[0])->val[UNTAG_Int(REGB0)]=fra.me.REG[1];
   stack_frame_head = fra.me.prev;
   return;
@@ -3758,7 +4587,7 @@ void array___NativeArray___copy_to(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_array;
-  fra.me.line = 592;
+  fra.me.line = 656;
   fra.me.meth = LOCATE_array___NativeArray___copy_to;
   fra.me.has_broke = 0;
   fra.me.REG_size = 2;
@@ -3767,7 +4596,7 @@ void array___NativeArray___copy_to(val_t p0, val_t p1, val_t p2){
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
   REGB0 = p2;
-  /* ./../lib/standard//collection//array.nit:592 */
+  /* ./../lib/standard//collection//array.nit:656 */
   (void)memcpy(((Nit_NativeArray )fra.me.REG[1])->val, ((Nit_NativeArray)fra.me.REG[0])->val, UNTAG_Int(REGB0)*sizeof(val_t));
   stack_frame_head = fra.me.prev;
   return;