add more tests
This commit is contained in:
parent
aedc46caca
commit
a323463726
2 changed files with 32 additions and 14 deletions
15
test.hs
15
test.hs
|
@ -7,14 +7,15 @@ 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
|
||||
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)
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue