X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=unit-tests%2Ftest-graph-algorithms.lisp;h=4502784d42c8b406ea936f229623cc91a5f32f65;hb=b9b77eaf8b04ffe94412d5ff49cacae2d19ebb65;hp=f54b8791ecd88e218886273549727d456bff1f95;hpb=3e6caf777362fbe61b76b305e9b4aa1e80a60bc4;p=cl-graph.git diff --git a/unit-tests/test-graph-algorithms.lisp b/unit-tests/test-graph-algorithms.lisp index f54b879..4502784 100644 --- a/unit-tests/test-graph-algorithms.lisp +++ b/unit-tests/test-graph-algorithms.lisp @@ -1,4 +1,4 @@ -(in-package cl-graph) +(in-package cl-graph-test) (deftestsuite test-connected-components () ()) @@ -113,6 +113,7 @@ ;;; --------------------------------------------------------------------------- +#+Ignore (let ((graph (make-container 'graph-container))) (loop for (a b) in '((r s) (r v) (s w) (t u) (t w) (t x) (u y) (w x) (x y)) do