c_src: update to have intern args
[nit.git] / c_src / string._nitni.c
index 1bccb57..7aef628 100644 (file)
@@ -1,63 +1,64 @@
 #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 )
+/* out/indirect function for string::Float::to_precision_native */
+val_t Float_to_precision_native___out( val_t recv, val_t nb )
 {
-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);
+float trans_recv;
+String orig_return;
+val_t trans_return;
+trans_recv = UNBOX_Float(recv);
+orig_return = malloc( sizeof( struct s_String ) );
+orig_return->ref.val = NIT_NULL;
+orig_return->ref.count = 0;
+orig_return = Float_to_precision_native___impl( trans_recv, UNTAG_Int(nb) );
+trans_return = orig_return->ref.val;
 nitni_local_ref_clean(  );
-return return___nit;
+return trans_return;
+}
+/* out/indirect function for string::NativeString::atof */
+val_t NativeString_atof___out( val_t recv )
+{
+char * trans_recv;
+float orig_return;
+val_t trans_return;
+trans_recv = UNBOX_NativeString(recv);
+orig_return = atof( trans_recv );
+trans_return = BOX_Float(orig_return);
+nitni_local_ref_clean(  );
+return trans_return;
 }
 /* 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 = 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);
+bigint orig_return;
+val_t trans_return;
+orig_return = kernel_Sys_Sys_native_argc_0( NULL );
+trans_return = TAG_Int(orig_return);
 nitni_local_ref_clean(  );
-return return___nit;
+return trans_return;
 }
 /* out/indirect function for string::Sys::native_argv */
 val_t Sys_native_argv___out( val_t recv, val_t i )
 {
-Sys recv___nitni;
-bigint i___nitni;
-char * return___nitni;
-val_t return___nit;
-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);
+char * orig_return;
+val_t trans_return;
+orig_return = kernel_Sys_Sys_native_argv_1( NULL, UNTAG_Int(i) );
+trans_return = BOX_NativeString(orig_return);
 nitni_local_ref_clean(  );
-return return___nit;
+return trans_return;
 }
-/* friendly for string::String::to_cstring */
-char * string_String_to_cstring( String recv )
+/* friendly for string::String::from_cstring */
+String string_new_String_from_cstring( char * str )
 {
-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;
+val_t trans___str;
+val_t orig_return;
+String trans_return;
+trans___str = BOX_NativeString(str);
+trans_return = malloc( sizeof( struct s_String ) );
+trans_return->ref.val = NIT_NULL;
+trans_return->ref.count = 0;
+nitni_local_ref_add( (struct nitni_ref *)trans_return );
+orig_return = NEW_String_standard___string___String___from_cstring( trans___str );
+trans_return->ref.val = orig_return;
+return trans_return;
 }