diff options
Diffstat (limited to 'libguile/gdbint.c')
-rw-r--r-- | libguile/gdbint.c | 4 |
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); } |