;;;; Programmer: Kevin M. Rosenberg
;;;; Date Started: Dec 2002
;;;;
-;;;; $Id: base64.asd,v 1.14 2003/04/15 16:03:54 kevin Exp $
+;;;; $Id: base64.asd,v 1.15 2003/04/15 16:05:39 kevin Exp $
;;;; *************************************************************************
(in-package :asdf)
))
(defmethod perform ((o test-op) (c (eql (find-system :base64))))
- (or (base64::test-base64)
+ (or (test-base64)
(error "test-op failed")))
;;;; Programmer: Kevin M. Rosenberg
;;;; Date Started: Dec 2002
;;;;
-;;;; $Id: package.lisp,v 1.3 2003/01/14 11:59:44 kevin Exp $
+;;;; $Id: package.lisp,v 1.4 2003/04/15 16:05:39 kevin Exp $
;;;;
;;;; *************************************************************************
#:*uri-encode-table*
#:*uri-decode-table*
#:make-decode-table
+
+ #:test-base64
))
(in-package #:cl-base64)