Commit 3d88a3ec authored by kristenk's avatar kristenk Committed by Edward Z. Yang
Browse files

Fix build with GHC 7.8.4.

parent 3aee78dd
......@@ -87,7 +87,7 @@ findCycles pkg rdm =
else Nothing
where
hasCycle :: Bool
hasCycle = pkg `elem` closure (neighbors pkg)
hasCycle = pkg `S.member` closure (neighbors pkg)
closure :: [QPN] -> S.Set QPN
closure = foldl go S.empty
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment