add GHC.HetMet.{hetmet_kappa,hetmet_kappa_app}

[ghc-base.git] / Data / STRef / Lazy.hs

diff --git a/Data/STRef/Lazy.hs b/Data/STRef/Lazy.hs
index b05fb83..288343e 100644 (file)
--- a/Data/STRef/Lazy.hs
+++ b/Data/STRef/Lazy.hs
@@ -6,26 +6,23 @@
 -- 
 -- Maintainer  :  libraries@haskell.org
 -- Stability   :  experimental
--- Portability :  non-portable (requires non-portable module ST)
+-- Portability :  non-portable (uses Control.Monad.ST.Lazy)
 --
 -- Mutable references in the lazy ST monad.
 --
 -----------------------------------------------------------------------------
 module Data.STRef.Lazy (
-       -- * STRefs
-       ST.STRef,       -- abstract, instance Eq
-       newSTRef,       -- :: a -> ST s (STRef s a)
-       readSTRef,      -- :: STRef s a -> ST s a
-       writeSTRef,     -- :: STRef s a -> a -> ST s ()
-       modifySTRef     -- :: STRef s a -> (a -> a) -> ST s ()
+        -- * STRefs
+        ST.STRef,       -- abstract, instance Eq
+        newSTRef,       -- :: a -> ST s (STRef s a)
+        readSTRef,      -- :: STRef s a -> ST s a
+        writeSTRef,     -- :: STRef s a -> a -> ST s ()
+        modifySTRef     -- :: STRef s a -> (a -> a) -> ST s ()
  ) where
 
 import Control.Monad.ST.Lazy
-#ifdef __HUGS__
-import Hugs.LazyST as ST
-#else
 import qualified Data.STRef as ST
-import qualified Control.Monad.ST as ST
+import Prelude
 
 newSTRef    :: a -> ST s (ST.STRef s a)
 readSTRef   :: ST.STRef s a -> ST s a
@@ -36,5 +33,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)
-
-#endif  /* __HUGS__ */