X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=fiveam.asd;h=724bd678bd4a93a9a638f3ec780fe48e86ba42f2;hb=45089eaf6af05d0ef6ea046364dd4f41d070bed0;hp=ee2792c1b068f9e410100e1d7a70b680fb06a708;hpb=1b24abf09e9fbb2a23c25a9583e5547514482f1b;p=fiveam.git

diff --git a/fiveam.asd b/fiveam.asd
index ee2792c..724bd67 100644
--- a/fiveam.asd
+++ b/fiveam.asd
@@ -1,33 +1,30 @@
 ;;;; -*- Mode: Lisp; indent-tabs-mode: nil -*-
 
-(defpackage :it.bese.FiveAM.system
-  (:use :common-lisp
-        :asdf))
+(defsystem :fiveam
+  :author "Edward Marco Baringer <mb@bese.it>"
+  :depends-on (:alexandria)
+  :pathname "src/"
+  :components ((:file "package")
+               (:file "utils" :depends-on ("packages"))
+               (:file "check" :depends-on ("packages" "utils"))
+               (:file "fixture" :depends-on ("packages"))
+               (:file "classes" :depends-on ("packages"))
+               (:file "random" :depends-on ("packages" "check"))
+               (:file "test" :depends-on ("packages" "fixture" "classes"))
+               (:file "explain" :depends-on ("packages" "utils" "check" "classes" "random"))
+               (:file "suite" :depends-on ("packages" "test" "classes"))
+               (:file "run" :depends-on ("packages" "check" "classes" "test" "explain" "suite")))
+  :in-order-to ((test-op (load-op :fiveam-test)))
+  :perform (test-op :after (op c)
+             (funcall (intern (string '#:run!) :it.bese.fiveam)
+                      :it.bese.fiveam)))
 
-(in-package :it.bese.FiveAM.system)
-
-(defsystem :FiveAM
-    :author "Edward Marco Baringer <mb@bese.it>"
-    :properties ((:test-suite-name . :it.bese.fiveam))
-    :components ((:static-file "fiveam.asd")
-                 (:module :src
-                  :components ((:file "check" :depends-on ("packages"))
-			       (:file "classes" :depends-on ("packages"))
-			       (:file "explain" :depends-on ("classes" "packages" "check"))
-			       (:file "fixture" :depends-on ("packages"))
-			       (:file "packages")
-			       (:file "run" :depends-on ("packages" "classes" "test" "suite" "check"))
-			       (:file "suite" :depends-on ("packages" "test" "classes"))
-                               (:file "random" :depends-on ("packages" "check"))
-			       (:file "test" :depends-on ("packages" "classes"))))
-		 (:module :t
-		  :components ((:file "suite")
-			       (:file "tests" :depends-on ("suite")))
-		  :depends-on (:src)))
-    :depends-on (:arnesi))
-
-(defmethod asdf:perform ((op asdf:test-op) (system (eql (find-system :FiveAM))))
-  (funcall (intern (string :run!) (string :it.bese.FiveAM)) :it.bese.FiveAM))
+(defsystem :fiveam-test
+  :author "Edward Marco Baringer <mb@bese.it>"
+  :depends-on (:fiveam)
+  :pathname "t/"
+  :components ((:file "suite")
+               (:file "tests" :depends-on ("suite"))))
 
 ;;;;@include "src/packages.lisp"