From d099dcbb755f1330224568e3b9aeae1a9e4214b7 Mon Sep 17 00:00:00 2001 From: Thomas White Date: Wed, 19 Aug 2020 17:10:02 +0200 Subject: Add lots more side-effects --- examples/demo.scm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'examples') diff --git a/examples/demo.scm b/examples/demo.scm index 57c8257..1ff0832 100644 --- a/examples/demo.scm +++ b/examples/demo.scm @@ -27,8 +27,8 @@ ;; Set up working lights on a MIDI fader (define working-light-fader - (make-midi-controller #:channel 14 - #:cc-number 19)) + (make-midi-controller! #:channel 14 + #:cc-number 19)) (define (worklight) (let ((state (make-empty-state)) @@ -42,8 +42,8 @@ (define pot1 - (make-midi-controller #:channel 14 - #:cc-number 7)) + (make-midi-controller! #:channel 14 + #:cc-number 7)) (define (example-state-1) -- cgit v1.2.3