anchor.diff:  (defmethod inspect-object-briefly ((object symbol) pane)
     (with-output-as-presentation
         (pane object (presentation-type-of object))
  -    (print object)))
  +    (prin1 object)))
   
   (defmethod inspect-object ((object symbol) pane)
     (inspector-table
  
positive.code: ;;;           Robert Strandh (strandh@labri.fr)
  ;;;  (c) copyright 2005 by
  ;;;           Vincent Arkesteijn
  
  ;;; This library is free software; you can redistribute it and/or
  ;;; modify it under the terms of the GNU Library General Public
  
negative.code: only the class name would be shown."))
  
  (defgeneric inspect-object (object pane)
    (:documentation "Inspect an object, displaying it on PANE. This can
  be as verbose as you like; the important thing is that all the
  information is present."))
  
  (defmethod inspect-object :around (object pane)
    (cond ((member object *inspected-objects*)
  