Commit 113e55a5 authored by Karsten Poeck's avatar Karsten Poeck
Browse files

Silence ./test/ -l clasp

parent ee9a35ac
......@@ -726,6 +726,9 @@ is bound, write a message and exit on an error. If
`(do-test-load-systems ',x))
(defun do-test-load-systems (systems)
(with-compilation-unit () (load-asdf-lisp))
(dolist (sys systems)
(format t "~&Trying to load ~A~%" sys)
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