diff --git a/base64-tests.lisp b/base64-tests.lisp index f12a8ff8e9e58768e1135a6bc164c02406a00823..c9bcb6fe0015892c191d0acc36ea35299f8b6775 100644 --- a/base64-tests.lisp +++ b/base64-tests.lisp @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Jan 2003 ;;;; -;;;; $Id: base64-tests.lisp,v 1.4 2003/04/15 15:53:38 kevin Exp $ +;;;; $Id: base64-tests.lisp,v 1.5 2003/04/15 15:55:52 kevin Exp $ ;;;; ************************************************************************* (in-package :cl-user) @@ -73,5 +73,5 @@ (time-iterations n (string-to-base64-string str)) (time-iterations n (excl:usb8-array-to-base64-string usb8)))) - +(export 'test-base64) ;;(test-base64) diff --git a/base64.asd b/base64.asd index e4a26aa98af8133dbadc633603b61ef4f4c386fd..a947a525bc8ff8db51600bb45ed9d5326e444a8f 100644 --- a/base64.asd +++ b/base64.asd @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Dec 2002 ;;;; -;;;; $Id: base64.asd,v 1.10 2003/04/15 15:53:38 kevin Exp $ +;;;; $Id: base64.asd,v 1.11 2003/04/15 15:54:51 kevin Exp $ ;;;; ************************************************************************* (in-package :asdf) @@ -35,7 +35,7 @@ ((:file "package") (:file "encode" :depends-on ("package")) (:file "decode" :depends-on ("package")) - (:file "tests-base64" :depends-on ("encode" "decode")) + (:file "base64-tests" :depends-on ("encode" "decode")) )) (defmethod perform ((o test-op) (c (eql (find-system :base64))))