1 #include "string._nitni.h"
2 #include "string_nit.h"
3 /* out/indirect function for string::String::to_f */
4 val_t
String_to_f___out( val_t recv
)
9 recv___nitni
= malloc( sizeof( struct s_String
) );
10 recv___nitni
->ref
.val
= NIT_NULL
;
11 recv___nitni
->ref
.count
= 0;
12 nitni_local_ref_add( (struct nitni_ref
*)recv___nitni
);
13 recv___nitni
->ref
.val
= recv
;
14 return___nitni
= String_to_f___impl( recv___nitni
);
15 return___nit
= BOX_Float(return___nitni
);
16 nitni_local_ref_clean( );
19 /* out/indirect function for string::Sys::native_argc */
20 val_t
Sys_native_argc___out( val_t recv
)
23 bigint return___nitni
;
25 recv___nitni
= malloc( sizeof( struct s_Sys
) );
26 recv___nitni
->ref
.val
= NIT_NULL
;
27 recv___nitni
->ref
.count
= 0;
28 nitni_local_ref_add( (struct nitni_ref
*)recv___nitni
);
29 recv___nitni
->ref
.val
= recv
;
30 return___nitni
= kernel_Sys_Sys_native_argc_0( recv___nitni
);
31 return___nit
= TAG_Int(return___nitni
);
32 nitni_local_ref_clean( );
35 /* out/indirect function for string::Sys::native_argv */
36 val_t
Sys_native_argv___out( val_t recv
, val_t i
)
40 char * return___nitni
;
42 recv___nitni
= malloc( sizeof( struct s_Sys
) );
43 recv___nitni
->ref
.val
= NIT_NULL
;
44 recv___nitni
->ref
.count
= 0;
45 nitni_local_ref_add( (struct nitni_ref
*)recv___nitni
);
46 recv___nitni
->ref
.val
= recv
;
47 i___nitni
= UNTAG_Int(i
);
48 return___nitni
= kernel_Sys_Sys_native_argv_1( recv___nitni
, i___nitni
);
49 return___nit
= BOX_NativeString(return___nitni
);
50 nitni_local_ref_clean( );
53 /* friendly for string::String::to_cstring */
54 char * string_String_to_cstring( String recv
)
57 char * result___nitni
;
59 recv___nit
= recv
->ref
.val
;
60 result___nit
= CALL_standard___string___String___to_cstring( recv___nit
)( recv___nit
);
61 result___nitni
= UNBOX_NativeString(result___nit
);
62 return result___nitni
;