blob: 568fd720c1ff241b7e9094a03a9378633efaccd3 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
(require "asdf")
;; this in itself ensures that we've listed the files in consfigurator.asd in
;; the correct order
(let ((asdf:*compile-file-failure-behaviour* :error)
(asdf:*compile-file-warnings-behaviour* :error)
(asdf:*user-cache* (uiop:getenv "AUTOPKGTEST_TMP")))
(asdf:load-system "consfigurator/tests"))
;; we can't use ASDF:TEST-SYSTEM because its return value does not indicate
;; whether any tests failed
(unless (consfigurator/tests::do-tests)
(uiop:quit 2))
|
