From 0aa1e432c070996a72f27ff367ea8a2647d4ea09 Mon Sep 17 00:00:00 2001 From: Marius Vollmer Date: Wed, 27 Nov 1996 23:29:29 +0000 Subject: [PATCH] * eval.c (scm_definedp): Use top_level_lookup_closure_var and not top_level_lookup_thunk_var. --- libguile/eval.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/libguile/eval.c b/libguile/eval.c index b3549a7bd..6fee7e969 100644 --- a/libguile/eval.c +++ b/libguile/eval.c @@ -2843,7 +2843,7 @@ scm_definedp (sym) SCM_ASSERT (SCM_NIMP (sym) && SCM_SYMBOLP (sym), sym, SCM_ARG1, s_definedp); vcell = scm_sym2vcell(sym, - SCM_CDR (scm_top_level_lookup_thunk_var), + SCM_CDR (scm_top_level_lookup_closure_var), SCM_BOOL_F); return (vcell == SCM_BOOL_F || SCM_UNBNDP(SCM_CDR(vcell))) ? SCM_BOOL_F : SCM_BOOL_T;