Move the IPv4 pattern stuff into its own module and begin a real test suite.

[dead/harbl.git] / test / TestSuite.hs

diff --git a/test/TestSuite.hs b/test/TestSuite.hs
new file mode 100644 (file)
index 0000000..83a4dec
--- /dev/null
+++ b/test/TestSuite.hs
@@ -0,0 +1,8 @@
+import Test.Tasty ( TestTree, defaultMain, testGroup )
+import IPv4Pattern ( v4octet_tests )
+
+tests :: TestTree
+tests = testGroup "All Tests" [ v4octet_tests ]
+
+main :: IO ()
+main = defaultMain tests