tests: adjust paths

This commit is contained in:
Daniel Kochmański 2016-10-08 20:50:35 +02:00
parent 141eb6d763
commit d9afb21775

View file

@ -49,7 +49,7 @@
with lib-name = (format nil "../lib/ecl-~A/" (lisp-implementation-version))
for base in (list root (merge-pathnames lib-name root))
when (or (probe-file (merge-pathnames "./BUILD-STAMP" base))
(probe-file (merge-pathnames "./LGPL" base)))
(probe-file (merge-pathnames "./COPYING" base)))
do (return base)))
(setf (logical-pathname-translations "SYS")