X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2FcodeGen%2FCgParallel.hs;h=8cd5067ddcfacc2cbe2469adfc9cec0b4e6b9729;hp=b826a33cba31e44d9423caf2c52066938250a8ca;hb=49c98d143c382a1341e1046f5ca00819a25691ba;hpb=b00b5bc04ff36a551552470060064f0b7d84ca30

diff --git a/compiler/codeGen/CgParallel.hs b/compiler/codeGen/CgParallel.hs
index b826a33..8cd5067 100644
--- a/compiler/codeGen/CgParallel.hs
+++ b/compiler/codeGen/CgParallel.hs
@@ -1,6 +1,12 @@
+-----------------------------------------------------------------------------
+--
+-- (c) The University of Glasgow -2006
+--
 -- Code generation relaed to GpH
 -- 	(a) parallel
 --	(b) GranSim
+--
+-----------------------------------------------------------------------------
 
 module CgParallel(
 	staticGranHdr,staticParHdr,
@@ -9,10 +15,10 @@ module CgParallel(
   ) where
 
 import CgMonad
-import CgCallConv	( mkRegLiveness )
-import Id		( Id )
-import Cmm		( CmmLit, GlobalReg(..), node, CmmExpr )
-import StaticFlags	( opt_GranMacros )
+import CgCallConv
+import Id
+import Cmm
+import StaticFlags
 import Outputable
 
 staticParHdr :: [CmmLit]