X-Git-Url: http://git.kpe.io/?p=cl-base64.git;a=blobdiff_plain;f=base64-tests.lisp;fp=base64-tests.lisp;h=d1589aacfafa6e3fb534d2cf451f7f90b5976872;hp=26004f4f9becfdf8d4a5a2a0fb2d3880559b23ea;hb=e34a016ebf2a676a297b5587cdd7e1029dbc1daf;hpb=82add2747ad25aafe558e51660b41286d1e39b77 diff --git a/base64-tests.lisp b/base64-tests.lisp index 26004f4..d1589aa 100644 --- a/base64-tests.lisp +++ b/base64-tests.lisp @@ -7,12 +7,13 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Jan 2003 ;;;; -;;;; $Id: base64-tests.lisp,v 1.13 2003/05/06 16:19:51 kevin Exp $ +;;;; $Id: base64-tests.lisp,v 1.14 2003/06/12 14:05:11 kevin Exp $ ;;;; ************************************************************************* -(in-package :cl-user) - -(defpackage #:base64-test (:use #:cl #:kmrcl #:base64)) +(in-package #:cl-user) +(defpackage #:base64-test + (:use #:cl #:kmrcl #:base64) + (:export #:test-base64)) (in-package #:base64-test) (defun test-base64 () @@ -71,5 +72,4 @@ #+allegro (time-iterations n (excl:usb8-array-to-base64-string usb8)))) -(export 'test-base64) ;;(test-base64)