[slime-devel] SBCL-specific function inspection

The following patch is a work-around (excuse the pun) to have the fancy-inspector use the SBCL-specific method for function inspection.

Ariel

diff -u -r1.193 swank-sbcl.lisp --- swank-sbcl.lisp 28 Feb 2008 19:44:14 -0000 1.193 +++ swank-sbcl.lisp 3 Mar 2008 04:09:39 -0000 @@ -1041,7 +1041,7 @@ (loop for value in parts for i from 0 append (label-value-line i value))))))))

-(defmethod emacs-inspect ((o function)) +(defmethod emacs-inspect :around ((o function)) (let ((header (sb-kernel:widetag-of o))) (cond ((= header sb-vm:simple-fun-header-widetag) (label-value-line*