abcl-asdf.asd 1.51 KB
Newer Older
1 2
;;;; -*- Mode: LISP -*-

3
(asdf:defsystem :abcl-asdf
4
  :author "Mark Evenson"
5
  :version "1.5.1"
6
  :description "<> asdf:defsystem <urn:abcl.org/release/1.4.0/contrib/abcl-asdf#1.5.1>"
7
  :depends-on (jss)
8
  :components 
9 10 11 12 13 14
  ((:module packages :pathname "" 
            :components
            ((:file "packages")))
   (:module base :pathname "" 
            :components
            ((:file "abcl-asdf")
15 16 17
             (:file "asdf-jar" 
                    :depends-on ("abcl-asdf"))
             (:file "maven-embedder" 
18 19
                    :depends-on ("abcl-asdf" "asdf-jar")))
            :depends-on (packages))))
20

21
(asdf:defsystem :abcl-asdf-test
22
  :author "Mark Evenson"
23
  :depends-on (abcl abcl-test-lisp abcl-asdf rt)
24 25 26 27
  :components ((:module tests :serial t 
                        :components ((:file "example")
                                     (:file "maven")
                                     (:file "test")))))
28

29 30

(defmethod asdf:perform ((o asdf:test-op) (c (eql (asdf:find-system 'abcl-asdf-test))))
31 32
  (funcall (intern (symbol-name 'run) 'abcl-asdf-test)))

33 34
(defmethod asdf:perform ((o asdf:test-op) (c (eql (asdf:find-system 'abcl-asdf))))
  (asdf:load-system :abcl-asdf-test)
35 36 37
  (asdf:test-system :abcl-asdf-test))

 ;;; FIXME
38 39
#+nil
(defmethod asdf:perform ((o asdf:test-op) (c (eql (asdf:find-system 'abcl-asdf))))
40 41 42 43 44
  "Invoke tests with (asdf:test-system 'abcl-asdf)."
  (asdf:load-system 'abcl)
  (asdf:load-system 'abcl-test-lisp)
  (asdf:load-system 'abcl-asdf-test)
  (funcall (intern (symbol-name 'run) 'abcl-asdf-test)))
45