This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
# vim:fileencoding=utf-8:ft=conf | |
# Font family. You can also specify different fonts for the | |
# bold/italic/bold-italic variants. By default they are derived automatically, | |
# by the OSes font system. Setting them manually is useful for font families | |
# that have many weight variants like Book, Medium, Thick, etc. For example: | |
# font_family Operator Mono Book | |
# bold_font Operator Mono Thick | |
# bold_italic_font Operator Mono Medium | |
font_family Hack |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(defn slurp-edn [f] | |
(with-open [r (PushbackReader. (io/reader f))] | |
(let [edn-seq (repeatedly (partial edn/read {:eof :EOF} r))] | |
(doall (take-while #(not= :EOF %) edn-seq))))) | |
(defn in? | |
"true if seq contains elm" | |
[seq elm] | |
(some #(= elm %) seq)) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(require 'boot.repl) | |
(swap! boot.repl/*default-dependencies* | |
concat '[[cider/cider-nrepl "0.8.1"]]) | |
(swap! boot.repl/*default-middleware* | |
conj 'cider.nrepl/cider-middleware) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(ns overtone.examples.internal-sequencer | |
(:use [overtone.live])) | |
;; A fully server-side sample sequencer. | |
;; ===================================== | |
;; This example demonstrates some of the benefits of moving all synth | |
;; triggers inside the server itself. For example, it allows you to | |
;; modify the synthesis with *immediate* effect (rather than waiting for | |
;; the next bar/chunk to be scheduled) and you can use a global pulse to |