X-Git-Url: http://nitlanguage.org diff --git a/c_src/string._sep.h b/c_src/string._sep.h index ff406cc..12057e0 100644 --- a/c_src/string._sep.h +++ b/c_src/string._sep.h @@ -80,204 +80,216 @@ extern const int SFT_string[]; #define CALL_string___Sys___init_args(recv) ((string___Sys___init_args_t)CALL((recv), (SFT_string[23] + 1))) #define CALL_string___Sys___native_argc(recv) ((string___Sys___native_argc_t)CALL((recv), (SFT_string[23] + 2))) #define CALL_string___Sys___native_argv(recv) ((string___Sys___native_argv_t)CALL((recv), (SFT_string[23] + 3))) -#define LOCATE_string___AbstractString___output "string::AbstractString::(kernel::Object::output)" -void string___AbstractString___output(val_t p0); -typedef void (*string___AbstractString___output_t)(val_t p0); -#define LOCATE_string___AbstractString_____bra "string::AbstractString::(abstract_collection::MapRead::[])" -val_t string___AbstractString_____bra(val_t p0, val_t p1); -typedef val_t (*string___AbstractString_____bra_t)(val_t p0, val_t p1); -val_t NEW_AbstractString_array___AbstractArrayRead___init(); -#define LOCATE_string___AbstractString___items "string::AbstractString::items" +static const char * const LOCATE_string___AbstractString___items = "string::AbstractString::items"; val_t string___AbstractString___items(val_t p0); typedef val_t (*string___AbstractString___items_t)(val_t p0); -#define LOCATE_string___AbstractString___substring "string::AbstractString::substring" +static const char * const LOCATE_string___AbstractString_____bra = "string::AbstractString::(abstract_collection::MapRead::[])"; +val_t string___AbstractString_____bra(val_t p0, val_t p1); +typedef val_t (*string___AbstractString_____bra_t)(val_t p0, val_t p1); +static const char * const LOCATE_string___AbstractString___substring = "string::AbstractString::substring"; val_t string___AbstractString___substring(val_t p0, val_t p1, val_t p2); typedef val_t (*string___AbstractString___substring_t)(val_t p0, val_t p1, val_t p2); -#define LOCATE_string___AbstractString___substring_from "string::AbstractString::substring_from" +static const char * const LOCATE_string___AbstractString___substring_from = "string::AbstractString::substring_from"; val_t string___AbstractString___substring_from(val_t p0, val_t p1); typedef val_t (*string___AbstractString___substring_from_t)(val_t p0, val_t p1); -#define LOCATE_string___AbstractString___has_substring "string::AbstractString::has_substring" +static const char * const LOCATE_string___AbstractString___has_substring = "string::AbstractString::has_substring"; val_t string___AbstractString___has_substring(val_t p0, val_t p1, val_t p2); typedef val_t (*string___AbstractString___has_substring_t)(val_t p0, val_t p1, val_t p2); -#define LOCATE_string___AbstractString___has_prefix "string::AbstractString::has_prefix" +static const char * const LOCATE_string___AbstractString___has_prefix = "string::AbstractString::has_prefix"; val_t string___AbstractString___has_prefix(val_t p0, val_t p1); typedef val_t (*string___AbstractString___has_prefix_t)(val_t p0, val_t p1); -#define LOCATE_string___AbstractString___has_suffix "string::AbstractString::has_suffix" +static const char * const LOCATE_string___AbstractString___has_suffix = "string::AbstractString::has_suffix"; val_t string___AbstractString___has_suffix(val_t p0, val_t p1); typedef val_t (*string___AbstractString___has_suffix_t)(val_t p0, val_t p1); -#define LOCATE_string___AbstractString___to_i "string::AbstractString::to_i" +static const char * const LOCATE_string___AbstractString___to_i = "string::AbstractString::to_i"; val_t string___AbstractString___to_i(val_t p0); typedef val_t (*string___AbstractString___to_i_t)(val_t p0); -#define LOCATE_string___AbstractString___to_hex "string::AbstractString::to_hex" +static const char * const LOCATE_string___AbstractString___to_hex = "string::AbstractString::to_hex"; val_t string___AbstractString___to_hex(val_t p0); typedef val_t (*string___AbstractString___to_hex_t)(val_t p0); -#define LOCATE_string___AbstractString___a_to "string::AbstractString::a_to" +static const char * const LOCATE_string___AbstractString___a_to = "string::AbstractString::a_to"; val_t string___AbstractString___a_to(val_t p0, val_t p1); typedef val_t (*string___AbstractString___a_to_t)(val_t p0, val_t p1); -#define LOCATE_string___AbstractString___to_upper "string::AbstractString::to_upper" + typedef void (*CLOS_OC_string___AbstractString___a_to_1_0)(struct stack_frame_t *); + void OC_string___AbstractString___a_to_1(struct stack_frame_t *closctx, val_t p0, struct stack_frame_t *closctx_param, fun_t clos_fun0); + typedef void (*OC_string___AbstractString___a_to_1_t)(struct stack_frame_t *closctx, val_t p0, struct stack_frame_t *closctx_param, fun_t clos_fun0); +static const char * const LOCATE_string___AbstractString___to_upper = "string::AbstractString::to_upper"; val_t string___AbstractString___to_upper(val_t p0); typedef val_t (*string___AbstractString___to_upper_t)(val_t p0); -#define LOCATE_string___AbstractString___to_lower "string::AbstractString::to_lower" + typedef void (*CLOS_OC_string___AbstractString___to_upper_1_0)(struct stack_frame_t *); + void OC_string___AbstractString___to_upper_1(struct stack_frame_t *closctx, val_t p0, struct stack_frame_t *closctx_param, fun_t clos_fun0); + typedef void (*OC_string___AbstractString___to_upper_1_t)(struct stack_frame_t *closctx, val_t p0, struct stack_frame_t *closctx_param, fun_t clos_fun0); +static const char * const LOCATE_string___AbstractString___to_lower = "string::AbstractString::to_lower"; val_t string___AbstractString___to_lower(val_t p0); typedef val_t (*string___AbstractString___to_lower_t)(val_t p0); -#define LOCATE_string___String_____eqeq "string::String::(kernel::Object::==)" -val_t string___String_____eqeq(val_t p0, val_t p1); -typedef val_t (*string___String_____eqeq_t)(val_t p0, val_t p1); -#define LOCATE_string___String_____l "string::String::(kernel::Comparable::<)" -val_t string___String_____l(val_t p0, val_t p1); -typedef val_t (*string___String_____l_t)(val_t p0, val_t p1); -#define LOCATE_string___String___hash "string::String::(hash::Object::hash)" -val_t string___String___hash(val_t p0); -typedef val_t (*string___String___hash_t)(val_t p0); -#define LOCATE_string___String___to_s "string::String::(string::Object::to_s)" -val_t string___String___to_s(val_t p0); -typedef val_t (*string___String___to_s_t)(val_t p0); -#define LOCATE_string___String___with_native "string::String::with_native" + typedef void (*CLOS_OC_string___AbstractString___to_lower_1_0)(struct stack_frame_t *); + void OC_string___AbstractString___to_lower_1(struct stack_frame_t *closctx, val_t p0, struct stack_frame_t *closctx_param, fun_t clos_fun0); + typedef void (*OC_string___AbstractString___to_lower_1_t)(struct stack_frame_t *closctx, val_t p0, struct stack_frame_t *closctx_param, fun_t clos_fun0); +static const char * const LOCATE_string___AbstractString___output = "string::AbstractString::(kernel::Object::output)"; +void string___AbstractString___output(val_t p0); +typedef void (*string___AbstractString___output_t)(val_t p0); +val_t NEW_AbstractString_array___AbstractArrayRead___init(); +static const char * const LOCATE_string___String___with_native = "string::String::with_native"; void string___String___with_native(val_t p0, val_t p1, val_t p2, int* init_table); typedef void (*string___String___with_native_t)(val_t p0, val_t p1, val_t p2, int* init_table); val_t NEW_String_string___String___with_native(val_t p0, val_t p1); -#define LOCATE_string___String___from_cstring "string::String::from_cstring" +static const char * const LOCATE_string___String___from_cstring = "string::String::from_cstring"; void string___String___from_cstring(val_t p0, val_t p1, int* init_table); typedef void (*string___String___from_cstring_t)(val_t p0, val_t p1, int* init_table); val_t NEW_String_string___String___from_cstring(val_t p0); -#define LOCATE_string___String___to_cstring "string::String::to_cstring" +static const char * const LOCATE_string___String___to_cstring = "string::String::to_cstring"; val_t string___String___to_cstring(val_t p0); typedef val_t (*string___String___to_cstring_t)(val_t p0); -#define LOCATE_string___String_____plus "string::String::+" +static const char * const LOCATE_string___String_____eqeq = "string::String::(kernel::Object::==)"; +val_t string___String_____eqeq(val_t p0, val_t p1); +typedef val_t (*string___String_____eqeq_t)(val_t p0, val_t p1); +static const char * const LOCATE_string___String_____l = "string::String::(kernel::Comparable::<)"; +val_t string___String_____l(val_t p0, val_t p1); +typedef val_t (*string___String_____l_t)(val_t p0, val_t p1); +static const char * const LOCATE_string___String_____plus = "string::String::+"; val_t string___String_____plus(val_t p0, val_t p1); typedef val_t (*string___String_____plus_t)(val_t p0, val_t p1); -#define LOCATE_string___String_____star "string::String::*" +static const char * const LOCATE_string___String_____star = "string::String::*"; val_t string___String_____star(val_t p0, val_t p1); typedef val_t (*string___String_____star_t)(val_t p0, val_t p1); -#define LOCATE_string___Buffer_____eqeq "string::Buffer::(kernel::Object::==)" -val_t string___Buffer_____eqeq(val_t p0, val_t p1); -typedef val_t (*string___Buffer_____eqeq_t)(val_t p0, val_t p1); -#define LOCATE_string___Buffer___to_s "string::Buffer::(string::Object::to_s)" -val_t string___Buffer___to_s(val_t p0); -typedef val_t (*string___Buffer___to_s_t)(val_t p0); -#define LOCATE_string___Buffer_____l "string::Buffer::(kernel::Comparable::<)" -val_t string___Buffer_____l(val_t p0, val_t p1); -typedef val_t (*string___Buffer_____l_t)(val_t p0, val_t p1); -#define LOCATE_string___Buffer_____braeq "string::Buffer::(abstract_collection::Map::[]=)" +static const char * const LOCATE_string___String___to_s = "string::String::(string::Object::to_s)"; +val_t string___String___to_s(val_t p0); +typedef val_t (*string___String___to_s_t)(val_t p0); +static const char * const LOCATE_string___String___hash = "string::String::(hash::Object::hash)"; +val_t string___String___hash(val_t p0); +typedef val_t (*string___String___hash_t)(val_t p0); +static const char * const LOCATE_string___Buffer_____braeq = "string::Buffer::(abstract_collection::Map::[]=)"; void string___Buffer_____braeq(val_t p0, val_t p1, val_t p2); typedef void (*string___Buffer_____braeq_t)(val_t p0, val_t p1, val_t p2); -#define LOCATE_string___Buffer___add "string::Buffer::(abstract_collection::SimpleCollection::add)" +static const char * const LOCATE_string___Buffer___add = "string::Buffer::(abstract_collection::SimpleCollection::add)"; void string___Buffer___add(val_t p0, val_t p1); typedef void (*string___Buffer___add_t)(val_t p0, val_t p1); -#define LOCATE_string___Buffer___append "string::Buffer::(abstract_collection::Sequence::append)" -void string___Buffer___append(val_t p0, val_t p1); -typedef void (*string___Buffer___append_t)(val_t p0, val_t p1); -#define LOCATE_string___Buffer___enlarge "string::Buffer::(array::AbstractArray::enlarge)" +static const char * const LOCATE_string___Buffer___enlarge = "string::Buffer::(array::AbstractArray::enlarge)"; void string___Buffer___enlarge(val_t p0, val_t p1); typedef void (*string___Buffer___enlarge_t)(val_t p0, val_t p1); -#define LOCATE_string___Buffer___init "string::Buffer::init" +static const char * const LOCATE_string___Buffer___append = "string::Buffer::(abstract_collection::Sequence::append)"; +void string___Buffer___append(val_t p0, val_t p1); +typedef void (*string___Buffer___append_t)(val_t p0, val_t p1); +static const char * const LOCATE_string___Buffer___to_s = "string::Buffer::(string::Object::to_s)"; +val_t string___Buffer___to_s(val_t p0); +typedef val_t (*string___Buffer___to_s_t)(val_t p0); +static const char * const LOCATE_string___Buffer_____l = "string::Buffer::(kernel::Comparable::<)"; +val_t string___Buffer_____l(val_t p0, val_t p1); +typedef val_t (*string___Buffer_____l_t)(val_t p0, val_t p1); +static const char * const LOCATE_string___Buffer___init = "string::Buffer::init"; void string___Buffer___init(val_t p0, int* init_table); typedef void (*string___Buffer___init_t)(val_t p0, int* init_table); val_t NEW_Buffer_string___Buffer___init(); -#define LOCATE_string___Buffer___from "string::Buffer::from" +static const char * const LOCATE_string___Buffer___from = "string::Buffer::from"; void string___Buffer___from(val_t p0, val_t p1, int* init_table); typedef void (*string___Buffer___from_t)(val_t p0, val_t p1, int* init_table); val_t NEW_Buffer_string___Buffer___from(val_t p0); -#define LOCATE_string___Buffer___with_capacity "string::Buffer::with_capacity" +static const char * const LOCATE_string___Buffer___with_capacity = "string::Buffer::with_capacity"; void string___Buffer___with_capacity(val_t p0, val_t p1, int* init_table); typedef void (*string___Buffer___with_capacity_t)(val_t p0, val_t p1, int* init_table); val_t NEW_Buffer_string___Buffer___with_capacity(val_t p0); -#define LOCATE_string___Buffer___capacity "string::Buffer::capacity" +static const char * const LOCATE_string___Buffer_____eqeq = "string::Buffer::(kernel::Object::==)"; +val_t string___Buffer_____eqeq(val_t p0, val_t p1); +typedef val_t (*string___Buffer_____eqeq_t)(val_t p0, val_t p1); +static const char * const LOCATE_string___Buffer___capacity = "string::Buffer::capacity"; val_t string___Buffer___capacity(val_t p0); typedef val_t (*string___Buffer___capacity_t)(val_t p0); -#define LOCATE_string___Object___to_s "string::Object::to_s" +static const char * const LOCATE_string___Object___to_s = "string::Object::to_s"; val_t string___Object___to_s(val_t p0); typedef val_t (*string___Object___to_s_t)(val_t p0); -#define LOCATE_string___Object___inspect "string::Object::inspect" +static const char * const LOCATE_string___Object___inspect = "string::Object::inspect"; val_t string___Object___inspect(val_t p0); typedef val_t (*string___Object___inspect_t)(val_t p0); -#define LOCATE_string___Object___inspect_head "string::Object::inspect_head" +static const char * const LOCATE_string___Object___inspect_head = "string::Object::inspect_head"; val_t string___Object___inspect_head(val_t p0); typedef val_t (*string___Object___inspect_head_t)(val_t p0); -#define LOCATE_string___Object___args "string::Object::args" +static const char * const LOCATE_string___Object___args = "string::Object::args"; val_t string___Object___args(val_t p0); typedef val_t (*string___Object___args_t)(val_t p0); -#define LOCATE_string___Bool___to_s "string::Bool::(string::Object::to_s)" +static const char * const LOCATE_string___Bool___to_s = "string::Bool::(string::Object::to_s)"; val_t string___Bool___to_s(val_t p0); typedef val_t (*string___Bool___to_s_t)(val_t p0); -#define LOCATE_string___Int___to_s "string::Int::(string::Object::to_s)" -val_t string___Int___to_s(val_t p0); -typedef val_t (*string___Int___to_s_t)(val_t p0); -#define LOCATE_string___Int___fill_buffer "string::Int::fill_buffer" +static const char * const LOCATE_string___Int___fill_buffer = "string::Int::fill_buffer"; void string___Int___fill_buffer(val_t p0, val_t p1, val_t p2, val_t p3); typedef void (*string___Int___fill_buffer_t)(val_t p0, val_t p1, val_t p2, val_t p3); -#define LOCATE_string___Int___to_hex "string::Int::to_hex" +static const char * const LOCATE_string___Int___to_s = "string::Int::(string::Object::to_s)"; +val_t string___Int___to_s(val_t p0); +typedef val_t (*string___Int___to_s_t)(val_t p0); +static const char * const LOCATE_string___Int___to_hex = "string::Int::to_hex"; val_t string___Int___to_hex(val_t p0); typedef val_t (*string___Int___to_hex_t)(val_t p0); -#define LOCATE_string___Int___to_base "string::Int::to_base" +static const char * const LOCATE_string___Int___to_base = "string::Int::to_base"; val_t string___Int___to_base(val_t p0, val_t p1, val_t p2); typedef val_t (*string___Int___to_base_t)(val_t p0, val_t p1, val_t p2); -#define LOCATE_string___Float___to_s "string::Float::(string::Object::to_s)" +static const char * const LOCATE_string___Float___to_s = "string::Float::(string::Object::to_s)"; val_t string___Float___to_s(val_t p0); typedef val_t (*string___Float___to_s_t)(val_t p0); -#define LOCATE_string___Float___to_precision "string::Float::to_precision" +static const char * const LOCATE_string___Float___to_precision = "string::Float::to_precision"; val_t string___Float___to_precision(val_t p0, val_t p1); typedef val_t (*string___Float___to_precision_t)(val_t p0, val_t p1); -#define LOCATE_string___Char___to_s "string::Char::(string::Object::to_s)" +static const char * const LOCATE_string___Char___to_s = "string::Char::(string::Object::to_s)"; val_t string___Char___to_s(val_t p0); typedef val_t (*string___Char___to_s_t)(val_t p0); -#define LOCATE_string___Collection___to_s "string::Collection::(string::Object::to_s)" +static const char * const LOCATE_string___Collection___to_s = "string::Collection::(string::Object::to_s)"; val_t string___Collection___to_s(val_t p0); typedef val_t (*string___Collection___to_s_t)(val_t p0); -#define LOCATE_string___Collection___join "string::Collection::join" + typedef void (*CLOS_OC_string___Collection___to_s_1_0)(struct stack_frame_t *); + void OC_string___Collection___to_s_1(struct stack_frame_t *closctx, val_t p0, struct stack_frame_t *closctx_param, fun_t clos_fun0); + typedef void (*OC_string___Collection___to_s_1_t)(struct stack_frame_t *closctx, val_t p0, struct stack_frame_t *closctx_param, fun_t clos_fun0); +static const char * const LOCATE_string___Collection___join = "string::Collection::join"; val_t string___Collection___join(val_t p0, val_t p1); typedef val_t (*string___Collection___join_t)(val_t p0, val_t p1); -val_t NEW_Array_array___Array___init(); -val_t NEW_Array_array___Array___with_items(val_t p0); +static const char * const LOCATE_string___Array___to_s = "string::Array::(string::Object::to_s)"; +val_t string___Array___to_s(val_t p0); +typedef val_t (*string___Array___to_s_t)(val_t p0); val_t NEW_Array_array___Array___with_capacity(val_t p0); +val_t NEW_Array_array___Array___init(); val_t NEW_Array_array___Array___filled_with(val_t p0, val_t p1); +val_t NEW_Array_array___Array___with_items(val_t p0); val_t NEW_Array_array___Array___with_native(val_t p0, val_t p1); -#define LOCATE_string___Array___to_s "string::Array::(string::Object::to_s)" -val_t string___Array___to_s(val_t p0); -typedef val_t (*string___Array___to_s_t)(val_t p0); -#define LOCATE_string___Map___map_join "string::Map::map_join" +static const char * const LOCATE_string___Map___map_join = "string::Map::map_join"; val_t string___Map___map_join(val_t p0, val_t p1, val_t p2); typedef val_t (*string___Map___map_join_t)(val_t p0, val_t p1, val_t p2); -#define LOCATE_string___NativeString_____bra "string::NativeString::[]" +static const char * const LOCATE_string___NativeString_____bra = "string::NativeString::[]"; val_t string___NativeString_____bra(val_t p0, val_t p1); typedef val_t (*string___NativeString_____bra_t)(val_t p0, val_t p1); -#define LOCATE_string___NativeString_____braeq "string::NativeString::[]=" +static const char * const LOCATE_string___NativeString_____braeq = "string::NativeString::[]="; void string___NativeString_____braeq(val_t p0, val_t p1, val_t p2); typedef void (*string___NativeString_____braeq_t)(val_t p0, val_t p1, val_t p2); -#define LOCATE_string___NativeString___copy_to "string::NativeString::copy_to" +static const char * const LOCATE_string___NativeString___copy_to = "string::NativeString::copy_to"; void string___NativeString___copy_to(val_t p0, val_t p1, val_t p2, val_t p3, val_t p4); typedef void (*string___NativeString___copy_to_t)(val_t p0, val_t p1, val_t p2, val_t p3, val_t p4); -#define LOCATE_string___NativeString___cstring_length "string::NativeString::cstring_length" +static const char * const LOCATE_string___NativeString___cstring_length = "string::NativeString::cstring_length"; val_t string___NativeString___cstring_length(val_t p0); typedef val_t (*string___NativeString___cstring_length_t)(val_t p0); -#define LOCATE_string___NativeString___atoi "string::NativeString::atoi" +static const char * const LOCATE_string___NativeString___atoi = "string::NativeString::atoi"; val_t string___NativeString___atoi(val_t p0); typedef val_t (*string___NativeString___atoi_t)(val_t p0); -#define LOCATE_string___NativeString___init "string::NativeString::init" +static const char * const LOCATE_string___NativeString___init = "string::NativeString::init"; void string___NativeString___init(val_t p0, int* init_table); typedef void (*string___NativeString___init_t)(val_t p0, int* init_table); val_t NEW_NativeString_string___NativeString___init(); -#define LOCATE_string___StringCapable___calloc_string "string::StringCapable::calloc_string" +static const char * const LOCATE_string___StringCapable___calloc_string = "string::StringCapable::calloc_string"; val_t string___StringCapable___calloc_string(val_t p0, val_t p1); typedef val_t (*string___StringCapable___calloc_string_t)(val_t p0, val_t p1); -#define LOCATE_string___StringCapable___init "string::StringCapable::init" +static const char * const LOCATE_string___StringCapable___init = "string::StringCapable::init"; void string___StringCapable___init(val_t p0, int* init_table); typedef void (*string___StringCapable___init_t)(val_t p0, int* init_table); val_t NEW_StringCapable_string___StringCapable___init(); -val_t NEW_Sys_kernel___Sys___init(); -#define LOCATE_string___Sys___args "string::Sys::(string::Object::args)" +static const char * const LOCATE_string___Sys___args = "string::Sys::(string::Object::args)"; val_t string___Sys___args(val_t p0); typedef val_t (*string___Sys___args_t)(val_t p0); -#define LOCATE_string___Sys___program_name "string::Sys::program_name" +static const char * const LOCATE_string___Sys___program_name = "string::Sys::program_name"; val_t string___Sys___program_name(val_t p0); typedef val_t (*string___Sys___program_name_t)(val_t p0); -#define LOCATE_string___Sys___init_args "string::Sys::init_args" +static const char * const LOCATE_string___Sys___init_args = "string::Sys::init_args"; void string___Sys___init_args(val_t p0); typedef void (*string___Sys___init_args_t)(val_t p0); -#define LOCATE_string___Sys___native_argc "string::Sys::native_argc" +static const char * const LOCATE_string___Sys___native_argc = "string::Sys::native_argc"; val_t string___Sys___native_argc(val_t p0); typedef val_t (*string___Sys___native_argc_t)(val_t p0); -#define LOCATE_string___Sys___native_argv "string::Sys::native_argv" +static const char * const LOCATE_string___Sys___native_argv = "string::Sys::native_argv"; val_t string___Sys___native_argv(val_t p0, val_t p1); typedef val_t (*string___Sys___native_argv_t)(val_t p0, val_t p1); +val_t NEW_Sys_kernel___Sys___init(); #endif