{-# LANGUAGE NoMonomorphismRestriction #-} import Data.Monoid (mempty) import Test.Framework ( Test, defaultMainWithOpts, ) import Test.Framework.Runners.Options import EmailAddress (email_address_tests) tests :: [Test.Framework.Test] tests = [ email_address_tests ] main :: IO () main = do let empty_runner_opts = mempty :: RunnerOptions defaultMainWithOpts tests empty_runner_opts