1 ;;;; -*- Mode: LISP; Syntax: ANSI-Common-Lisp; Base: 10 -*-
2 ;;;; *************************************************************************
3 ;;;; FILE IDENTIFICATION
5 ;;;; Name: cl-base64.asd
6 ;;;; Purpose: ASDF definition file for Cl-Base64
7 ;;;; Programmer: Kevin M. Rosenberg
8 ;;;; Date Started: Dec 2002
11 ;;;; *************************************************************************
13 (in-package #:cl-user)
14 (defpackage #:cl-base64-system (:use #:asdf #:cl))
15 (in-package #:cl-base64-system)
20 :author "Kevin M. Rosenberg based on initial code by Juri Pakaste"
22 :maintainer "Kevin M. Rosenberg <kmr@debian.org>"
24 :description "Base64 encoding and decoding with URI support."
28 (:file "encode" :depends-on ("package"))
29 (:file "decode" :depends-on ("package"))
32 (defmethod perform ((o test-op) (c (eql (find-system 'cl-base64))))
33 (operate 'load-op 'cl-base64-tests)
34 (operate 'test-op 'cl-base64-tests :force t))
36 (defsystem cl-base64-tests
37 :depends-on (cl-base64 ptester kmrcl)
42 (defmethod perform ((o test-op) (c (eql (find-system 'cl-base64-tests))))
43 (operate 'load-op 'cl-base64-tests)
44 (or (funcall (intern (symbol-name '#:do-tests)
45 (find-package '#:cl-base64-tests)))
46 (error "test-op failed")))