X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=Data%2FFiniteMap.hs;h=88279bda85baf013ce0b71eadfbffc36c349f741;hb=4836cf1053a971fe823ba547a8268431745c5bce;hp=a44bb36f9f387ec068ee2b555df927d218688748;hpb=53d88f36b842166ebdc2c4937fb865d27ffbd766;p=ghc-base.git

diff --git a/Data/FiniteMap.hs b/Data/FiniteMap.hs
index a44bb36..88279bd 100644
--- a/Data/FiniteMap.hs
+++ b/Data/FiniteMap.hs
@@ -201,7 +201,7 @@ emptyFM
     bottom = panic "emptyFM"
 -}
 
--- #define EmptyFM (Branch _ _ IF_GHC(0#,0) _ _)
+--  #define EmptyFM (Branch _ _ IF_GHC(0#,0) _ _)
 
 unitFM key elt = Branch key elt IF_GHC(1#,1) emptyFM emptyFM