diff options
author | Thomas White <taw@physics.org> | 2020-08-19 17:10:02 +0200 |
---|---|---|
committer | Thomas White <taw@physics.org> | 2020-08-19 17:10:02 +0200 |
commit | d099dcbb755f1330224568e3b9aeae1a9e4214b7 (patch) | |
tree | eaade83be2992263948a0a029d24c2b4bcee234c /examples/demo.scm | |
parent | b71668d0362df473d9081f4deaf7d2aa758ba177 (diff) |
Add lots more side-effects
Diffstat (limited to 'examples/demo.scm')
-rw-r--r-- | examples/demo.scm | 8 |
1 files changed, 4 insertions, 4 deletions
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) |