Loading test/asdf-pathname-test.script +6 −6 Original line number Diff line number Diff line Loading @@ -469,9 +469,9 @@ (test-pathname-parsing) ;;; test for CMUCL issue with search lists versus pathnames #+os-unix (progn (DBG "Checking CMUCL user-homedir-pathname issue.") (assert (multiple-value-bind (value error) (ignore-errors (pathname-match-p (uiop::user-homedir-pathname) (uiop:getenv "HOME"))) (null error))) (assert (pathname-match-p (uiop/common-lisp:user-homedir-pathname) (getenv-pathname "HOME")))) Loading
test/asdf-pathname-test.script +6 −6 Original line number Diff line number Diff line Loading @@ -469,9 +469,9 @@ (test-pathname-parsing) ;;; test for CMUCL issue with search lists versus pathnames #+os-unix (progn (DBG "Checking CMUCL user-homedir-pathname issue.") (assert (multiple-value-bind (value error) (ignore-errors (pathname-match-p (uiop::user-homedir-pathname) (uiop:getenv "HOME"))) (null error))) (assert (pathname-match-p (uiop/common-lisp:user-homedir-pathname) (getenv-pathname "HOME"))))