diff --git a/alexandria-tests.asd b/alexandria-tests.asd index 86317698acfc86d84ffead373c4907ab0388dc7f..445c18cf7f77f078b021b7693faf1cef6742669d 100644 --- a/alexandria-tests.asd +++ b/alexandria-tests.asd @@ -1,12 +1,11 @@ -(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 , and others." :depends-on (:alexandria #+sbcl :sb-rt #-sbcl :rt) - :components ((:file "tests"))) - -(defmethod perform ((o test-op) (c (eql (find-system :alexandria-tests)))) - (flet ((run-tests (&rest args) - (apply (intern (string '#:run-tests) '#:alexandria-tests) args))) - (run-tests :compiled nil) - (run-tests :compiled t))) + :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)))) diff --git a/alexandria.asd b/alexandria.asd index 045c360e8f22beef7a421dff7cbb5be54cdf9d37..47141ac22be90a389b7b6460801638b85e61a671 100644 --- a/alexandria.asd +++ b/alexandria.asd @@ -1,4 +1,4 @@ -(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"))))