Skip to content
Snippets Groups Projects
Commit eb07bed2 authored by Francois-Rene Rideau's avatar Francois-Rene Rideau
Browse files

Tweak tests for CLISP

parent 83bbc23c
No related branches found
No related tags found
No related merge requests found
......@@ -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)
......
......@@ -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)))
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment