X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=unit-tests%2Ftest-graph-container.lisp;h=f2e2c89f652f3f13af2cc35db7e32de820e4a376;hb=790be1703c3eb5cd77043ba0dbfa0aafb834e8cd;hp=95ba3c0064fc9a8214b80ae348242fd337629447;hpb=fbbd5f255d84d9f24a47907cc68d048b18907a5c;p=cl-graph.git diff --git a/unit-tests/test-graph-container.lisp b/unit-tests/test-graph-container.lisp index 95ba3c0..f2e2c89 100644 --- a/unit-tests/test-graph-container.lisp +++ b/unit-tests/test-graph-container.lisp @@ -1,4 +1,4 @@ -(in-package cl-graph-test) +(in-package #:cl-graph-test) ;;; --------------------------------------------------------------------------- ;;; utilities @@ -47,6 +47,7 @@ (ensure-same (size g) 6 :test '=))) +#| ;;; --------------------------------------------------------------------------- ;;; copying ;;; --------------------------------------------------------------------------- @@ -79,6 +80,5 @@ (ensure (not (find-edge-between-vertexes g2 (find-vertex g1 'a) (find-vertex g1 'b)))))) -;;; --------------------------------------------------------------------------- - +|#