    82 :R
    88 :X
    89 :Y})
+
+
+(def ^:private axis-keys
+  #{:up :down :left :right})
 
 
 (defn- key-handler

              dt (if last-press (- now last-press) 0)]
          (println (format "Key pressed: %d %s -- %d ms since %s"
                           code new-key dt old-key))
          ; TODO: emit button/press and button/repeat events
          ; TODO: need timers to handle button/release events
          (swap! state assoc :old-key new-key :last-press now))))))



(def ^:private key-codes
  "Maps integer key codes to keywords."
  {10 :start    ; enter
   32 :select   ; space
   37 :left
   38 :up
   39 :right
