r5066: *** empty log message ***

[kmrcl.git] / kmrcl.asd

diff --git a/kmrcl.asd b/kmrcl.asd
index 3665dc570216c1d61c942465f90e89a01970f226..b866b39929c914e7a83e8e4eaf9c1a28256bb9bf 100644 (file)
--- a/kmrcl.asd
+++ b/kmrcl.asd
@@ -7,7 +7,7 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Apr 2000
 ;;;;
-;;;; $Id: kmrcl.asd,v 1.28 2003/04/29 03:55:49 kevin Exp $
+;;;; $Id: kmrcl.asd,v 1.30 2003/06/06 21:59:29 kevin Exp $
 ;;;;
 ;;;; This file, part of KMRCL, is Copyright (c) 2002 by Kevin M. Rosenberg
 ;;;;
@@ -16,6 +16,7 @@
 ;;;; (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)
 
@@ -38,7 +39,6 @@
      (:file "io" :depends-on ("macros"))
      (:file "console" :depends-on ("macros"))
      (:file "strings" :depends-on ("macros"))
-     (:file "equal" :depends-on ("macros"))
      (:file "buff-input" :depends-on ("macros"))
      (:file "telnet-server" :depends-on ("macros"))
      (:file "random" :depends-on ("macros"))
@@ -47,15 +47,13 @@
      (:file "math" :depends-on ("macros"))
      #+kmr-mop (:file "mop" :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"))
      (: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*))
+  (operate 'load-op 'kmrcl-tests)
+  (operate 'test-op 'kmrcl-tests))