nitlanguage / nit.git / blobdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | inline | side by side
c_src: update
[nit.git] / c_src / vararg._sep.c
diff --git a/c_src/vararg._sep.c b/c_src/vararg._sep.c
index 5d70ad9..3ea3975 100644 (file)
--- a/c_src/vararg._sep.c
+++ b/c_src/vararg._sep.c
@@ -1,5 +1,74 @@
 /* This C file is generated by NIT to compile module vararg. */
 #include "vararg._sep.h"
+val_t vararg___MMSignature___vararg_rank(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_vararg;
+  fra.me.line = 24;
+  fra.me.meth = LOCATE_vararg___MMSignature___vararg_rank;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 1;
+  fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[0] = p0;
+  /* ./metamodel//vararg.nit:24 */
+  REGB0 = TAG_Bool(ATTR_vararg___MMSignature____vararg_rank(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB0)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_vararg_rank", LOCATE_vararg, 24);
+  }
+  REGB0 = ATTR_vararg___MMSignature____vararg_rank(fra.me.REG[0]);
+  stack_frame_head = fra.me.prev;
+  return REGB0;
+}
+void vararg___MMSignature___vararg_rank__eq(val_t p0, val_t p1){
+  struct {struct stack_frame_t me;} fra;
+  val_t REGB0;
+  val_t tmp;
+  fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
+  fra.me.file = LOCATE_vararg;
+  fra.me.line = 24;
+  fra.me.meth = LOCATE_vararg___MMSignature___vararg_rank__eq;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 1;
+  fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[0] = p0;
+  REGB0 = p1;
+  /* ./metamodel//vararg.nit:24 */
+  ATTR_vararg___MMSignature____vararg_rank(fra.me.REG[0]) = REGB0;
+  stack_frame_head = fra.me.prev;
+  return;
+}
+val_t vararg___MMSignature___has_vararg(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_vararg;
+  fra.me.line = 27;
+  fra.me.meth = LOCATE_vararg___MMSignature___has_vararg;
+  fra.me.has_broke = 0;
+  fra.me.REG_size = 1;
+  fra.me.REG[0] = NIT_NULL;
+  fra.me.REG[0] = p0;
+  /* ./metamodel//vararg.nit:30 */
+  REGB0 = TAG_Bool(ATTR_vararg___MMSignature____vararg_rank(fra.me.REG[0])!=NIT_NULL);
+  if (UNTAG_Bool(REGB0)) {
+  } else {
+    nit_abort("Uninitialized attribute %s", "_vararg_rank", LOCATE_vararg, 30);
+  }
+  REGB0 = ATTR_vararg___MMSignature____vararg_rank(fra.me.REG[0]);
+  REGB1 = TAG_Int(0);
+  /* ./../lib/standard//kernel.nit:213 */
+  REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
+  /* ./metamodel//vararg.nit:30 */
+  goto label1;
+  label1: while(0);
+  stack_frame_head = fra.me.prev;
+  return REGB1;
+}
 val_t vararg___MMSignature___adaptation_to(val_t p0, val_t p1){
   struct {struct stack_frame_t me; val_t MORE_REG[2];} fra;
   val_t REGB0;
@@ -15,15 +84,15 @@ val_t vararg___MMSignature___adaptation_to(val_t p0, val_t p1){
   fra.me.REG[2] = NIT_NULL;
   fra.me.REG[0] = p0;
   fra.me.REG[1] = p1;
+  /* ./metamodel//vararg.nit:33 */
   fra.me.REG[2] = fra.me.REG[0];
+  /* ./metamodel//vararg.nit:35 */
   fra.me.REG[1] = CALL_SUPER_vararg___MMSignature___adaptation_to(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1]);
-  REGB0 = TAG_Bool(ATTR_vararg___MMSignature____vararg_rank(fra.me.REG[2])!=NIT_NULL);
   /* ./metamodel//vararg.nit:36 */
+  REGB0 = TAG_Bool(ATTR_vararg___MMSignature____vararg_rank(fra.me.REG[2])!=NIT_NULL);
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_vararg_rank");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_vararg, 36);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_vararg_rank", LOCATE_vararg, 36);
   }
   REGB0 = ATTR_vararg___MMSignature____vararg_rank(fra.me.REG[2]);
   CALL_vararg___MMSignature___vararg_rank__eq(fra.me.REG[1])(fra.me.REG[1], REGB0);
