1
1
mirror of https://github.com/github/semantic.git synced 2024-11-24 08:54:07 +03:00

parseAST handles this

This commit is contained in:
Ayman Nadeem 2019-10-11 13:05:09 -04:00
parent 08cbd88e71
commit 7e358a8c2e

View File

@ -63,14 +63,6 @@ data Format = Show
deriving (Read)
-- pass in a file as an argument and parse its contents
fileInput :: Parser Input
fileInput = FileInput <$> strOption
( long "file"
<> short 'f'
<> metavar "FILENAME"
<> help "Input file" )
-- Read from stdin
stdInput :: Parser Input
stdInput = flag' StdInput