Skip to content
Snippets Groups Projects
Commit 85d21aea authored by Daniel Kochmański's avatar Daniel Kochmański
Browse files

makefile: fix partial tests

parent 0776495b
No related branches found
No related tags found
No related merge requests found
...@@ -18,6 +18,9 @@ ...@@ -18,6 +18,9 @@
(when *load-pathname* (when *load-pathname*
(mapc #'regression-test:rem-test '(load-pathname.1 load-truename.1))) (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)) (time (regression-test:do-tests))
#+allegro (cl-user::exit) #+allegro (cl-user::exit)
......
...@@ -12,7 +12,7 @@ MAKE=make ...@@ -12,7 +12,7 @@ MAKE=make
test: test:
@rm -rf scratch @rm -rf scratch
cd sandbox | cat doit.lsp | $(LISP) | tee test.out cat doit.lsp | $(LISP) | tee test.out
test-symbols: test-symbols:
(cat doit1.lsp ; echo "(load \"load-symbols.lsp\")"; cat doit2.lsp) | $(LISP) | tee test-symbols.out (cat doit1.lsp ; echo "(load \"load-symbols.lsp\")"; cat doit2.lsp) | $(LISP) | tee test-symbols.out
......
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