I'll be applying this, thanks!

Allow "cabal test tests network bugs" as suggested by Trent.
------------------------------------------------------------
> -  runTests = test,
> +  runTests = \ args _ _ _ ->
> +             sequence_ [ case w of
> +                           x | x == "bugs" -> allTests Bug
> +                             | x == "network" -> execTests Network ""
> +                             | x == "tests" -> allTests Test
> +                             | otherwise -> fail $ "Unknown test: " ++ x

Could this be written like the below?

             sequence_ [ case w of
                           "bugs" -> allTests Bug
                           "network" -> execTests Network ""
                           "tests" -> allTests Test
                           _  -> fail $ "Unknown test: " ++ w 

I did an informal test, and this does seem to cope with flags for
cabal and the test command itself,
  cabal test -v
for example

-- 
Eric Kow <http://www.nltg.brighton.ac.uk/home/Eric.Kow>
PGP Key ID: 08AC04F9

Attachment: signature.asc
Description: Digital signature

_______________________________________________
darcs-users mailing list
[email protected]
http://lists.osuosl.org/mailman/listinfo/darcs-users

Reply via email to