module Main where

import qualified ExprTests as E
import qualified System.Exit as Exit
import Test.HUnit

tests :: Test
tests = TestList [TestLabel "ExprTests" E.tests]

main :: IO ()
main = do
    result <- runTestTT tests
    if failures result > 0 then Exit.exitFailure else Exit.exitSuccess