diff options
| -rw-r--r-- | src/Main.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Main.hs b/src/Main.hs index e7d451d..7671aa3 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -424,5 +424,5 @@ main = do optDefaultTool opts `seq` return () out <- startOutput $ optVerbose opts - ok <- flip allM files $ allM (runTest out opts) <=< parseTestFile + ok <- allM (runTest out opts) . concat =<< mapM parseTestFile files when (not ok) exitFailure |