summaryrefslogtreecommitdiff
path: root/dev
diff options
context:
space:
mode:
Diffstat (limited to 'dev')
-rw-r--r--dev/scratch.clj8
1 files changed, 4 insertions, 4 deletions
diff --git a/dev/scratch.clj b/dev/scratch.clj
index 0115233..315df29 100644
--- a/dev/scratch.clj
+++ b/dev/scratch.clj
@@ -4,7 +4,8 @@
[unheard.instrument.minilab3 :as minilab3]
[unheard.instrument.omx-27 :as omx-27]
[unheard.theory :refer [note poly]]
- [missionary.core :as m]))
+ [missionary.core :as m])
+ (:import [javax.sound.midi ShortMessage]))
#_(print-all-midi-devices)
@@ -22,6 +23,7 @@
(poly
(triad clock tonic)
+ #_
(triad clock (m/latest #(+ % 12) tonic))
;; The rest of the "song" is a drum pattern.
@@ -64,7 +66,5 @@
p (song song-config)]
(m/?< (m/latest vector clock p))))))))
-#_(def cancel
- (run prn prn))
-#_(cancel)
+(def cancel (run {} {}))