summaryrefslogtreecommitdiffstats
path: root/unwind.c
diff options
context:
space:
mode:
Diffstat (limited to 'unwind.c')
-rw-r--r--unwind.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/unwind.c b/unwind.c
index 1da59d19..0202f4e4 100644
--- a/unwind.c
+++ b/unwind.c
@@ -751,7 +751,8 @@ val uw_capture_cont(val tag, val ctx)
uw_frame_t *fr;
for (fr = uw_stack; fr != 0; fr = fr->uw.up) {
- if (fr->uw.type == UW_BLOCK && fr->bl.tag == tag)
+ if ((fr->uw.type == UW_BLOCK || fr->uw.type == UW_CAPTURED_BLOCK)
+ && fr->bl.tag == tag)
break;
}