X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=Data%2FSTRef%2FLazy.hs;h=d7e028ce351695abdada0024e29eff2377e3860b;hb=60a7a748da3d168969ac8da224537dfdc4959ea4;hp=daa48a0f49b742cc46e7f6926297ba6712be0a2a;hpb=1819f73fc5bb82bf8e2a57905edfde81017d9167;p=ghc-base.git diff --git a/Data/STRef/Lazy.hs b/Data/STRef/Lazy.hs index daa48a0..d7e028c 100644 --- a/Data/STRef/Lazy.hs +++ b/Data/STRef/Lazy.hs @@ -22,7 +22,6 @@ module Data.STRef.Lazy ( import Control.Monad.ST.Lazy import qualified Data.STRef as ST -import qualified Control.Monad.ST as ST newSTRef :: a -> ST s (ST.STRef s a) readSTRef :: ST.STRef s a -> ST s a @@ -33,5 +32,3 @@ newSTRef = strictToLazyST . ST.newSTRef readSTRef = strictToLazyST . ST.readSTRef writeSTRef r a = strictToLazyST (ST.writeSTRef r a) modifySTRef r f = strictToLazyST (ST.modifySTRef r f) - -