diff options
author | Roman Smrž <roman.smrz@seznam.cz> | 2022-11-17 20:23:56 +0100 |
---|---|---|
committer | Roman Smrž <roman.smrz@seznam.cz> | 2022-11-17 20:23:56 +0100 |
commit | 20a510e824a52526d9b5e48497dbf52df4c2d7f6 (patch) | |
tree | 70137a9c6a1714ae82fa75e07314d5aaf69f5e93 /src/Main.hs | |
parent | cbe9378666803c3dfdd6e198c0adf643d5100ea7 (diff) |
Parse all input files before running any tests
Diffstat (limited to 'src/Main.hs')
-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 |