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