   "Suite of tests to verify that a given block store implementation conforms to
   the spec."
   (:require
-    [alphabase.core :as abc]
+    [alphabase.bytes :as bytes]
+    [alphabase.hex :as hex]
     [blocks.core :as block]
     [blocks.store.util :as util]
     [clojure.java.io :as io]

    blocks.data.PersistentBytes))


;; ## Generators

(defn random-blocks

  [store ids n]
  (let [prefix (-> (block/list store :limit 1) first :id multihash/hex (subs 0 4))]
    (dotimes [i n]
      (let [after (str prefix (hex/encode (bytes/random-bytes 6)))
            limit (inc (rand-int 100))
            stats (block/list store :after after :limit limit)
            expected (->> ids
