1 ;;;; -*- Mode: LISP; Syntax: ANSI-Common-Lisp; Base: 10 -*-
2 ;;;; *************************************************************************
3 ;;;; FILE IDENTIFICATION
6 ;;;; Purpose: ASDF definition file for XLtest
7 ;;;; Programmer: Kevin M. Rosenberg
8 ;;;; Date Started: Aug 2003
10 ;;;; $Id: xltest.asd,v 1.2 2003/08/04 09:46:44 kevin Exp $
11 ;;;; *************************************************************************
13 (defpackage #:xltest-system (:use #:asdf #:cl))
14 (in-package #:xltest-system)
18 :author "Kevin Rosenberg based on work by Craig Brozensky"
19 :maintainer "Kevin M. Rosenberg <kmr@debian.org>"
20 :licence "Public domain"
21 :description "Extreme Lisp Testing Suite"
22 :long-description "The XLTEST package is toolkit for building test suites based on the XPTEST package by Craig Brozensky."
26 (:file "src" :depends-on ("package"))))
28 (defmethod perform ((o test-op) (c (eql (find-system 'xltest))))
29 (oos 'load-op 'xltest-tests)
30 (oos 'test-op 'xltest-tests))
32 (defsystem xltest-tests
34 :components ((:file "tests")))
36 (defmethod perform ((o test-op) (c (eql (find-system 'xltest-tests))))
37 (or (funcall (intern (symbol-name #:do-tests)
38 (find-package #:xltest-tests)))
39 (error "test-op failed")))