about summary refs log tree commit diff
diff options
context:
space:
mode:
-rw-r--r--ravanan/work/monads.scm5
1 files changed, 3 insertions, 2 deletions
diff --git a/ravanan/work/monads.scm b/ravanan/work/monads.scm
index 866e1d7..7fd7e79 100644
--- a/ravanan/work/monads.scm
+++ b/ravanan/work/monads.scm
@@ -1,5 +1,5 @@
 ;;; ravanan --- High-reproducibility CWL runner powered by Guix
-;;; Copyright © 2024, 2025 Arun Isaac <arunisaac@systemreboot.net>
+;;; Copyright © 2024–2026 Arun Isaac <arunisaac@systemreboot.net>
 ;;;
 ;;; This file is part of ravanan.
 ;;;
@@ -72,7 +72,8 @@
      ((monad-bind monad-type)
       first-expression
       (lambda _
-        body ...)))))
+        (mbegin monad-type
+          body ...))))))
 
 (define (sequence monad-type mvalues)
   "Convert a list of monadic @var{mvalues} in @var{monad-type} into a monadic list