Update c_src

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

diff --git a/c_src/sorter._sep.c b/c_src/sorter._sep.c
index 2450e4b..0c4b4e2 100644 (file)
--- a/c_src/sorter._sep.c
+++ b/c_src/sorter._sep.c
@@ -1,27 +1,28 @@
 /* This C file is generated by NIT to compile module sorter. */
 #include "sorter._sep.h"
 val_t sorter___AbstractSorter___compare(val_t  self, val_t  param0, val_t  param1) {
-  struct trace_t trace = {NULL, LOCATE_sorter___AbstractSorter___compare, 22};
+  struct trace_t trace = {NULL, LOCATE_sorter, 22, LOCATE_sorter___AbstractSorter___compare};
   trace.prev = tracehead; tracehead = &trace;
-  fprintf(stderr, "Deferred method %s called (%s: %d)\n", "compare", LOCATE_sorter, 22);
+  fprintf(stderr, "Deferred method %s called");
+  fprintf(stderr, " (%s:%d)\n", LOCATE_sorter, 22);
   nit_exit(1);
   tracehead = trace.prev;
   return NIT_NULL;
 }
 void sorter___AbstractSorter___sort(val_t  self, val_t  param0) {
-  struct trace_t trace = {NULL, LOCATE_sorter___AbstractSorter___sort, 29};
+  struct trace_t trace = {NULL, LOCATE_sorter, 29, LOCATE_sorter___AbstractSorter___sort};
   val_t variable0;
   val_t variable1;
   trace.prev = tracehead; tracehead = &trace;
   variable0 =  param0;
-  variable1 = ((array___AbstractArray___length_t)CALL( variable0 /*array*/,COLOR_abstract_collection___Collection___length))( variable0 /*array*/) /*Array::length*/;
+  variable1 = ((array___AbstractArray___length_t)CALL( variable0 /*array*/,COLOR_abstract_collection___Collection___length))( variable0 /*array*/) /*AbstractArray::length*/;
   variable1 = TAG_Int(UNTAG_Int(variable1)-UNTAG_Int( TAG_Int(1)));
   ((sorter___AbstractSorter___sub_sort_t)CALL( self,COLOR_sorter___AbstractSorter___sub_sort))( self,  variable0 /*array*/,  TAG_Int(0), variable1) /*AbstractSorter::sub_sort*/;
   tracehead = trace.prev;
   return;
 }
 void sorter___AbstractSorter___sub_sort(val_t  self, val_t  param0, val_t  param1, val_t  param2) {
-  struct trace_t trace = {NULL, LOCATE_sorter___AbstractSorter___sub_sort, 32};
+  struct trace_t trace = {NULL, LOCATE_sorter, 32, LOCATE_sorter___AbstractSorter___sub_sort};
   val_t variable0;
   val_t variable1;
   val_t variable2;
@@ -47,7 +48,7 @@ void sorter___AbstractSorter___sub_sort(val_t  self, val_t  param0, val_t  param
   return;
 }
 void sorter___AbstractSorter___quick_sort(val_t  self, val_t  param0, val_t  param1, val_t  param2) {
-  struct trace_t trace = {NULL, LOCATE_sorter___AbstractSorter___quick_sort, 44};
+  struct trace_t trace = {NULL, LOCATE_sorter, 44, LOCATE_sorter___AbstractSorter___quick_sort};
   val_t variable0;
   val_t variable1;
   val_t variable2;
@@ -66,11 +67,11 @@ void sorter___AbstractSorter___quick_sort(val_t  self, val_t  param0, val_t  par
   variable5 = TAG_Bool(UNTAG_Int( variable4 /*index*/)>=UNTAG_Int( TAG_Int(0)));
   variable6 = variable5;
   if (UNTAG_Bool(variable6)) { /* and */
-    variable6 = ATTR_array___AbstractArray____length( variable0 /*array*/) /*Array::_length*/;
+    variable6 = ATTR_array___AbstractArray____length( variable0 /*array*/) /*AbstractArray::_length*/;
     variable6 = TAG_Bool(UNTAG_Int( variable4 /*index*/)<UNTAG_Int(variable6));
   }
   variable5 = variable6;
-  if (!UNTAG_Bool(variable5)) { fprintf(stderr, "Assert%s failed (%s: %d)\n", " 'index' ", LOCATE_array___Array_____bra, 229); nit_exit(1);}
+  if (!UNTAG_Bool(variable5)) { fprintf(stderr, "Assert%s failed", " 'index' "); fprintf(stderr, " in %s (%s:%d)\n", LOCATE_array___Array_____bra, LOCATE_sorter, 229); nit_exit(1);}
   variable5 = ATTR_array___Array____items( variable0 /*array*/) /*Array::_items*/;
   variable5 = UNBOX_NativeArray(variable5)[UNTAG_Int( variable4 /*index*/)];
   goto return_label3;
@@ -90,11 +91,11 @@ void sorter___AbstractSorter___quick_sort(val_t  self, val_t  param0, val_t  par
         variable8 = TAG_Bool(UNTAG_Int( variable7 /*index*/)>=UNTAG_Int( TAG_Int(0)));
         variable9 = variable8;
         if (UNTAG_Bool(variable9)) { /* and */
-          variable9 = ATTR_array___AbstractArray____length( variable0 /*array*/) /*Array::_length*/;
+          variable9 = ATTR_array___AbstractArray____length( variable0 /*array*/) /*AbstractArray::_length*/;
           variable9 = TAG_Bool(UNTAG_Int( variable7 /*index*/)<UNTAG_Int(variable9));
         }
         variable8 = variable9;
-        if (!UNTAG_Bool(variable8)) { fprintf(stderr, "Assert%s failed (%s: %d)\n", " 'index' ", LOCATE_array___Array_____bra, 229); nit_exit(1);}
+        if (!UNTAG_Bool(variable8)) { fprintf(stderr, "Assert%s failed", " 'index' "); fprintf(stderr, " in %s (%s:%d)\n", LOCATE_array___Array_____bra, LOCATE_sorter, 229); nit_exit(1);}
         variable8 = ATTR_array___Array____items( variable0 /*array*/) /*Array::_items*/;
         variable8 = UNBOX_NativeArray(variable8)[UNTAG_Int( variable7 /*index*/)];
         goto return_label6;
@@ -117,11 +118,11 @@ void sorter___AbstractSorter___quick_sort(val_t  self, val_t  param0, val_t  par
         variable8 = TAG_Bool(UNTAG_Int( variable7 /*index*/)>=UNTAG_Int( TAG_Int(0)));
         variable9 = variable8;
         if (UNTAG_Bool(variable9)) { /* and */
-          variable9 = ATTR_array___AbstractArray____length( variable0 /*array*/) /*Array::_length*/;
+          variable9 = ATTR_array___AbstractArray____length( variable0 /*array*/) /*AbstractArray::_length*/;
           variable9 = TAG_Bool(UNTAG_Int( variable7 /*index*/)<UNTAG_Int(variable9));
         }
         variable8 = variable9;
-        if (!UNTAG_Bool(variable8)) { fprintf(stderr, "Assert%s failed (%s: %d)\n", " 'index' ", LOCATE_array___Array_____bra, 229); nit_exit(1);}
+        if (!UNTAG_Bool(variable8)) { fprintf(stderr, "Assert%s failed", " 'index' "); fprintf(stderr, " in %s (%s:%d)\n", LOCATE_array___Array_____bra, LOCATE_sorter, 229); nit_exit(1);}
         variable8 = ATTR_array___Array____items( variable0 /*array*/) /*Array::_items*/;
         variable8 = UNBOX_NativeArray(variable8)[UNTAG_Int( variable7 /*index*/)];
         goto return_label8;
@@ -142,11 +143,11 @@ void sorter___AbstractSorter___quick_sort(val_t  self, val_t  param0, val_t  par
       variable8 = TAG_Bool(UNTAG_Int( variable7 /*index*/)>=UNTAG_Int( TAG_Int(0)));
       variable9 = variable8;
       if (UNTAG_Bool(variable9)) { /* and */
-        variable9 = ATTR_array___AbstractArray____length( variable0 /*array*/) /*Array::_length*/;
+        variable9 = ATTR_array___AbstractArray____length( variable0 /*array*/) /*AbstractArray::_length*/;
         variable9 = TAG_Bool(UNTAG_Int( variable7 /*index*/)<UNTAG_Int(variable9));
       }
       variable8 = variable9;
-      if (!UNTAG_Bool(variable8)) { fprintf(stderr, "Assert%s failed (%s: %d)\n", " 'index' ", LOCATE_array___Array_____bra, 229); nit_exit(1);}
+      if (!UNTAG_Bool(variable8)) { fprintf(stderr, "Assert%s failed", " 'index' "); fprintf(stderr, " in %s (%s:%d)\n", LOCATE_array___Array_____bra, LOCATE_sorter, 229); nit_exit(1);}
       variable8 = ATTR_array___Array____items( variable0 /*array*/) /*Array::_items*/;
       variable8 = UNBOX_NativeArray(variable8)[UNTAG_Int( variable7 /*index*/)];
       goto return_label9;
@@ -157,11 +158,11 @@ void sorter___AbstractSorter___quick_sort(val_t  self, val_t  param0, val_t  par
       variable8 = TAG_Bool(UNTAG_Int( variable7 /*index*/)>=UNTAG_Int( TAG_Int(0)));
       variable9 = variable8;
       if (UNTAG_Bool(variable9)) { /* and */
-        variable9 = ATTR_array___AbstractArray____length( variable0 /*array*/) /*Array::_length*/;
+        variable9 = ATTR_array___AbstractArray____length( variable0 /*array*/) /*AbstractArray::_length*/;
         variable9 = TAG_Bool(UNTAG_Int( variable7 /*index*/)<UNTAG_Int(variable9));
       }
       variable8 = variable9;
-      if (!UNTAG_Bool(variable8)) { fprintf(stderr, "Assert%s failed (%s: %d)\n", " 'index' ", LOCATE_array___Array_____bra, 229); nit_exit(1);}
+      if (!UNTAG_Bool(variable8)) { fprintf(stderr, "Assert%s failed", " 'index' "); fprintf(stderr, " in %s (%s:%d)\n", LOCATE_array___Array_____bra, LOCATE_sorter, 229); nit_exit(1);}
       variable8 = ATTR_array___Array____items( variable0 /*array*/) /*Array::_items*/;
       variable8 = UNBOX_NativeArray(variable8)[UNTAG_Int( variable7 /*index*/)];
       goto return_label10;
@@ -178,11 +179,11 @@ void sorter___AbstractSorter___quick_sort(val_t  self, val_t  param0, val_t  par
   variable8 = TAG_Bool(UNTAG_Int( variable7 /*index*/)>=UNTAG_Int( TAG_Int(0)));
   variable9 = variable8;
   if (UNTAG_Bool(variable9)) { /* and */
-    variable9 = ATTR_array___AbstractArray____length( variable0 /*array*/) /*Array::_length*/;
+    variable9 = ATTR_array___AbstractArray____length( variable0 /*array*/) /*AbstractArray::_length*/;
     variable9 = TAG_Bool(UNTAG_Int( variable7 /*index*/)<UNTAG_Int(variable9));
   }
   variable8 = variable9;
-  if (!UNTAG_Bool(variable8)) { fprintf(stderr, "Assert%s failed (%s: %d)\n", " 'index' ", LOCATE_array___Array_____bra, 229); nit_exit(1);}
+  if (!UNTAG_Bool(variable8)) { fprintf(stderr, "Assert%s failed", " 'index' "); fprintf(stderr, " in %s (%s:%d)\n", LOCATE_array___Array_____bra, LOCATE_sorter, 229); nit_exit(1);}
   variable8 = ATTR_array___Array____items( variable0 /*array*/) /*Array::_items*/;
   variable8 = UNBOX_NativeArray(variable8)[UNTAG_Int( variable7 /*index*/)];
   goto return_label11;
@@ -198,7 +199,7 @@ void sorter___AbstractSorter___quick_sort(val_t  self, val_t  param0, val_t  par
   return;
 }
 void sorter___AbstractSorter___bubble_sort(val_t  self, val_t  param0, val_t  param1, val_t  param2) {
-  struct trace_t trace = {NULL, LOCATE_sorter___AbstractSorter___bubble_sort, 65};
+  struct trace_t trace = {NULL, LOCATE_sorter, 65, LOCATE_sorter___AbstractSorter___bubble_sort};
   val_t variable0;
   val_t variable1;
   val_t variable2;
@@ -222,11 +223,11 @@ void sorter___AbstractSorter___bubble_sort(val_t  self, val_t  param0, val_t  pa
     variable7 = TAG_Bool(UNTAG_Int( variable6 /*index*/)>=UNTAG_Int( TAG_Int(0)));
     variable8 = variable7;
     if (UNTAG_Bool(variable8)) { /* and */
-      variable8 = ATTR_array___AbstractArray____length( variable0 /*array*/) /*Array::_length*/;
+      variable8 = ATTR_array___AbstractArray____length( variable0 /*array*/) /*AbstractArray::_length*/;
       variable8 = TAG_Bool(UNTAG_Int( variable6 /*index*/)<UNTAG_Int(variable8));
     }
     variable7 = variable8;
-    if (!UNTAG_Bool(variable7)) { fprintf(stderr, "Assert%s failed (%s: %d)\n", " 'index' ", LOCATE_array___Array_____bra, 229); nit_exit(1);}
+    if (!UNTAG_Bool(variable7)) { fprintf(stderr, "Assert%s failed", " 'index' "); fprintf(stderr, " in %s (%s:%d)\n", LOCATE_array___Array_____bra, LOCATE_sorter, 229); nit_exit(1);}
     variable7 = ATTR_array___Array____items( variable0 /*array*/) /*Array::_items*/;
     variable7 = UNBOX_NativeArray(variable7)[UNTAG_Int( variable6 /*index*/)];
     goto return_label14;
@@ -241,11 +242,11 @@ void sorter___AbstractSorter___bubble_sort(val_t  self, val_t  param0, val_t  pa
       variable8 = TAG_Bool(UNTAG_Int( variable7 /*index*/)>=UNTAG_Int( TAG_Int(0)));
       variable9 = variable8;
       if (UNTAG_Bool(variable9)) { /* and */
-        variable9 = ATTR_array___AbstractArray____length( variable0 /*array*/) /*Array::_length*/;
+        variable9 = ATTR_array___AbstractArray____length( variable0 /*array*/) /*AbstractArray::_length*/;
         variable9 = TAG_Bool(UNTAG_Int( variable7 /*index*/)<UNTAG_Int(variable9));
       }
       variable8 = variable9;
-      if (!UNTAG_Bool(variable8)) { fprintf(stderr, "Assert%s failed (%s: %d)\n", " 'index' ", LOCATE_array___Array_____bra, 229); nit_exit(1);}
+      if (!UNTAG_Bool(variable8)) { fprintf(stderr, "Assert%s failed", " 'index' "); fprintf(stderr, " in %s (%s:%d)\n", LOCATE_array___Array_____bra, LOCATE_sorter, 229); nit_exit(1);}
       variable8 = ATTR_array___Array____items( variable0 /*array*/) /*Array::_items*/;
       variable8 = UNBOX_NativeArray(variable8)[UNTAG_Int( variable7 /*index*/)];
       goto return_label16;
@@ -259,11 +260,11 @@ void sorter___AbstractSorter___bubble_sort(val_t  self, val_t  param0, val_t  pa
         variable8 = TAG_Bool(UNTAG_Int( variable7 /*index*/)>=UNTAG_Int( TAG_Int(0)));
         variable9 = variable8;
         if (UNTAG_Bool(variable9)) { /* and */
-          variable9 = ATTR_array___AbstractArray____length( variable0 /*array*/) /*Array::_length*/;
+          variable9 = ATTR_array___AbstractArray____length( variable0 /*array*/) /*AbstractArray::_length*/;
           variable9 = TAG_Bool(UNTAG_Int( variable7 /*index*/)<UNTAG_Int(variable9));
         }
         variable8 = variable9;
-        if (!UNTAG_Bool(variable8)) { fprintf(stderr, "Assert%s failed (%s: %d)\n", " 'index' ", LOCATE_array___Array_____bra, 229); nit_exit(1);}
+        if (!UNTAG_Bool(variable8)) { fprintf(stderr, "Assert%s failed", " 'index' "); fprintf(stderr, " in %s (%s:%d)\n", LOCATE_array___Array_____bra, LOCATE_sorter, 229); nit_exit(1);}
         variable8 = ATTR_array___Array____items( variable0 /*array*/) /*Array::_items*/;
         variable8 = UNBOX_NativeArray(variable8)[UNTAG_Int( variable7 /*index*/)];
         goto return_label17;
@@ -281,11 +282,11 @@ void sorter___AbstractSorter___bubble_sort(val_t  self, val_t  param0, val_t  pa
       variable8 = TAG_Bool(UNTAG_Int( variable7 /*index*/)>=UNTAG_Int( TAG_Int(0)));
       variable9 = variable8;
       if (UNTAG_Bool(variable9)) { /* and */
-        variable9 = ATTR_array___AbstractArray____length( variable0 /*array*/) /*Array::_length*/;
+        variable9 = ATTR_array___AbstractArray____length( variable0 /*array*/) /*AbstractArray::_length*/;
         variable9 = TAG_Bool(UNTAG_Int( variable7 /*index*/)<UNTAG_Int(variable9));
       }
       variable8 = variable9;
-      if (!UNTAG_Bool(variable8)) { fprintf(stderr, "Assert%s failed (%s: %d)\n", " 'index' ", LOCATE_array___Array_____bra, 229); nit_exit(1);}
+      if (!UNTAG_Bool(variable8)) { fprintf(stderr, "Assert%s failed", " 'index' "); fprintf(stderr, " in %s (%s:%d)\n", LOCATE_array___Array_____bra, LOCATE_sorter, 229); nit_exit(1);}
       variable8 = ATTR_array___Array____items( variable0 /*array*/) /*Array::_items*/;
       variable8 = UNBOX_NativeArray(variable8)[UNTAG_Int( variable7 /*index*/)];
       goto return_label18;
@@ -302,7 +303,7 @@ void sorter___AbstractSorter___bubble_sort(val_t  self, val_t  param0, val_t  pa
   return;
 }
 val_t sorter___ComparableSorter___compare(val_t  self, val_t  param0, val_t  param1) {
-  struct trace_t trace = {NULL, LOCATE_sorter___ComparableSorter___compare, 93};
+  struct trace_t trace = {NULL, LOCATE_sorter, 93, LOCATE_sorter___ComparableSorter___compare};
   val_t variable0;
   val_t variable1;
   val_t variable2;
@@ -316,7 +317,7 @@ val_t sorter___ComparableSorter___compare(val_t  self, val_t  param0, val_t  par
   return variable2;
 }
 void sorter___ComparableSorter___init(val_t  self, int* init_table) {
-  struct trace_t trace = {NULL, LOCATE_sorter___ComparableSorter___init, 96};
+  struct trace_t trace = {NULL, LOCATE_sorter, 96, LOCATE_sorter___ComparableSorter___init};
   trace.prev = tracehead; tracehead = &trace;
   if (init_table[VAL2OBJ( self)->vft[INIT_TABLE_POS_ComparableSorter].i]) return;
   init_table[VAL2OBJ( self)->vft[INIT_TABLE_POS_ComparableSorter].i] = 1;