-;;; -*- 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 (symbol-name :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.2"
: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" "macros"))
- (: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")
+ :cl-containers
+ :metabang-bind
+ ))
-;;; ---------------------------------------------------------------------------
+(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")))))
+ :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")))))
+
+#+asdf-system-connections
+(asdf:defsystem-connection cl-graph-and-moptilities
+ :requires (cl-graph moptilities)
+ :components ((:module
+ "dev"
+ :components
+ ((:file "subgraph-containing")))))
+
+#+asdf-system-connections
+(asdf:defsystem-connection cl-graph-and-dynamic-classes
+ :requires (cl-graph dynamic-classes)
+ :components ((:module
+ "dev"
+ :components
+ ((:file "dynamic-classes")))))
+
+
+
+