dynamic-state 0.3.1 → 0.3.2
raw patch · 3 files changed
+7/−3 lines, 3 filesnew-uploaderPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
+ Data.DynamicState: instance GHC.Base.Semigroup Data.DynamicState.DynamicState
+ Data.DynamicState.Serializable: instance GHC.Base.Semigroup Data.DynamicState.Serializable.DynamicState
Files
dynamic-state.cabal view
@@ -1,5 +1,5 @@ name: dynamic-state-version: 0.3.1+version: 0.3.2 synopsis: Optionally serializable dynamic state keyed by type description: Optionally serializable dynamic state keyed by type license: GPL-2
src/Data/DynamicState.hs view
@@ -29,11 +29,13 @@ #if __GLASGOW_HASKELL__ >= 804 instance Semigroup DynamicState where- (<>) = mappend+ DynamicState a <> DynamicState b = DynamicState (a <> b) #endif instance Monoid DynamicState where+#if !MIN_VERSION_base(4,11,0) mappend (DynamicState a) (DynamicState b) = DynamicState (mappend a b)+#endif mempty = DynamicState mempty getDyn :: forall a. Typeable a => DynamicState -> Maybe a
src/Data/DynamicState/Serializable.hs view
@@ -56,11 +56,13 @@ #if __GLASGOW_HASKELL__ >= 804 instance Semigroup DynamicState where- (<>) = mappend+ DynamicState a <> DynamicState b = DynamicState (a <> b) #endif instance Monoid DynamicState where+#if !MIN_VERSION_base(4,11,0) mappend (DynamicState a) (DynamicState b) = DynamicState (mappend a b)+#endif mempty = DynamicState mempty -- | Get a value, inside a State-like monad specified by the first two functions