X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fcode%2Finspect.lisp;h=6d3b0a527e8a4d9315a2004307ecf337f7ea4c58;hb=ff6f7c4d82e5780cced4900561eaae2af0a24d06;hp=f059e883b9a67ded308129579409953f406ab545;hpb=4898ef32c639b1c7f4ee13a5ba566ce6debd03e6;p=sbcl.git diff --git a/src/code/inspect.lisp b/src/code/inspect.lisp index f059e88..6d3b0a5 100644 --- a/src/code/inspect.lisp +++ b/src/code/inspect.lisp @@ -198,12 +198,6 @@ evaluated expressions. t (inspected-standard-object-elements object))) -(defmethod inspected-parts ((object funcallable-instance)) - (values (format nil "The object is a FUNCALLABLE-INSTANCE of type ~S.~%" - (type-of object)) - t - (inspected-standard-object-elements object))) - (defmethod inspected-parts ((object condition)) (values (format nil "The object is a CONDITION of type ~S.~%" (type-of object))