@@ -13,6 +13,7 @@ data Arguments = Arguments
1313 ,argsVersion :: Bool
1414 ,argsShakeProfiling :: Maybe FilePath
1515 ,argsTesting :: Bool
16+ ,argsThreads :: Int
1617 }
1718
1819getArguments :: IO Arguments
@@ -31,3 +32,4 @@ arguments = Arguments
3132 <*> switch (long "version" <> help "Show ghcide and GHC versions")
3233 <*> optional (strOption $ long "shake-profiling" <> metavar "DIR" <> help "Dump profiling reports to this directory")
3334 <*> switch (long "test" <> help "Enable additional lsp messages used by the testsuite")
35+ <*> option auto (short 'j' <> help "Number of threads (0: automatic)" <> metavar "NUM" <> value 0 <> showDefault)