diff options
Diffstat (limited to 'libguile/eval.c')
-rw-r--r-- | libguile/eval.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/eval.c b/libguile/eval.c index ac11090a6..3e828a178 100644 --- a/libguile/eval.c +++ b/libguile/eval.c @@ -447,7 +447,7 @@ eval (SCM x, SCM env) k = EVAL1 (CAR (mx), env); handler = EVAL1 (CDDR (mx), env); - vp = SCM_VM_DATA (scm_the_vm ()); + vp = scm_the_vm (); /* Push the prompt onto the dynamic stack. */ scm_dynstack_push_prompt (&SCM_I_CURRENT_THREAD->dynstack, @@ -463,7 +463,7 @@ eval (SCM x, SCM env) { /* The prompt exited nonlocally. */ proc = handler; - vp = SCM_VM_DATA (scm_the_vm ()); + vp = scm_the_vm (); args = scm_i_prompt_pop_abort_args_x (vp); goto apply_proc; } |