Added first TestParser, genericized some other Test code

[offlineimap] / testsrc / TestSyncable.hs

diff --git a/testsrc/TestSyncable.hs b/testsrc/TestSyncable.hs
index 131702b7b669e9afceb8b76752084bfe0838202b..7e7dafadf6c67c4ba7f3d82700bc87c0e9cb1168 100644 (file)
--- a/testsrc/TestSyncable.hs
+++ b/testsrc/TestSyncable.hs
@@ -181,9 +181,6 @@ prop_diffCollection coll1 coll2 =
         newcoll2 = unaryApplyChanges coll1 commands
         in coll2 @=? newcoll2
 
-q :: Testable a => String -> a -> HU.Test
-q = qccheck (defaultConfig {configMaxTest = 250})
-
 allt = [q "Empty" prop_empty,
         q "Del all from child" prop_delAllFromChild,
         q "Del all from master" prop_delAllFromMaster,