From: simonmar <unknown>
Date: Tue, 12 Feb 2002 10:50:37 +0000 (+0000)
Subject: [project @ 2002-02-12 10:50:37 by simonmar]
X-Git-Tag: nhc98-1-18-release~1134
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=bf0d5c6e8033ce5cd8c82ccc50a3050b1396b185;p=ghc-base.git

[project @ 2002-02-12 10:50:37 by simonmar]
Make this build: OPTIONS -fparr and place it above the Prelude in the
dependency tree.
---

diff --git a/GHC/PArr.hs b/GHC/PArr.hs
index d385d84..bb5910e 100644
--- a/GHC/PArr.hs
+++ b/GHC/PArr.hs
@@ -1,4 +1,6 @@
---  $Id: PArr.hs,v 1.1 2002/02/11 17:11:12 simonmar Exp $
+{-# OPTIONS -fparr #-}
+
+--  $Id: PArr.hs,v 1.2 2002/02/12 10:50:37 simonmar Exp $
 --
 --  Copyright (c) [2001..2002] Manuel M T Chakravarty & Gabriele Keller
 --
@@ -65,8 +67,6 @@
 --  * We might want to add bounds checks that can be deactivated.
 --
 
-{-# OPTIONS -fno-implicit-prelude #-}
-
 module GHC.PArr (
   [::],			-- abstract
 
@@ -136,11 +136,11 @@ module GHC.PArr (
   indexOfP		-- :: (a -> Bool) -> [:a:] -> [:Int:]
 ) where
 
-import PrelBase
-import PrelST   (ST(..), STRep, runST)
-import PrelList
-import PrelShow
-import PrelRead
+import Prelude
+
+import GHC.ST   ( ST(..), STRep, runST )
+import GHC.Exts	( Int#, Array#, Int(I#), MutableArray#, newArray#,
+		  unsafeFreezeArray#, indexArray#, writeArray# )
 
 infixl 9  !:
 infixr 5  +:+