diff --git a/src/lisp/kernel/lsp/describe.lsp b/src/lisp/kernel/lsp/describe.lsp index 01673a8b2e..466e974bee 100644 --- a/src/lisp/kernel/lsp/describe.lsp +++ b/src/lisp/kernel/lsp/describe.lsp @@ -430,6 +430,7 @@ q (or Q): quits the inspection.~%~ ((hash-table-p object) (inspect-hashtable object)) #+clos ((sys:instancep object) (inspect-instance object)) + ((sys:cxx-object-p object) (describe-object object *standard-output*)) (t (format t "~S - ~S" object (type-of object)))))) (defun default-inspector (object)