summaryrefslogtreecommitdiffstats
path: root/share
diff options
context:
space:
mode:
Diffstat (limited to 'share')
-rw-r--r--share/txr/stdlib/yield.tl2
1 files changed, 1 insertions, 1 deletions
diff --git a/share/txr/stdlib/yield.tl b/share/txr/stdlib/yield.tl
index f763d3e5..97c0cd87 100644
--- a/share/txr/stdlib/yield.tl
+++ b/share/txr/stdlib/yield.tl
@@ -86,5 +86,5 @@
(defmacro suspend (:form form name var . body)
^(sys:capture-cont ',name (lambda (,var)
- (sys:abscond-from ,name ,*body))
+ (sys:abscond-from ,name (progn ,*body)))
',form))