Verified Commit e77942d0 authored by Camil Staps's avatar Camil Staps 🚀

Fix order of tests (as --run params, not as list in program)

parent 0f78fc16
......@@ -48,7 +48,7 @@ exposeProperties globopts ps w
= w
# ps = case opts.test_options.runs of
[] -> map (tuple []) ps
rs -> [(map (fromOk o parseOpt) r.options, p) \\ p <- ps, r <- rs | r.TestRun.name == testname p]
rs -> [(map (fromOk o parseOpt) r.options, p) \\ r <- rs, p <- ps | r.TestRun.name == testname p]
# ps = filter (\p -> not (isMember (testname p) opts.test_options.skip)) ps
# io = foldl (<<<) io $ concatMap (test opts.global_options) ps
# (_,w) = fclose io w
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment