Remove old workaround for containers <= 0.3
authorPatrick Palka <patrick@parcs.ath.cx>
Fri, 8 Nov 2013 22:15:26 +0000 (17:15 -0500)
committerPatrick Palka <patrick@parcs.ath.cx>
Wed, 13 Nov 2013 02:55:45 +0000 (21:55 -0500)
compiler/utils/FiniteMap.lhs

index 94d1eef..b52f28c 100644 (file)
@@ -27,10 +27,6 @@ deleteList ks m = foldl (flip Map.delete) m ks
 foldRight        :: (elt -> a -> a) -> a -> Map key elt -> a
 foldRight        = Map.fold
 foldRightWithKey :: (key -> elt -> a -> a) -> a -> Map key elt -> a
-#if (MIN_VERSION_containers(0,4,0))
 foldRightWithKey = Map.foldrWithKey
-#else
-foldRightWithKey = Map.foldWithKey
-#endif
 \end{code}