libgraph 1.11 → 1.12
raw patch · 3 files changed
+11/−2 lines, 3 files
Files
- Data/Graph/Libgraph.hs +2/−0
- Data/Graph/Libgraph/Core.hs +8/−1
- libgraph.cabal +1/−1
Data/Graph/Libgraph.hs view
@@ -34,6 +34,8 @@ , collapse , remove , treeDepth+, succCache+, predCache ) where import Data.Graph.Libgraph.Core import Data.Graph.Libgraph.DepthFirst
Data/Graph/Libgraph/Core.hs view
@@ -57,7 +57,14 @@ Nothing -> [] (Just ws) -> ws - where m = foldl (\m' (Arc v w _) -> insertCon v w m') Map.empty (arcs g)+ where m = foldl' (\m' (Arc v w _) -> insertCon v w m') Map.empty (arcs g)++predCache :: Ord vertex => Graph vertex arc -> (vertex -> [vertex])+predCache g = \v -> case Map.lookup v m of + Nothing -> []+ (Just ws) -> ws++ where m = foldl' (\m' (Arc v w _) -> insertCon w v m') Map.empty (arcs g) insertCon :: Ord k => k -> a -> Map k [a] -> Map k [a]
libgraph.cabal view
@@ -1,5 +1,5 @@ Name: libgraph -Version: 1.11 +Version: 1.12 Homepage: http://maartenfaddegon.nl Synopsis: Store and manipulate data in a graph. Description: A graph type, analysis of graphs and manipulation of graphs.