Hello,

using stuff like C-c C-w resulted in an error with Allegro CL 7.0 because in fspec-definition-locations in swank-allegro.lisp the destructuring-bind was given a list without position element. A quick fix is:

Index: swank-allegro.lisp =================================================================== RCS file: /project/slime/cvsroot/slime/swank-allegro.lisp,v retrieving revision 1.87 diff -u -r1.87 swank-allegro.lisp --- swank-allegro.lisp 4 May 2006 14:38:07 -0000 1.87 +++ swank-allegro.lisp 15 May 2006 20:39:32 -0000 @@ -402,8 +402,10 @@ (defun fspec-definition-locations (fspec) (cond ((and (listp fspec) - (eql (car fspec) :top-level-form)) - (destructuring-bind (top-level-form file position) fspec + (eql (car fspec) :top-level-form) + (= (length fspec) 3)) + (destructuring-bind (top-level-form file position) fspec + (declare (ignore top-level-form)) (list (list (list nil fspec) (make-location (list :buffer file)

Regards,