diff options
Diffstat (limited to 'Utility/SubTasty.hs')
-rw-r--r-- | Utility/SubTasty.hs | 25 |
1 files changed, 0 insertions, 25 deletions
diff --git a/Utility/SubTasty.hs b/Utility/SubTasty.hs deleted file mode 100644 index 5164f9d1b..000000000 --- a/Utility/SubTasty.hs +++ /dev/null @@ -1,25 +0,0 @@ -{- Running tasty as a subcommand. - - - - Copyright 2015 Joey Hess <id@joeyh.name> - - - - License: BSD-2-clause - -} - -module Utility.SubTasty where - -import Test.Tasty -import Test.Tasty.Options -import Test.Tasty.Runners -import Options.Applicative - --- Uses tasty's option parser, modified to expect a subcommand. -parseOpts :: String -> [Ingredient] -> TestTree -> [String] -> IO OptionSet -parseOpts subcommand is ts = - handleParseResult . execParserPure (prefs idm) pinfo - where - pinfo = info (helper <*> subpinfo) (fullDesc <> header desc) - subpinfo = subparser $ command subcommand $ - suiteOptionParser is ts - `info` - progDesc desc - desc = "Builtin test suite" |