summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--sly/signal.scm4
1 files changed, 4 insertions, 0 deletions
diff --git a/sly/signal.scm b/sly/signal.scm
index 9547f17..0ddda2a 100644
--- a/sly/signal.scm
+++ b/sly/signal.scm
@@ -183,11 +183,15 @@ be coerced into one."
((_ name value)
#'(define name (make-signal-maybe value))))))
+;; emacs: (put 'signal-let 'scheme-indent-function 1)
+
(define-syntax-rule (signal-let ((var signal) ...) body ...)
"Similar to 'let', but produces a signal whose value is dependent
upon all signals in the bindings list."
(signal-map (lambda (var ...) body ...) signal ...))
+;; emacs: (put 'signal-let* 'scheme-indent-function 1)
+
(define-syntax-rule (signal-let* ((var signal) ...) body ...)
"Similar to 'signal-let', but the signal variable bindings are
performed sequentially."