Skip to content
Snippets Groups Projects
Commit b2b9020f authored by Francois-Rene Rideau's avatar Francois-Rene Rideau
Browse files

Fix file-pathname-p to accept NIL pathname-name

ccl, gcl, lispworks think that (probe-file #p".bashrc") has its
pathname-name and pathname-type be NIL and "bashrc" whereas other
implementations (at least abcl allegro clisp cmucl ecl mkcl sbcl xcl)
think that it has them be ".bashrc" and NIL.

cl -l $l -i "(let ((p (probe-file \".bashrc\"))) \
(format t \"FOO $l: ~S ~S~%\" (pathname-name p) (pathname-type p)))" \
|& grep FOO
parent 9451a887
No related branches found
No related tags found
No related merge requests found
Loading
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment