diff options
Diffstat (limited to 'app')
| -rw-r--r-- | app/Main.hs | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/app/Main.hs b/app/Main.hs index 721dfec..1e22a4b 100644 --- a/app/Main.hs +++ b/app/Main.hs @@ -27,6 +27,13 @@ args = (long "target" <> short 't' <> metavar "TARGET" <> value "" <> help "Optimize to target using BLoC and BLoCade" ) + <*> strOption + ( long "reducer" + <> short 'r' + <> metavar "REDUCER" + <> value "RKNL" + <> help "Reducer (currently RKNL or ION)" + ) <*> optional (argument str (metavar "PATH" <> help "Path to file")) main :: IO () |