fancier tests
This commit is contained in:
parent
25f9df34ab
commit
b0692c15b9
4 changed files with 200 additions and 89 deletions
|
@ -16,10 +16,4 @@ allTests = [
|
|||
Equal.tests
|
||||
]
|
||||
|
||||
main = do
|
||||
opts <- getTestOpts
|
||||
go <- case opts.tapVersion of
|
||||
"13" => pure TAP.mainFlat
|
||||
"14" => pure TAP.main
|
||||
_ => do putStrLn "unrecognised TAP version; use 13 or 14"; exitFailure
|
||||
go allTests
|
||||
main = TAP.main !getTestOpts allTests
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue