-import Test.Framework (
- Test,
- defaultMain,
- )
+module Main
+where
-import StringUtils (string_utils_tests)
-import Twitter.Status(status_tests)
-import Html(html_tests)
+import Test.Tasty ( TestTree, defaultMain, testGroup )
-tests :: [Test]
-tests = [ html_tests,
- status_tests,
- string_utils_tests ]
+import StringUtils ( string_utils_tests )
+import Twitter.Status ( status_tests )
+import Html ( html_tests )
+
+tests :: TestTree
+tests =
+ testGroup "All Tests" [
+ html_tests,
+ status_tests,
+ string_utils_tests ]
main :: IO ()
main = defaultMain tests