From 149ff5ad68415fc573c6485ec387c66500c46421 Mon Sep 17 00:00:00 2001 From: simonpj Date: Mon, 18 Mar 2002 15:21:25 +0000 Subject: [PATCH] [project @ 2002-03-18 15:21:25 by simonpj] Splittable class comes from GlaExts now --- ghc/compiler/prelude/PrelNames.lhs | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) 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} %************************************************************************ -- 1.7.10.4