-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};
- 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) {
+val_t environ___NativeString___get_environ(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_environ;
+ fra.me.line = 34;
+ fra.me.meth = LOCATE_environ___NativeString___get_environ;
+ fra.me.has_broke = 0;
+ fra.me.REG_size = 1;
+ fra.me.REG[0] = NIT_NULL;
+ fra.me.REG[0] = p0;
+ /* ./../lib/standard//environ.nit:34 */
+ fra.me.REG[0] = BOX_NativeString(string_NativeString_NativeString_get_environ_0(UNBOX_NativeString(fra.me.REG[0])));
+ stack_frame_head = fra.me.prev;
+ return fra.me.REG[0];