summaryrefslogtreecommitdiff
path: root/libguile/control.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/control.c')
-rw-r--r--libguile/control.c4
1 files changed, 1 insertions, 3 deletions
diff --git a/libguile/control.c b/libguile/control.c
index 7120ffee9..aad5aba5f 100644
--- a/libguile/control.c
+++ b/libguile/control.c
@@ -108,12 +108,10 @@ reify_partial_continuation (SCM vm,
if (SCM_FRAME_DYNAMIC_LINK (bottom_fp) != saved_fp)
abort();
- /* Capture from the top of the thunk application frame up to the end. Set an
- MVRA only, as the post-abort code is in an MV context. */
+ /* Capture from the top of the thunk application frame up to the end. */
vm_cont = scm_i_vm_capture_stack (bottom_fp - 1,
SCM_VM_DATA (vm)->fp,
SCM_VM_DATA (vm)->sp,
- NULL,
SCM_VM_DATA (vm)->ip,
dynstack,
flags);