From 318077a65d5a81bc410bd309c3695ab93a72b892 Mon Sep 17 00:00:00 2001 From: Arun Isaac Date: Sat, 11 Jan 2025 01:20:05 +0000 Subject: monads: Rename bindings to other-bindings in mlet*. other-bindings is a more descriptive name. * ravanan/work/monads.scm (mlet*): Rename bindings to other-bindings. --- ravanan/work/monads.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/ravanan/work/monads.scm b/ravanan/work/monads.scm index 7f5106d..866e1d7 100644 --- a/ravanan/work/monads.scm +++ b/ravanan/work/monads.scm @@ -57,11 +57,11 @@ ((_ monad-type () body ...) (begin body ...)) - ((_ monad-type ((var mvalue) bindings ...) body ...) + ((_ monad-type ((var mvalue) other-bindings ...) body ...) ((monad-bind monad-type) mvalue (lambda (var) - (mlet* monad-type (bindings ...) + (mlet* monad-type (other-bindings ...) body ...)))))) (define-syntax mbegin -- cgit v1.2.3