packages feed

tmapchan 0.0.2 → 0.0.3

raw patch · 3 files changed

+8/−1 lines, 3 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

+ Control.Concurrent.STM.TMapChan: keys :: TMapChan k a -> STM [k]
+ Control.Concurrent.STM.TMapChan.Hash: keys :: TMapChan k a -> STM [k]

Files

src/Control/Concurrent/STM/TMapChan.hs view
@@ -8,6 +8,7 @@   , -- * Utils     getTChan   , setTChan+  , keys   , broadcast   , cloneAt, cloneAll, cloneAllUniquely   ) where@@ -23,6 +24,9 @@   newtype TMapChan k a = TMapChan {runTMapChan :: TVar (Map k (TChan a))}++keys :: TMapChan k a -> STM [k]+keys (TMapChan m) = Map.keys <$> readTVar m  newTMapChan :: STM (TMapChan k a) newTMapChan = TMapChan <$> newTVar Map.empty
src/Control/Concurrent/STM/TMapChan/Hash.hs view
@@ -79,6 +79,9 @@  -- * Utils +keys :: TMapChan k a -> STM [k]+keys (TMapChan m) = HashMap.keys <$> readTVar m+  -- | Creates a new one if it doesn't already exist getTChan :: (Eq k, Hashable k) => TMapChan k a -> k -> STM (TChan a)
tmapchan.cabal view
@@ -1,5 +1,5 @@ name:                tmapchan-version:             0.0.2+version:             0.0.3 synopsis:            An insert-ordered multimap (indexed FIFO) which consumes values as you lookup -- description: homepage:            https://github.com/athanclark/tmapchan#readme