extracted meta-model from LoL into its own archive

[clinton/lisp-on-lines.git] / lisp-on-lines.asd

diff --git a/lisp-on-lines.asd b/lisp-on-lines.asd
index ebcdcfa..e4daa46 100644 (file)
--- a/lisp-on-lines.asd
+++ b/lisp-on-lines.asd
@@ -1,42 +1,33 @@
 ;;; -*- lisp -*-
 
 (eval-when (:compile-toplevel :load-toplevel :execute)
-  (unless (find-package :coop.tech.lisp-on-lines.system)
-    (defpackage :coop.tech.lisp-on-lines.system
+  (unless (find-package :coop.tech.systems)
+    (defpackage :coop.tech.systems
       (:documentation "ASDF System package for meta-model.")
       (:use :common-lisp :asdf))))
 
-(in-package :coop.tech.lisp-on-lines.system)
+(in-package :coop.tech.systems)
 
-(defsystem :meta-model
-  :components (
-               (:module :src
-                :components ((:file "packages")
-                             (:file "meta-model" :depends-on ("packages"))))
-              (:module :backend
-                :depends-on (:src)      
-               :pathname "src/backend/"
-               :components ((:file "clsql"))))
-  :depends-on (:clsql :clsql-pg-introspect))
-
-;; this is no longer used
-(defsystem :meta-model-clsql
-  :components ()
-  :depends-on  (:meta-model :clsql ))
 
 (defsystem :mewa
   :components ((:module :src 
                :pathname "src/mewa/"
                :components 
-                 ((:file "mewa")
-                  (:file "presentations" :depends-on ("mewa"))
-                  (:file "slot-presentations" :depends-on ("presentations")))))
+               ((:file "packages")
+                (:file "static-presentations")
+                (:file "mewa")
+                (:file "presentations" )
+                (:file "slot-presentations"))
+               :serial t))
   :depends-on (:ucw :meta-model))
          
 (defsystem :lisp-on-lines
   :components ((:static-file "lisp-on-lines.asd")
               (:module :src
-                       :components ((:file "lisp-on-lines")))
+                       :components ((:file "packages")
+                                    (:file "lisp-on-lines"))
+                       :serial t)
+                       
               (:module :components
                :pathname "src/components/"
                 :components ((:file "range-list")