test: Add --test-debug option

This work is supported by the NIH-funded NICEMAN (ReproNim TR&D3) project.
This commit is contained in:
Joey Hess 2022-11-28 15:12:53 -04:00
parent 022c14ec02
commit 2b5e6ff20a
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
6 changed files with 84 additions and 4 deletions

View file

@ -92,7 +92,7 @@ import qualified Utility.Gpg
optParser :: Parser TestOptions
optParser = TestOptions
<$> snd (tastyParser (tests 1 False True (TestOptions mempty False False Nothing mempty mempty)))
<$> snd (tastyParser (tests 1 False True (TestOptions mempty False False Nothing mempty False mempty)))
<*> switch
( long "keep-failures"
<> help "preserve repositories on test failure"
@ -111,6 +111,10 @@ optParser = TestOptions
<> help "run tests with a git config set"
<> metavar "NAME=VALUE"
))
<*> switch
( long "test-debug"
<> help "show debug messages for commands run by test suite"
)
<*> cmdParams "non-options are for internal use only"
where
parseconfigvalue s = case break (== '=') s of