packages feed

polysemy-zoo 0.6.0.0 → 0.6.0.1

raw patch · 4 files changed

+9/−5 lines, 4 filesPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

API changes (from Hackage documentation)

- Polysemy.RevState: revPut :: forall s r. Member (RevState s) r => Sem r s
+ Polysemy.RevState: revPut :: forall s r. Member (RevState s) r => s -> Sem r ()
- Polysemy.SetStore: addS :: forall k_aJTZ v_aJU0 r_aJWV. MemberWithError (SetStore k_aJTZ v_aJU0) r_aJWV => k_aJTZ -> v_aJU0 -> Sem r_aJWV ()
+ Polysemy.SetStore: addS :: forall k_aJU6 v_aJU7 r_aJX2. MemberWithError (SetStore k_aJU6 v_aJU7) r_aJX2 => k_aJU6 -> v_aJU7 -> Sem r_aJX2 ()
- Polysemy.SetStore: delS :: forall k_aJU2 v_aJU3 r_aJWY. MemberWithError (SetStore k_aJU2 v_aJU3) r_aJWY => k_aJU2 -> v_aJU3 -> Sem r_aJWY ()
+ Polysemy.SetStore: delS :: forall k_aJU9 v_aJUa r_aJX5. MemberWithError (SetStore k_aJU9 v_aJUa) r_aJX5 => k_aJU9 -> v_aJUa -> Sem r_aJX5 ()
- Polysemy.SetStore: memberS :: forall k_aJU5 v_aJU6 r_aJX1. MemberWithError (SetStore k_aJU5 v_aJU6) r_aJX1 => k_aJU5 -> v_aJU6 -> Sem r_aJX1 Bool
+ Polysemy.SetStore: memberS :: forall k_aJUc v_aJUd r_aJX8. MemberWithError (SetStore k_aJUc v_aJUd) r_aJX8 => k_aJUc -> v_aJUd -> Sem r_aJX8 Bool

Files

ChangeLog.md view
@@ -1,5 +1,8 @@ # Changelog for polysemy-zoo +## 0.6.0.1 (2019-09-12)++- Fixed the implementation of `atomicPut`  ## 0.6.0.0 (2019-09-05)
polysemy-zoo.cabal view
@@ -4,10 +4,10 @@ -- -- see: https://github.com/sol/hpack ----- hash: 138a6e0718009344f60c180fe1afffe26e3cf2f9712657e1a0e7c205a9ddebb0+-- hash: 508b2d70f45ca899d68cc756e99c4a93128f7748848feefea756030db96c9c94  name:           polysemy-zoo-version:        0.6.0.0+version:        0.6.0.1 synopsis:       Experimental, user-contributed effects and interpreters for polysemy description:    Please see the README on GitHub at <https://github.com/isovector/polysemy-zoo#readme> category:       Polysemy
src/Polysemy/RevState.hs view
@@ -50,8 +50,9 @@ -- | Sends a new state into the past. revPut :: forall s r         . Member (RevState s) r-       => Sem r s-revPut = revState $ \s -> (s, s)+       => s+       -> Sem r ()+revPut s = revState $ \_ -> (s, ())  ------------------------------------------------------------------------------ -- | Gets the state as sent from the next call to 'revState'
src/Polysemy/Tagged.hs view
@@ -36,7 +36,7 @@ --             -> 'Sem' r a --             -> 'Sem' r a -- taggedLocal f m =---   'tag' @k @('Polysemy.Reader.Reader' i) $ 'Polysemy.Reader.local' @i f ('raise' m)+--   'tag' \@k \@('Polysemy.Reader.Reader' i) $ 'Polysemy.Reader.local' \@i f ('raise' m) -- @ -- tag :: forall k e r a