@@ -46,15 +115,15 @@ val_t vararg___MMSignature___not_for_self(val_t p0){
   fra.me.REG[0] = NIT_NULL;
   fra.me.REG[1] = NIT_NULL;
   fra.me.REG[0] = p0;
+  /* ./metamodel//vararg.nit:40 */
   fra.me.REG[1] = fra.me.REG[0];
+  /* ./metamodel//vararg.nit:42 */
   fra.me.REG[0] = CALL_SUPER_vararg___MMSignature___not_for_self(fra.me.REG[0])(fra.me.REG[0]);
-  REGB0 = TAG_Bool(ATTR_vararg___MMSignature____vararg_rank(fra.me.REG[1])!=NIT_NULL);
   /* ./metamodel//vararg.nit:43 */
+  REGB0 = TAG_Bool(ATTR_vararg___MMSignature____vararg_rank(fra.me.REG[1])!=NIT_NULL);
   if (UNTAG_Bool(REGB0)) {
   } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_vararg_rank");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_vararg, 43);
-    nit_exit(1);
+    nit_abort("Uninitialized attribute %s", "_vararg_rank", LOCATE_vararg, 43);
   }
   REGB0 = ATTR_vararg___MMSignature____vararg_rank(fra.me.REG[1]);
   CALL_vararg___MMSignature___vararg_rank__eq(fra.me.REG[0])(fra.me.REG[0], REGB0);
@@ -85,10 +154,13 @@ void vararg___MMSignature___init(val_t p0, val_t p1, val_t p2, val_t p3, int* in
   fra.me.REG[1] = p1;
   fra.me.REG[2] = p2;
   fra.me.REG[3] = p3;
+  /* ./metamodel//vararg.nit:47 */
   fra.me.REG[4] = fra.me.REG[0];
   /* ./metamodel//vararg.nit:49 */
   CALL_SUPER_vararg___MMSignature___init(fra.me.REG[0])(fra.me.REG[0], fra.me.REG[1], fra.me.REG[2], fra.me.REG[3], init_table);
+  /* ./metamodel//vararg.nit:50 */
   REGB0 = TAG_Int(1);
+  /* ./../lib/standard//kernel.nit:216 */
   REGB0 = TAG_Int(-UNTAG_Int(REGB0));
   /* ./metamodel//vararg.nit:50 */
   ATTR_vararg___MMSignature____vararg_rank(fra.me.REG[4]) = REGB0;
@@ -96,75 +168,3 @@ void vararg___MMSignature___init(val_t p0, val_t p1, val_t p2, val_t p3, int* in
   init_table[itpos0] = 1;
   return;
 }
-val_t vararg___MMSignature___vararg_rank(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_vararg;
-  fra.me.line = 24;
-  fra.me.meth = LOCATE_vararg___MMSignature___vararg_rank;
-  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_vararg___MMSignature____vararg_rank(fra.me.REG[0])!=NIT_NULL);
-  /* ./metamodel//vararg.nit:24 */
-  if (UNTAG_Bool(REGB0)) {
-  } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_vararg_rank");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_vararg, 24);
-    nit_exit(1);
-  }
-  REGB0 = ATTR_vararg___MMSignature____vararg_rank(fra.me.REG[0]);
-  stack_frame_head = fra.me.prev;
-  return REGB0;
-}
-void vararg___MMSignature___vararg_rank__eq(val_t p0, val_t p1){
-  struct {struct stack_frame_t me;} fra;
-  val_t REGB0;
-  val_t tmp;
-  fra.me.prev = stack_frame_head; stack_frame_head = &fra.me;
-  fra.me.file = LOCATE_vararg;
-  fra.me.line = 24;
-  fra.me.meth = LOCATE_vararg___MMSignature___vararg_rank__eq;
-  fra.me.has_broke = 0;
-  fra.me.REG_size = 1;
-  fra.me.REG[0] = NIT_NULL;
-  fra.me.REG[0] = p0;
-  REGB0 = p1;
-  /* ./metamodel//vararg.nit:24 */
-  ATTR_vararg___MMSignature____vararg_rank(fra.me.REG[0]) = REGB0;
-  stack_frame_head = fra.me.prev;
-  return;
-}
-val_t vararg___MMSignature___has_vararg(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_vararg;
-  fra.me.line = 27;
-  fra.me.meth = LOCATE_vararg___MMSignature___has_vararg;
-  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_vararg___MMSignature____vararg_rank(fra.me.REG[0])!=NIT_NULL);
-  /* ./metamodel//vararg.nit:30 */
-  if (UNTAG_Bool(REGB0)) {
-  } else {
-    fprintf(stderr, "Uninitialized attribute %s", "_vararg_rank");
-    fprintf(stderr, " (%s:%d)\n", LOCATE_vararg, 30);
-    nit_exit(1);
-  }
-  REGB0 = ATTR_vararg___MMSignature____vararg_rank(fra.me.REG[0]);
-  REGB1 = TAG_Int(0);
-  REGB1 = TAG_Bool(UNTAG_Int(REGB0)>=UNTAG_Int(REGB1));
-  /* ./metamodel//vararg.nit:30 */
-  goto label1;
-  label1: while(0);
-  stack_frame_head = fra.me.prev;
-  return REGB1;
-}
Nit language project; an oo programing language and its tool suite.