(def app-state (atom {:showing :all :todos {} }))

(aset js/window "benchmark1"
      (fn [e]
        (dotimes [i 200]
          (let [todos (:todos @app-state)
                new-todo {:id (guid)
                          :title i
                          :completed false}]
            (swap! app-state update-in [:todos] conj new-todo)))
        (println @app-state)))