Hide Prelude.mapM_ in Data.WeakBag
commitd5973f080aaf4497f0a22869905aa2b388fe0b81
authorRyan Trinkle <ryan.trinkle@gmail.com>
dateSun 17 Jul 2016, 20:39 (10 years ago)
parent4e930a4
src/Data/WeakBag.hs+2
@@ -10,6 +10,8 @@ import qualified Data.IntMap.Strict as IntMap
1010import Data.IORef
1111import System.Mem.Weak
1212
13+import Prelude hiding (mapM_)
14+
1315data WeakBag a = WeakBag
1416 { _weakBag_nextId :: {-# UNPACK #-} !(TVar Int) --TODO: what if this wraps around?
1517 , _weakBag_children :: {-# UNPACK #-} !(TVar (IntMap (Weak a)))