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))))