示例#1
0
/* out/indirect function for stream::Object::intern_poll */
val_t Object_intern_poll___out( val_t recv, val_t in_fds, val_t out_fds )
{
Object recv___nitni;
Array in_fds___nitni;
Array out_fds___nitni;
nullable_Int return___nitni;
val_t return___nit;
recv___nitni = malloc( sizeof( struct s_Object ) );
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;
in_fds___nitni = malloc( sizeof( struct s_Array ) );
in_fds___nitni->ref.val = NIT_NULL;
in_fds___nitni->ref.count = 0;
nitni_local_ref_add( (struct nitni_ref *)in_fds___nitni );
in_fds___nitni->ref.val = in_fds;
out_fds___nitni = malloc( sizeof( struct s_Array ) );
out_fds___nitni->ref.val = NIT_NULL;
out_fds___nitni->ref.count = 0;
nitni_local_ref_add( (struct nitni_ref *)out_fds___nitni );
out_fds___nitni->ref.val = out_fds;
return___nitni = malloc( sizeof( struct s_nullable_Int ) );
return___nitni->ref.val = NIT_NULL;
return___nitni->ref.count = 0;
return___nitni = Object_intern_poll___impl( recv___nitni, in_fds___nitni, out_fds___nitni );
return___nit = return___nitni->ref.val;
nitni_local_ref_clean(  );
return return___nit;
}
示例#2
0
nullable_Object stream_null_Object()
{
nullable_Object n;
n = malloc( sizeof( struct s_nullable_Object ) );
n->ref.val = NIT_NULL;
n->ref.count = 0;
nitni_local_ref_add( (struct nitni_ref *)n );
return n;
}
示例#3
0
/* friendly for hash_collection::HashSet::init */
HashSet file_new_HashSet(  )
{
HashSet result___nitni;
val_t result___nit;
result___nitni = malloc( sizeof( struct s_HashSet ) );
result___nitni->ref.val = NIT_NULL;
result___nitni->ref.count = 0;
nitni_local_ref_add( (struct nitni_ref *)result___nitni );
result___nit = NEW_HashSet_standard___collection___hash_collection___HashSet___init(  );
result___nitni->ref.val = result___nit;
return result___nitni;
}
示例#4
0
nullable_Int stream_Int_as_nullable( bigint value )
{
val_t temp;
nullable_Int out;
out = malloc( sizeof( struct s_nullable_Int ) );
out->ref.val = NIT_NULL;
out->ref.count = 0;
nitni_local_ref_add( (struct nitni_ref *)out );
temp = TAG_Int(value);
out->ref.val = temp;
return out;
}
示例#5
0
/* friendly for string::String::from_cstring */
String file_new_String_from_cstring( char * str )
{
val_t str___nit;
String result___nitni;
val_t result___nit;
str___nit = BOX_NativeString(str);
result___nitni = malloc( sizeof( struct s_String ) );
result___nitni->ref.val = NIT_NULL;
result___nitni->ref.count = 0;
nitni_local_ref_add( (struct nitni_ref *)result___nitni );
result___nit = NEW_String_standard___string___String___from_cstring( str___nit );
result___nitni->ref.val = result___nit;
return result___nitni;
}
示例#6
0
/* 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;
}
示例#7
0
/* 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);
nitni_local_ref_clean(  );
return return___nit;
}
示例#8
0
/* friendly for array::Array::(abstract_collection::SequenceRead::[]) */
nullable_Object stream_Array__index( Array recv, bigint index )
{
val_t recv___nit;
val_t index___nit;
nullable_Object result___nitni;
val_t result___nit;
recv___nit = recv->ref.val;
index___nit = TAG_Int(index);
result___nitni = malloc( sizeof( struct s_nullable_Object ) );
result___nitni->ref.val = NIT_NULL;
result___nitni->ref.count = 0;
nitni_local_ref_add( (struct nitni_ref *)result___nitni );
result___nit = CALL_standard___collection___abstract_collection___SequenceRead_____bra( recv___nit )( recv___nit, index___nit );
result___nitni->ref.val = result___nit;
return result___nitni;
}
示例#9
0
/* 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);
nitni_local_ref_clean(  );
return return___nit;
}
示例#10
0
/* out/indirect function for stream::FDStream::native_close */
val_t FDStream_native_close___out( val_t recv, val_t i )
{
FDStream recv___nitni;
bigint i___nitni;
bigint return___nitni;
val_t return___nit;
recv___nitni = malloc( sizeof( struct s_FDStream ) );
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 = stream_FDStream_FDStream_native_close_1( recv___nitni, i___nitni );
return___nit = TAG_Int(return___nitni);
nitni_local_ref_clean(  );
return return___nit;
}
示例#11
0
Object file_String_as_Object( String value )
{
val_t temp;
Object out;
out = malloc( sizeof( struct s_Object ) );
out->ref.val = NIT_NULL;
out->ref.count = 0;
nitni_local_ref_add( (struct nitni_ref *)out );
temp = value->ref.val;
if ( ISNULL(temp) ){	fprintf( stderr, "Casting from String to Object failed because value is null." );
	abort();
}if ( ! ( ISOBJ( temp ) ? OBJISA( temp, standard___kernel___Object ): VALISA( temp, standard___kernel___Object ) ) ){
	fprintf( stderr, "Casting to Object failed because value is not a Object." );
	abort();
}
out->ref.val = temp;
return out;
}
示例#12
0
/* out/indirect function for file::String::files */
val_t String_files___out( val_t recv )
{
String recv___nitni;
Set 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 = malloc( sizeof( struct s_Set ) );
return___nitni->ref.val = NIT_NULL;
return___nitni->ref.count = 0;
return___nitni = String_files___impl( recv___nitni );
return___nit = return___nitni->ref.val;
nitni_local_ref_clean(  );
return return___nit;
}
示例#13
0
Set file_HashSet_as_Set( HashSet value )
{
val_t temp;
Set out;
out = malloc( sizeof( struct s_Set ) );
out->ref.val = NIT_NULL;
out->ref.count = 0;
nitni_local_ref_add( (struct nitni_ref *)out );
temp = value->ref.val;
if ( ISNULL(temp) ){	fprintf( stderr, "Casting from HashSet[String] to Set[String] failed because value is null." );
	abort();
}if ( ! ( ISOBJ( temp ) ? OBJISA( temp, standard___collection___abstract_collection___Set ): VALISA( temp, standard___collection___abstract_collection___Set ) ) ){
	fprintf( stderr, "Casting to Set[String] failed because value is not a Set[String]." );
	abort();
}
out->ref.val = temp;
return out;
}
示例#14
0
/* out/indirect function for stream::FDStream::native_write */
val_t FDStream_native_write___out( val_t recv, val_t i, val_t buf, val_t len )
{
FDStream recv___nitni;
bigint i___nitni;
char * buf___nitni;
bigint len___nitni;
bigint return___nitni;
val_t return___nit;
recv___nitni = malloc( sizeof( struct s_FDStream ) );
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);
buf___nitni = UNBOX_NativeString(buf);
len___nitni = UNTAG_Int(len);
return___nitni = stream_FDStream_FDStream_native_write_3( recv___nitni, i___nitni, buf___nitni, len___nitni );
return___nit = TAG_Int(return___nitni);
nitni_local_ref_clean(  );
return return___nit;
}