diff options
-rwxr-xr-x | tt.hs | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -97,7 +97,7 @@ rep Forever = forever rep (Times n) = replicateM_ n makeArgs :: [String] -> [Flag] -> FilePath -> String -> Bool -> IO [String] -makeArgs [] [] _ _ _ = return ["check"] +makeArgs [] [] _ _ _ = return ["check", "V=0"] makeArgs tests flags testDir testVar inTree = do let buildPaths = expand testDir inTree . unprefix testDir tests' <- concat <$> mapM buildPaths tests @@ -106,7 +106,7 @@ makeArgs tests flags testDir testVar inTree = do -- two different sets of tests. , "TWISTED_SEPARATE_TESTS=" ] - return $ [ "check-twisted", "-s", "-C", testDir ] ++ t ++ flags + return $ [ "check-twisted", "-s", "-C", testDir, "V=0" ] ++ t ++ flags runTests :: FilePath -> String -> Bool -> [String] -> [Flag] -> Repetitions -> IO () |