X-Git-Url: http://git.kpe.io/?p=kmrcl.git;a=blobdiff_plain;f=kmrcl.asd;h=eb47c3f772ea1dd14d448e8c30199f79cfcad89c;hp=04124bc6860d7885479b0406ae05ee9a9efde938;hb=4de7f25a69c218303f170314ac26217770a531ed;hpb=5e5cc3c20a925d8af5de153a118fdaf0792dd7e2

diff --git a/kmrcl.asd b/kmrcl.asd
index 04124bc..eb47c3f 100644
--- a/kmrcl.asd
+++ b/kmrcl.asd
@@ -7,33 +7,53 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Apr 2000
 ;;;;
-;;;; $Id: kmrcl.asd,v 1.1 2002/10/06 13:21:47 kevin Exp $
+;;;; $Id: kmrcl.asd,v 1.25 2003/04/28 23:51:59 kevin Exp $
 ;;;;
 ;;;; This file, part of KMRCL, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
 ;;;; KMRCL users are granted the rights to distribute and use this software
-;;;; as governed by the terms of the GNU General Public License.
+;;;; as governed by the terms of the Lisp Lesser GNU Public License
+;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL.
 ;;;; *************************************************************************
 
-#+allegro (require :pxml)
-#+allegro (require :aserve)
+(defpackage #:kmrcl-system (:use #:asdf #:cl))
+(in-package #:kmrcl-system)
 
-(in-package :asdf)
+#+(or allegro cmucl lispworks sbcl scl) (pushnew :kmr-mop cl:*features*)
+
+(defsystem kmrcl
+    :name "kmrcl"
+    :author "Kevin M. Rosenberg <kevin@rosenberg.net>"
+    :version "1.31+"
+    :maintainer "Kevin M. Rosenberg <kmr@debian.org>"
+    :licence "LLGPL"
 
-(defsystem :kmrcl
     :components 
     ((:file "package")
-     (:file "genutils" :depends-on ("package"))
-     (:file "buff-input" :depends-on ("genutils"))
-     (:file "telnet-server" :depends-on ("genutils"))
-     (:file "pipes" :depends-on ("package"))
-     (:file "random" :depends-on ("package"))
-     (:file "cl-symbols" :depends-on ("package"))
-     #+allegro (:file "attrib-class" :depends-on ("package"))
-     
-     (:file "web-utils" :depends-on ("package"))
-     (:file "xml-utils" :depends-on ("package"))
-     #+(or allegro lispworks) (:file "ml-class" :depends-on ("package"))
-     #+(or allegro aserve) (:file "web-utils-aserve" :depends-on ("package"))
-     ))
+     (:file "macros" :depends-on ("package"))
+     (:file "functions" :depends-on ("macros"))
+     (:file "lists" :depends-on ("macros"))
+     (:file "seqs" :depends-on ("macros"))
+     (:file "io" :depends-on ("macros"))
+     (:file "console" :depends-on ("macros"))
+     (:file "strings" :depends-on ("genutils"))
+     (:file "equal" :depends-on ("macros"))
+     (:file "buff-input" :depends-on ("macros"))
+     (:file "telnet-server" :depends-on ("macros"))
+     (:file "random" :depends-on ("macros"))
+     (:file "symbols" :depends-on ("macros"))
+     (:file "datetime" :depends-on ("macros"))
+     (:file "math" :depends-on ("macros"))
+     #+kmr-mop (:file "mop" :depends-on ("macros"))
+     #+kmr-mop (:file "attrib-class" :depends-on ("genutils" "mop"))
+     (:file "web-utils" :depends-on ("macros"))
+     (:file "xml-utils" :depends-on ("macros")))
+    )
+
+#+(or allegro lispworks sbcl cmu scl)
+(defmethod perform ((o test-op) (c (eql (find-system :kmrcl))))
+  (oos 'load-op 'kmrcl-tests)
+  (oos 'test-op 'kmrcl-tests))
 
+#+kmr-mop
+(setq cl:*features* (delete :kmr-mop cl:*features*))