Permalink
Browse files

Made tests callable from ASDF.

  • Loading branch information...
1 parent 5a99f79 commit c663fee550b0541099dbf1acf0007cf6d522ddad @tpapp committed Jun 4, 2012
Showing with 7 additions and 0 deletions.
  1. +7 −0 let-plus.asd
View
@@ -11,10 +11,17 @@
(:file "extensions"))
:depends-on (#:alexandria #:anaphora))
+(defmethod perform ((op test-op) (sys (eql (find-system '#:let-plus))))
+ (operate 'test-op '#:let-plus-tests))
+
(asdf:defsystem #:let-plus-tests
:description "Tests for the LET-PLUS library."
:author "Tamas K. Papp <tkpapp@gmail.com>."
:license "Same as LET-PLUS -- this is part of the latter."
:serial t
:components ((:file "tests"))
:depends-on (#:lift #:let-plus))
+
+(defmethod perform ((op test-op) (sys (eql (find-system '#:let-plus-tests))))
+ (operate 'load-op '#:let-plus-tests)
+ (funcall (find-symbol (string '#:run) '#:let-plus-tests)))

0 comments on commit c663fee

Please sign in to comment.