summaryrefslogtreecommitdiff
path: root/libguile/memoize.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/memoize.c')
-rw-r--r--libguile/memoize.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/libguile/memoize.c b/libguile/memoize.c
index 393598e94..977b86933 100644
--- a/libguile/memoize.c
+++ b/libguile/memoize.c
@@ -377,9 +377,9 @@ memoize (SCM exp, SCM env)
SCM vars, exps, body, undefs, inits, sets, new_env;
int i, nvars;
- vars = REF (exp, LET, GENSYMS);
- exps = REF (exp, LET, VALS);
- body = REF (exp, LET, BODY);
+ vars = REF (exp, LETREC, GENSYMS);
+ exps = REF (exp, LETREC, VALS);
+ body = REF (exp, LETREC, BODY);
nvars = i = scm_ilength (vars);
inits = undefs = sets = SCM_EOL;
new_env = env;