on develop help sign in
A few more small cleanups
commit0e769938152fd2eb91deb7caa9c12defce96e3ea authorRyan Trinkle <ryan.trinkle@gmail.com> dateFri 13 Jul 2018, 23:52 (8 years ago) parentbb39b6e
3 files changed+8−10
src/Data/FastMutableIntMap.hs+2−2 src/Data/FastWeakBag.hs+3−4 src/Data/WeakBag.hs+3−4
src/Data/FastMutableIntMap.hs+2−2
@@ -22,13 +22,13 @@ module Data.FastMutableIntMap
2222--TODO: Fast copy to FastIntMap
2323--TODO: Fast patch type
2424
25+import Prelude hiding (lookup)
26+
2527import Control.Monad.IO.Class
2628import Data.Foldable (traverse_)
2729import Data.IntMap.Strict (IntMap)
2830import qualified Data.IntMap.Strict as IntMap
2931import Data.IORef
30−import Data.Maybe
31−import Prelude hiding (lookup)
3232import Reflex.Patch.Class
3333import Reflex.Patch.IntMap
3434
src/Data/FastWeakBag.hs+3−4
@@ -26,7 +26,9 @@ module Data.FastWeakBag
2626#endif
2727 ) where
2828
29−import Control.Monad hiding (forM_, mapM_)
29+import Prelude hiding (traverse)
30+
31+import Control.Monad
3032import Control.Monad.IO.Class
3133
3234#ifdef GHCJS_FAST_WEAK
@@ -34,15 +36,12 @@ import GHCJS.Types
3436import Reflex.FastWeak (js_isNull, unsafeFromRawJSVal, unsafeToRawJSVal)
3537#else
3638import Control.Exception
37−import Data.Foldable (forM_, mapM_)
3839import Data.IntMap.Strict (IntMap)
3940import qualified Data.IntMap.Strict as IntMap
4041import Data.IORef
4142import System.Mem.Weak
4243#endif
4344
44−import Prelude hiding (mapM_, traverse)
45−
4645-- | A @FastWeakBag a@ holds a set of values of type @a@, but does not retain them -
4746-- that is, they can still be garbage-collected. As long as the @a@s remain
4847-- alive, the 'FastWeakBag' will continue to refer to them.
src/Data/WeakBag.hs+3−4
@@ -21,17 +21,16 @@ module Data.WeakBag
2121 , _weakBag_children --TODO: Don't export this
2222 ) where
2323
24+import Prelude hiding (traverse)
25+
2426import Control.Exception
25−import Control.Monad hiding (forM_, mapM_)
27+import Control.Monad
2628import Control.Monad.IO.Class
27−import Data.Foldable (forM_, mapM_)
2829import Data.IntMap.Strict (IntMap)
2930import qualified Data.IntMap.Strict as IntMap
3031import Data.IORef
3132import System.Mem.Weak
3233
33−import Prelude hiding (mapM_, traverse)
34−
3534-- | A @WeakBag a@ holds a set of values of type @a@, but does not retain them -
3635-- that is, they can still be garbage-collected. As long as the @a@s remain
3736-- alive, the 'WeakBag' will continue to refer to them.