7 foldRight, foldRightWithKey
11 import qualified Data.Map as Map
13 insertList :: Ord key => [(key,elt)] -> Map key elt -> Map key elt
14 insertList xs m = foldl (\m (k, v) -> Map.insert k v m) m xs
16 insertListWith :: Ord key
17 => (elt -> elt -> elt)
21 insertListWith f xs m0 = foldl (\m (k, v) -> Map.insertWith f k v m) m0 xs
23 deleteList :: Ord key => [key] -> Map key elt -> Map key elt
24 deleteList ks m = foldl (flip Map.delete) m ks
26 foldRight :: (elt -> a -> a) -> a -> Map key elt -> a
28 foldRightWithKey :: (key -> elt -> a -> a) -> a -> Map key elt -> a
29 #if (MIN_VERSION_containers(0,4,0))
30 foldRightWithKey = Map.foldrWithKey
32 foldRightWithKey = Map.foldWithKey