cli/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 Textphile.CLI
   9
  10 main :: IO ()
  11 main = do
  12         args <- Env.getArgs
  13         -- putStrLn $ "args: " <> show args
  14         parseAPI $ CLI.lexer args