mockazo 0.1.0 → 0.1.1

raw patch · 4 files changed

+7/−8 lines, 4 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

mockazo.cabal +2/−2
src/Data/Component/Mock/TH/Instance.hs +2/−4
test/Mock/SingleKinded.hs +2/−1
test/Spec.hs +1/−1

mockazo.cabal view

@@ -4,10 +4,10 @@ -- -- see: https://github.com/sol/hpack ----- hash: 835e8ef5d2e80d1f671e85ac3cee6fc223d5a0055d244bf702a12ea687d50cd7+-- hash: 70df2f10973c81e46d821b983f5e34da9259332300e55b19450c28ddf2c78bbf  name:           mockazo-version:        0.1.0+version:        0.1.1 synopsis:       Mock records of functions easily description:    Please see the README on GitHub at <https://github.com/theam/mockazo#readme> category:       Testing

src/Data/Component/Mock/TH/Instance.hs view

@@ -88,10 +88,8 @@       condition     (condition : moreConditions) ->       foldl' joinConditions condition moreConditions-    other ->-      error-      $ "Mockazo: Error when running 'makeCondition' for value '" <> show other <> "'\n"-      <> "Please file an issue for this at https://github.com/theam/mockazo/issues"+    [] ->+      (Meta.ConE $ Meta.mkName "True")  where   compareVars v v' =     Meta.UInfixE v (Meta.VarE (Meta.mkName "==")) v'

test/Mock/SingleKinded.hs view

@@ -11,6 +11,7 @@ data Component context = Component   { foo :: Int -> Int -> context ()   , bar :: Text -> context Int+  , quux :: context Int   }  makeMock ''Component@@ -18,5 +19,5 @@ test :: Monad context => Component context -> context () test Component{..} = do   x <- bar "x"-  y <- bar "y"+  y <- quux   foo x y

test/Spec.hs view

@@ -15,7 +15,7 @@         runMock           $ withActions             [ SingleKinded.Bar "x" :-> 3-            , SingleKinded.Bar "y" :-> 4+            , SingleKinded.Quux :-> 4             , SingleKinded.Foo 3 4 :-> ()             ]           $ SingleKinded.test mock