diff options
Diffstat (limited to 'testsuite/tests/typecheck/should_compile/tc065.hs')
-rw-r--r-- | testsuite/tests/typecheck/should_compile/tc065.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/testsuite/tests/typecheck/should_compile/tc065.hs b/testsuite/tests/typecheck/should_compile/tc065.hs index 1d47cf35c4..510eca6103 100644 --- a/testsuite/tests/typecheck/should_compile/tc065.hs +++ b/testsuite/tests/typecheck/should_compile/tc065.hs @@ -68,7 +68,7 @@ type FlattenedDependencyInfo vertex name code mkVertices :: FlattenedDependencyInfo vertex name code -> [vertex] mkVertices info = [ vertex | (vertex,_,_,_) <- info] -mkEdges :: (Eq vertex, Ord name) => +mkEdges :: (Ord name) => [vertex] -> FlattenedDependencyInfo vertex name code -> [Edge vertex] @@ -85,7 +85,7 @@ mkEdges vertices flat_info name `Set.member` names_defined ] -lookupVertex :: (Eq vertex, Ord name) => +lookupVertex :: (Eq vertex) => FlattenedDependencyInfo vertex name code -> vertex -> code |