about summary refs log blame commit diff
path: root/users/wpcarro/assessments/tt/src/Main.hs
blob: 9df4232066bb24dc3ccb8472d2accc292c4e92ad (plain) (tree)
1
2
3
4
5
6
7
8
                                                                                
                 

                                                                                
                                    
                                                                                

             




                            
--------------------------------------------------------------------------------
module Main where
--------------------------------------------------------------------------------
import qualified App
import qualified System.Envy as Envy
--------------------------------------------------------------------------------

main :: IO ()
main = do
  mEnv <- Envy.decodeEnv
  case mEnv of
    Left err -> putStrLn err
    Right env -> App.run env