[Rt-commit] [svn] r1014 - in mzscheme: . Language-MzScheme
Language-MzScheme/lib/Language
autrijus at pallas.eruditorum.org
autrijus at pallas.eruditorum.org
Mon Jun 7 03:28:53 EDT 2004
Author: autrijus
Date: Mon Jun 7 03:28:53 2004
New Revision: 1014
Added:
mzscheme/Language-MzScheme/lib/Language/MzScheme_in.pm
Modified:
mzscheme/ (props changed)
mzscheme/Language-MzScheme/MANIFEST.SKIP
mzscheme/Language-MzScheme/Makefile.PL
mzscheme/Language-MzScheme/mzscheme.i
Log:
----------------------------------------------------------------------
r5446 at not: autrijus | 2004-06-07T07:28:53.022617Z
* provide MzScheme_in.pm to override -shadow.
----------------------------------------------------------------------
Modified: mzscheme/Language-MzScheme/MANIFEST.SKIP
==============================================================================
--- mzscheme/Language-MzScheme/MANIFEST.SKIP (original)
+++ mzscheme/Language-MzScheme/MANIFEST.SKIP Mon Jun 7 03:28:53 2004
@@ -14,7 +14,6 @@
^mzscheme_wrap
^blibdirs
^pm_to_blib
-^lib/Language/MzScheme_in.pm
~$
\.old$
^#.*#$
Modified: mzscheme/Language-MzScheme/Makefile.PL
==============================================================================
--- mzscheme/Language-MzScheme/Makefile.PL (original)
+++ mzscheme/Language-MzScheme/Makefile.PL Mon Jun 7 03:28:53 2004
@@ -35,7 +35,13 @@
qw(-module Language::MzScheme -includeall -exportall -perl5 mzscheme.i)
);
-rename("MzScheme.pm" => "lib/Language/MzScheme_in.pm");
+if (-e "lib/Language/MzScheme_in.pm") {
+ print "Using existing lib/Language/MzScheme_in.pm (remove it to regenerate).\n";
+ unlink "MzScheme.pm";
+}
+else {
+ rename("MzScheme.pm" => "lib/Language/MzScheme_in.pm");
+}
makemaker_args(
LIBS => "-L$plt_path/lib -lmzgc -lmzscheme",
Added: mzscheme/Language-MzScheme/lib/Language/MzScheme_in.pm
==============================================================================
--- (empty file)
+++ mzscheme/Language-MzScheme/lib/Language/MzScheme_in.pm Mon Jun 7 03:28:53 2004
@@ -0,0 +1,10 @@
+# This file was automatically generated by SWIG
+package Language::MzScheme;
+require Exporter;
+require DynaLoader;
+ at ISA = qw(Exporter DynaLoader);
+package Language::MzScheme;
+bootstrap Language::MzScheme;
+package Language::MzScheme;
+ at EXPORT = qw( $scheme_config scheme_basic_env scheme_get_param mzscheme_init $SCHEME_STACK_SIZE $SYSTEM_TYPE_NAME $STACK_SAFETY_MARGIN $_MZ_SPECIAL_TAG $MZSCHEME_VERSION_MAJOR $MZSCHEME_VERSION_MINOR $MZSCHEME_VERSION $SCHEME_DIRECT_EMBEDDED Scheme_Object_type_set Scheme_Object_type_get Scheme_Object_keyex_set Scheme_Object_keyex_get Scheme_Object_u_get new_Scheme_Object delete_Scheme_Object Scheme_Object_u_svector_val_get Scheme_Object_u_pair_val_get Scheme_Object_u_ptr_long_val_get Scheme_Object_u_ptr_int_val_get Scheme_Object_u_two_int_val_get Scheme_Object_u_two_ptr_val_get Scheme_Object_u_str_val_get new_Scheme_Object_u delete_Scheme_Object_u Scheme_Object_u_svector_val_len_set Scheme_Object_u_svector_val_len_get Scheme_Object_u_svector_val_vec_set Scheme_Object_u_svector_val_vec_get new_Scheme_Object_u_svector_val delete_Scheme_Object_u_svector_val Scheme_Object_u_pair_val_car_set Scheme_Object_u_pair_val_car_get Scheme_Object_u_pair_val_cdr_set Scheme_Object_u_pair_val_cdr_get new_Scheme_Object_u_pair_val delete_Scheme_Object_u_pair_val Scheme_Object_u_ptr_long_val_ptr_set Scheme_Object_u_ptr_long_val_ptr_get Scheme_Object_u_ptr_long_val_pint_set Scheme_Object_u_ptr_long_val_pint_get new_Scheme_Object_u_ptr_long_val delete_Scheme_Object_u_ptr_long_val Scheme_Object_u_ptr_int_val_ptr_set Scheme_Object_u_ptr_int_val_ptr_get Scheme_Object_u_ptr_int_val_pint_set Scheme_Object_u_ptr_int_val_pint_get new_Scheme_Object_u_ptr_int_val delete_Scheme_Object_u_ptr_int_val Scheme_Object_u_two_int_val_int1_set Scheme_Object_u_two_int_val_int1_get Scheme_Object_u_two_int_val_int2_set Scheme_Object_u_two_int_val_int2_get new_Scheme_Object_u_two_int_val delete_Scheme_Object_u_two_int_val Scheme_Object_u_two_ptr_val_ptr1_set Scheme_Object_u_two_ptr_val_ptr1_get Scheme_Object_u_two_ptr_val_ptr2_set Scheme_Object_u_two_ptr_val_ptr2_get new_Scheme_Object_u_two_ptr_val delete_Scheme_Object_u_two_ptr_val Scheme_Object_u_str_val_string_val_set Scheme_Object_u_str_val_string_val_get Scheme_Object_u_str_val_tag_val_set Scheme_Object_u_str_val_tag_val_get new_Scheme_Object_u_str_val delete_Scheme_Object_u_str_val Scheme_Small_Object_type_set Scheme_Small_Object_type_get Scheme_Small_Object_u_get new_Scheme_Small_Object delete_Scheme_Small_Object Scheme_Small_Object_u_char_val_set Scheme_Small_Object_u_char_val_get Scheme_Small_Object_u_ptr_value_set Scheme_Small_Object_u_ptr_value_get Scheme_Small_Object_u_int_val_set Scheme_Small_Object_u_int_val_get Scheme_Small_Object_u_ptr_val_set Scheme_Small_Object_u_ptr_val_get new_Scheme_Small_Object_u delete_Scheme_Small_Object_u Scheme_Double_type_set Scheme_Double_type_get Scheme_Double_double_val_set Scheme_Double_double_val_get new_Scheme_Double delete_Scheme_Double Scheme_Symbol_type_set Scheme_Symbol_type_get Scheme_Symbol_keyex_set Scheme_Symbol_keyex_get Scheme_Symbol_len_set Scheme_Symbol_len_get Scheme_Symbol_s_set Scheme_Symbol_s_get new_Scheme_Symbol delete_Scheme_Symbol Scheme_Vector_type_set Scheme_Vector_type_get Scheme_Vector_keyex_set Scheme_Vector_keyex_get Scheme_Vector_size_set Scheme_Vector_size_get Scheme_Vector_els_set Scheme_Vector_els_get new_Scheme_Vector delete_Scheme_Vector $scheme_toplevel_type $scheme_local_type $scheme_local_unbox_type $scheme_syntax_type $scheme_application_type $scheme_application2_type $scheme_application3_type $scheme_sequence_type $scheme_branch_type $scheme_unclosed_procedure_type $scheme_let_value_type $scheme_let_void_type $scheme_letrec_type $scheme_let_one_type $scheme_with_cont_mark_type $_scheme_values_types_ $scheme_compiled_unclosed_procedure_type $scheme_compiled_let_value_type $scheme_compiled_let_void_type $scheme_compiled_syntax_type $scheme_compiled_toplevel_type $scheme_compiled_quote_syntax_type $scheme_quote_compilation_type $scheme_variable_type $scheme_module_variable_type $_scheme_compiled_values_types_ $scheme_prim_type $scheme_closed_prim_type $scheme_closure_type $scheme_case_closure_type $scheme_cont_type $scheme_escaping_cont_type $scheme_proc_struct_type $scheme_structure_type $scheme_char_type $scheme_integer_type $scheme_bignum_type $scheme_rational_type $scheme_float_type $scheme_double_type $scheme_complex_izi_type $scheme_complex_type $scheme_string_type $scheme_symbol_type $scheme_null_type $scheme_pair_type $scheme_vector_type $scheme_inspector_type $scheme_input_port_type $scheme_output_port_type $scheme_eof_type $scheme_true_type $scheme_false_type $scheme_void_type $scheme_syntax_compiler_type $scheme_macro_type $scheme_box_type $scheme_thread_type $scheme_stx_offset_type $scheme_cont_mark_set_type $scheme_sema_type $scheme_hash_table_type $scheme_c_pointer_type $scheme_weak_box_type $scheme_struct_type_type $scheme_module_index_type $scheme_set_macro_type $scheme_listener_type $scheme_namespace_type $scheme_config_type $scheme_stx_type $scheme_will_executor_type $scheme_custodian_type $scheme_random_state_type $scheme_regexp_type $scheme_bucket_type $scheme_bucket_table_type $scheme_subprocess_type $scheme_compilation_top_type $scheme_wrap_chunk_type $scheme_eval_waiting_type $scheme_tail_call_waiting_type $scheme_undefined_type $scheme_struct_property_type $scheme_multiple_values_type $scheme_placeholder_type $scheme_case_lambda_sequence_type $scheme_begin0_sequence_type $scheme_rename_table_type $scheme_module_type $scheme_svector_type $scheme_lazy_macro_type $scheme_resolve_prefix_type $scheme_security_guard_type $scheme_indent_type $scheme_udp_type $scheme_udp_waitable_type $scheme_id_macro_type $scheme_waitable_set_type $scheme_wrapped_waitable_type $scheme_nack_guard_waitable_type $scheme_semaphore_repost_type $scheme_channel_type $scheme_channel_put_type $scheme_thread_resume_type $scheme_thread_suspend_type $scheme_thread_dead_type $scheme_poll_waitable_type $scheme_nack_waitable_type $scheme_module_registry_type $scheme_thread_set_type $scheme_reserved1_type $scheme_reserved2_type $scheme_reserved3_type $_scheme_last_type_ $SCHEME_PRIM_IS_FOLDING $SCHEME_PRIM_IS_PRIMITIVE $SCHEME_PRIM_IS_STRUCT_PROC $SCHEME_PRIM_IS_STRUCT_SETTER $SCHEME_PRIM_IS_PARAMETER $SCHEME_PRIM_IS_STRUCT_GETTER $SCHEME_PRIM_IS_STRUCT_PRED $SCHEME_PRIM_IS_STRUCT_CONSTR $SCHEME_PRIM_IS_MULTI_RESULT $SCHEME_PRIM_IS_GENERIC $SCHEME_PRIM_IS_USER_PARAMETER $SCHEME_PRIM_IS_METHOD Scheme_Primitive_Proc_type_set Scheme_Primitive_Proc_type_get Scheme_Primitive_Proc_flags_set Scheme_Primitive_Proc_flags_get Scheme_Primitive_Proc_prim_val_set Scheme_Primitive_Proc_prim_val_get Scheme_Primitive_Proc_name_set Scheme_Primitive_Proc_name_get Scheme_Primitive_Proc_mina_set Scheme_Primitive_Proc_mina_get Scheme_Primitive_Proc_maxa_set Scheme_Primitive_Proc_maxa_get new_Scheme_Primitive_Proc delete_Scheme_Primitive_Proc Scheme_Prim_W_Result_Arity_p_set Scheme_Prim_W_Result_Arity_p_get Scheme_Prim_W_Result_Arity_minr_set Scheme_Prim_W_Result_Arity_minr_get Scheme_Prim_W_Result_Arity_maxr_set Scheme_Prim_W_Result_Arity_maxr_get new_Scheme_Prim_W_Result_Arity delete_Scheme_Prim_W_Result_Arity Scheme_Closed_Primitive_Proc_type_set Scheme_Closed_Primitive_Proc_type_get Scheme_Closed_Primitive_Proc_flags_set Scheme_Closed_Primitive_Proc_flags_get Scheme_Closed_Primitive_Proc_prim_val_set Scheme_Closed_Primitive_Proc_prim_val_get Scheme_Closed_Primitive_Proc_data_set Scheme_Closed_Primitive_Proc_data_get Scheme_Closed_Primitive_Proc_name_set Scheme_Closed_Primitive_Proc_name_get Scheme_Closed_Primitive_Proc_mina_set Scheme_Closed_Primitive_Proc_mina_get Scheme_Closed_Primitive_Proc_maxa_set Scheme_Closed_Primitive_Proc_maxa_get new_Scheme_Closed_Primitive_Proc delete_Scheme_Closed_Primitive_Proc Scheme_Closed_Prim_W_Result_Arity_p_set Scheme_Closed_Prim_W_Result_Arity_p_get Scheme_Closed_Prim_W_Result_Arity_minr_set Scheme_Closed_Prim_W_Result_Arity_minr_get Scheme_Closed_Prim_W_Result_Arity_maxr_set Scheme_Closed_Prim_W_Result_Arity_maxr_get new_Scheme_Closed_Prim_W_Result_Arity delete_Scheme_Closed_Prim_W_Result_Arity Scheme_Closed_Case_Primitive_Proc_p_set Scheme_Closed_Case_Primitive_Proc_p_get Scheme_Closed_Case_Primitive_Proc_cases_set Scheme_Closed_Case_Primitive_Proc_cases_get new_Scheme_Closed_Case_Primitive_Proc delete_Scheme_Closed_Case_Primitive_Proc Scheme_Hash_Table_type_set Scheme_Hash_Table_type_get Scheme_Hash_Table_keyex_set Scheme_Hash_Table_keyex_get Scheme_Hash_Table_size_set Scheme_Hash_Table_size_get Scheme_Hash_Table_count_set Scheme_Hash_Table_count_get Scheme_Hash_Table_step_set Scheme_Hash_Table_step_get Scheme_Hash_Table_keys_set Scheme_Hash_Table_keys_get Scheme_Hash_Table_vals_set Scheme_Hash_Table_vals_get Scheme_Hash_Table_make_hash_indices_set Scheme_Hash_Table_make_hash_indices_get Scheme_Hash_Table_compare_set Scheme_Hash_Table_compare_get Scheme_Hash_Table_mutex_set Scheme_Hash_Table_mutex_get Scheme_Hash_Table_mcount_set Scheme_Hash_Table_mcount_get new_Scheme_Hash_Table delete_Scheme_Hash_Table Scheme_Bucket_type_set Scheme_Bucket_type_get Scheme_Bucket_val_set Scheme_Bucket_val_get Scheme_Bucket_key_set Scheme_Bucket_key_get new_Scheme_Bucket delete_Scheme_Bucket Scheme_Bucket_Table_type_set Scheme_Bucket_Table_type_get Scheme_Bucket_Table_size_set Scheme_Bucket_Table_size_get Scheme_Bucket_Table_count_set Scheme_Bucket_Table_count_get Scheme_Bucket_Table_step_set Scheme_Bucket_Table_step_get Scheme_Bucket_Table_buckets_set Scheme_Bucket_Table_buckets_get Scheme_Bucket_Table_weak_set Scheme_Bucket_Table_weak_get Scheme_Bucket_Table_with_home_set Scheme_Bucket_Table_with_home_get Scheme_Bucket_Table_make_hash_indices_set Scheme_Bucket_Table_make_hash_indices_get Scheme_Bucket_Table_compare_set Scheme_Bucket_Table_compare_get Scheme_Bucket_Table_mutex_set Scheme_Bucket_Table_mutex_get new_Scheme_Bucket_Table delete_Scheme_Bucket_Table $SCHEME_hash_string $SCHEME_hash_ptr $SCHEME_hash_bound_id $SCHEME_hash_weak_ptr Scheme_Jumpup_Buf_Holder_type_set Scheme_Jumpup_Buf_Holder_type_get Scheme_Jumpup_Buf_Holder_buf_set Scheme_Jumpup_Buf_Holder_buf_get new_Scheme_Jumpup_Buf_Holder delete_Scheme_Jumpup_Buf_Holder Scheme_Continuation_Jump_State_jumping_to_continuation_set Scheme_Continuation_Jump_State_jumping_to_continuation_get Scheme_Continuation_Jump_State_num_vals_set Scheme_Continuation_Jump_State_num_vals_get Scheme_Continuation_Jump_State_is_kill_set Scheme_Continuation_Jump_State_is_kill_get Scheme_Continuation_Jump_State_u_get new_Scheme_Continuation_Jump_State delete_Scheme_Continuation_Jump_State Scheme_Continuation_Jump_State_u_vals_set Scheme_Continuation_Jump_State_u_vals_get Scheme_Continuation_Jump_State_u_val_set Scheme_Continuation_Jump_State_u_val_get new_Scheme_Continuation_Jump_State_u delete_Scheme_Continuation_Jump_State_u Scheme_Cont_Frame_Data_cont_mark_pos_set Scheme_Cont_Frame_Data_cont_mark_pos_get Scheme_Cont_Frame_Data_cont_mark_stack_set Scheme_Cont_Frame_Data_cont_mark_stack_get new_Scheme_Cont_Frame_Data delete_Scheme_Cont_Frame_Data $MZCONFIG_ENV $MZCONFIG_INPUT_PORT $MZCONFIG_OUTPUT_PORT $MZCONFIG_ERROR_PORT $MZCONFIG_ENABLE_BREAK $MZCONFIG_ERROR_DISPLAY_HANDLER $MZCONFIG_ERROR_PRINT_VALUE_HANDLER $MZCONFIG_EXIT_HANDLER $MZCONFIG_EXN_HANDLER $MZCONFIG_INIT_EXN_HANDLER $MZCONFIG_EVAL_HANDLER $MZCONFIG_LOAD_HANDLER $MZCONFIG_PRINT_HANDLER $MZCONFIG_PROMPT_READ_HANDLER $MZCONFIG_CAN_READ_GRAPH $MZCONFIG_CAN_READ_COMPILED $MZCONFIG_CAN_READ_BOX $MZCONFIG_CAN_READ_PIPE_QUOTE $MZCONFIG_CAN_READ_DOT $MZCONFIG_CAN_READ_QUASI $MZCONFIG_READ_DECIMAL_INEXACT $MZCONFIG_PRINT_GRAPH $MZCONFIG_PRINT_STRUCT $MZCONFIG_PRINT_BOX $MZCONFIG_PRINT_VEC_SHORTHAND $MZCONFIG_PRINT_HASH_TABLE $MZCONFIG_CASE_SENS $MZCONFIG_SQUARE_BRACKETS_ARE_PARENS $MZCONFIG_CURLY_BRACES_ARE_PARENS $MZCONFIG_ERROR_PRINT_WIDTH $MZCONFIG_ERROR_ESCAPE_HANDLER $MZCONFIG_ALLOW_SET_UNDEFINED $MZCONFIG_CUSTODIAN $MZCONFIG_INSPECTOR $MZCONFIG_USE_COMPILED_KIND $MZCONFIG_LOAD_DIRECTORY $MZCONFIG_COLLECTION_PATHS $MZCONFIG_PORT_PRINT_HANDLER $MZCONFIG_LOAD_EXTENSION_HANDLER $MZCONFIG_CURRENT_DIRECTORY $MZCONFIG_RANDOM_STATE $MZCONFIG_CURRENT_MODULE_RESOLVER $MZCONFIG_CURRENT_MODULE_PREFIX $MZCONFIG_ERROR_PRINT_SRCLOC $MZCONFIG_CMDLINE_ARGS $MZCONFIG_LOCALE $MZCONFIG_SECURITY_GUARD $MZCONFIG_PORT_COUNT_LINES $MZCONFIG_SCHEDULER_RANDOM_STATE $MZCONFIG_THREAD_SET $__MZCONFIG_BUILTIN_COUNT__ Scheme_Config_type_set Scheme_Config_type_get Scheme_Config_use_count_set Scheme_Config_use_count_get Scheme_Config_extensions_set Scheme_Config_extensions_get Scheme_Config_configs_set Scheme_Config_configs_get new_Scheme_Config delete_Scheme_Config Scheme_Input_Port_type_set Scheme_Input_Port_type_get Scheme_Input_Port_closed_set Scheme_Input_Port_closed_get Scheme_Input_Port_pending_eof_set Scheme_Input_Port_pending_eof_get Scheme_Input_Port_sub_type_set Scheme_Input_Port_sub_type_get Scheme_Input_Port_mref_set Scheme_Input_Port_mref_get Scheme_Input_Port_port_data_set Scheme_Input_Port_port_data_get Scheme_Input_Port_get_string_fun_set Scheme_Input_Port_get_string_fun_get Scheme_Input_Port_peek_string_fun_set Scheme_Input_Port_peek_string_fun_get Scheme_Input_Port_char_ready_fun_set Scheme_Input_Port_char_ready_fun_get Scheme_Input_Port_close_fun_set Scheme_Input_Port_close_fun_get Scheme_Input_Port_need_wakeup_fun_set Scheme_Input_Port_need_wakeup_fun_get Scheme_Input_Port_read_handler_set Scheme_Input_Port_read_handler_get Scheme_Input_Port_name_set Scheme_Input_Port_name_get Scheme_Input_Port_peeked_read_set Scheme_Input_Port_peeked_read_get Scheme_Input_Port_peeked_write_set Scheme_Input_Port_peeked_write_get Scheme_Input_Port_ungotten_set Scheme_Input_Port_ungotten_get Scheme_Input_Port_ungotten_count_set Scheme_Input_Port_ungotten_count_get Scheme_Input_Port_special_set Scheme_Input_Port_special_get Scheme_Input_Port_ungotten_special_set Scheme_Input_Port_ungotten_special_get Scheme_Input_Port_position_set Scheme_Input_Port_position_get Scheme_Input_Port_readpos_set Scheme_Input_Port_readpos_get Scheme_Input_Port_lineNumber_set Scheme_Input_Port_lineNumber_get Scheme_Input_Port_charsSinceNewline_set Scheme_Input_Port_charsSinceNewline_get Scheme_Input_Port_column_set Scheme_Input_Port_column_get Scheme_Input_Port_oldColumn_set Scheme_Input_Port_oldColumn_get Scheme_Input_Port_count_lines_set Scheme_Input_Port_count_lines_get Scheme_Input_Port_was_cr_set Scheme_Input_Port_was_cr_get Scheme_Input_Port_output_half_set Scheme_Input_Port_output_half_get new_Scheme_Input_Port delete_Scheme_Input_Port Scheme_Output_Port_type_set Scheme_Output_Port_type_get Scheme_Output_Port_closed_set Scheme_Output_Port_closed_get Scheme_Output_Port_sub_type_set Scheme_Output_Port_sub_type_get Scheme_Output_Port_mref_set Scheme_Output_Port_mref_get Scheme_Output_Port_port_data_set Scheme_Output_Port_port_data_get Scheme_Output_Port_write_string_fun_set Scheme_Output_Port_write_string_fun_get Scheme_Output_Port_close_fun_set Scheme_Output_Port_close_fun_get Scheme_Output_Port_ready_fun_set Scheme_Output_Port_ready_fun_get Scheme_Output_Port_need_wakeup_fun_set Scheme_Output_Port_need_wakeup_fun_get Scheme_Output_Port_pos_set Scheme_Output_Port_pos_get Scheme_Output_Port_display_handler_set Scheme_Output_Port_display_handler_get Scheme_Output_Port_write_handler_set Scheme_Output_Port_write_handler_get Scheme_Output_Port_print_handler_set Scheme_Output_Port_print_handler_get Scheme_Output_Port_input_half_set Scheme_Output_Port_input_half_get new_Scheme_Output_Port delete_Scheme_Output_Port $SCHEME_SPECIAL $MZEXN $MZEXN_USER $MZEXN_VARIABLE $MZEXN_APPLICATION $MZEXN_APPLICATION_ARITY $MZEXN_APPLICATION_TYPE $MZEXN_APPLICATION_MISMATCH $MZEXN_APPLICATION_DIVIDE_BY_ZERO $MZEXN_APPLICATION_CONTINUATION $MZEXN_SYNTAX $MZEXN_READ $MZEXN_READ_EOF $MZEXN_READ_NON_CHAR $MZEXN_I_O $MZEXN_I_O_PORT $MZEXN_I_O_PORT_READ $MZEXN_I_O_PORT_WRITE $MZEXN_I_O_PORT_CLOSED $MZEXN_I_O_FILESYSTEM $MZEXN_I_O_TCP $MZEXN_I_O_UDP $MZEXN_THREAD $MZEXN_MODULE $MZEXN_BREAK $MZEXN_SPECIAL_COMMENT $MZEXN_MISC $MZEXN_MISC_UNSUPPORTED $MZEXN_MISC_OUT_OF_MEMORY $MZEXN_OTHER $SCHEME_GUARD_FILE_READ $SCHEME_GUARD_FILE_WRITE $SCHEME_GUARD_FILE_EXECUTE $SCHEME_GUARD_FILE_DELETE $SCHEME_GUARD_FILE_EXISTS scheme_exit scheme_console_printf scheme_console_output scheme_sleep scheme_notify_multithread scheme_wakeup_on_input scheme_check_for_break scheme_module_demand_hook scheme_make_stdin scheme_make_stdout scheme_make_stderr scheme_actual_main scheme_on_atomic_timeout scheme_init_jmpup_buf scheme_setjmpup_relative scheme_longjmpup scheme_reset_jmpup_buf scheme_clear_escape scheme_new_jmpupbuf_holder scheme_make_config scheme_branch_config scheme_new_param scheme_param_config scheme_register_parameter scheme_get_env $scheme_current_thread $scheme_fuel_counter scheme_out_of_fuel scheme_thread scheme_thread_w_custodian scheme_thread_w_custodian_killkind scheme_kill_thread scheme_break_thread scheme_thread_block scheme_swap_thread scheme_making_progress scheme_weak_suspend_thread scheme_weak_resume_thread scheme_block_until scheme_in_main_thread scheme_cancel_sleep scheme_tls_allocate scheme_tls_set scheme_tls_get scheme_make_custodian scheme_add_managed scheme_custodian_check_available scheme_remove_managed scheme_close_managed scheme_schedule_custodian_close scheme_add_custodian_extractor scheme_add_atexit_closer scheme_add_waitable scheme_add_waitable_through_sema scheme_is_waitable scheme_object_wait_multiple scheme_object_wait_multiple_enable_break scheme_make_waitable_set scheme_add_swap_callback scheme_call_enable_break scheme_close_should_force_port_closed scheme_push_kill_action scheme_pop_kill_action scheme_signal_error scheme_raise_exn scheme_warning scheme_raise scheme_wrong_count scheme_wrong_count_m scheme_case_lambda_wrong_count scheme_wrong_type scheme_arg_mismatch scheme_wrong_return_arity scheme_unbound_global scheme_dynamic_wind scheme_make_type scheme_get_type_name $scheme_eof scheme_make_eof $scheme_null scheme_make_null $scheme_true scheme_make_true $scheme_false scheme_make_false $scheme_void scheme_make_void $scheme_undefined $scheme_tail_call_waiting $scheme_multiple_values scheme_eval scheme_eval_multi scheme_eval_compiled scheme_eval_compiled_multi _scheme_eval_compiled _scheme_eval_compiled_multi scheme_apply scheme_apply_multi scheme_apply_eb scheme_apply_multi_eb scheme_apply_to_list scheme_eval_string scheme_eval_string_multi scheme_eval_string_all _scheme_apply_known_closed_prim _scheme_apply_known_closed_prim_multi _scheme_apply_closed_prim _scheme_apply_closed_prim_multi scheme_values scheme_check_one_value scheme_tail_apply scheme_tail_apply_no_copy scheme_tail_apply_to_list scheme_tail_eval_expr scheme_set_tail_buffer_size scheme_force_value scheme_set_cont_mark scheme_push_continuation_frame scheme_pop_continuation_frame scheme_temp_dec_mark_depth scheme_temp_inc_mark_depth scheme_current_continuation_marks scheme_do_eval scheme_eval_compiled_stx_string scheme_load_compiled_stx_string scheme_compiled_stx_symbol scheme_eval_compiled_sized_string GC_malloc GC_malloc_atomic GC_malloc_stubborn GC_malloc_uncollectable scheme_malloc_eternal scheme_end_stubborn_change scheme_calloc scheme_strdup scheme_strdup_eternal scheme_malloc_fail_ok scheme_weak_reference scheme_weak_reference_indirect scheme_unweak_reference scheme_add_finalizer scheme_add_finalizer_once scheme_add_scheme_finalizer scheme_add_scheme_finalizer_once scheme_register_finalizer scheme_remove_all_finalization scheme_dont_gc_ptr scheme_gc_ptr_ok scheme_collect_garbage scheme_make_bucket_table scheme_add_to_table scheme_change_in_table scheme_lookup_in_table scheme_bucket_from_table scheme_bucket_table_equal scheme_make_hash_table scheme_make_hash_table_equal scheme_hash_set scheme_hash_get scheme_hash_table_equal scheme_is_hash_table_equal scheme_make_prim scheme_make_noneternal_prim scheme_make_closed_prim scheme_make_prim_w_arity scheme_make_folding_prim scheme_make_noneternal_prim_w_arity scheme_make_closed_prim_w_arity scheme_make_folding_closed_prim scheme_make_prim_w_everything scheme_make_closed_prim_w_everything scheme_prim_is_method scheme_make_pair scheme_make_immutable_pair scheme_make_string scheme_make_sized_string scheme_make_sized_offset_string scheme_make_immutable_sized_string scheme_make_string_without_copying scheme_alloc_string scheme_append_string scheme_make_vector scheme_make_integer_value scheme_make_integer_value_from_unsigned scheme_make_integer_value_from_long_long scheme_make_integer_value_from_unsigned_long_long scheme_make_double scheme_make_char scheme_make_sema scheme_post_sema scheme_post_sema_all scheme_wait_sema $scheme_char_constants scheme_make_channel scheme_get_int_val scheme_get_unsigned_int_val scheme_real_to_double scheme_make_cptr scheme_get_proc_name scheme_make_bignum scheme_make_bignum_from_unsigned scheme_bignum_to_double scheme_bignum_from_double scheme_bignum_to_string scheme_bignum_to_allocated_string scheme_read_bignum scheme_bignum_normalize scheme_make_rational scheme_rational_to_double scheme_rational_from_double scheme_rational_normalize scheme_rational_numerator scheme_rational_denominator scheme_make_complex scheme_complex_normalize scheme_complex_real_part scheme_complex_imaginary_part scheme_is_exact scheme_is_inexact scheme_expand scheme_compile scheme_read scheme_read_syntax scheme_write scheme_display scheme_write_w_max scheme_display_w_max scheme_write_string scheme_put_string scheme_write_to_string scheme_display_to_string scheme_write_to_string_w_max scheme_display_to_string_w_max scheme_debug_print scheme_flush_output scheme_format scheme_printf scheme_getc scheme_peekc scheme_peekc_skip scheme_getc_special_ok scheme_peekc_special_ok scheme_peekc_special_ok_skip scheme_ungetc scheme_char_ready scheme_peekc_is_ungetc scheme_need_wakeup scheme_get_string scheme_get_chars scheme_tell scheme_output_tell scheme_tell_line scheme_tell_column scheme_count_lines scheme_close_input_port scheme_close_output_port scheme_make_port_type scheme_make_input_port scheme_make_output_port scheme_open_input_file scheme_open_output_file scheme_make_file_input_port scheme_make_named_file_input_port scheme_make_file_output_port scheme_make_string_input_port scheme_make_sized_string_input_port scheme_make_string_output_port scheme_get_string_output scheme_get_sized_string_output scheme_pipe scheme_pipe_with_limit scheme_set_file_position scheme_file_exists scheme_directory_exists scheme_expand_filename scheme_os_getcwd scheme_os_setcwd scheme_getdrive scheme_split_pathname scheme_build_pathname scheme_alloc_fdset_array scheme_init_fdset_array scheme_get_fdset scheme_fdzero scheme_fdset scheme_fdclr scheme_fdisset scheme_add_fd_handle scheme_add_fd_eventmask scheme_security_check_file scheme_security_check_network scheme_get_host_address scheme_make_namespace scheme_add_namespace_option scheme_require_from_original_env scheme_add_global scheme_add_global_symbol scheme_make_envunbox scheme_lookup_global scheme_global_bucket scheme_global_keyword_bucket scheme_module_bucket scheme_exptime_global_bucket scheme_exptime_module_bucket scheme_builtin_value scheme_set_global_bucket scheme_install_macro scheme_save_initial_module_set scheme_primitive_module scheme_finish_primitive_module scheme_make_modidx scheme_declare_module scheme_intern_symbol scheme_intern_exact_symbol scheme_make_symbol scheme_make_exact_symbol scheme_symbol_name scheme_symbol_name_and_size scheme_symbol_val scheme_make_struct_values scheme_make_struct_names scheme_make_struct_type scheme_make_struct_instance scheme_make_struct_exptime scheme_is_struct_instance scheme_struct_ref scheme_struct_set scheme_make_struct_type_property scheme_make_struct_type_property_w_guard scheme_struct_type_property_ref scheme_eq scheme_eqv scheme_equal scheme_equal_hash_key scheme_equal_hash_key2 scheme_build_list scheme_make_list_immutable scheme_list_length scheme_proper_list_length scheme_alloc_list scheme_map_1 scheme_car scheme_cdr scheme_cadr scheme_caddr scheme_vector_to_list scheme_list_to_vector scheme_append scheme_box scheme_unbox scheme_set_box scheme_make_weak_box scheme_load scheme_load_extension scheme_register_extension_global scheme_get_seconds scheme_get_milliseconds scheme_get_inexact_milliseconds scheme_get_process_milliseconds scheme_banner scheme_version scheme_check_proc_arity scheme_make_provided_string scheme_make_args_string scheme_no_dumps scheme_system_library_subpath scheme_signal_received $SCHEME_SNF_FOR_TS $SCHEME_SNF_PIPE_QUOTE $SCHEME_SNF_NO_PIPE_QUOTE $SCHEME_SNF_NEED_CASE $SCHEME_STRUCT_NO_TYPE $SCHEME_STRUCT_NO_CONSTR $SCHEME_STRUCT_NO_PRED $SCHEME_STRUCT_NO_GET $SCHEME_STRUCT_NO_SET $SCHEME_STRUCT_GEN_GET $SCHEME_STRUCT_GEN_SET $SCHEME_STRUCT_EXPTIME );
+1;
Modified: mzscheme/Language-MzScheme/mzscheme.i
==============================================================================
--- mzscheme/Language-MzScheme/mzscheme.i (original)
+++ mzscheme/Language-MzScheme/mzscheme.i Mon Jun 7 03:28:53 2004
@@ -1,10 +1,9 @@
-%module mzscheme
%{
#include "scheme.h"
void mzscheme_init () {
int dummy;
- scheme_set_stack_base(&dummy, 0);
+ scheme_set_stack_base(&dummy, 1);
}
%}
More information about the Rt-commit
mailing list