Changeset 12338 for trunk/abcl/abcl.asd
- Timestamp:
- 01/06/10 15:52:13 (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/abcl/abcl.asd
r12337 r12338 8 8 9 9 ;;; Wrapper for all ABCL ASDF definitions. 10 (defsystem :abcl :version "0. 4.0")10 (defsystem :abcl :version "0.5.0") 11 11 12 12 (defmethod perform :after ((o load-op) (c (eql (find-system :abcl)))) 13 ;;; Additional test suite loads would go here. 14 (operate 'load-op :test-abcl :force t)) 15 16 (defmethod perform ((o test-op) (c (eql (find-system :abcl)))) 17 ;;; Additional test suite invocations would go here. 18 (operate 'test-op :ansi-compiled :force t)) 19 20 ;;; A collection of test suites for ABCL. 21 (defsystem :test-abcl 22 :version "0.3.1" 23 :depends-on (:ansi-compiled #+nil :abcl-tests)) 24 25 (defmethod perform :after ((o load-op) (c (eql (find-system :abcl)))) 13 (operate 'load-op :abcl-tests :force t) 14 (operate 'load-op :abcl-test-lisp :force t) 26 15 (operate 'load-op :cl-bench :force t) 27 (operate 'load-op :abcl-test-lisp :force t)28 16 (operate 'load-op :ansi-compiled :force t) 29 17 (operate 'load-op :ansi-interpreted :force t)) 30 18 31 #+nil 32 (defmethod perform :before ((o load-op) (c t))33 ( warn "ASDF load-op class is ~A" c))19 ;;; Run via (asdf:operate 'asdf:test-op :abcl :force t) 20 (defmethod perform ((o test-op) (c (eql (find-system :abcl)))) 21 (operate 'test-op :abcl-tests :force t)) 34 22 35 (defsystem :ansi-test :version "1.0" :components 36 ;;; GCL ANSI test suite. 37 ((:module ansi-tests :pathname "test/lisp/ansi/" :components 38 ((:file "package"))))) 23 ;;; A collection of test suites for ABCL. 24 (defsystem :abcl-tests 25 :version "2.0" 26 :depends-on (:abcl-test-lisp 27 :ansi-compiled :ansi-interpreted 28 :cl-bench)) 39 29 40 (defsystem :ansi-interpreted :version "1.0" :depends-on (ansi-test)) 41 (defmethod perform ((o test-op) (c (eql (find-system :ansi-interpreted)))) 42 "Invoke tests with: (asdf:oos 'asdf:test-op :ansi-interpreted :force t)." 43 (funcall (intern (symbol-name 'run) :abcl.test.ansi) 44 :compile-tests nil)) 45 (defmethod perform :before ((o test-op) (c (eql (find-system 46 :ansi-interpreted)))) 47 (operate 'load-op :ansi-interpreted :force t)) 30 (defmethod perfom :before ((o test-op (c (eql find-system :abcl-tests)))) 31 (operate 'load-op :abcl-test-lisp) 32 (operate 'load-op :ansi-compiled) 33 (operate 'load-op :cl-bench)) 48 34 49 (defsystem :ansi-compiled :version "1.0" :depends-on (ansi-test)) 50 (defmethod perform ((o test-op) (c (eql (find-system :ansi-compiled)))) 51 "Invoke tests with: (asdf:oos 'asdf:test-op :abcl-compiled :force t)." 52 (funcall (intern (symbol-name 'run) :abcl.test.ansi) 53 :compile-tests t)) 54 (defmethod perform :before ((o test-op) (c (eql (find-system 55 :ansi-compiled)))) 56 (operate 'load-op :ansi-compiled :force t)) 35 ;;; Run via (asdf:operate 'asdf:test-op :abcl-tests :force t) 36 (defmethod perform ((o test-op) (c (eql (find-system :abcl-tests)))) 37 ;; Additional test suite invocations would go here. 38 (operate 'test-op :abcl-test-lisp) 39 (operate 'test-op :ansi-compiled) 40 (operate 'test-op :cl-bench)) 57 41 42 ;;; Test ABCL with the Lisp unit tests collected in "test/lisp/abcl" 58 43 (defsystem :abcl-test-lisp :version "1.1" :components 59 44 ((:module abcl-rt :pathname "test/lisp/abcl/" :serial t :components … … 62 47 :pathname "test/lisp/abcl/" :components 63 48 ((:file "package"))))) 64 65 49 (defmethod perform :before ((o test-op) (c (eql (find-system 66 50 :abcl-test-lisp)))) 67 51 (operate 'load-op :abcl-test-lisp :force t)) 68 69 52 (defmethod perform ((o test-op) (c (eql (find-system 'abcl-test-lisp)))) 70 53 "Invoke tests with (asdf:oos 'asdf:test-op :abcl-test-lisp)." 71 54 (funcall (intern (symbol-name 'run) :abcl-test))) 72 55 56 ;;; Test ABCL with the interpreted ANSI tests 57 (defsystem :ansi-interpreted :version "1.0.1" 58 :components 59 ((:module ansi-tests :pathname "test/lisp/ansi/" :components 60 ((:file "package"))))) 61 (defmethod perform :before ((o test-op) (c (eql (find-system :ansi-interpreted)))) 62 (operate 'load-op :ansi-interpreted)) 63 (defmethod perform ((o test-op) (c (eql (find-system :ansi-interpreted)))) 64 (funcall (intern (symbol-name 'run) :abcl.test.ansi) 65 :compile-tests nil)) 66 67 ;;; Test ABCL with the compiled ANSI tests 68 (defsystem :ansi-compiled :version "1.0.1" 69 :components 70 ((:module ansi-tests :pathname "test/lisp/ansi/" :components 71 ((:file "package"))))) 72 (defmethod perform :before ((o test-op) (c (eql (find-system :ansi-compiled)))) 73 (operate 'load-op :ansi-compiled)) 74 (defmethod perform ((o test-op) (c (eql (find-system :ansi-compiled)))) 75 (funcall (intern (symbol-name 'run) :abcl.test.ansi) 76 :compile-tests t)) 77 78 79 ;;; Test ABCL with CL-BENCH 73 80 (defsystem :cl-bench :components 74 81 ((:module cl-bench-package :pathname "../cl-bench/" … … 77 84 :depends-on (cl-bench-package) :components 78 85 ((:file "wrapper"))))) 79 80 86 (defmethod perform :before ((o test-op) (c (eql (find-system :cl-bench)))) 81 87 (operate 'load-op :cl-bench :force t)) 82 83 88 (defmethod perform ((o test-op) (c (eql (find-system :cl-bench)))) 84 89 (funcall (intern (symbol-name 'run) :abcl.test.cl-bench)))
Note: See TracChangeset
for help on using the changeset viewer.