Commit 0a3268b0 authored by Robert Goldman's avatar Robert Goldman Committed by Elias Pipping
Browse files

Fix test on clisp.

Use of PATHNAME-MATCH caused spurious test failures on clisp.
parent aca81698
Loading
Loading
Loading
Loading
+2 −1
Original line number Diff line number Diff line
;;; -*- Lisp -*-
(in-package :asdf-test)

(eval-when (:compile-toplevel :load-toplevel :execute)
  #-(or xcl gcl) (push :asdf-test-logical-pathname *features*)
@@ -472,6 +473,6 @@
#+os-unix
(progn
  (DBG "Checking CMUCL user-homedir-pathname issue.")
  (assert (pathname-match-p
  (assert (pathname-equal
           (uiop/common-lisp:user-homedir-pathname)
           (getenv-pathname "HOME" :want-directory t))))