[bknr-cvs] edi changed trunk/thirdparty/cl-fad/fad.lisp

[BKNR Commits]

Revision: 4668
Author: edi
URL: http://bknr.net/trac/changeset/4668

Make argument ignorable

U   trunk/thirdparty/cl-fad/fad.lisp

Modified: trunk/thirdparty/cl-fad/fad.lisp
===================================================================
--- trunk/thirdparty/cl-fad/fad.lisp	2011-05-25 14:40:41 UTC (rev 4667)
+++ trunk/thirdparty/cl-fad/fad.lisp	2011-05-30 12:15:18 UTC (rev 4668)
@@ -94,6 +94,7 @@
 When FOLLOW-SYMLINKS is NIL, it should return the actual directory
 contents, which might include symlinks.  Currently this works on SBCL
 and CCL."
+  (declare (ignorable follow-symlinks))
   (when (wild-pathname-p dirname)
     (error "Can only list concrete directory names."))
   #+:ecl