ghc-mod/test/Expectation.hs

9 lines
196 B
Haskell
Raw Normal View History

2013-02-12 05:06:22 +00:00
module Expectation where
import Test.Hspec
shouldContain :: Eq a => [a] -> a -> Expectation
shouldContain containers element = do
let res = element `elem` containers
res `shouldBe` True