Benchmark

Add as dependency:
[gpio "0.2.1"]

(ns benchmark.core
  (require [gpio.core :refer :all])
  (:gen-class))

(defn -main
  "I don't do a whole lot ... yet."
  [& args]
  (set-direction 18 :out)
  (time (dotimes [_ 1000000]
    (write-value 18 true)
    (write-value 18 false))))