module Test.Hspec.Core (
Example (..)
, Params (..)
, Progress
, ProgressCallback
, Result (..)
, SpecM
, runSpecM
, fromSpecList
, SpecTree (..)
, mapSpecTree
, Item (..)
, Location (..)
, LocationAccuracy(..)
, mapSpecItem
, modifyParams
, specGroup
, specItem
, describe
, it
) where
import Test.Hspec.Core.Type
modifyParams :: (Params -> Params) -> Spec -> Spec
modifyParams f = mapSpecItem $ \item -> item {itemExample = \p -> (itemExample item) (f p)}
describe :: String -> [SpecTree] -> SpecTree
describe = specGroup
it :: Example a => String -> a -> SpecTree
it = specItem