mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-06-18 01:30:27 +02:00
finish deprecating eval closures
* libguile/deprecated.h: * libguile/deprecated.c (scm_eval_closure_lookup) (scm_standard_eval_closure, scm_standard_interface_eval_closure) (scm_eval_closure_module): Deprecate these, as they are unused. * libguile/modules.h: * libguile/modules.c: Remove deprecated code. * module/oop/goops/util.scm (top-level-env, top-level-env?): Deprecate. * module/ice-9/deprecated.scm (set-system-module!): Deprecate. (module-eval-closure): Deprecate, by overriding the core definition to return a fresh eval closure. * module/ice-9/boot-9.scm (make-module): Don't set an eval closure on the module. (the-root-module, the-scm-module): Don't call set-system-module!.
This commit is contained in:
parent
3f48638c8c
commit
2de74cb56e
7 changed files with 120 additions and 151 deletions
|
@ -64,10 +64,6 @@ SCM_API scm_t_bits scm_module_tag;
|
|||
#define SCM_MODULE_IMPORT_OBARRAY(module) \
|
||||
SCM_PACK (SCM_STRUCT_DATA (module)[scm_module_index_import_obarray])
|
||||
|
||||
SCM_API scm_t_bits scm_tc16_eval_closure;
|
||||
|
||||
#define SCM_EVAL_CLOSURE_P(x) SCM_TYP16_PREDICATE (scm_tc16_eval_closure, x)
|
||||
|
||||
|
||||
|
||||
SCM_API SCM scm_current_module (void);
|
||||
|
@ -121,10 +117,6 @@ SCM_API SCM scm_module_public_interface (SCM module);
|
|||
SCM_API SCM scm_module_import_interface (SCM module, SCM sym);
|
||||
SCM_API SCM scm_module_transformer (SCM module);
|
||||
SCM_API SCM scm_current_module_transformer (void);
|
||||
SCM_API SCM scm_eval_closure_lookup (SCM eclo, SCM sym, SCM definep);
|
||||
SCM_API SCM scm_standard_eval_closure (SCM module);
|
||||
SCM_API SCM scm_standard_interface_eval_closure (SCM module);
|
||||
SCM_API SCM scm_eval_closure_module (SCM eval_closure); /* deprecated already */
|
||||
SCM_API SCM scm_get_pre_modules_obarray (void);
|
||||
|
||||
SCM_INTERNAL void scm_modules_prehistory (void);
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue