                          (let [points (object-array asize)
                                agg-fn (agg-fn-by-path %)
                                rows (->> (alia/execute
-                                          session fetch!
+                                          session
+                                          fetch!
                                           {:values [% tenant (int rollup)
                                                     (int period)
                                                     from to]

  [session]
  (alia/prepare
   session
   (str
    "SELECT data,time FROM metric WHERE "
    "path = ? AND tenant = ? AND rollup = ? AND period = ? "
    "AND time >= ? AND time <= ?;")))


(defn useq

    "UPDATE metric USING TTL ? SET data = data + ? "
    "WHERE tenant = ? AND rollup = ? AND period = ? AND path = ? AND time = ?;")))

(def ^:const fetchq (str "SELECT data,time FROM metric WHERE "
                         "path = ? AND tenant = ? AND rollup = ? AND period = ? "
                         "AND time >= ? AND time <= ?;"))

(defn fetchqp
  "Yields a cassandra prepared statement of 7 arguments:

* `paths`: list of paths
