summaryrefslogtreecommitdiff
path: root/src/Main.hs
diff options
context:
space:
mode:
authorRoman Smrž <roman.smrz@seznam.cz>2026-05-23 10:18:14 +0200
committerRoman Smrž <roman.smrz@seznam.cz>2026-05-23 10:18:14 +0200
commitf57ff5611c28e42df9e419da3c9af166cd4c3570 (patch)
tree0cd5850570b093cb0b20fd4074d4b802c502d426 /src/Main.hs
parent29a9f747993663bf24877ceaa8cd2f3a03e9a538 (diff)
Evaluate test tag expressions
Diffstat (limited to 'src/Main.hs')
-rw-r--r--src/Main.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Main.hs b/src/Main.hs
index 3285bee..619c4a5 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -193,7 +193,7 @@ main = do
| otherwise = OutputStyleQuiet
out <- startOutput outputStyle useColor
- ( modules, globalDefs ) <- loadModules (map fst files)
+ ( modules, _, globalDefs ) <- loadModules (map fst files)
tests <- filter ((`notElem` optExclude opts) . testName) <$> if null otests
then fmap concat $ forM (zip modules files) $ \( Module {..}, ( filePath, mbTestName )) -> do
case mbTestName of