X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;ds=sidebyside;f=2%2Flml2-tests.asd;fp=2%2Flml2-tests.asd;h=0000000000000000000000000000000000000000;hb=d69fd6931095af586a7ba72e0586330a436f0803;hp=1a1a603ea68719b05f978e2e7258aa8cd99c4410;hpb=ffe053ab486b6e503513cf57f5321c61bd38b9c2;p=lml.git diff --git a/2/lml2-tests.asd b/2/lml2-tests.asd deleted file mode 100644 index 1a1a603..0000000 --- a/2/lml2-tests.asd +++ /dev/null @@ -1,26 +0,0 @@ -;;;; -*- Mode: Lisp; Syntax: ANSI-Common-Lisp; Base: 10 -*- -;;;; ************************************************************************* -;;;; FILE IDENTIFICATION -;;;; -;;;; Name: lml2-tests.asd -;;;; Purpose: ASDF system definitionf for lml2 testing package -;;;; Author: Kevin M. Rosenberg -;;;; Date Started: Apr 2003 -;;;; -;;;; $Id$ -;;;; ************************************************************************* - -(defpackage #:lml2-tests-system - (:use #:asdf #:cl)) -(in-package #:lml2-tests-system) - -(defsystem lml2-tests - :depends-on (:rt :lml2) - :in-order-to ((test-op (load-op lml2-tests))) - :components ((:file "tests"))) - -(defmethod perform ((o test-op) (c (eql (find-system 'lml2-tests)))) - (or (funcall (intern (symbol-name '#:do-tests) - (find-package '#:regression-test))) - (error "test-op failed"))) -