packages feed

typesafe-precure 0.1.0.0 → 0.2.0.0

raw patch · 3 files changed

+7/−10 lines, 3 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

- ACME.PreCure.Monad: transform :: (Transformation g' i') => g' -> i' -> (Style g' i' -> PreCureMonad x) -> PreCureMonad x
+ ACME.PreCure.Monad: transform :: (Transformation g' i') => g' -> i' -> PreCureMonad (Style g' i')

Files

src/ACME/PreCure/Monad.hs view
@@ -67,7 +67,6 @@   snd . runPreCureMonad  --- TODO: Write test runPreCureMonad :: PreCureMonad a -> (a, [String]) runPreCureMonad =     Arrow.second DList.toList . runPreCureMonadD@@ -107,12 +106,10 @@     Concurrent.threadDelay interval  -transform-  :: (Transformation g' i')-  => g' -> i' -> (Style g' i' -> PreCureMonad x) -> PreCureMonad x-transform g i a = do+transform :: (Transformation g' i') => g' -> i' -> PreCureMonad (Style g' i')+transform g i = do   speak $ transformationSpeech g i-  a $ transformedStyle g i+  return $ transformedStyle g i   purify
test/ACME/PreCureSpec.hs view
@@ -52,9 +52,9 @@         groupVariation specialForm `shouldBe` "オーバー・ザ・レインボー"    let action = do-        transform (Nagisa, Honoka) (CardCommune_Mepple, CardCommune_Mipple) $ \(CureBlack, CureWhite) -> do-          purifyWithoutItem (CureBlack, CureWhite)-          purify (CureBlack, CureWhite) RainbowBrace+        (CureBlack, CureWhite) <- transform (Nagisa, Honoka) (CardCommune_Mepple, CardCommune_Mipple)+        purifyWithoutItem (CureBlack, CureWhite)+        purify (CureBlack, CureWhite) RainbowBrace    describe "composeEpisode" $ do     it "returns accumulated lines" $ do
typesafe-precure.cabal view
@@ -1,5 +1,5 @@ name:                typesafe-precure-version:             0.1.0.0+version:             0.2.0.0 synopsis:            Type-safe transformations and purifications of PreCures (Japanese Battle Heroine) description:         See README.md for details. homepage:            https://github.com/igrep/typesafe-precure#readme