add testcoverage target using hpc

added a test for key read and show

1 files changed, 3 insertions, 0 deletions

diff --git a/test.hs b/test.hs
index 9d64e9260..28b54b78b 100644
--- a/test.hs
+++ b/test.hs
@@ -4,14 +4,17 @@ 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
 	]
 
 main :: IO (Counts, Int)
 main = runVerboseTests (TestList alltests)
+