testsupport unit tests work and verify numerical equality approach.
[CommonLispStat.git] / external / lift.darcs / lift.asd
blobd5d3667b74ea7eeda43ebcd6128bc7a86cdc4b3c
1 (defpackage #:asdf-lift (:use #:asdf #:cl))
2 (in-package #:asdf-lift)
4 (defsystem lift
5   :version "1.3.5"
6   :author "Gary Warren King <gwking@metabang.com>"
7   :maintainer "Gary Warren King <gwking@metabang.com>"
8   :licence "MIT Style License; see file COPYING for details"
9   :description "LIsp Framework for Testing"
10   :long-description "LIFT is an SUnit variant and much much more."  
11   :components ((:module
12                 "dev" 
13                 :components 
14                 ((:static-file "notes.text")
15              
16                  (:file "packages")
17                  (:file "lift"
18                         :depends-on ("packages" "measuring"))
19                  (:file "copy-file"
20                         :depends-on ("packages"))
21                  (:file "random-testing" 
22                         :depends-on ("packages" "lift"))
23                  (:file "port" 
24                         :depends-on ("packages"))
25                  (:file "measuring" 
26                         :depends-on ("packages"))
27                  (:file "config" 
28                         :depends-on ("port" "lift"))
29                  (:file "reports" 
30                         :depends-on ("port"))
31                  #+Ignore
32                  (:file "prototypes"
33                         :depends-on ("lift"))))
34                
35                (:module 
36                 "website"
37                 :components ((:module "source"
38                                       :components 
39                                       ((:static-file "index.lml"))))))
40   
41   :in-order-to ((test-op (load-op lift-test)))
42   :depends-on ()
43   :perform (test-op :after (op c)
44                     (funcall
45                       (intern (symbol-name '#:run-tests) :lift)
46                       :config :generic)))
48 (defmethod operation-done-p 
49            ((o test-op) (c (eql (find-system 'lift))))
50   (values nil))