       (print-value v))))
 
 
-(defn print-data-str
+(defn print-blob-str
   "Prints a canonical EDN representation to a string and returns it. This
   function disables colorization."
   [value & more]

(ns vault.data.format.edn
  "Functions to read structured data formatted as EDN."
  (:require
    [byte-streams :refer [bytes=]]
    [clojure.string :as str]

(defn- read-secondary-values!
  "Reads the secondary EDN values from a data blob. Returns a seq of the values
  read."
  [tag-readers
   ^Reader reader]
  (let [opts {:eof ::end-stream
              :readers tag-readers}
        read-stream (partial edn/read opts reader)
        edn-stream (repeatedly read-stream)
        not-eos? (partial not= ::end-stream)]
