We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 956e11d commit cb28287Copy full SHA for cb28287
exe/Main.hs
@@ -130,7 +130,11 @@ main = do
130
let grab file = fromMaybe (head sessions) $ do
131
cradle <- Map.lookup file filesToCradles
132
Map.lookup cradle cradlesToSessions
133
- ide <- initialise def mainRule (pure $ IdInt 0) (showEvent lock) (logger Info) (defaultIdeOptions $ return $ return . grab) vfs
+
134
+ let options =
135
+ (defaultIdeOptions $ return $ return . grab)
136
+ { optShakeProfiling = argsShakeProfiling }
137
+ ide <- initialise def mainRule (pure $ IdInt 0) (showEvent lock) (logger Info) options vfs
138
139
putStrLn "\nStep 6/6: Type checking the files"
140
setFilesOfInterest ide $ Set.fromList $ map toNormalizedFilePath files
0 commit comments