module Test.Tasty.Providers
( IsTest(..)
, testPassed
, testFailed
, Result
, Progress(..)
, TestName
, TestTree
, singleTest
)
where
import Test.Tasty.Core
singleTest :: IsTest t => TestName -> t -> TestTree
singleTest :: TestName -> t -> TestTree
singleTest = TestName -> t -> TestTree
forall t. IsTest t => TestName -> t -> TestTree
SingleTest
testPassed
:: String
-> Result
testPassed :: TestName -> Result
testPassed desc :: TestName
desc = Result :: Outcome -> TestName -> TestName -> Time -> Result
Result
{ resultOutcome :: Outcome
resultOutcome = Outcome
Success
, resultDescription :: TestName
resultDescription = TestName
desc
, resultShortDescription :: TestName
resultShortDescription = "OK"
, resultTime :: Time
resultTime = 0
}
testFailed
:: String
-> Result
testFailed :: TestName -> Result
testFailed desc :: TestName
desc = Result :: Outcome -> TestName -> TestName -> Time -> Result
Result
{ resultOutcome :: Outcome
resultOutcome = FailureReason -> Outcome
Failure FailureReason
TestFailed
, resultDescription :: TestName
resultDescription = TestName
desc
, resultShortDescription :: TestName
resultShortDescription = "FAIL"
, resultTime :: Time
resultTime = 0
}