github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2025-01-03 04:51:57 +03:00
Code Issues Projects Releases Wiki Activity

Fix up some type applications.

Browse Source
This commit is contained in:
Rob Rix 2018-10-22 13:00:57 -04:00
parent 119cdad2d2
commit bfe5406fad
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

@ -105,7 +105,7 @@ runCallGraph lang includePackages modules package = do
analyzeModule = (if includePackages then graphingPackages else id) . convergingModules . graphingModules analyzeModule = (if includePackages then graphingPackages else id) . convergingModules . graphingModules
extractGraph (graph, _) = simplify graph extractGraph (graph, _) = simplify graph
runGraphAnalysis runGraphAnalysis
= graphing @_ @_ @(Maybe Name) @Monovariant = graphing @_ @_ @_ @(Hole (Maybe Name) (Located Monovariant))
. runHeap . runHeap
. caching . caching
. raiseHandler runFresh . raiseHandler runFresh