[project @ 1999-01-23 17:46:01 by sof]

[ghc-hetmet.git] / ghc / lib / exts / LazyST.lhs

diff --git a/ghc/lib/exts/LazyST.lhs b/ghc/lib/exts/LazyST.lhs
index 07bf7a7..ee3925e 100644 (file)
--- a/ghc/lib/exts/LazyST.lhs
+++ b/ghc/lib/exts/LazyST.lhs
@@ -26,6 +26,8 @@ module LazyST (
        thawSTArray, freezeSTArray, unsafeFreezeSTArray, 
        Ix,
 
+       ST.unsafeIOToST, ST.stToIO,
+
        strictToLazyST, lazyToStrictST
     ) where
 
@@ -80,6 +82,7 @@ writeSTRef :: ST.STRef s a -> a -> ST s ()
 newSTRef   = strictToLazyST . ST.newSTRef
 readSTRef  = strictToLazyST . ST.readSTRef
 writeSTRef r a = strictToLazyST (ST.writeSTRef r a)
+
 \end{code}
 
 %*********************************************************