diff options
author | Andy Wingo <wingo@pobox.com> | 2012-05-23 12:00:23 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2012-05-23 12:00:23 +0200 |
commit | 3f48638c8c82d7839b75204e475af691fcd67c33 (patch) | |
tree | b6620a485207fe45f1266227ad6d0d8b3ab7146b /libguile/deprecated.h | |
parent | 62e15979b5d773dda79c4f44c07e919b5d0f6e18 (diff) | |
download | guile-3f48638c8c82d7839b75204e475af691fcd67c33.tar.gz |
deprecate lookup closures
* libguile/deprecated.h (SCM_TOP_LEVEL_LOOKUP_CLOSURE):
* libguile/deprecated.c (scm_lookup_closure_module):
(scm_module_lookup_closure):
(scm_current_module_lookup_closure): Deprecate this part of the eval
closure interface. It was unused internally, after the scm_sym2var
refactor.
* libguile/eval.h:
* libguile/modules.c:
* libguile/modules.h: Remove deprecated code.
* libguile/goops.c (scm_ensure_accessor): Use scm_module_variable
instead of calling the lookup closure. However I'm not sure that this
code is used at all.
Diffstat (limited to 'libguile/deprecated.h')
-rw-r--r-- | libguile/deprecated.h | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/libguile/deprecated.h b/libguile/deprecated.h index be6cd81db..e777d2f80 100644 --- a/libguile/deprecated.h +++ b/libguile/deprecated.h @@ -817,6 +817,16 @@ SCM_DEPRECATED SCM scm_sym2var (SCM sym, SCM thunk, SCM definep); +/* Eval closure deprecation, 23-05-2012. */ +#define SCM_TOP_LEVEL_LOOKUP_CLOSURE (scm_current_module_lookup_closure()) + +SCM_DEPRECATED SCM scm_lookup_closure_module (SCM proc); +SCM_DEPRECATED SCM scm_module_lookup_closure (SCM module); +SCM_DEPRECATED SCM scm_current_module_lookup_closure (void); + + + + void scm_i_init_deprecated (void); #endif |