--- /dev/null
+{-# 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