      x
      (parse-address (str x))))
   ([algorithm digest]
+   (assert-valid-digest algorithm)
    (BlobRef. algorithm digest)))

  (into #{} (keys digest-functions)))



;; BLOB REFERENCE


  [algorithm digest]

  Object

  (toString [this]
    (str (name algorithm) ":" digest)))

