;;;; Programmer: Kevin M. Rosenberg
;;;; Date Started: Apr 2000
;;;;
-;;;; $Id: kmrcl.asd,v 1.25 2003/04/28 23:51:59 kevin Exp $
+;;;; $Id$
;;;;
;;;; This file, part of KMRCL, is Copyright (c) 2002 by Kevin M. Rosenberg
;;;;
;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL.
;;;; *************************************************************************
+(in-package #:cl-user)
(defpackage #:kmrcl-system (:use #:asdf #:cl))
(in-package #:kmrcl-system)
-#+(or allegro cmucl lispworks sbcl scl) (pushnew :kmr-mop cl:*features*)
+#+(or allegro cmu lispworks sbcl scl openmcl)
+(pushnew :kmr-mop cl:*features*)
(defsystem kmrcl
:name "kmrcl"
:components
((:file "package")
+ (:file "ifstar" :depends-on ("package"))
+ (:file "byte-stream" :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 "impl" :depends-on ("macros"))
+ (:file "io" :depends-on ("macros" "impl"))
(:file "console" :depends-on ("macros"))
- (:file "strings" :depends-on ("genutils"))
- (:file "equal" :depends-on ("macros"))
+ (:file "strings" :depends-on ("macros" "seqs"))
+ (:file "strmatch" :depends-on ("strings"))
(: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"))
+ (:file "color" :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")))
- )
+ #+kmr-mop (:file "attrib-class" :depends-on ("seqs" "mop"))
+ (:file "equal" :depends-on ("macros" #+kmr-mop "mop"))
+ (:file "web-utils" :depends-on ("macros" "strings"))
+ (:file "xml-utils" :depends-on ("macros"))
+ (:file "sockets" :depends-on ("strings"))
+ (:file "processes" :depends-on ("macros"))
+ (:file "listener" :depends-on ("sockets" "processes" "console"))
+ (:file "repl" :depends-on ("listener" "strings"))
+ (:file "os" :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))
+(defmethod perform ((o test-op) (c (eql (find-system 'kmrcl))))
+ (operate 'load-op 'kmrcl-tests)
+ (operate 'test-op 'kmrcl-tests :force t))
-#+kmr-mop
-(setq cl:*features* (delete :kmr-mop cl:*features*))