[Git][cmucl/cmucl][issue-158-darwin-pathnames-utf8] Use correct path to directory for issues.158.dir

[Raymond Toy (@rtoy)]

Raymond Toy pushed to branch issue-158-darwin-pathnames-utf8 at cmucl / cmucl


Commits:
a4475ab6 by Raymond Toy at 2023-02-20T13:33:07-08:00
Use correct path to directory for issues.158.dir

Need to merge in `*test-path*` to get the correct path to the
directory containing the file we want to test.

- - - - -


1 changed file:

- tests/issues.lisp


Changes:

=====================================
tests/issues.lisp
=====================================
@@ -861,7 +861,7 @@
     (:tag :issues)
   (flet ((get-file ()
 	   ;; This assumes that there is only one file in resources/darwin
-	   (let ((files (directory "resources/darwin/*.txt")))
+	   (let ((files (directory (merge-pathnames "resources/darwin/*.txt" *test-path*))))
 	     (assert-equal (length files) 1)
 	     (first files))))
     (let ((f (get-file))



View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/a4475ab65d0aebc845408bce4346afc811ce2b1c

-- 
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/a4475ab65d0aebc845408bce4346afc811ce2b1c
You're receiving this email because of your account on gitlab.common-lisp.net.


-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/cmucl-cvs/attachments/20230220/50a91405/attachment.html>