 (ns tetris.core
   (:require [reagent.core :as r]))
 
-(defonce ^:const initial-tick-frequency 500)
-(defonce ^:const width 10)
-(defonce ^:const height 20)
+(defonce initial-tick-frequency 500)
+(defonce width 10)
+(defonce height 20)
 
 (defonce empty-grid
   (vec (take height (repeat (vec (take width (repeat \ )))))))


(defn ^:export run []
  (r/render-component [main-component world-atom]
                    (.getElementById js/document "container")))


     (when game-over?
       [:a.title
        {:href     "#"
         :on-click #(reset! world-atom
                            (new-block {:grid empty-grid}))}
        "GAME OVER"])]))
