diff options
author | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 2000-06-21 02:42:14 +0000 |
---|---|---|
committer | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 2000-06-21 02:42:14 +0000 |
commit | a0ea2bf0433a3519394429f891ac04e62d79819f (patch) | |
tree | d86ea49542f6b245e4b5d29d05347a3f890abc8a /libguile/eval.h | |
parent | 549e6ec69d0ba7d3cfadc9575c62f3e94f7c63b8 (diff) | |
download | guile-a0ea2bf0433a3519394429f891ac04e62d79819f.tar.gz |
* eval.c, eval.h (scm_top_level_lookup_closure_var): Added.
#include "libguile/fluids.h".
* eval.h (SCM_TOP_LEVEL_LOOKUP_CLOSURE): New macro which replaces
SCM_CDR (scm_top_level_lookup_closure_var) everywhere.
Diffstat (limited to 'libguile/eval.h')
-rw-r--r-- | libguile/eval.h | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/libguile/eval.h b/libguile/eval.h index 7f3abc6de..4fa1e6d7a 100644 --- a/libguile/eval.h +++ b/libguile/eval.h @@ -118,6 +118,12 @@ extern SCM scm_eval_options_interface (SCM setting); #define SCM_EXTEND_ENV scm_acons + +#define SCM_TOP_LEVEL_LOOKUP_CLOSURE scm_fluid_ref (SCM_CDR (scm_top_level_lookup_closure_var)) + +extern SCM scm_system_transformer; +extern SCM scm_top_level_lookup_closure_var; + extern const char scm_s_expression[]; extern const char scm_s_test[]; |