anchor.diff:  
   ;; a simple protocol with documentation and multiple
   ;; methods.
  +
   (defprotocol greeter
     "A Way to Say Hello"
     (hi (object) "Greet object to stdout")
  
positive.code: #|
  (delete-package :com.clearly-useful.protocols.test)
  |#
  
  (defpackage :com.clearly-useful.protocols.test
    (:use :cl :com.clearly-useful.protocols))
  
  
negative.code: 
  ;;;;; should be over the eval-when issues.
  
  (defstruct still-okay foo)
  
  (defprotocol okay-now?
  