r3273: *** empty log message ***
[pipes.git] / pipes.asd
1 ;;;; -*- Mode: Lisp; Syntax: ANSI-Common-Lisp; Base: 10 -*-
2 ;;;; *************************************************************************
3 ;;;; FILE IDENTIFICATION
4 ;;;;
5 ;;;; Name:          pipes.asd
6 ;;;; Purpose:       ASDF system definition for PIPES package
7 ;;;; Programmer:    Kevin M. Rosenberg
8 ;;;; Date Started:  Apr 2000
9 ;;;;
10 ;;;; $Id: pipes.asd,v 1.1 2002/11/02 17:49:10 kevin Exp $
11 ;;;;
12 ;;;; This file, part of PIPES, is Copyright (c) 2002 by Kevin M. Rosenberg
13 ;;;;
14 ;;;; PIPES users are granted the rights to distribute and use this software
15 ;;;; as governed by the terms of the Lisp Lesser GNU Public License
16 ;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL.
17 ;;;; *************************************************************************
18
19 #+allegro (require :pxml)
20 #+(and allegro common-lisp-controller) (c-l-c::clc-require :aserve)
21 #+(and allegro (not common-lisp-controller)) (require :aserve)
22        
23 (in-package :asdf)
24
25 (defsystem :pipes
26     :perform (load-op :after (op pipes)
27                       (pushnew :pipes cl:*features*))
28     :components 
29     ((:file "package")
30      (:file "pipes" :depends-on ("package"))))
31
32
33 (when (ignore-errors (find-class 'load-compiled-op))
34   (defmethod perform :after ((op load-compiled-op) (c (eql (find-system :pipes))))
35     (pushnew :pipes cl:*features*)))
36