better test framework

This commit is contained in:
Joey Hess 2010-11-02 17:08:16 -04:00
parent d93a372894
commit 606ed6bb35

11
test.hs
View file

@ -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)