better test framework

1 files changed, 8 insertions, 3 deletions

diff --git a/test.hs b/test.hs
index e9ea68459..989723617 100644
--- a/test.hs
+++ b/test.hs
@@ -1,8 +1,13 @@
 -- TODO find a test harness that is actually in Debian and use it.
 
 import Test.QuickCheck
+import Test.HUnit
+import Test.HUnit.Tools
+
 import GitRepo
 
-main = do
-	putStr "prop_idempotent_deencode "
-	quickCheck prop_idempotent_deencode
+alltests = [
+	qctest "prop_idempotent_deencode" prop_idempotent_deencode
+	]
+
+main = runVerboseTests (TestList alltests)