From: sof <unknown>
Date: Wed, 30 Sep 1998 09:00:41 +0000 (+0000)
Subject: [project @ 1998-09-30 09:00:41 by sof]
X-Git-Tag: Approx_2487_patches~250
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=05bfa2a63450597c0973171281a4268f16133283;p=ghc-hetmet.git

[project @ 1998-09-30 09:00:41 by sof]
Included fixity info declared elsewhere; added 'seq' infix decl
---

diff --git a/ghc/lib/std/Prelude.lhs b/ghc/lib/std/Prelude.lhs
index d81b810..1ba96bb 100644
--- a/ghc/lib/std/Prelude.lhs
+++ b/ghc/lib/std/Prelude.lhs
@@ -75,7 +75,28 @@ import PrelBounded
 import Monad
 import Maybe
 import PrelErr   ( error, seqError )
-import IO
+import IO  ( IO, FilePath, IOError,
+	     fail, userError, catch,
+	     putChar, putStr, putStrLn, print,
+	     getChar, getLine, getContents, interact,
+	     readFile, writeFile, appendFile, readIO, readLn
+	   )
+
+{- Declared elsewhere:
+PrelBase: infixr 9 .
+PrelNum:  infixr 8 ^, ^^, **
+PrelBase: infixl *
+PrelNum:  infixl 7 /, %, `quot`, `rem`, `div`, `mod`
+PrelBase: infixl 6 +, -
+PrelBase: infixr 5 :, ++
+PrelBase: infix  4 ==, /=, <. <=, >=, >
+PrelBase: infixr 3 &&
+PrelBase: infixr 2 ||
+PrelBase: infixl >>, >>=
+PrelBase: infixr $
+-}
+infixr 0 `seq`
+
 
 -- These can't conveniently be defined in PrelBase because they use numbers,
 -- or I/O, so here's a convenient place to do them.