r2812: *** empty log message ***
[ptester.git] / debian / tester.asd
1 ;;;; -*- Mode: LISP; Syntax: ANSI-Common-Lisp; Base: 10 -*-
2 ;;;; *************************************************************************
3 ;;;; FILE IDENTIFICATION
4 ;;;;
5 ;;;; Name:          tester.asd
6 ;;;; Purpose:       ASDF definition file for Tester
7 ;;;; Programmer:    Kevin M. Rosenberg
8 ;;;; Date Started:  Sep 2002
9 ;;;;
10 ;;;; $Id: tester.asd,v 1.1 2002/09/20 07:34:06 kevin Exp $
11 ;;;;
12 ;;;; This file, part of cl-tester, is Copyright (c) 2002 by Kevin M. Rosenberg
13 ;;;;
14 ;;;; cl-tester users are granted the rights to distribute and use this software
15 ;;;; as governed by the terms of the GNU Lesser General Public License 
16 ;;;; (http://www.gnu.org/licenses/lgpl.html)
17 ;;;; *************************************************************************
18
19 (in-package :asdf)
20
21 (defsystem :tester
22   :name "cl-tester"
23   :author "Kevin Layer, Franz, Inc"
24   :version "2.2.12.2.6.1"
25   :maintainer "Kevin M. Rosenberg <kmr@debian.org>"
26   :licence "GNU Lesser General Public License"
27   :description "Franz's Test Harness Package"
28   :long-description "Tester provides an framework for creating automated testing progams."
29   
30   :perform (load-op :after (op tester)
31             (pushnew :tester cl:*features*))
32   
33   :components
34   ((:file "tester")))
35
36 (defmethod source-file-type  ((c cl-source-file) (s (eql (find-system 'tester)))) 
37    "cl")
38
39 (when (ignore-errors (find-class 'load-compiled-op))
40   (defmethod perform :after ((op load-compiled-op) (c (eql (find-system :tester))))
41     (pushnew :tester cl:*features*)))
42