Browse files

Make argument ignorable

git-svn-id: svn:// 4281704c-cde7-0310-8518-8e2dc76b1ff0
  • Loading branch information...
1 parent f3b7abb commit 0bfdfd8320e1ccd9969331e37689fedf11e27438 Edi Weitz committed May 30, 2011
Showing with 1 addition and 0 deletions.
  1. +1 −0 fad.lisp
@@ -94,6 +94,7 @@ all platforms.
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."))

0 comments on commit 0bfdfd8

Please sign in to comment.