blob: 9d64e9260714cb11add45773dd6c5b7b36c4c977 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
import Test.HUnit
import Test.HUnit.Tools
import GitRepo
import Locations
import Utility
alltests :: [Test]
alltests = [
qctest "prop_idempotent_deencode" prop_idempotent_deencode,
qctest "prop_idempotent_fileKey" prop_idempotent_fileKey,
qctest "prop_idempotent_shellescape" prop_idempotent_shellescape,
qctest "prop_idempotent_shellescape_multiword" prop_idempotent_shellescape_multiword
]
main :: IO (Counts, Int)
main = runVerboseTests (TestList alltests)
|
