21 lines
689 B
Haskell
21 lines
689 B
Haskell
import Test.HUnit
|
|
import Test.HUnit.Tools
|
|
|
|
import GitRepo
|
|
import Locations
|
|
import Utility
|
|
import TypeInternals
|
|
|
|
alltests :: [Test]
|
|
alltests =
|
|
[ qctest "prop_idempotent_deencode" prop_idempotent_deencode
|
|
, qctest "prop_idempotent_fileKey" prop_idempotent_fileKey
|
|
, qctest "prop_idempotent_key_read_show" prop_idempotent_key_read_show
|
|
, qctest "prop_idempotent_shellEscape" prop_idempotent_shellEscape
|
|
, qctest "prop_idempotent_shellEscape_multiword" prop_idempotent_shellEscape_multiword
|
|
, qctest "prop_parentDir_basics" prop_parentDir_basics
|
|
, qctest "prop_relPathDirToDir_basics" prop_relPathDirToDir_basics
|
|
]
|
|
|
|
main :: IO (Counts, Int)
|
|
main = runVerboseTests (TestList alltests)
|