fancier tests

This commit is contained in:
rhiannon morris 2022-05-24 12:09:17 +02:00
parent 25f9df34ab
commit b0692c15b9
4 changed files with 200 additions and 89 deletions

View file

@ -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