(format s "~:_(~@<~S ~:_~S~:>)" k v)))))
(defmethod describe-object ((condition condition) s)
- (sb-conditions::describe-condition condition s))
+ (sb-kernel:describe-condition condition s))
\f
;;;; DESCRIBE-OBJECT methods for symbols and functions, including all
;;;; sorts of messy stuff about documentation, type information,