summaryrefslogtreecommitdiff
path: root/libguile/gdbint.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/gdbint.c')
-rw-r--r--libguile/gdbint.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/gdbint.c b/libguile/gdbint.c
index 74e70fe13..3ce4f2eca 100644
--- a/libguile/gdbint.c
+++ b/libguile/gdbint.c
@@ -255,7 +255,7 @@ gdb_eval (exp)
}
SCM_BEGIN_FOREIGN_BLOCK;
{
- SCM env = scm_top_level_env (SCM_CDR (scm_top_level_lookup_thunk_var));
+ SCM env = scm_top_level_env (SCM_CDR (scm_top_level_lookup_closure_var));
gdb_result = scm_permanent_object (scm_ceval (exp, env));
}
SCM_END_FOREIGN_BLOCK;
@@ -293,7 +293,7 @@ gdb_binding (name, value)
SCM_BEGIN_FOREIGN_BLOCK;
{
SCM vcell = scm_sym2vcell (name,
- SCM_CDR (scm_top_level_lookup_thunk_var),
+ SCM_CDR (scm_top_level_lookup_closure_var),
SCM_BOOL_T);
SCM_SETCDR (vcell, value);
}