]> Git — Sourcephile - majurity.git/blob - hjugement-cli/src/Main.hs
protocol: align {To,From}JSON on Belenios' schemas.
[majurity.git] / hjugement-cli / src / Main.hs
1 module Main where
2
3 import Data.Function (($))
4 import System.IO (IO)
5 import qualified Symantic.CLI as CLI
6 import qualified System.Environment as Env
7
8 import Hjugement.CLI
9
10 main :: IO ()
11 main = do
12 args <- Env.getArgs
13 -- putStrLn $ "args: " <> show args
14 parseAPI $ CLI.lexer args