Commit e5c54bc3 authored by Attila Lendvai's avatar Attila Lendvai

Simplify .asd files for ASDF 3 (i.e. only compatible with 2013 or later).

parent 0426bd2f
(defsystem alexandria-tests
(defsystem "alexandria-tests"
:licence "Public Domain / 0-clause MIT"
:description "Tests for Alexandria, which is a collection of portable public domain utilities."
:author "Nikodemus Siivola <nikodemus@sb-studio.net>, and others."
:depends-on (:alexandria #+sbcl :sb-rt #-sbcl :rt)
:components ((:file "tests")))
(defmethod perform ((o test-op) (c (eql (find-system :alexandria-tests))))
:components ((:file "tests"))
:perform (test-op (o c)
(flet ((run-tests (&rest args)
(apply (intern (string '#:run-tests) '#:alexandria-tests) args)))
(run-tests :compiled nil)
(run-tests :compiled t)))
(run-tests :compiled t))))
(defsystem :alexandria
(defsystem "alexandria"
:version "0.0.0"
:licence "Public Domain / 0-clause MIT"
:description "Alexandria is a collection of portable public domain utilities."
......@@ -58,11 +58,5 @@ the following constraints:
(:file "arrays" :depends-on ("package" "types"))
(:file "sequences" :depends-on ("package" "lists" "types"))
(:file "numbers" :depends-on ("package" "sequences"))
(:file "features" :depends-on ("package" "control-flow"))))
(defmethod operation-done-p ((o test-op) (c (eql (find-system :alexandria))))
nil)
(defmethod perform ((o test-op) (c (eql (find-system :alexandria))))
(operate 'load-op :alexandria-tests)
(operate 'test-op :alexandria-tests))
(:file "features" :depends-on ("package" "control-flow")))
:in-order-to ((test-op (test-op "alexandria-tests"))))
Markdown is supported
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