X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=cl-graph.asd;h=b6852f8c5eb768dd347ed4217d0e1f8e94ec4dfa;hb=47ed448564c30a2d685e8897a80b14aa7798261a;hp=9fe25307ff27adf67a76fa3f75cd1eec7953df51;hpb=b621ac7a68fbf0d4ee562c4b2eeb7b6d707efa81;p=cl-graph.git

diff --git a/cl-graph.asd b/cl-graph.asd
index 9fe2530..b6852f8 100644
--- a/cl-graph.asd
+++ b/cl-graph.asd
@@ -1,76 +1,98 @@
-;;; -*- Mode: Lisp; package: CL-USER; Syntax: Common-lisp; Base: 10 -*-
+;;; -*- Mode: Lisp; package: cl-user; Syntax: Common-lisp; Base: 10 -*-
 
-#|
+(in-package #:common-lisp-user)
+(defpackage #:cl-graph-system (:use #:cl #:asdf))
+(in-package #:cl-graph-system)
 
-|#
-
-(in-package :common-lisp-user)
-(defpackage "ASDF-CL-GRAPH" (:use #:cl #:asdf))
-(in-package "ASDF-CL-GRAPH")
-
-(unless (find-system 'asdf-system-connections nil)
- (when (find-package 'asdf-install)
-   (print "Trying to install asdf-system-connections with ASDF-Install...")
-   (funcall (intern "INSTALL" "ASDF-INSTALL") 'asdf-system-connections)))
-;; give up with a useful (?) error message
 (unless (find-system 'asdf-system-connections nil)
-  (error "The CL-Graph system requires ASDF-SYSTEM-CONNECTIONS. See 
+  (warn "The CL-Graph system would enjoy having asdf-system-connections 
+around. See 
 http://www.cliki.net/asdf-system-connections for details and download
 instructions."))
-
-(asdf:operate 'asdf:load-op 'asdf-system-connections)
+(when (find-system 'asdf-system-connections nil)
+  (operate 'load-op 'asdf-system-connections))
 
 (defsystem cl-graph
-  :version "0.8"
+  :version "0.9.0"
   :author "Gary Warren King <gwking@metabang.com>"
   :maintainer "Gary Warren King <gwking@metabang.com>"
   :licence "MIT Style License"
   :description "Graph manipulation utilities for Common Lisp"
-  :components ((:module "dev"
-                        :components ((:file "package")
-                                     (:file "api"
-                                            :depends-on ("package"))
-                                     (:file "macros"
-                                            :depends-on ("package"))
-                                     (:file "graph"
-                                            :depends-on ("api"))
-                                     (:file "graph-container"
-                                            :depends-on ("graph"))
-                                     (:file "graph-matrix"
-                                            :depends-on ("graph"))
-                                     (:file "graph-metrics"
-                                            :depends-on ("graph"))
-                                     (:file "graph-algorithms"
-                                            :depends-on ("graph"))
+  :components ((:static-file "COPYING")
+	       (:module 
+		"dev"
+		:components 
+		((:file "package")
+		 (:file "api"
+			:depends-on ("package"))
+		 (:file "macros"
+			:depends-on ("package"))
+		 (:file "graph"
+			:depends-on ("api" "macros"))
+		 (:file "graph-container"
+			:depends-on ("graph"))
+		 (:file "graph-matrix"
+			:depends-on ("graph"))
+		 (:file "graph-algorithms"
+			:depends-on ("graph"))
                                      
-                                     (:static-file "notes.text")
+		 (:static-file "notes.text")
 
-                                     (:module "graphviz" :depends-on ("graph")
-                                              :components ((:file "graphviz-support")))))
-               (:module "website"
-                        :components ((:module "source"
-                                              :components ((:static-file "index.lml"))))))
-  
-  :depends-on (metatilities 
-               cl-containers
-               metabang-bind
-               cl-mathstats
-               asdf-system-connections          ; makes ASDF-Install get this automatically
-               ))
+		 (:module "graphviz" :depends-on ("graph")
+			  :components ((:file "graphviz-support")))))
+               (:module 
+		"website"
+		:components 
+		((:module "source"
+			  :components ((:static-file "index.md"))))))
+  :in-order-to ((test-op (load-op :cl-graph-test)))
+  :perform (test-op :after (op c)
+		    (funcall
+		      (intern (symbol-name '#:run-tests) :lift)
+		      :config :generic))
+  :depends-on ((:version :metatilities-base "0.6.0")
+	       :dynamic-classes
+	       :cl-containers
+	       :metabang-bind
+	       ;:cl-mathstats
+	       :moptilities
+	       ))
 
-;;; ---------------------------------------------------------------------------
+(defmethod operation-done-p 
+           ((o test-op) (c (eql (find-system 'cl-graph))))
+  (values nil))
 
+#+asdf-system-connections
 (asdf:defsystem-connection cl-graph-and-cl-variates
   :requires (cl-graph cl-variates)
-  :components ((:module "dev"
-                        :components ((:file "graph-and-variates")
-                                     (:file "graph-generation"
-                                            :depends-on ("graph-and-variates"))))))
+  :components ((:module 
+		"dev"
+		:components
+		((:file "graph-and-variates")
+		 (:file "graph-generation"
+			:depends-on ("graph-and-variates"))))))
 
+#+asdf-system-connections
 (asdf:defsystem-connection cl-graph-and-cl-graphviz
   :requires (cl-graph cl-graphviz)
-  :components ((:module "dev"
-                        :components
-                        ((:module "graphviz"
-                                  :components
-                                  ((:file "graphviz-support-optional")))))))
+  :components ((:module 
+		"dev"
+		:components
+		((:module "graphviz"
+			  :components
+			  ((:file "graphviz-support-optional")))))))
+
+#+asdf-system-connections
+(asdf:defsystem-connection cl-graph-and-metacopy
+  :requires (cl-graph metacopy)
+  :components ((:module 
+		"dev"
+		:components ((:file "copying")))))
+
+#+asdf-system-connections
+(asdf:defsystem-connection cl-graph-and-cl-mathstats
+  :requires (cl-graph cl-mathstats)
+  :components ((:module 
+		"dev"
+		:components
+		((:file "graph-metrics")))))