From: simonpj <unknown>
Date: Mon, 18 Mar 2002 15:21:25 +0000 (+0000)
Subject: [project @ 2002-03-18 15:21:25 by simonpj]
X-Git-Tag: Approx_11550_changesets_converted~2251
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=149ff5ad68415fc573c6485ec387c66500c46421;p=ghc-hetmet.git

[project @ 2002-03-18 15:21:25 by simonpj]
Splittable class comes from GlaExts now
---

diff --git a/ghc/compiler/prelude/PrelNames.lhs b/ghc/compiler/prelude/PrelNames.lhs
index f79adc7..611bb03 100644
--- a/ghc/compiler/prelude/PrelNames.lhs
+++ b/ghc/compiler/prelude/PrelNames.lhs
@@ -241,7 +241,6 @@ pREL_ARR_Name     = mkModuleName "GHC.Arr"
 pREL_BYTEARR_Name = mkModuleName "PrelByteArr"
 fOREIGN_PTR_Name  = mkModuleName "Foreign.ForeignPtr"
 pREL_STABLE_Name  = mkModuleName "GHC.Stable"
-pREL_SPLIT_Name   = mkModuleName "GHC.Split"
 pREL_ADDR_Name    = mkModuleName "GHC.Addr"
 pREL_PTR_Name     = mkModuleName "GHC.Ptr"
 pREL_ERR_Name     = mkModuleName "GHC.Err"
@@ -257,7 +256,7 @@ pREL_WORD_Name	  = mkModuleName "GHC.Word"
 fOREIGNOBJ_Name	  = mkModuleName "ForeignObj"
 aDDR_Name	  = mkModuleName "Addr"
 
-gLA_EXTS_Name   = mkModuleName "GlaExts"
+gLA_EXTS_Name   = mkModuleName "GHC.Exts"
 
 gHC_PRIM     	= mkPrelModule gHC_PRIM_Name
 pREL_BASE    	= mkPrelModule pREL_BASE_Name
@@ -562,7 +561,7 @@ errorName	   = varQual pREL_ERR_Name FSLIT("error") errorIdKey
 runSTRepName	   = varQual pREL_ST_Name  FSLIT("runSTRep") runSTRepIdKey
 
 -- The "split" Id for splittable implicit parameters
-splitName          = varQual pREL_SPLIT_Name FSLIT("split") splitIdKey
+splitName          = varQual gLA_EXTS_Name FSLIT("split") splitIdKey
 \end{code}
 
 %************************************************************************