Update c_src

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

diff --git a/c_src/environ._sep.c b/c_src/environ._sep.c
index 37d4062..3481752 100644 (file)
--- a/c_src/environ._sep.c
+++ b/c_src/environ._sep.c
@@ -1,7 +1,7 @@
 /* This C file is generated by NIT to compile module environ. */
 #include "environ._sep.h"
 val_t environ___Symbol___environ(val_t  self) {
-  struct trace_t trace = {NULL, LOCATE_environ___Symbol___environ, 19};
+  struct trace_t trace = {NULL, LOCATE_environ, 19, LOCATE_environ___Symbol___environ};
   val_t variable0;
   val_t variable1;
   val_t variable2;
@@ -25,7 +25,7 @@ val_t environ___Symbol___environ(val_t  self) {
     once_bool_variable2_1 = true;
   }
   variable1 = variable2;
-  variable2 = TAG_Bool(!UNTAG_Bool(TAG_Bool(( variable0 /*res*/ ==  variable1 /*nulstr*/) || (( variable0 /*res*/ != NIT_NULL) && ((((kernel___Object_____eqeq_t)CALL( variable0 /*res*/,COLOR_kernel___Object_____eqeq))==kernel___Object_____eqeq)?(IS_EQUAL_NN( variable0 /*res*/, variable1 /*nulstr*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t)CALL( variable0 /*res*/,COLOR_kernel___Object_____eqeq))( variable0 /*res*/,  variable1 /*nulstr*/) /*NativeString::==*/)))))));
+  variable2 = TAG_Bool(!UNTAG_Bool(TAG_Bool(( variable0 /*res*/ ==  variable1 /*nulstr*/) || (( variable0 /*res*/ != NIT_NULL) && ((((kernel___Object_____eqeq_t)CALL( variable0 /*res*/,COLOR_kernel___Object_____eqeq))==kernel___Object_____eqeq)?(IS_EQUAL_NN( variable0 /*res*/, variable1 /*nulstr*/)):(UNTAG_Bool(((kernel___Object_____eqeq_t)CALL( variable0 /*res*/,COLOR_kernel___Object_____eqeq))( variable0 /*res*/,  variable1 /*nulstr*/) /*Object::==*/)))))));
   if (UNTAG_Bool(variable2)) { /*if*/
     variable2 = NEW_string___String___init(); /*new String*/
     variable3 = NEW_string___String___with_native(BOX_NativeString("env "), TAG_Int(4)); /*new String*/
@@ -38,7 +38,7 @@ val_t environ___Symbol___environ(val_t  self) {
     variable7 = variable6;
     ((string___String___append_t)CALL(variable2,COLOR_abstract_collection___IndexedCollection___append))(variable2, variable7) /*String::append*/;
     ((string___String___output_t)CALL(variable2,COLOR_kernel___Object___output))(variable2) /*String::output*/;
-    ((kernel___Object___output_t)CALL( variable0 /*res*/,COLOR_kernel___Object___output))( variable0 /*res*/) /*NativeString::output*/;
+    ((kernel___Object___output_t)CALL( variable0 /*res*/,COLOR_kernel___Object___output))( variable0 /*res*/) /*Object::output*/;
     variable2 = NEW_string___String___from_cstring( variable0 /*res*/); /*new String*/
     variable0 = variable2;
     goto return_label0;
@@ -51,53 +51,9 @@ val_t environ___Symbol___environ(val_t  self) {
   tracehead = trace.prev;
   return variable0;
 }
-void environ___Symbol___environ__eq(val_t  self, val_t  param0) {
-  struct trace_t trace = {NULL, LOCATE_environ___Symbol___environ__eq, 26};
-  val_t variable0;
-  val_t variable1;
-  val_t variable2;
-  trace.prev = tracehead; tracehead = &trace;
-  variable0 =  param0;
-  variable1 = ((symbol___Symbol___to_s_t)CALL( self,COLOR_string___Object___to_s))( self) /*Symbol::to_s*/;
-  variable1 = ((string___String___to_cstring_t)CALL(variable1,COLOR_string___String___to_cstring))(variable1) /*String::to_cstring*/;
-  variable2 = ((string___String___to_cstring_t)CALL( variable0 /*v*/,COLOR_string___String___to_cstring))( variable0 /*v*/) /*String::to_cstring*/;
-  ((environ___NativeString___set_environ_t)CALL(variable1,COLOR_environ___NativeString___set_environ))(variable1, variable2,  TAG_Int(1)) /*NativeString::set_environ*/;
-  tracehead = trace.prev;
-  return;
-}
-void environ___Symbol___environ_default__eq(val_t  self, val_t  param0) {
-  struct trace_t trace = {NULL, LOCATE_environ___Symbol___environ_default__eq, 29};
-  val_t variable0;
-  val_t variable1;
-  val_t variable2;
-  trace.prev = tracehead; tracehead = &trace;
-  variable0 =  param0;
-  variable1 = ((symbol___Symbol___to_s_t)CALL( self,COLOR_string___Object___to_s))( self) /*Symbol::to_s*/;
-  variable1 = ((string___String___to_cstring_t)CALL(variable1,COLOR_string___String___to_cstring))(variable1) /*String::to_cstring*/;
-  variable2 = ((string___String___to_cstring_t)CALL( variable0 /*v*/,COLOR_string___String___to_cstring))( variable0 /*v*/) /*String::to_cstring*/;
-  ((environ___NativeString___set_environ_t)CALL(variable1,COLOR_environ___NativeString___set_environ))(variable1, variable2,  TAG_Int(0)) /*NativeString::set_environ*/;
-  tracehead = trace.prev;
-  return;
-}
-void environ___Symbol___unset(val_t  self) {
-  struct trace_t trace = {NULL, LOCATE_environ___Symbol___unset, 32};
-  val_t variable0;
-  trace.prev = tracehead; tracehead = &trace;
-  variable0 = ((symbol___Symbol___to_s_t)CALL( self,COLOR_string___Object___to_s))( self) /*Symbol::to_s*/;
-  variable0 = ((string___String___to_cstring_t)CALL(variable0,COLOR_string___String___to_cstring))(variable0) /*String::to_cstring*/;
-  ((environ___NativeString___unset_environ_t)CALL(variable0,COLOR_environ___NativeString___unset_environ))(variable0) /*NativeString::unset_environ*/;
-  tracehead = trace.prev;
-  return;
-}
 val_t environ___NativeString___get_environ(val_t  self) {
-  struct trace_t trace = {NULL, LOCATE_environ___NativeString___get_environ, 37};
+  struct trace_t trace = {NULL, LOCATE_environ, 36, LOCATE_environ___NativeString___get_environ};
   trace.prev = tracehead; tracehead = &trace;
   tracehead = trace.prev;
   return BOX_NativeString(string_NativeString_NativeString_get_environ_0(UNBOX_NativeString( self)));
 }
-void environ___NativeString___put_environ(val_t  self) {
-}
-void environ___NativeString___unset_environ(val_t  self) {
-}
-void environ___NativeString___set_environ(val_t  self, val_t  param0, val_t  param1) {
-}