From 94a3714fc95e7502d333135be2a8bfc6cd3e12bf Mon Sep 17 00:00:00 2001
From: simonm <unknown>
Date: Thu, 4 Dec 1997 14:56:40 +0000
Subject: [PATCH] [project @ 1997-12-04 14:56:39 by simonm] Pull runST and
 unsafeInterleaveST into new module UnsafeST to avoid
 recursive dependencies.  Grrrr.

---
 ghc/lib/glaExts/LazyST.lhs |    2 +-
 ghc/lib/glaExts/ST.lhs     |    2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/ghc/lib/glaExts/LazyST.lhs b/ghc/lib/glaExts/LazyST.lhs
index 4c44e30..3d457ca 100644
--- a/ghc/lib/glaExts/LazyST.lhs
+++ b/ghc/lib/glaExts/LazyST.lhs
@@ -31,7 +31,7 @@ module LazyST (
 import qualified ST
 import qualified STBase
 import ArrBase
-import qualified Unsafe   ( unsafeInterleaveST )
+import qualified UnsafeST   ( unsafeInterleaveST )
 import PrelBase	( Eq(..), Int, Bool, ($), ()(..) )
 import Monad
 import Ix
diff --git a/ghc/lib/glaExts/ST.lhs b/ghc/lib/glaExts/ST.lhs
index f58832a..1df58dc 100644
--- a/ghc/lib/glaExts/ST.lhs
+++ b/ghc/lib/glaExts/ST.lhs
@@ -29,7 +29,7 @@ module ST (
     ) where
 
 import ArrBase
-import Unsafe   ( unsafeInterleaveST )
+import UnsafeST
 import STBase
 import PrelBase	( Eq(..), Int, Bool, ($), ()(..) )
 import Monad
-- 
1.7.10.4