remove scheme_require_from_original_env from linking table
svn: r11431
This commit is contained in:
parent
e0658b6e27
commit
553e068ccf
|
@ -463,7 +463,6 @@ scheme_print_string
|
|||
scheme_read_byte_string
|
||||
scheme_make_namespace
|
||||
scheme_add_namespace_option
|
||||
scheme_require_from_original_env
|
||||
scheme_add_global
|
||||
scheme_add_global_symbol
|
||||
scheme_make_envunbox
|
||||
|
|
|
@ -473,7 +473,6 @@ scheme_print_string
|
|||
scheme_read_byte_string
|
||||
scheme_make_namespace
|
||||
scheme_add_namespace_option
|
||||
scheme_require_from_original_env
|
||||
scheme_add_global
|
||||
scheme_add_global_symbol
|
||||
scheme_make_envunbox
|
||||
|
|
|
@ -451,7 +451,6 @@ EXPORTS
|
|||
scheme_read_byte_string
|
||||
scheme_make_namespace
|
||||
scheme_add_namespace_option
|
||||
scheme_require_from_original_env
|
||||
scheme_add_global
|
||||
scheme_add_global_symbol
|
||||
scheme_make_envunbox
|
||||
|
|
|
@ -465,7 +465,6 @@ EXPORTS
|
|||
scheme_read_byte_string
|
||||
scheme_make_namespace
|
||||
scheme_add_namespace_option
|
||||
scheme_require_from_original_env
|
||||
scheme_add_global
|
||||
scheme_add_global_symbol
|
||||
scheme_make_envunbox
|
||||
|
|
|
@ -5069,7 +5069,7 @@ static Scheme_Object *gen_compare(char *name, int pos,
|
|||
startp_buffer = NULL;
|
||||
} else {
|
||||
startp = MALLOC_N_ATOMIC(rxpos, r->nsubexp);
|
||||
maybep = NULL;
|
||||
maybep = NULL;
|
||||
endp = MALLOC_N_ATOMIC(rxpos, r->nsubexp);
|
||||
}
|
||||
if ((r->nsubexp > 1) && !maybep)
|
||||
|
|
|
@ -890,8 +890,6 @@ MZ_EXTERN Scheme_Object *scheme_read_byte_string(Scheme_Object *port);
|
|||
MZ_EXTERN Scheme_Object *scheme_make_namespace(int argc, Scheme_Object *argv[]);
|
||||
MZ_EXTERN void scheme_add_namespace_option(Scheme_Object *key, void (*f)(Scheme_Env *));
|
||||
|
||||
MZ_EXTERN void scheme_require_from_original_env(Scheme_Env *env, int syntax_only);
|
||||
|
||||
MZ_EXTERN void scheme_add_global(const char *name, Scheme_Object *val, Scheme_Env *env);
|
||||
MZ_EXTERN void scheme_add_global_symbol(Scheme_Object *name, Scheme_Object *val,
|
||||
Scheme_Env *env);
|
||||
|
|
|
@ -745,7 +745,6 @@ Scheme_Object *(*scheme_read_byte_string)(Scheme_Object *port);
|
|||
/*========================================================================*/
|
||||
Scheme_Object *(*scheme_make_namespace)(int argc, Scheme_Object *argv[]);
|
||||
void (*scheme_add_namespace_option)(Scheme_Object *key, void (*f)(Scheme_Env *));
|
||||
void (*scheme_require_from_original_env)(Scheme_Env *env, int syntax_only);
|
||||
void (*scheme_add_global)(const char *name, Scheme_Object *val, Scheme_Env *env);
|
||||
void (*scheme_add_global_symbol)(Scheme_Object *name, Scheme_Object *val,
|
||||
Scheme_Env *env);
|
||||
|
|
|
@ -515,7 +515,6 @@
|
|||
scheme_extension_table->scheme_read_byte_string = scheme_read_byte_string;
|
||||
scheme_extension_table->scheme_make_namespace = scheme_make_namespace;
|
||||
scheme_extension_table->scheme_add_namespace_option = scheme_add_namespace_option;
|
||||
scheme_extension_table->scheme_require_from_original_env = scheme_require_from_original_env;
|
||||
scheme_extension_table->scheme_add_global = scheme_add_global;
|
||||
scheme_extension_table->scheme_add_global_symbol = scheme_add_global_symbol;
|
||||
scheme_extension_table->scheme_make_envunbox = scheme_make_envunbox;
|
||||
|
|
|
@ -515,7 +515,6 @@
|
|||
#define scheme_read_byte_string (scheme_extension_table->scheme_read_byte_string)
|
||||
#define scheme_make_namespace (scheme_extension_table->scheme_make_namespace)
|
||||
#define scheme_add_namespace_option (scheme_extension_table->scheme_add_namespace_option)
|
||||
#define scheme_require_from_original_env (scheme_extension_table->scheme_require_from_original_env)
|
||||
#define scheme_add_global (scheme_extension_table->scheme_add_global)
|
||||
#define scheme_add_global_symbol (scheme_extension_table->scheme_add_global_symbol)
|
||||
#define scheme_make_envunbox (scheme_extension_table->scheme_make_envunbox)
|
||||
|
|
Loading…
Reference in New Issue
Block a user