X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Futils%2FFiniteMap.lhs;h=0b1e3d9f8bbfbe3cfc6de3f926b4418d056980b1;hb=ca5a4a480d10d61e5b7a52eb4d556e8b8c33e69d;hp=6710032aa6efb1d600782b21532a5c632bc219d7;hpb=f01a8e8c9c53bfb5ab3393ed3457ebf25390efa1;p=ghc-hetmet.git

diff --git a/ghc/compiler/utils/FiniteMap.lhs b/ghc/compiler/utils/FiniteMap.lhs
index 6710032..0b1e3d9 100644
--- a/ghc/compiler/utils/FiniteMap.lhs
+++ b/ghc/compiler/utils/FiniteMap.lhs
@@ -47,7 +47,7 @@ module FiniteMap (
 
 	plusFM,
 	plusFM_C,
-	minusFM, 		-- exported for GHCI only
+	minusFM,
 
 	IF_NOT_GHC(intersectFM COMMA)
 	IF_NOT_GHC(intersectFM_C COMMA)
@@ -60,7 +60,7 @@ module FiniteMap (
 #ifdef COMPILING_GHC
 	, bagToFM
 	, FiniteSet(..), emptySet, mkSet, isEmptySet
-	, elementOf, setToList, union, minusSet{-exported for GHCI-}
+	, elementOf, setToList, union, minusSet
 #endif
 
 	-- To make it self-sufficient