File: runtests.lisp

package info (click to toggle)
cl-interpol 20201106.git70a1137-1
  • links: PTS, VCS
  • area: main
  • in suites: bullseye
  • size: 464 kB
  • sloc: lisp: 868; perl: 34; makefile: 4
file content (9 lines) | stat: -rw-r--r-- 310 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
 
(require "asdf")

(let ((asdf:*user-cache* (uiop:getenv "AUTOPKGTEST_TMP"))) ; Store FASL in some temporary dir
  (asdf:load-system "cl-interpol")
  (asdf:load-system "cl-interpol-test"))

;; Can't use ASDF:TEST-SYSTEM, its return value is meaningless
(unless (cl-interpol-test:run-all-tests)
  (uiop:quit 1))