Commit eb07bed2 authored by Francois-Rene Rideau's avatar Francois-Rene Rideau
Browse files

Tweak tests for CLISP

parent 83bbc23c
Loading
Loading
Loading
Loading
+1 −1
Original line number Diff line number Diff line
@@ -364,7 +364,7 @@
                                          :direction :output
                                          :if-exists :supersede :if-does-not-exist :create)
             (setup-asdftest-logical-host :root root)
             #+(and asdf-test-logical-pathname (not clisp))
             #+(and asdf-test-logical-pathname)
             (assert-pathname-equal
              (make-pathname :host "ASDFTEST" :directory '(:absolute "system2" "module4")
                             :name nil :type nil)
+3 −0
Original line number Diff line number Diff line
@@ -48,6 +48,9 @@
(load-system :test-logical-pathname :force t)

#+abcl (leave-test "ABCL translates logical pathnames in *LOAD-PATHNAME*" 0)
#+clisp
(unless (version<= "2.50" (first (split-string (lisp-implementation-version) :separator "-+ ")))
  (leave-test "CLISP 2.49 translates logical pathnames in *LOAD-PATHNAME*" 0))

(defparameter sys (find-system :test-logical-pathname))
(assert (logical-pathname-p (component-pathname sys)))