source: trunk/abcl/abcl.asd @ 13261

Last change on this file since 13261 was 13261, checked in by Mark Evenson, 10 years ago

Only invoke ABCL internal Lisp tests by default.

Housecleaning in ASDF defintion removing uncessary ABCL-ASDF pacakge.
Move to the more friendly ASDF2 invocations.

Normalize ASDF-TEST-LISP convention to "hanging keyword".

  • Property svn:keywords set to Id
File size: 4.5 KB
Line 
1;;; -*- Mode: LISP; Syntax: COMMON-LISP -*-
2;;; $Id: abcl.asd 13261 2011-04-04 08:41:43Z mevenson $
3
4(require 'asdf)
5(in-package :asdf)
6
7;;; Wrapper for all ABCL ASDF definitions.
8(defsystem :abcl :version "0.6.0")
9
10;;;  Run via (asdf:operate 'asdf:test-op :abcl :force t)
11(defmethod perform ((o test-op) (c (eql (find-system :abcl))))
12  (load-system (find-system :abcl-test-lisp))
13  (operate 'test-op :abcl-test-lisp))
14
15;;; Test ABCL with the Lisp unit tests collected in "test/lisp/abcl"
16;;;
17;;; We guard with #+abcl for tests that other Lisps cannot load.  This
18;;; could be possibly be done at finer granularity in the files
19;;; themselves.
20(defsystem :abcl-test-lisp :version "1.2" :components
21     ((:module abcl-rt
22                     :pathname "test/lisp/abcl/" :serial t :components
23         ((:file "rt-package")
24                      (:file "rt")
25                      (:file "test-utilities")))
26      (:module package  :depends-on (abcl-rt)
27         :pathname "test/lisp/abcl/" :components
28         ((:file "package")))
29            (:module test :depends-on (package)
30         :pathname "test/lisp/abcl/" :components
31                     ((:file "utilities")
32                      (:file "compiler-tests")
33                      (:file "condition-tests")
34                      #+abcl
35                      (:file "class-file")
36                      #+abcl
37                      (:file "metaclass")
38                      #+abcl
39                      (:file "mop-tests-setup")
40                      #+abcl
41                      (:file "mop-tests" :depends-on
42                             ("mop-tests-setup"))
43                      (:file "file-system-tests")
44                      #+abcl
45                      (:file "jar-pathname" :depends-on
46                             ("utilities" "pathname-tests" "file-system-tests"))
47                      #+abcl
48                      (:file "url-pathname")
49                      (:file "math-tests" :depends-on
50                             ("compiler-tests"))
51                      (:file "misc-tests")
52                      (:file "latin1-tests")
53                      #+abcl
54                      (:file "bugs" :depends-on
55                             ("file-system-tests"))
56                      (:file "wild-pathnames" :depends-on
57                             ("file-system-tests"))
58                      #+abcl
59                      (:file "pathname-tests" :depends-on
60                             ("utilities"))))))
61
62(defmethod perform ((o test-op) (c (eql (find-system 'abcl-test-lisp))))
63   "Invoke tests with (asdf:oos 'asdf:test-op :abcl-test-lisp)."
64   (funcall (intern (symbol-name 'run) :abcl.test.lisp)))
65
66;;; Test ABCL with the interpreted ANSI tests
67(defsystem :ansi-interpreted :version "1.1"
68           :components
69           ((:module ansi-tests :pathname "test/lisp/ansi/" :components
70         ((:file "package")
71                (:file "parse-ansi-errors" :depends-on ("package"))))))
72(defmethod perform :before ((o test-op) (c (eql (find-system :ansi-interpreted))))
73  (load-system  :ansi-interpreted))
74(defmethod perform ((o test-op) (c (eql (find-system :ansi-interpreted))))
75  (funcall (intern (symbol-name 'run) :abcl.test.ansi)
76     :compile-tests nil))
77
78;;; Test ABCL with the compiled ANSI tests
79(defsystem :ansi-compiled :version "1.1"
80           :components
81           ((:module ansi-tests :pathname "test/lisp/ansi/" :components
82         ((:file "package")
83                (:file "parse-ansi-errors" :depends-on ("package"))))))
84(defmethod perform :before ((o test-op) (c (eql (find-system :ansi-compiled))))
85  (load-system :ansi-compiled))
86(defmethod perform ((o test-op) (c (eql (find-system :ansi-compiled))))
87  (funcall (intern (symbol-name 'run) :abcl.test.ansi)
88     :compile-tests t))
89
90;;; Test ABCL with CL-BENCH
91(defsystem :cl-bench :components
92           ((:module cl-bench-package :pathname "../cl-bench/"
93                    :components ((:file "defpackage")))
94            (:module cl-bench-wrapper :pathname "test/lisp/cl-bench/"
95                     :depends-on (cl-bench-package) :components
96                     ((:file "wrapper")))))
97(defmethod perform :before ((o test-op) (c (eql (find-system :cl-bench))))
98  (load-system :cl-bench))
99(defmethod perform ((o test-op) (c (eql (find-system :cl-bench))))
100  (funcall (intern (symbol-name 'run) :abcl.test.cl-bench)))
101 
102;;; Build ABCL from a Lisp.
103;;; aka the "Lisp-hosted build system"
104;;; Works for: abcl, sbcl, clisp, cmu, lispworks, allegro, openmcl
105(defsystem :build-abcl :components
106     ((:module build :pathname ""  :components
107         ((:file "build-abcl")
108          (:file "customizations" :depends-on ("build-abcl"))))))
109
110
111
Note: See TracBrowser for help on using the repository browser.