Merge remote-tracking branch 'alexandre/master'

[nit.git] / c_src / string._nitni.c

diff --git a/c_src/string._nitni.c b/c_src/string._nitni.c
index ecf4630..1bccb57 100644 (file)
--- a/c_src/string._nitni.c
+++ b/c_src/string._nitni.c
@@ -1,14 +1,35 @@
 #include "string._nitni.h"
 #include "string_nit.h"
+/* out/indirect function for string::String::to_f */
+val_t String_to_f___out( val_t recv )
+{
+String recv___nitni;
+float return___nitni;
+val_t return___nit;
+recv___nitni = malloc( sizeof( struct s_String ) );
+recv___nitni->ref.val = NIT_NULL;
+recv___nitni->ref.count = 0;
+nitni_local_ref_add( (struct nitni_ref *)recv___nitni );
+recv___nitni->ref.val = recv;
+return___nitni = String_to_f___impl( recv___nitni );
+return___nit = BOX_Float(return___nitni);
+nitni_local_ref_clean(  );
+return return___nit;
+}
 /* out/indirect function for string::Sys::native_argc */
 val_t Sys_native_argc___out( val_t recv )
 {
 Sys recv___nitni;
 bigint return___nitni;
 val_t return___nit;
-recv___nitni.v = recv;
+recv___nitni = malloc( sizeof( struct s_Sys ) );
+recv___nitni->ref.val = NIT_NULL;
+recv___nitni->ref.count = 0;
+nitni_local_ref_add( (struct nitni_ref *)recv___nitni );
+recv___nitni->ref.val = recv;
 return___nitni = kernel_Sys_Sys_native_argc_0( recv___nitni );
 return___nit = TAG_Int(return___nitni);
+nitni_local_ref_clean(  );
 return return___nit;
 }
 /* out/indirect function for string::Sys::native_argv */
@@ -18,9 +39,25 @@ Sys recv___nitni;
 bigint i___nitni;
 char * return___nitni;
 val_t return___nit;
-recv___nitni.v = recv;
+recv___nitni = malloc( sizeof( struct s_Sys ) );
+recv___nitni->ref.val = NIT_NULL;
+recv___nitni->ref.count = 0;
+nitni_local_ref_add( (struct nitni_ref *)recv___nitni );
+recv___nitni->ref.val = recv;
 i___nitni = UNTAG_Int(i);
 return___nitni = kernel_Sys_Sys_native_argv_1( recv___nitni, i___nitni );
 return___nit = BOX_NativeString(return___nitni);
+nitni_local_ref_clean(  );
 return return___nit;
 }
+/* friendly for string::String::to_cstring */
+char * string_String_to_cstring( String recv )
+{
+val_t recv___nit;
+char * result___nitni;
+val_t result___nit;
+recv___nit = recv->ref.val;
+result___nit = CALL_standard___string___String___to_cstring( recv___nit )( recv___nit );
+result___nitni = UNBOX_NativeString(result___nit);
+return result___nitni;
+}