From: sewardj <unknown>
Date: Tue, 23 Nov 1999 10:03:41 +0000 (+0000)
Subject: [project @ 1999-11-23 10:03:41 by sewardj]
X-Git-Tag: Approximately_9120_patches~5517
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=797f06996064543d218c0ac2b8bca08f060ae9e9;p=ghc-hetmet.git

[project @ 1999-11-23 10:03:41 by sewardj]
wibble
---

diff --git a/ghc/interpreter/lib/Prelude.hs b/ghc/interpreter/lib/Prelude.hs
index 406d775..3ada1bc 100644
--- a/ghc/interpreter/lib/Prelude.hs
+++ b/ghc/interpreter/lib/Prelude.hs
@@ -1806,7 +1806,6 @@ newtype ST s a = ST (s -> (a,s))
 data RealWorld
 type IO a = ST RealWorld a
 
-
 --primRunST :: (forall s. ST s a) -> a
 primRunST :: ST RealWorld a -> a
 primRunST m = fst (unST m theWorld)
diff --git a/ghc/lib/hugs/Prelude.hs b/ghc/lib/hugs/Prelude.hs
index 406d775..3ada1bc 100644
--- a/ghc/lib/hugs/Prelude.hs
+++ b/ghc/lib/hugs/Prelude.hs
@@ -1806,7 +1806,6 @@ newtype ST s a = ST (s -> (a,s))
 data RealWorld
 type IO a = ST RealWorld a
 
-
 --primRunST :: (forall s. ST s a) -> a
 primRunST :: ST RealWorld a -> a
 primRunST m = fst (unST m theWorld)