From a2ebdba7acefdc62ae8be378415f70a0aed68b2e Mon Sep 17 00:00:00 2001
From: Andy Wingo <wingo@pobox.com>
Date: Wed, 16 Apr 2014 19:18:29 +0200
Subject: [PATCH] Fix rewinding continuations when outermost frame has zero
 locals

* libguile/vm.c (vm_reinstate_partial_continuation_inner): Fix boundary
  condition when the outermost frame has zero locals.
---
 libguile/vm.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/libguile/vm.c b/libguile/vm.c
index 6946afd98..86a3dfc60 100644
--- a/libguile/vm.c
+++ b/libguile/vm.c
@@ -397,7 +397,7 @@ vm_reinstate_partial_continuation_inner (void *data_ptr)
   {
     SCM *fp;
     for (fp = vp->fp;
-         SCM_FRAME_LOWER_ADDRESS (fp) > base;
+         SCM_FRAME_LOWER_ADDRESS (fp) >= base;
          fp = SCM_FRAME_DYNAMIC_LINK (fp))
       SCM_FRAME_SET_DYNAMIC_LINK (fp, SCM_FRAME_DYNAMIC_LINK (fp) + reloc);
   }