source: trunk/abcl/abcl.asd @ 11599

Last change on this file since 11599 was 11599, checked in by Mark Evenson, 13 years ago

Use HANDLER-CASE for ANSI tests to quit invoking Lisp if an error in generated.

Further incremental work on ABCL-TEST-LISP (aka the internal ABCL
tests) necessitated by the fact that both it and the ANSI tests use
the REGRESSION-TEST framework which doesn't work well in the same Lisp
instances. Trying to repackage this correctly, but it needs more work.

  • Property svn:keywords set to Id
File size: 2.5 KB
Line 
1;;; -*- Mode: LISP; Syntax: COMMON-LISP -*-
2;;; $Id: abcl.asd 11599 2009-01-29 16:00:07Z mevenson $
3
4(require 'asdf)
5(defpackage :abcl-asdf
6  (:use :cl :asdf))
7(in-package :abcl-asdf)
8
9;;; Wrapper for all ABCL ASDF definitions.
10(defsystem :abcl :version "0.3.0")
11
12(defmethod perform :after ((o load-op) (c (eql (find-system 'abcl))))
13  ;;; Additional test suite loads would go here.
14  (asdf:oos 'asdf: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  (asdf:oos 'asdf:test-op :ansi-compiled :force t))
19
20;;; A collection of test suites for ABCL.
21(defsystem :test-abcl
22  :version "0.3"
23  :depends-on (:ansi-compiled #+nil :abcl-tests))
24
25(defmethod perform :after ((o load-op) (c (eql (find-system 'test-abcl))))
26  #+nil (asdf:oos 'asdf:test-op :cl-bench :force t)
27  (asdf:oos 'asdf:load-op :abcl-test-lisp :force t)
28  (asdf:oos 'asdf:load-op :ansi-compiled :force t)
29  (asdf:oos 'asdf:load-op :ansi-interpreted :force t))
30
31(defsystem :ansi-test :version "1.0" :components
32     ;;; GCL ANSI test suite.
33     ((:module ansi-tests :pathname "test/lisp/ansi/" :components
34         ((:file "package")))))
35
36(defsystem :ansi-interpreted :version "1.0" :depends-on (ansi-test))
37(defmethod perform ((o test-op) (c (eql (find-system 'ansi-interpreted))))
38   "Invoke tests with:  (asdf:oos 'asdf:test-op :ansi-interpreted :force t)."
39   ;;; FIXME needs ASDF:OOS to be invoked with :FORCE t
40  (funcall (intern (symbol-name 'run) :ansi.test.ansi)
41     :compile-tests nil))
42
43(defsystem :ansi-compiled :version "1.0" :depends-on (ansi-test))
44(defmethod perform ((o test-op) (c (eql (find-system 'ansi-compiled))))
45  "Invoke tests with:  (asdf:oos 'asdf:test-op :abcl-compiled :force t)."
46  (funcall (intern (symbol-name 'run) :abcl.test.ansi)
47     :compile-tests t))
48
49(defsystem :abcl-test-lisp :version "1.0" :components
50     ((:module package  :pathname "test/lisp/abcl/" :components
51         ((:file "package")))))
52(defmethod perform ((o test-op) (c (eql (find-system 'abcl-test-lisp))))
53   "Invoke tests with:  (asdf:oos 'asdf:test-op :abcl-tests :force t)."
54   ;;; FIXME needs ASDF:OOS to be invoked with :FORCE t
55   (funcall (intern (symbol-name 'run) :abcl.test.lisp)))
56 
57;;; Build ABCL from a Lisp.
58;;; aka the "Lisp-hosted build system"
59;;; Works for: abcl, sbcl, clisp, cmu, lispworks, allegro, openmcl
60(defsystem :build-abcl :components
61     ((:module build :pathname ""  :components
62         ((:file "build-abcl")
63          (:file "customizations" :depends-on ("build-abcl"))))))
64
65
66
Note: See TracBrowser for help on using the repository browser.