github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-12-22 14:21:31 +03:00
Code Issues Projects Releases Wiki Activity

🔥 some redundant Monad constraints.

Browse Source
This commit is contained in:
Rob Rix 2018-10-23 11:54:34 -04:00
parent 9bae2bfcb2
commit 422d1a6db0
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/Semantic/Graph.hs
View File

@ -65,7 +65,7 @@ data GraphType = ImportGraph | CallGraph
type AnalysisClasses = '[ Declarations1, Eq1, Evaluatable, FreeVariables1, Foldable, Functor, Ord1, Show1 ] type AnalysisClasses = '[ Declarations1, Eq1, Evaluatable, FreeVariables1, Foldable, Functor, Ord1, Show1 ]
runGraph :: (Member Distribute sig, Member (Error SomeException) sig, Member Resolution sig, Member Task sig, Member Trace sig, Carrier sig m, Monad m, Effect sig) runGraph :: (Member Distribute sig, Member (Error SomeException) sig, Member Resolution sig, Member Task sig, Member Trace sig, Carrier sig m, Effect sig)
=> GraphType => GraphType
-> Bool -> Bool
-> Project -> Project
@ -236,7 +236,6 @@ parsePythonPackage :: forall syntax sig m term.
, Member Trace sig , Member Trace sig
, Member Task sig , Member Task sig
, Carrier sig m , Carrier sig m
, Monad m
, Effect sig , Effect sig
) )
=> Parser term -- ^ A parser. => Parser term -- ^ A parser.