summaryrefslogtreecommitdiff
path: root/tests/Hakyll/Core/DirectedGraph
diff options
context:
space:
mode:
authorJasper Van der Jeugt <jaspervdj@gmail.com>2011-02-09 18:11:24 +0100
committerJasper Van der Jeugt <jaspervdj@gmail.com>2011-02-09 18:11:24 +0100
commit002cf4de32db979d515c2a9cdcd8c8f42859a797 (patch)
tree6992a3f05e693116ae6802ef48448a5a03aded1e /tests/Hakyll/Core/DirectedGraph
parent7da7e0b96c245a14122896c24dcee52f038e583a (diff)
downloadhakyll-002cf4de32db979d515c2a9cdcd8c8f42859a797.tar.gz
Add hamlet templates and restructure tests
Diffstat (limited to 'tests/Hakyll/Core/DirectedGraph')
-rw-r--r--tests/Hakyll/Core/DirectedGraph/Tests.hs12
1 files changed, 0 insertions, 12 deletions
diff --git a/tests/Hakyll/Core/DirectedGraph/Tests.hs b/tests/Hakyll/Core/DirectedGraph/Tests.hs
index 1a9b406..3e04b49 100644
--- a/tests/Hakyll/Core/DirectedGraph/Tests.hs
+++ b/tests/Hakyll/Core/DirectedGraph/Tests.hs
@@ -11,13 +11,10 @@ import Test.HUnit hiding (Test)
import Hakyll.Core.DirectedGraph
import Hakyll.Core.DirectedGraph.DependencySolver
-import Hakyll.Core.DirectedGraph.ObsoleteFilter
tests :: [Test]
tests =
[ testCase "solveDependencies [1]" solveDependencies1
- , testCase "filterObsolete [1]" filterObsolete1
- , testCase "filterObsolete [2]" filterObsolete2
]
node :: Ord a => a -> [a] -> (a, Set a)
@@ -37,12 +34,3 @@ solveDependencies1 = result == [3, 4, 2, 6, 8] || result == [3, 4, 2, 6, 8]
@? "solveDependencies1"
where
result = solveDependencies testGraph01
-
-filterObsolete1 :: Assertion
-filterObsolete1 = nodes (filterObsolete [6] testGraph01) == S.fromList [6, 8]
- @? "filterObsolete1"
-
-filterObsolete2 :: Assertion
-filterObsolete2 =
- nodes (filterObsolete [4] testGraph01) == S.fromList [4, 2, 6, 8]
- @? "filterObsolete2"