summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Thompson <dthompson2@worcester.edu>2014-08-27 11:30:50 -0400
committerDavid Thompson <dthompson2@worcester.edu>2014-08-27 11:30:50 -0400
commit19245613f79f3c4ea767b2315f023f325cc15c07 (patch)
tree054e3e47f03b4f9154636ebf133b0095b0708952
parent1cbc19bea518840bce44e8e387d36b662a1fcc6a (diff)
signal: Allow non-signal values to be bound in signal-let.
* sly/signal.scm (signal-let): Use signal-ref-maybe instead of signal-ref.
-rw-r--r--sly/signal.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/sly/signal.scm b/sly/signal.scm
index 9780b1c..8ecc58d 100644
--- a/sly/signal.scm
+++ b/sly/signal.scm
@@ -171,7 +171,7 @@ be coerced into one."
#'(define name (make-signal-maybe value))))))
(define-syntax-rule (signal-let ((var signal) ...) body ...)
- ((lambda (var ...) body ...) (signal-ref signal) ...))
+ ((lambda (var ...) body ...) (signal-ref-maybe signal) ...))
(define-syntax signal-let*
(syntax-rules ()