anchor.diff:  (defmethod inspect-object-briefly ((object string) pane)
     (with-output-as-presentation
         (pane object (presentation-type-of object))
  -    (prin1 object)))
  +    (prin1 object pane)))
   
   (defmethod inspect-object-briefly ((object number) pane)
     (with-output-as-presentation
         (pane object (presentation-type-of object))
  -    (prin1 object)))
  +    (prin1 object pane)))
   
   (defun inspect-complex (object pane)
     "Inspect a complex number. Since complex numbers should be inspected
  
positive.code:   (with-output-as-presentation
        (pane object (presentation-type-of object))
      (with-text-family (pane :fix)
        (prin1 object))))
  
  (defmethod inspect-object ((object symbol) pane)
    (inspector-table (object pane)
  
negative.code: 	(princ "Nicknames:" pane)
        (inspect-vertical-list (package-nicknames object) pane))
      (inspector-table-row (pane)
  	(princ "Used by:" pane)
        (inspect-vertical-list (package-used-by-list object) pane))
      (inspector-table-row (pane)
  	(princ "Uses:" pane)
        (inspect-vertical-list (package-use-list object) pane))
      (inspector-table-row (pane)
  	(princ "Exports:" pane)
        (inspect-vertical-list (package-exported-symbols object) pane))))
  
  (defmethod inspect-object ((object vector) pane)
  