From 7d76d1142827c15ab0a735b10ebb7b2a20127d98 Mon Sep 17 00:00:00 2001 From: "Kevin M. Rosenberg" Date: Tue, 15 Apr 2003 16:02:21 +0000 Subject: [PATCH] r4489: Auto commit for Debian build --- base64-tests.lisp | 7 ++----- base64.asd | 4 ++-- 2 files changed, 4 insertions(+), 7 deletions(-) diff --git a/base64-tests.lisp b/base64-tests.lisp index c9bcb6f..7b8a14a 100644 --- a/base64-tests.lisp +++ b/base64-tests.lisp @@ -7,15 +7,12 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Jan 2003 ;;;; -;;;; $Id: base64-tests.lisp,v 1.5 2003/04/15 15:55:52 kevin Exp $ +;;;; $Id: base64-tests.lisp,v 1.6 2003/04/15 16:02:21 kevin Exp $ ;;;; ************************************************************************* (in-package :cl-user) -(defpackage #:base64-test - (:use #:cl #:kmrcl #:base64 #:util.test)) - -(in-package #:base64-test) +(in-package #:base64) (defun test-base64 () (setq *break-on-test-failures* t) diff --git a/base64.asd b/base64.asd index 058c33c..81a054c 100644 --- a/base64.asd +++ b/base64.asd @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Dec 2002 ;;;; -;;;; $Id: base64.asd,v 1.12 2003/04/15 15:58:33 kevin Exp $ +;;;; $Id: base64.asd,v 1.13 2003/04/15 16:02:21 kevin Exp $ ;;;; ************************************************************************* (in-package :asdf) @@ -39,5 +39,5 @@ )) (defmethod perform ((o test-op) (c (eql (find-system :base64)))) - (or (base64-test:test-base64) + (or (test-base64) (error "test-op failed"))) -- 2.34.1