From e2806c1000054f765c46bd14f8fb64a4d74d4eea Mon Sep 17 00:00:00 2001 From: Mikael Djurfeldt Date: Fri, 13 Sep 1996 11:07:24 +0000 Subject: * __scm.h, chars.c, debug.c, eval.c, eval.h, extchrs.c, extchrs.h, fdsocket.c, feature.c, mbstrings.c, mbstrings.h, numbers.c, numbers.h, print.c, scmhob.h, simpos.h, symbols.c, symbols.h, tags.h, throw.c, variable.h: Name cleanup. Lots of xxxSCM_yyy removed. (These were introduced by unsupervised name substitution.) --- libguile/debug.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'libguile/debug.c') diff --git a/libguile/debug.c b/libguile/debug.c index 59fa029b3..a7a7704a7 100644 --- a/libguile/debug.c +++ b/libguile/debug.c @@ -278,7 +278,7 @@ scm_procedure_source (proc) src = SCM_CODE (proc); return scm_cons (scm_i_lambda, scm_unmemocopy (src, - SCM_EXTEND_SCM_ENV (SCM_CAR (src), + SCM_EXTEND_ENV (SCM_CAR (src), SCM_EOL, SCM_ENV (proc)))); } -- cgit v1.2.3