From: Michael Orlitzky <michael@orlitzky.com>
Date: Fri, 1 Oct 2010 01:36:14 +0000 (-0400)
Subject: Add the test suite.
X-Git-Url: https://gitweb.michael.orlitzky.com/?a=commitdiff_plain;h=290bcbf36437cf651360fb63bf80b6d6c887e80d;p=dead%2Fhalcyon.git

Add the test suite.
---

diff --git a/test/TestSuite.hs b/test/TestSuite.hs
new file mode 100644
index 0000000..09087b9
--- /dev/null
+++ b/test/TestSuite.hs
@@ -0,0 +1,13 @@
+import Test.HUnit
+
+import Twitter.Xml(xml_tests)
+
+-- The list of HUnit tests.
+test_suite = TestList (concat [xml_tests])
+
+main :: IO ()
+main = do
+  putStrLn "HUnit"
+  putStrLn "-----"
+  runTestTT test_suite
+  return ()
\ No newline at end of file