intern 0.5.1 → 0.5.1.1

raw patch · 2 files changed

+5/−4 lines, 2 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• Data/Interned/Internal.hs +4/−3
• intern.cabal +1/−1

@@ -1,6 +1,7 @@ {-# LANGUAGE TypeFamilies            , FlexibleInstances            , FlexibleContexts+           , BangPatterns            , GeneralizedNewtypeDeriving #-}  module Data.Interned.Internal@@ -57,9 +58,9 @@   unintern :: t -> Uninterned t  intern :: Interned t => Uninterned t -> t-intern bt = unsafeDupablePerformIO $ modifyAdvice $ modifyMVar (getCache cache) go+intern !bt = unsafeDupablePerformIO $ modifyAdvice $ modifyMVar (getCache cache) go   where-  dt = describe bt+  !dt = describe bt   go (CacheState i m) = case HashMap.lookup dt m of     Nothing -> k i m     Just wt -> do@@ -75,7 +76,7 @@  -- given a description, go hunting for an entry in the cache recover :: Interned t => Description t -> IO (Maybe t)-recover dt = do+recover !dt = do   CacheState _ m <- readMVar $ getCache cache   case HashMap.lookup dt m of     Nothing -> return Nothing

@@ -1,6 +1,6 @@ name:          intern category:      Data, Data Structures-version:       0.5.1+version:       0.5.1.1 license:       BSD3 cabal-version: >= 1.6 license-file:  LICENSE