anchor.diff:  (SIMPLE-ARRAY (UNSIGNED-BYTE 8) (*))."
     (encode digest-name (digest-sequence digest-name sequence)))
   
  +;;; multihash high-level functions
  +
   ;;; %to-octets returns the serialized form of an object
   ;;; this is used to extend multihash-object
  +;;; it is recommended that any methods return a multicodec rather than just
  +;;; raw bytes in some unknown format
   (defgeneric %to-octets (object)
     (:documentation "Returns a representation of the object as (SIMPLE-ARRAY (OCTET 8) *)"))
   
   (defgeneric multihash-object (digest object)
  -  (:documentation "Returns a multihash of OBJECT"))
  +  (:documentation "Returns a multihash of OBJECT."))
   
   (defmethod multihash-object (digest object)
     (multihash-sequence digest (%to-octets object)))
  
positive.code: ;;; For more information, see: https://github.com/jbenet/multihash
  ;;; -- Copied from https://github.com/jbenet/multihash
  
  ;;; A multihash is a hash digest with 5 bytes of metadata prepended
  
  (in-package #:multihash)
  
  
negative.code:     (blake2b #x40 64)
      (blake2s #x41 32)))
  
  ;;; *MULTIHASH-DEFINITIONS* is a list of all multihash-definitions
  ;;; It is used for all lookup purposes
  (defparameter *multihash-definitions*
    (loop for (name code length) in *definitions*
       collect (make-multihash-definition :name (make-keyword name) :code code :length length))
  