view release on metacpan or  search on metacpan

mzscheme_wrap.c  view on Meta::CPAN

_swigt__p_Scheme_Primitive_Proc, 
_swigt__p_Scheme_Closed_Primitive_Proc, 
_swigt__p_Scheme_Closed_Case_Primitive_Proc, 
_swigt__p_Scheme_Escaping_Cont, 
_swigt__p_Scheme_Prim_W_Result_Arity, 
_swigt__p_Scheme_Closed_Prim_W_Result_Arity, 
_swigt__p_f_p_struct_Scheme_Output_Port_p_q_const__char_long_long_int__long, 
_swigt__p_f_p_void__p_Scheme_Object, 
_swigt__p_f_p_struct_Scheme_Object__p_Scheme_Object, 
_swigt__p_f_p_Scheme_Object_p_int__p_Scheme_Object, 
_swigt__p_f_p_Scheme_Object__p_Scheme_Object, 
_swigt__p_p_Scheme_Object, 
_swigt__p_Scheme_Object, 
_swigt__p_Scheme_Small_Object, 
_swigt__p_Scheme_Object_u_ptr_long_val, 
_swigt__p_Scheme_Config, 
_swigt__p_Scheme_Object_u_pair_val, 
_swigt__p_f_p_struct_Scheme_Env_long_p_struct_Scheme_Object_p_void__void, 
_swigt__p_f_int_a___p_struct_Scheme_Object__p_Scheme_Object, 
_swigt__p_long, 
_swigt__p_Scheme_Thread, 
_swigt__p_f_p_struct_Scheme_Input_Port_p_char_long_long_int__long, 
_swigt__p_char, 
_swigt__p_Scheme_Object_u_str_val, 
_swigt__p_f_p_struct_Scheme_Input_Port_p_char_long_long_p_struct_Scheme_Object_int__long, 
_swigt__p_Scheme_Jumpup_Buf, 
_swigt__p_p_Scheme_Custodian, 
_swigt__p_Scheme_Custodian, 
_swigt__p_Scheme_Jumpup_Buf_Holder, 
_swigt__p_unsigned_long, 
_swigt__p_Scheme_Symbol, 
_swigt__p_Scheme_Object_u, 
_swigt__p_Scheme_Small_Object_u, 
_swigt__p_unsigned_int, 
_swigt__p_unsigned_char, 
_swigt__p_Scheme_Env, 
_swigt__p_f_p_void_int_a___p_struct_Scheme_Object__p_Scheme_Object, 
_swigt__p_Scheme_Cont_Frame_Data, 
_swigt__p_Scheme_Output_Port, 
_swigt__p_Scheme_Input_Port, 
_swigt__p_Perl_Scalar, 
_swigt__p_FILE, 
_swigt__p_Scheme_Object_u_two_int_val, 
_swigt__p_Scheme_Object_u_ptr_int_val, 
_swigt__p_f_p_struct_Scheme_Output_Port__int, 
_swigt__p_f_p_struct_Scheme_Input_Port__int, 
0
};


/* -------- TYPE CONVERSION AND EQUIVALENCE RULES (END) -------- */

static swig_constant_info swig_constants[] = {
{ SWIG_INT,     (char *) SWIG_prefix "SCHEME_STACK_SIZE", (long) 5000, 0, 0, 0},
{ SWIG_STRING,  (char *) SWIG_prefix "SYSTEM_TYPE_NAME", 0, 0, (void *)"unix", 0},
{ SWIG_INT,     (char *) SWIG_prefix "STACK_SAFETY_MARGIN", (long) 50000, 0, 0, 0},
{ SWIG_STRING,  (char *) SWIG_prefix "_MZ_SPECIAL_TAG", 0, 0, (void *)"\0", 0},
{ SWIG_INT,     (char *) SWIG_prefix "MZSCHEME_VERSION_MAJOR", (long) 208, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "MZSCHEME_VERSION_MINOR", (long) 0, 0, 0, 0},
{ SWIG_STRING,  (char *) SWIG_prefix "MZSCHEME_VERSION", 0, 0, (void *)"208", 0},
{ SWIG_INT,     (char *) SWIG_prefix "SCHEME_DIRECT_EMBEDDED", (long) 1, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_toplevel_type", (long) scheme_toplevel_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_local_type", (long) scheme_local_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_local_unbox_type", (long) scheme_local_unbox_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_syntax_type", (long) scheme_syntax_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_application_type", (long) scheme_application_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_application2_type", (long) scheme_application2_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_application3_type", (long) scheme_application3_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_sequence_type", (long) scheme_sequence_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_branch_type", (long) scheme_branch_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_unclosed_procedure_type", (long) scheme_unclosed_procedure_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_let_value_type", (long) scheme_let_value_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_let_void_type", (long) scheme_let_void_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_letrec_type", (long) scheme_letrec_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_let_one_type", (long) scheme_let_one_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_with_cont_mark_type", (long) scheme_with_cont_mark_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "_scheme_values_types_", (long) _scheme_values_types_, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_compiled_unclosed_procedure_type", (long) scheme_compiled_unclosed_procedure_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_compiled_let_value_type", (long) scheme_compiled_let_value_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_compiled_let_void_type", (long) scheme_compiled_let_void_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_compiled_syntax_type", (long) scheme_compiled_syntax_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_compiled_toplevel_type", (long) scheme_compiled_toplevel_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_compiled_quote_syntax_type", (long) scheme_compiled_quote_syntax_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_quote_compilation_type", (long) scheme_quote_compilation_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_variable_type", (long) scheme_variable_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_module_variable_type", (long) scheme_module_variable_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "_scheme_compiled_values_types_", (long) _scheme_compiled_values_types_, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_prim_type", (long) scheme_prim_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_closed_prim_type", (long) scheme_closed_prim_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_closure_type", (long) scheme_closure_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_case_closure_type", (long) scheme_case_closure_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_cont_type", (long) scheme_cont_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_escaping_cont_type", (long) scheme_escaping_cont_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_proc_struct_type", (long) scheme_proc_struct_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_structure_type", (long) scheme_structure_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_char_type", (long) scheme_char_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_integer_type", (long) scheme_integer_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_bignum_type", (long) scheme_bignum_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_rational_type", (long) scheme_rational_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_float_type", (long) scheme_float_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_double_type", (long) scheme_double_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_complex_izi_type", (long) scheme_complex_izi_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_complex_type", (long) scheme_complex_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_string_type", (long) scheme_string_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_symbol_type", (long) scheme_symbol_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_null_type", (long) scheme_null_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_pair_type", (long) scheme_pair_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_vector_type", (long) scheme_vector_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_inspector_type", (long) scheme_inspector_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_input_port_type", (long) scheme_input_port_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_output_port_type", (long) scheme_output_port_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_eof_type", (long) scheme_eof_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_true_type", (long) scheme_true_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_false_type", (long) scheme_false_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_void_type", (long) scheme_void_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_syntax_compiler_type", (long) scheme_syntax_compiler_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_macro_type", (long) scheme_macro_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_box_type", (long) scheme_box_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_thread_type", (long) scheme_thread_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_stx_offset_type", (long) scheme_stx_offset_type, 0, 0, 0},
{ SWIG_INT,     (char *) SWIG_prefix "scheme_cont_mark_set_type", (long) scheme_cont_mark_set_type, 0, 0, 0},