qnikst/ghc-timings-report
1
1
Fork 0
mirror of https://github.com/qnikst/ghc-timings-report.git synced 2024-10-03 23:39:35 +03:00
Code Issues Projects Releases Wiki Activity

Main.hs cleanup and spaces

Browse Source
This commit is contained in:
Alexander Vershilov 2022-09-04 16:56:42 +03:00
parent 1dceb1c4be
commit 01aa2431e1
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
Main.hs
View File

@ -15,6 +15,7 @@ main = join $ execParser (info (helper <*> opts) idm)
command "generate" (info (helper <*> generate) (progDesc "Generate timings report"))
<> command "compare" (info (helper <*> compareReports) (progDesc "Compare two reports"))
-- | Gather arguments for report generation.
generate :: Options.Parser (IO ())
generate = runGenerate
<$> strOption
@ -23,6 +24,8 @@ generate = runGenerate
<> metavar "PROJECT_DIR"
<> help "Haskell project directory"
)
-- | Gather arguments for comparing reports.
compareReports :: Options.Parser (IO ())
compareReports = runCompare
<$> strOption