Parse command-line options

This commit is contained in:
Joscha 2020-03-27 21:35:04 +00:00
parent 975c5e4116
commit 362025c8df
3 changed files with 35 additions and 1 deletions

View file

@ -1,4 +1,10 @@
module Main where
import Options.Applicative
import Mima.MimaRun.Options
main :: IO ()
main = putStrLn "In the beginning, there was nothing."
main = do
opts <- execParser parserInfo
putStrLn $ "The options are: " ++ show opts