Commit a542fe27 authored by Francois-Rene Rideau's avatar Francois-Rene Rideau Committed by Elias Pipping

asdf-pathname-test: simplify the last test, disable on windows

parent 408ccf50
...@@ -469,9 +469,9 @@ ...@@ -469,9 +469,9 @@
(test-pathname-parsing) (test-pathname-parsing)
;;; test for CMUCL issue with search lists versus pathnames ;;; test for CMUCL issue with search lists versus pathnames
(DBG "Checking CMUCL user-homedir-pathname issue.") #+os-unix
(assert (progn
(multiple-value-bind (value error) (DBG "Checking CMUCL user-homedir-pathname issue.")
(ignore-errors (assert (pathname-match-p
(pathname-match-p (uiop::user-homedir-pathname) (uiop:getenv "HOME"))) (uiop/common-lisp:user-homedir-pathname)
(null error))) (getenv-pathname "HOME"))))
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment