X-Git-Url: http://git.kpe.io/?p=cl-base64.git;a=blobdiff_plain;f=base64-tests.lisp;h=ee2d8863946e8858400c88286511ef59e6f51e9d;hp=0e5fb1e0504b71bd876d321f09c8fa09a8dcbf9a;hb=ea86d529b888eaf0d3add0e22b87f2655d7a08a2;hpb=e0713e35f91fd123fda58c7187d934d25e1590d1 diff --git a/base64-tests.lisp b/base64-tests.lisp index 0e5fb1e..ee2d886 100644 --- a/base64-tests.lisp +++ b/base64-tests.lisp @@ -7,18 +7,17 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Jan 2003 ;;;; -;;;; $Id: base64-tests.lisp,v 1.10 2003/04/15 16:21:43 kevin Exp $ +;;;; $Id: base64-tests.lisp,v 1.11 2003/04/15 16:22:45 kevin Exp $ ;;;; ************************************************************************* (in-package :cl-user) (defpackage #:base64-test - (:use #:cl #:kmrcl #:base64 #:util.test)) + (:use #:cl #:kmrcl #:base64)) (in-package #:base64-test) (defun test-base64 () - (setq *break-on-test-failures* t) (do* ((length 0 (+ 3 length)) (string (make-string length) (make-string length)) (usb8 (make-usb8-array length) (make-usb8-array length))