cl-tuples-test.asd

   1
   2
   3 (defsystem cl-tuples-test
   4   :description "Tests for cl-tuples"
   5   :depends-on (:cl-tuples :alexandria)
   6   :components ((:file "tuples-test")))
   7
   8 (defmethod asdf:perform ((op asdf:test-op) (c (eql (find-system ':cl-tuples))))
   9   (asdf:operate 'asdf:load-op ':cl-tuples-test)
  10   (asdf:operate 'asdf:test-op ':cl-tuples-test))
  11
  12
  13 (defmethod asdf:perform ((op asdf:test-op) (c (eql (find-system ':cl-tuples-tests))))
  14   (funcall (intern "TEST-CL-TUPLES" (find-package "CL-TUPLES-TEST"))))