Strictness for !fullModuleGraph

haskell · Dec 26, 2022 · 299795a · 299795a
1 parent 580795d
commit 299795a
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/ghcide/src/Development/IDE/Core/Rules.hs b/ghcide/src/Development/IDE/Core/Rules.hs
@@ -815,7 +815,8 @@ ghcSessionDepsDefinition fullModSummary GhcSessionDepsConfig{..} env file = do
 #endif
                       nubOrdOn ms_mod (ms : concatMap mgModSummaries mgs)
 #endif
-                pure $ mkModuleGraph module_graph_nodes
+                evaluate $ liftRnf rwhnf module_graph_nodes
+                return $ mkModuleGraph module_graph_nodes
             session' <- liftIO $ mergeEnvs hsc mg ms inLoadOrder depSessions
 
             Just <$> liftIO (newHscEnvEqWithImportPaths (envImportPaths env) session' [])