summaryrefslogtreecommitdiff
path: root/test/Spec.hs
diff options
context:
space:
mode:
Diffstat (limited to 'test/Spec.hs')
-rw-r--r--test/Spec.hs20
1 files changed, 20 insertions, 0 deletions
diff --git a/test/Spec.hs b/test/Spec.hs
new file mode 100644
index 0000000..0f46756
--- /dev/null
+++ b/test/Spec.hs
@@ -0,0 +1,20 @@
+import Test.Framework (defaultMain, testGroup)
+import Test.Framework.Providers.QuickCheck2 (testProperty)
+
+import Test.QuickCheck
+
+main :: IO ()
+main = defaultMain tests
+
+tests = [
+ testGroup "Sorting Group 1" [
+ testProperty "prop1" prop1,
+ testProperty "prop2" prop2
+ ]
+ ]
+
+prop1 b = b == False
+ where types = (b :: Bool)
+
+prop2 i = i == 42
+ where types = (i :: Int)