summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/Main.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Main.hs b/src/Main.hs
index 113f54b..eb34c62 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -136,5 +136,5 @@ main = do
Just name -> filter ((==name) . testName) fileTests
ok <- allM (runTest out $ optTest opts) $
- concatMap (replicate (optRepeat opts)) $ concat tests
+ concat $ replicate (optRepeat opts) $ concat tests
when (not ok) exitFailure