There is no portable way to distinguish between the many filesystem errors, anyway. Is there a good reason to not let LOAD report whatever error it wants?
Otherwise, we could use this function: (defun file-readable-p (path) (with-open-file (s path :direction :input :if-does-not-exist nil :element-type '(unsigned-byte 8)) (and s t)))
[ François-René ÐVB Rideau | Reflection&Cybernethics | http://fare.tunes.org ] Only presidents, editors, and people with tapeworms have the right to use the editorial "we." — Mark Twain
On 28 March 2010 19:04, Samium Gromoff _deepfire@feelingofgreen.ru wrote:
On Sat, 27 Mar 2010 12:44:08 -0400, Faré fahree@gmail.com wrote:
Samium,
you're the one who seemingly introduced this with-open-file in 2ca05589. Why do we need such a fancy and not-that-portable way of testing the file is there?
PROBE-FILE fails to catch dead symlinks, and I need a meaningful condition from which I can deduce /what/ is being failed upon, whereas the subtype of FILE-ERROR used by, for example, SBCL, doesn't give me this information.
regards, Samium Gromoff