2019-02-24 10:30:57 +01:00
|
|
|
;;;; Define ASDF system
|
|
|
|
|
(defsystem "lisp-algo"
|
|
|
|
|
:description "Provide several lisp algorithms"
|
|
|
|
|
:version "0.0.1"
|
|
|
|
|
:depends-on ("lisp-unit")
|
|
|
|
|
:perform (test-op (o s) (symbol-call :com.lisp-algo.test :do-tests))
|
2019-02-24 20:33:55 +01:00
|
|
|
:serial t
|
2019-02-24 10:30:57 +01:00
|
|
|
:components ((:file "packages")
|
|
|
|
|
(:module "union-find"
|
2019-02-24 20:33:55 +01:00
|
|
|
:serial t
|
2019-02-24 10:30:57 +01:00
|
|
|
:depends-on ("packages")
|
2019-02-24 20:33:55 +01:00
|
|
|
:components ((:file "union-find")
|
|
|
|
|
(:file "quick-find")
|
2019-02-24 10:30:57 +01:00
|
|
|
(:file "quick-union")
|
|
|
|
|
(:file "weighted-quick-union")
|
|
|
|
|
(:file "weighted-quick-union-path-compression")))
|
|
|
|
|
(:module "test"
|
|
|
|
|
:depends-on ("packages")
|
|
|
|
|
:components ((:file "test")
|
|
|
|
|
(:file "union-find")))))
|
|
|
|
|
|
|
|
|
|
|
