2010-11-02 21:08:16 +00:00
|
|
|
import Test.HUnit
|
|
|
|
|
import Test.HUnit.Tools
|
|
|
|
|
|
2010-11-02 20:49:35 +00:00
|
|
|
import GitRepo
|
2010-11-08 20:47:36 +00:00
|
|
|
import Locations
|
2011-01-01 00:33:43 +00:00
|
|
|
import Utility
|
2010-11-02 20:49:35 +00:00
|
|
|
|
2010-11-10 14:49:35 +00:00
|
|
|
alltests :: [Test]
|
2010-11-02 21:08:16 +00:00
|
|
|
alltests = [
|
2010-11-08 20:47:36 +00:00
|
|
|
qctest "prop_idempotent_deencode" prop_idempotent_deencode,
|
2011-01-01 00:33:43 +00:00
|
|
|
qctest "prop_idempotent_fileKey" prop_idempotent_fileKey,
|
|
|
|
|
qctest "prop_idempotent_shellescape" prop_idempotent_shellescape,
|
|
|
|
|
qctest "prop_idempotent_shellescape_multiword" prop_idempotent_shellescape_multiword
|
2010-11-02 21:08:16 +00:00
|
|
|
]
|
|
|
|
|
|
2010-11-10 14:49:35 +00:00
|
|
|
main :: IO (Counts, Int)
|
2010-11-02 21:08:16 +00:00
|
|
|
main = runVerboseTests (TestList alltests)
|
