From 95fa10b75d11b8b2e0db11301bd1d061d29bacea Mon Sep 17 00:00:00 2001 From: David Thompson Date: Sun, 7 Dec 2014 20:02:02 -0500 Subject: signal: Require signal values in signal-let. * sly/signal.scm (signal-let): Use signal-ref instead of signal-ref-maybe. --- sly/signal.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/sly/signal.scm b/sly/signal.scm index 4f42f75..788bb25 100644 --- a/sly/signal.scm +++ b/sly/signal.scm @@ -184,7 +184,7 @@ be coerced into one." #'(define name (make-signal-maybe value)))))) (define-syntax-rule (signal-let ((var signal) ...) body ...) - ((lambda (var ...) body ...) (signal-ref-maybe signal) ...)) + ((lambda (var ...) body ...) (signal-ref signal) ...)) (define-syntax signal-let* (syntax-rules () -- cgit v1.2.3