X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Fvectorise%2FVectorise%2FBuiltins%2FModules.hs;fp=compiler%2Fvectorise%2FVectorise%2FBuiltins%2FModules.hs;h=d828fe889ce9f0c7ad06ac8d26ced50af24b9705;hp=eafb0ca30c74d49d621a2e1b76de19a275a4460c;hb=35474439dcf6dc60e2f6e296de7da128c690d50e;hpb=73350708d2769ef96ffa102630f675dd4ab40cd1

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 ]