r3287: *** empty log message ***
[umlisp.git] / umlisp.asd
index 6830add9a51f49ca1b8accf93e5bd25251f1a799..29e1e5829996cdcfeb533dfaf70117e3437cef89 100644 (file)
@@ -7,7 +7,7 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Apr 2000
 ;;;;
-;;;; $Id: umlisp.asd,v 1.5 2002/10/13 16:47:29 kevin Exp $
+;;;; $Id: umlisp.asd,v 1.10 2002/11/03 20:10:11 kevin Exp $
 ;;;;
 ;;;; This file, part of UMLisp, is
 ;;;;    Copyright (c) 2000-2002 by Kevin M. Rosenberg, M.D.
 
 (in-package :asdf)
 
-#+(or allegro lispworks cmu)
-(defsystem umlisp
+#+(or allegro lispworks cmu sbcl openmcl scl)
+(defsystem :umlisp
+  :perform (load-op :after (op umlisp)
+                   (pushnew :umlisp cl:*features*))
+  
     :components 
      ((:file "package")
       (:file "data-structures" :depends-on ("package"))
       (:file "parse-macros"  :depends-on ("sql"))
       (:file "parse-2002"  :depends-on ("parse-macros"))
       (:file "parse-common"  :depends-on ("parse-2002"))
+      (:file "sql-create" :depends-on ("parse-common"))
       (:file "classes" :depends-on ("utils"))
       (:file "sql-classes" :depends-on ("classes" "sql"))
       (:file "composite" :depends-on ("sql-classes")))
-     :depends-on (:kmrcl
-                 :clsql-mysql
-                 :clsql)
-     )
+     :depends-on (:clsql-mysql
+                 :clsql-postgresql
+                 :clsql
+                 :kmrcl
+                 :hyperobject))
 
+#+(or allegro lispworks cmu sbcl openmcl)
+(when (ignore-errors (find-class 'load-compiled-op))
+  (defmethod perform :after ((op load-compiled-op) (c (eql (find-system :umlisp))))
+    (pushnew :umlisp cl:*features*)))