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/eval.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/eval.h')
-rw-r--r-- | libguile/eval.h | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/libguile/eval.h b/libguile/eval.h index 014f0dec5..9e5f65467 100644 --- a/libguile/eval.h +++ b/libguile/eval.h @@ -3,7 +3,7 @@ #ifndef SCM_EVAL_H #define SCM_EVAL_H -/* Copyright (C) 1995,1996,1998,1999,2000,2001,2002,2003,2004,2008,2009,2010,2011 +/* Copyright (C) 1995,1996,1998,1999,2000,2001,2002,2003,2004,2008,2009,2010,2011,2012 * Free Software Foundation, Inc. * * This library is free software; you can redistribute it and/or @@ -57,10 +57,6 @@ typedef SCM (*scm_t_trampoline_2) (SCM proc, SCM arg1, SCM arg2); #define SCM_EXTEND_ENV scm_acons -/*fixme* This should probably be removed throught the code. */ - -#define SCM_TOP_LEVEL_LOOKUP_CLOSURE (scm_current_module_lookup_closure()) - SCM_API SCM scm_call_0 (SCM proc); |