exe/Arguments.hs · ghcide

on package-debug help sign in

ghcide/exe/Arguments.hs

29 lines 914 B history raw

2-- SPDX-License-Identifier: Apache-2.0

4module Arguments(Arguments(..), getArguments) where

6import Options.Applicative

9data Arguments = Arguments

10 {argLSP :: Bool

11 ,argsCwd :: Maybe FilePath

12 ,argFiles :: [FilePath]

13 ,argsVersion :: Bool

14 }

16getArguments :: IO Arguments

17getArguments = execParser opts

18 where

19 opts = info (arguments <**> helper)

20 ( fullDesc

21 <> progDesc "Used as a test bed to check your IDE will work"

22 <> header "ghcide - the core of a Haskell IDE")

24arguments :: Parser Arguments

25arguments = Arguments

26 <$> switch (long "lsp" <> help "Start talking to an LSP server")

27 <*> optional (strOption $ long "cwd" <> metavar "DIR" <> help "Change to this directory")

28 <*> many (argument str (metavar "FILES/DIRS..."))

29 <*> switch (long "version" <> help "Show ghcide and GHC versions")