Skip to content

Instantly share code, notes, and snippets.

@earl-ducaine

earl-ducaine/gist:2aa8cc1f0cbcfa7ccd9256f63380e723

Created October 5, 2017 06:57
Show Gist options
  • Save earl-ducaine/2aa8cc1f0cbcfa7ccd9256f63380e723 to your computer and use it in GitHub Desktop.
Save earl-ducaine/2aa8cc1f0cbcfa7ccd9256f63380e723 to your computer and use it in GitHub Desktop.
Download ZIP
cl-fad:pathname-equal returns nil when I would expect t
Raw
gistfile1.txt
(ql:quickload :cl-fad)
(let ((ancestor #P"/home/rett/quicklisp/dists/quicklisp/software/cl-fad-0.7.4/")
(path #P"/home/rett/quicklisp/dists/quicklisp/software/cl-fad-0.7.4/path.lisp"))
(cl-fad:pathname-equal ancestor (cl-fad:pathname-directory-pathname path)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment