From: Ben Lippmeier <benl@ouroborus.net>
Date: Mon, 9 May 2011 03:24:58 +0000 (+1000)
Subject: Follow changes in DPH library: Repr module is gone.
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=35474439dcf6dc60e2f6e296de7da128c690d50e

Follow changes in DPH library: Repr module is gone.
---

diff --git a/compiler/vectorise/Vectorise/Builtins/Initialise.hs b/compiler/vectorise/Vectorise/Builtins/Initialise.hs
index a8cb2e8..5a6cf88 100644
--- a/compiler/vectorise/Vectorise/Builtins/Initialise.hs
+++ b/compiler/vectorise/Vectorise/Builtins/Initialise.hs
@@ -194,7 +194,6 @@ initBuiltins pkg
                 , dph_PArray_PData              = dph_PArray_PData
                 , dph_PArray_PDataInstances     = dph_PArray_PDataInstances
                 , dph_PArray_Types              = dph_PArray_Types
-                , dph_Repr                      = dph_Repr
                 , dph_Closure                   = dph_Closure
                 , dph_Scalar                    = dph_Scalar
                 , dph_Unboxed                   = dph_Unboxed
diff --git a/compiler/vectorise/Vectorise/Builtins/Modules.hs b/compiler/vectorise/Vectorise/Builtins/Modules.hs
index eafb0ca..d828fe8 100644
--- a/compiler/vectorise/Vectorise/Builtins/Modules.hs
+++ b/compiler/vectorise/Vectorise/Builtins/Modules.hs
@@ -19,7 +19,6 @@ data Modules
   , dph_PArray_PDataInstances   :: Module
   , dph_PArray_Types            :: Module
 	
-  , dph_Repr	                :: Module
   , dph_Closure	                :: Module
   , dph_Unboxed	                :: Module
   , dph_Combinators             :: Module
@@ -46,7 +45,6 @@ dph_Modules pkg
   , dph_PArray_PDataInstances   = mk (fsLit "Data.Array.Parallel.PArray.PDataInstances")
   , dph_PArray_Types            = mk (fsLit "Data.Array.Parallel.PArray.Types")
 	
-  , dph_Repr                    = mk (fsLit "Data.Array.Parallel.Lifted.Repr")
   , dph_Closure                 = mk (fsLit "Data.Array.Parallel.Lifted.Closure")
   , dph_Unboxed                 = mk (fsLit "Data.Array.Parallel.Lifted.Unboxed")
   , dph_Combinators             = mk (fsLit "Data.Array.Parallel.Lifted.Combinators")
@@ -65,6 +63,5 @@ dph_Modules pkg
 -- | Project out ids of modules that contain orphan instances that we need to load.
 dph_Orphans :: [Modules -> Module]
 dph_Orphans 
- =      [ dph_Repr
-        , dph_PArray_PReprInstances
+ =      [ dph_PArray_PReprInstances
         , dph_PArray_PDataInstances ]