[slime-cvs] CVS slime
mkoeppe
mkoeppe at common-lisp.net
Sun Aug 20 09:36:59 UTC 2006
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)))
More information about the slime-cvs
mailing list