[project @ 1996-05-06 11:01:29 by partain]

[ghc-hetmet.git] / ghc / compiler / utils / FiniteMap.lhs

diff --git a/ghc/compiler/utils/FiniteMap.lhs b/ghc/compiler/utils/FiniteMap.lhs
index 0b1e3d9..384a7d1 100644 (file)
--- a/ghc/compiler/utils/FiniteMap.lhs
+++ b/ghc/compiler/utils/FiniteMap.lhs
@@ -48,10 +48,11 @@ module FiniteMap (
        plusFM,
        plusFM_C,
        minusFM,
+       foldFM,
 
        IF_NOT_GHC(intersectFM COMMA)
        IF_NOT_GHC(intersectFM_C COMMA)
-       IF_NOT_GHC(mapFM COMMA foldFM COMMA filterFM COMMA)
+       IF_NOT_GHC(mapFM COMMA filterFM COMMA)
 
        sizeFM, isEmptyFM, elemFM, lookupFM, lookupWithDefaultFM,