diff --git a/src/Semantic/Graph.hs b/src/Semantic/Graph.hs
index a6bd3a3fc..3a143e683 100644
--- a/src/Semantic/Graph.hs
+++ b/src/Semantic/Graph.hs
@@ -105,7 +105,7 @@ runCallGraph lang includePackages modules package = do
       analyzeModule = (if includePackages then graphingPackages else id) . convergingModules . graphingModules
       extractGraph (graph, _) = simplify graph
       runGraphAnalysis
-        = graphing @_ @_ @(Maybe Name) @Monovariant
+        = graphing @_ @_ @_ @(Hole (Maybe Name) (Located Monovariant))
         . runHeap
         . caching
         . raiseHandler runFresh