Make PURI asd ASDF3.3 compatible
This commit is contained in:
10
puri.asd
10
puri.asd
@ -16,18 +16,18 @@
|
|||||||
((:file "src")))
|
((:file "src")))
|
||||||
|
|
||||||
(defmethod perform ((o test-op) (c (eql (find-system 'puri))))
|
(defmethod perform ((o test-op) (c (eql (find-system 'puri))))
|
||||||
(oos 'load-op 'puri-tests)
|
(oos 'load-op 'puri/tests)
|
||||||
(oos 'test-op 'puri-tests))
|
(oos 'test-op 'puri/tests))
|
||||||
|
|
||||||
(defsystem puri-tests
|
(defsystem puri/tests
|
||||||
:depends-on (:puri :ptester)
|
:depends-on (:puri :ptester)
|
||||||
:components
|
:components
|
||||||
((:file "tests")))
|
((:file "tests")))
|
||||||
|
|
||||||
(defmethod perform ((o test-op) (c (eql (find-system 'puri-tests))))
|
(defmethod perform ((o test-op) (c (eql (find-system 'puri/tests))))
|
||||||
(or (funcall (intern (symbol-name '#:do-tests)
|
(or (funcall (intern (symbol-name '#:do-tests)
|
||||||
(find-package :puri-tests)))
|
(find-package :puri-tests)))
|
||||||
(error "test-op failed")))
|
(error "test-op failed")))
|
||||||
|
|
||||||
(defmethod operation-done-p ((o test-op) (c (eql (find-system 'puri-tests))))
|
(defmethod operation-done-p ((o test-op) (c (eql (find-system 'puri/tests))))
|
||||||
(values nil))
|
(values nil))
|
||||||
|
|||||||
Reference in New Issue
Block a user