github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-12-11 08:45:48 +03:00
Code Issues Projects Releases Wiki Activity

We won’t ever have load errors to graph, so 🔥.

Browse Source
This commit is contained in:
Rob Rix 2018-05-22 14:13:17 -04:00
parent 178165abc2
commit cb264f5d36
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Semantic/Graph.hs
View File

@ -47,7 +47,7 @@ runGraph graphType project
| SomeAnalysisParser parser prelude <- someAnalysisParser | SomeAnalysisParser parser prelude <- someAnalysisParser
(Proxy :: Proxy '[ Evaluatable, Declarations1, FreeVariables1, Functor, Eq1, Ord1, Show1 ]) (projectLanguage project) = do (Proxy :: Proxy '[ Evaluatable, Declarations1, FreeVariables1, Functor, Eq1, Ord1, Show1 ]) (projectLanguage project) = do
package <- parsePackage parser prelude project package <- parsePackage parser prelude project
let analyzeTerm = withTermSpans . graphingLoadErrors . case graphType of let analyzeTerm = withTermSpans . case graphType of
ImportGraph -> id ImportGraph -> id
CallGraph -> graphingTerms CallGraph -> graphingTerms
analyzeModule = graphingPackages . graphingModules analyzeModule = graphingPackages . graphingModules