anchor.diff:            (inspect-object uses pane)))))
   
   (defmethod inspect-object ((object vector) pane)
  -  ;; Using 'vector as the presentation type may be nonstandard, but it
  -  ;; is more useful than the default.
  -  (with-output-as-presentation
  -      (pane object 'vector)
  +  (with-output-as-presentation
  +      (pane object (presentation-type-of object))
       (formatting-table (pane)
         (formatting-row (pane)
           (formatting-cell (pane)
  
positive.code: 			    (prin1 object string))))
        (if (< (length representation) *object-representation-max-length*)
  	  (princ representation pane)
  	  (format pane "instance of ~S" (class-name (class-of object)))))))
  
  (defmethod inspect-object ((object standard-object) pane)
    (inspect-structure-or-object object pane))
  
negative.code: 		   (format pane "~a:" slot-name))
  		 (inspect-object (slot-value object slot-name) pane)))))))
  
  ;; FIXME: should this be removed? It's really ugly.
  (defparameter *object-representation-max-length* 300
    "Maximum number of characters of an object's textual representation
  that are allowed before abbreviation kicks in")
  
  