pathname: Failing ANSI-TEST for current semantics normalization implementation.
requested to merge mevenson/ansi-test:ansi/failure/merge-pathnames.7a/abcl/pathname-device/2020921a into master
IN-PROGRESS ABCL-1.8.0
The MERGE_PATHNAMES.7 ANSI test passed under previous PATHNAME implementation. The reasons for this failure under the new pathnames implementation is not exactly clear.
(mapcar #'pathname-device `(,default-pathname-defaults ,(truename default-pathname-defaults)))
(unless (asdf:find-system :ansi-test-common) (asdf:initialize-source-registry) (asdf:load-system 'abcl/test/ansi/compiled))
(abcl/test/ansi:load-tests)
(in-package :cl-test)
(let* ((paths `(,default-pathname-defaults ,(user-homedir-pathname) cl-test::sandbox)) (truenames (mapcar #'truename paths))) (values (mapcar #'pathname-device truenames) paths (lisp-implementation-version)))