sbcl.sbcl/tests/sb-posix.impure.lisp
Douglas Katzman 43d0941f9d sb-posix: play nice in test sandbox
parallel-exec would fail in :READDIR/DIRENT-NAME a lot because many
tests (in any test file) would create and delete files in the current
directory, while this test randomly happened to be running.
Naturally the other tests are to blame, but in trying to fix it, I saw
that every posix test was badly behaved and that "-j 2 --runs_per_test 2"
on sb-posix.impure would reliably fail because *test-directory* was
derived solely from *load-truename*.
2022-09-12 12:09:40 -04:00

9 lines
381 B
Common Lisp

(require :sb-posix)
(let* ((pathname (test-util:generate-test-directory-name))
(test-util:*test-directory* pathname))
(ensure-directories-exist pathname)
(format t "~&::: NOTE: using test-directory ~S~%" pathname)
(unwind-protect (load "../contrib/sb-posix/posix-tests.lisp")
(delete-directory pathname :recursive t)))
(load "../contrib/sb-posix/libc-tests.lisp")