diff --git a/lib/scheme/misc-macros.scm b/lib/scheme/misc-macros.scm
index 7b367671..aaddccc4 100644
--- a/lib/scheme/misc-macros.scm
+++ b/lib/scheme/misc-macros.scm
@@ -25,7 +25,7 @@
                                              (raise-continuable condition)))
                                 clause ...))))))))
           (lambda ()
-            (let ((res (begin e1 e2 ...)))
+            (let ((res (let () e1 e2 ...)))
               (guard-k (lambda () res)))))))))))
 
 (define-syntax guard-aux