[slime-cvs] CVS slime/contrib

[trittweiler]

Update of /project/slime/cvsroot/slime/contrib
In directory clnet:/tmp/cvs-serv10626

Modified Files:
	swank-arglists.lisp 
Log Message:

* swank-arglists.lisp (read-form-spec): Changed "cons" clause to
  "list" clause in etypecase. Fix for error on arglist display on
  `(declare (ftype (|)))', | being point.


--- /project/slime/cvsroot/slime/contrib/swank-arglists.lisp	2007/12/30 11:31:55	1.16
+++ /project/slime/cvsroot/slime/contrib/swank-arglists.lisp	2008/01/10 00:43:03	1.17
@@ -222,7 +222,7 @@
                          (push sexp result)
                          (when newly-interned?
                            (push sexp newly-interned-symbols))))
-                      (cons
+                      (list
                        (multiple-value-bind (read-spec interned-symbols)
                            (read-form-spec element reader)
                          (push read-spec result)