|
Last change
on this file since 14233 was
14233,
checked in by Mark Evenson, 9 years ago
|
|
Re #262 in abcl-asdf: use first matching line if the first line doesn't work out.
Further work needed as something more meaningful should be returned
other than "The value NIL is not of type REAL" when abcl-asdf can't
parse the Maven version string.
Initial patch by Christoph.
|
|
File size:
1.4 KB
|
| Line | |
|---|
| 1 | ;;;; -*- Mode: LISP -*- |
|---|
| 2 | |
|---|
| 3 | (asdf:defsystem :abcl-asdf |
|---|
| 4 | :author "Mark Evenson" |
|---|
| 5 | :version "0.9.1" |
|---|
| 6 | :depends-on (jss) |
|---|
| 7 | :components |
|---|
| 8 | ((:module packages :pathname "" |
|---|
| 9 | :components |
|---|
| 10 | ((:file "packages"))) |
|---|
| 11 | (:module base :pathname "" |
|---|
| 12 | :components |
|---|
| 13 | ((:file "abcl-asdf") |
|---|
| 14 | (:file "asdf-jar" |
|---|
| 15 | :depends-on ("abcl-asdf")) |
|---|
| 16 | (:file "maven-embedder" |
|---|
| 17 | :depends-on ("abcl-asdf" "asdf-jar"))) |
|---|
| 18 | :depends-on (packages)))) |
|---|
| 19 | |
|---|
| 20 | (asdf:defsystem :abcl-asdf-test |
|---|
| 21 | :author "Mark Evenson" |
|---|
| 22 | :defsystem-depends-on (abcl abcl-test-lisp abcl-asdf) |
|---|
| 23 | :components ((:module tests :serial t |
|---|
| 24 | :components ((:file "example") |
|---|
| 25 | (:file "maven") |
|---|
| 26 | (:file "test"))))) |
|---|
| 27 | |
|---|
| 28 | #| |
|---|
| 29 | (defmethod perform ((o test-op) (c (eql (find-system 'abcl-asdf-test)))) |
|---|
| 30 | (funcall (intern (symbol-name 'run) 'abcl-asdf-test))) |
|---|
| 31 | |
|---|
| 32 | (defmethod perform ((o test-op) (c (eql (find-system 'abcl-asdf)))) |
|---|
| 33 | (asdf:load-system :abcl-asdf-test)) |
|---|
| 34 | (asdf:test-system :abcl-asdf-test)) |
|---|
| 35 | |
|---|
| 36 | ;;; FIXME |
|---|
| 37 | (defmethod perform ((o test-op) (c (eql (find-system 'abcl-asdf)))) |
|---|
| 38 | "Invoke tests with (asdf:test-system 'abcl-asdf)." |
|---|
| 39 | (asdf:load-system 'abcl) |
|---|
| 40 | (asdf:load-system 'abcl-test-lisp) |
|---|
| 41 | (asdf:load-system 'abcl-asdf-test) |
|---|
| 42 | (funcall (intern (symbol-name 'run) 'abcl-asdf-test))) |
|---|
| 43 | |# |
|---|
Note: See
TracBrowser
for help on using the repository browser.
