So I just noticed that due to a bug in CLISP's implementation of COPY-PPRINT-DISPATCH swank.lisp won't load. I sent a bug report to clisp-devel; in the meantime here's a patch that will get CLISP users back on their feet, though depending on how you read the spec, this may or may not really be equivalent. (I assume this use of copy-pprint-dispatch went in recently since I was having no problems with CLISP until today.)
-Peter
Index: swank.lisp =================================================================== RCS file: /project/slime/cvsroot/slime/swank.lisp,v retrieving revision 1.127 diff -u -r1.127 swank.lisp --- swank.lisp 26 Feb 2004 07:13:01 -0000 1.127 +++ swank.lisp 27 Feb 2004 20:31:12 -0000 @@ -697,7 +697,7 @@ ;;; cover cases like (&key (function #'cons) (quote 'quote)). Too ;;; much code for such a minor feature?
-(defvar *initial-pprint-dispatch-table* (copy-pprint-dispatch nil)) +(defvar *initial-pprint-dispatch-table* (copy-pprint-dispatch))
(defun print-cons-argument (stream object) (pprint-logical-block (stream object :prefix "(" :suffix ")") @@ -710,7 +710,7 @@ (princ object stream)))
(defvar *arglist-pprint-dispatch-table* - (let ((table (copy-pprint-dispatch nil))) + (let ((table (copy-pprint-dispatch))) (set-pprint-dispatch 'cons #'print-cons-argument 0 table) (set-pprint-dispatch 'symbol #'print-symbol-argument 0 table) table))