summaryrefslogtreecommitdiff
path: root/Biz/Test.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Biz/Test.hs')
-rw-r--r--Biz/Test.hs24
1 files changed, 24 insertions, 0 deletions
diff --git a/Biz/Test.hs b/Biz/Test.hs
new file mode 100644
index 0000000..9af8912
--- /dev/null
+++ b/Biz/Test.hs
@@ -0,0 +1,24 @@
+{-# LANGUAGE NoImplicitPrelude #-}
+
+module Biz.Test
+ ( Tree,
+ group,
+ unit,
+ (@=?),
+ )
+where
+
+-- : dep tasty
+-- : dep tasty-hunit
+import Alpha hiding (group)
+import qualified Test.Tasty as Tasty
+import Test.Tasty.HUnit ((@=?))
+import qualified Test.Tasty.HUnit as HUnit
+
+type Tree = Tasty.TestTree
+
+group :: Tasty.TestName -> [Tasty.TestTree] -> Tasty.TestTree
+group = Tasty.testGroup
+
+unit :: Tasty.TestName -> HUnit.Assertion -> Tasty.TestTree
+unit = HUnit.testCase