anchor.diff:  
   (defmethod reinitialize-instance ((state skein512/224) &rest initargs)
     (declare (ignore initargs))
  -  (replace (skein-value state) (copy-seq (skein-get-iv 512 224)))
  +  (replace (skein-value state) (skein-get-iv 512 224))
     (replace (skein-tweak state) (skein-make-tweak t nil +skein-msg+ 0))
     (replace (skein-cfg state) (skein-make-configuration-string 224))
     (setf (skein-buffer-length state) 0)
  
positive.code: 
  (defmethod reinitialize-instance ((state skein256/160) &rest initargs)
    (declare (ignore initargs))
    (replace (skein-value state) (copy-seq (skein-get-iv 256 160)))
    (replace (skein-tweak state) (skein-make-tweak t nil +skein-msg+ 0))
    (replace (skein-cfg state) (skein-make-configuration-string 160))
    (setf (skein-buffer-length state) 0)
  
negative.code: 
  (defmethod reinitialize-instance ((state skein1024/384) &rest initargs)
    (declare (ignore initargs))
    (replace (skein-value state) (skein-get-iv 1024 384))
    (replace (skein-tweak state) (skein-make-tweak t nil +skein-msg+ 0))
    (replace (skein-cfg state) (skein-make-configuration-string 384))
    (setf (skein-buffer-length state) 0)
  