Line | |
---|
1 | ;;;; -*- Mode: LISP -*- |
---|
2 | |
---|
3 | (asdf:defsystem :abcl-asdf |
---|
4 | :author "Mark Evenson" |
---|
5 | :version "1.1.0" |
---|
6 | :description "<> asdf:defsystem <urn:abcl.org/release/1.1.1/contrib/abcl-asdf#1.1.0>" |
---|
7 | :depends-on (jss) |
---|
8 | :components |
---|
9 | ((:module packages :pathname "" |
---|
10 | :components |
---|
11 | ((:file "packages"))) |
---|
12 | (:module base :pathname "" |
---|
13 | :components |
---|
14 | ((:file "abcl-asdf") |
---|
15 | (:file "asdf-jar" |
---|
16 | :depends-on ("abcl-asdf")) |
---|
17 | (:file "maven-embedder" |
---|
18 | :depends-on ("abcl-asdf" "asdf-jar"))) |
---|
19 | :depends-on (packages)))) |
---|
20 | |
---|
21 | (asdf:defsystem :abcl-asdf-test |
---|
22 | :author "Mark Evenson" |
---|
23 | :depends-on (abcl abcl-test-lisp abcl-asdf) |
---|
24 | :components ((:module tests :serial t |
---|
25 | :components ((:file "example") |
---|
26 | (:file "maven") |
---|
27 | (:file "test"))))) |
---|
28 | |
---|
29 | #| |
---|
30 | (defmethod perform ((o test-op) (c (eql (find-system 'abcl-asdf-test)))) |
---|
31 | (funcall (intern (symbol-name 'run) 'abcl-asdf-test))) |
---|
32 | |
---|
33 | (defmethod perform ((o test-op) (c (eql (find-system 'abcl-asdf)))) |
---|
34 | (asdf:load-system :abcl-asdf-test)) |
---|
35 | (asdf:test-system :abcl-asdf-test)) |
---|
36 | |
---|
37 | ;;; FIXME |
---|
38 | (defmethod perform ((o test-op) (c (eql (find-system 'abcl-asdf)))) |
---|
39 | "Invoke tests with (asdf:test-system 'abcl-asdf)." |
---|
40 | (asdf:load-system 'abcl) |
---|
41 | (asdf:load-system 'abcl-test-lisp) |
---|
42 | (asdf:load-system 'abcl-asdf-test) |
---|
43 | (funcall (intern (symbol-name 'run) 'abcl-asdf-test))) |
---|
44 | |# |
---|
Note: See
TracBrowser
for help on using the repository browser.