   (let [causal-order (get-in @stage [user repo :state :causal-order])
         master-head (first (get-in @stage [user repo :state :branches "master"]))]
     (-> (<!? (commit-value store mapped-eval causal-order master-head))
-        deref
         (get-in [:data])
-        count))
+        count
+        time))
 
 
   (use 'clojure.stacktrace)

  (if (eval-map code)
    (eval-map code)
    (do (debug "eval-map didn't match:" code)
        (throw code))))

(defn find-fn [name]
  (first (filter (fn [[_ fn-name]]


  (def user "kordano@topiq.es")

  (def repo #uuid "30b48786-9a2c-4f5a-ae82-079a990422b0")


  (<!? (s/subscribe-repos! stage {user {repo #{"master"}}}))
