                        total-item-bytes])
 
 
-(defn stats [& {:keys [service namespace]}]
+(defn statistics [& {:keys [service namespace]}]
   (let [service (get-memcache-service :service service :namespace namespace)
         stats (.getStatistics service)]
     (Statistics. (.getBytesReturnedForHits stats)

    (.contains service key)))


(defn delete [key & {:keys [service namespace millis-no-readd]}]
  (let [service (get-memcache-service :service service :namespace namespace)]
    (if millis-no-readd
        (.delete service key millis-no-readd)
        (.delete service key))))


(defn get [key & {:keys [service namespace]}]
  (let [service (get-memcache-service :service service :namespace namespace)]
    (.get service key)))


(defn put [key value & {:keys [service namespace]}]

                 (.getTotalItemBytes stats))))


(defn clear-all
  "Clears the entire cache. Does not respect namespaces!"
  [& {:keys [service namespace]}]
  (let [service (get-memcache-service :service service :namespace namespace)]
