[slime-cvs] CVS slime

[mkoeppe]

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

Modified Files:
	swank.lisp 
Log Message:
(compute-enriched-decoded-arglist with-open-file): Add an IGNORE
declaration.


--- /project/slime/cvsroot/slime/swank.lisp	2006/08/19 16:27:28	1.392
+++ /project/slime/cvsroot/slime/swank.lisp	2006/08/20 09:36:59	1.393
@@ -2022,6 +2022,7 @@
 
 (defmethod compute-enriched-decoded-arglist ((operator-form (eql 'with-open-file))
                                              argument-forms)
+  (declare (ignore argument-forms))
   (multiple-value-bind (decoded-arglist determining-args)
       (call-next-method)
     (let ((first-arg (first (arglist.required-args decoded-arglist)))