Commit 5f64a206 authored by Daniel Kochmański's avatar Daniel Kochmański
Browse files

compileit: fix pathname

Signed-off-by: Daniel Kochmański's avatarDaniel Kochmański <>
parent 8668d930
......@@ -29,6 +29,9 @@
(when *load-pathname*
(mapc #'regression-test:rem-test '(load-pathname.1 load-truename.1)))
;; We could use uiop:chdir here, but what about new implementations?
(setf *default-pathname-defaults* (truename #P"sandbox/"))
(time (regression-test:do-tests))
#+allegro :exit
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment