Turn off chatty tests, otherwise we exceed the travis size limit
authorNeil Mitchell <ndmitchell@gmail.com>
Mon, 3 Nov 2014 10:57:17 +0000 (10:57 +0000)
committerNeil Mitchell <ndmitchell@gmail.com>
Mon, 3 Nov 2014 10:57:17 +0000 (10:57 +0000)
tests/Test.hs

index 9b96db4..e3e0103 100755 (executable)
@@ -15,7 +15,7 @@ main = do
     let total = length tests
     bs <- forM (zip [1..] tests) $ \(i,(msg,prop)) -> do
         putStrLn $ "Test " ++ show i ++ " of " ++ show total ++ ": " ++ msg
-        res <- quickCheckWithResult stdArgs{maxSuccess=count} prop
+        res <- quickCheckWithResult stdArgs{chatty=False, maxSuccess=count} prop
         case res of
             Success{} -> return True
             _ -> putStrLn "TEST FAILURE!" >> return False