Skip to content
Snippets Groups Projects
Commit 57f6a6e5 authored by Robert Goldman's avatar Robert Goldman
Browse files

Merge branch 'fix-test-utilities' into 'master'

Fix garbled test.

See merge request asdf/asdf!184
parents 97b279fa fd289d99
No related branches found
No related tags found
No related merge requests found
...@@ -342,7 +342,7 @@ ...@@ -342,7 +342,7 @@
;; (assert (directory-exists-p oddball-pathname)) ;; (assert (directory-exists-p oddball-pathname))
;; (pathname oddball-namestring) ;; (pathname oddball-namestring)
;; (assert-equal nil (uiop:subdirectories oddball-namestring)) ;; (assert-equal nil (uiop:subdirectories oddball-namestring))
(with-expected-failure ("UIOP:SUBDIRECTORIES does not handle non-standard pathnames.") (with-expected-failure (#+(or sbcl cmucl) t)
(assert-equal nil (uiop:subdirectories "/[foo"))) (assert-equal nil (uiop:subdirectories "/[foo")))
(DBG "check to make sure WITH-CURRENT-DIRECTORY checks its parameter for directory pathname") (DBG "check to make sure WITH-CURRENT-DIRECTORY checks its parameter for directory pathname")
......
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