Revision 1882305cf46b4273e10742f6e8a6f1a9770460f0 authored by mkolosick on 10 September 2019, 00:19:29 UTC, committed by mkolosick on 10 September 2019, 00:19:29 UTC
1 parent cd20f0c
Raw File
Main.hs
import Language.Mist.Runner
import Language.Mist.Config
import System.Console.CmdArgs (cmdArgs)
import System.Exit
import System.IO

main :: IO ()
main = do
  config <- cmdArgs defConfig
  r <- runMist stderr config
  case r of
    Left _  -> exitFailure
    Right _ -> exitSuccess
back to top