X-Git-Url: https://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=test%2FTestSuite.hs;fp=test%2FTestSuite.hs;h=7dd088001cf81e1459cf41e7965f9bb2b175612e;hb=2a7f245979ec1dc33657cba9ee14144a77e45e25;hp=0000000000000000000000000000000000000000;hpb=a5e228280dfbdbd8f2b1f271adb362fee1a43de4;p=email-validator.git

diff --git a/test/TestSuite.hs b/test/TestSuite.hs
new file mode 100644
index 0000000..7dd0880
--- /dev/null
+++ b/test/TestSuite.hs
@@ -0,0 +1,17 @@
+{-# 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