--- a/cl-directed-graph.asd Sat Nov 05 19:34:10 2016 +0000
+++ b/cl-directed-graph.asd Sat Nov 05 19:36:53 2016 +0000
@@ -1,6 +1,6 @@
-(asdf:defsystem :cl-directed-graph
- :name "directed-graph"
- :description "Simple directed graphs in Common Lisp."
+(asdf:defsystem :cl-digraph
+ :name "digraph"
+ :description "Simple directed graphs for Common Lisp."
:author "Steve Losh <steve@stevelosh.com>"
--- a/package.lisp Sat Nov 05 19:34:10 2016 +0000
+++ b/package.lisp Sat Nov 05 19:36:53 2016 +0000
@@ -1,4 +1,4 @@
-(defpackage :directed-graph
- (:use :cl :directed-graph.quickutils)
+(defpackage :digraph
+ (:use :cl :digraph.quickutils)
(:export))
--- a/src/directed-graph.lisp Sat Nov 05 19:34:10 2016 +0000
+++ b/src/directed-graph.lisp Sat Nov 05 19:36:53 2016 +0000
@@ -1,4 +1,4 @@
-(in-package :directed-graph)
+(in-package :digraph)
;;;; Data ---------------------------------------------------------------------
--- a/vendor/make-quickutils.lisp Sat Nov 05 19:34:10 2016 +0000
+++ b/vendor/make-quickutils.lisp Sat Nov 05 19:36:53 2016 +0000
@@ -20,4 +20,4 @@
:with-gensyms
)
- :package "DIRECTED-GRAPH.QUICKUTILS")
+ :package "DIGRAPH.QUICKUTILS")
--- a/vendor/quickutils-package.lisp Sat Nov 05 19:34:10 2016 +0000
+++ b/vendor/quickutils-package.lisp Sat Nov 05 19:36:53 2016 +0000
@@ -1,10 +1,10 @@
(eval-when (:compile-toplevel :load-toplevel :execute)
- (unless (find-package "DIRECTED-GRAPH.QUICKUTILS")
- (defpackage "DIRECTED-GRAPH.QUICKUTILS"
+ (unless (find-package "DIGRAPH.QUICKUTILS")
+ (defpackage "DIGRAPH.QUICKUTILS"
(:documentation "Package that contains Quickutil utility functions.")
(:use :cl))))
-(in-package "DIRECTED-GRAPH.QUICKUTILS")
+(in-package "DIGRAPH.QUICKUTILS")
;; need to define this here so sbcl will shut the hell up about it being
;; undefined when compiling quickutils.lisp. computers are trash.
--- a/vendor/quickutils.lisp Sat Nov 05 19:34:10 2016 +0000
+++ b/vendor/quickutils.lisp Sat Nov 05 19:36:53 2016 +0000
@@ -2,15 +2,15 @@
;;;; See http://quickutil.org for details.
;;;; To regenerate:
-;;;; (qtlc:save-utils-as "quickutils.lisp" :utilities '(:COMPOSE :CURRY :DOHASH :ENSURE-BOOLEAN :ENSURE-GETHASH :ENSURE-LIST :HASH-TABLE-KEYS :MAPHASH-KEYS :MKSTR :ONCE-ONLY :RCURRY :REMOVEF :SYMB :WITH-GENSYMS) :ensure-package T :package "DIRECTED-GRAPH.QUICKUTILS")
+;;;; (qtlc:save-utils-as "quickutils.lisp" :utilities '(:COMPOSE :CURRY :DOHASH :ENSURE-BOOLEAN :ENSURE-GETHASH :ENSURE-LIST :HASH-TABLE-KEYS :MAPHASH-KEYS :MKSTR :ONCE-ONLY :RCURRY :REMOVEF :SYMB :WITH-GENSYMS) :ensure-package T :package "DIGRAPH.QUICKUTILS")
(eval-when (:compile-toplevel :load-toplevel :execute)
- (unless (find-package "DIRECTED-GRAPH.QUICKUTILS")
- (defpackage "DIRECTED-GRAPH.QUICKUTILS"
+ (unless (find-package "DIGRAPH.QUICKUTILS")
+ (defpackage "DIGRAPH.QUICKUTILS"
(:documentation "Package that contains Quickutil utility functions.")
(:use #:cl))))
-(in-package "DIRECTED-GRAPH.QUICKUTILS")
+(in-package "DIGRAPH.QUICKUTILS")
(when (boundp '*utilities*)
(setf *utilities* (union *utilities* '(:MAKE-GENSYM-LIST :ENSURE-FUNCTION