diff options
Diffstat (limited to 'compiler/utils/FiniteMap.hs')
| -rw-r--r-- | compiler/utils/FiniteMap.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/utils/FiniteMap.hs b/compiler/utils/FiniteMap.hs index dccfca10a9..cb6e5573e8 100644 --- a/compiler/utils/FiniteMap.hs +++ b/compiler/utils/FiniteMap.hs @@ -24,6 +24,6 @@ deleteList :: Ord key => [key] -> Map key elt -> Map key elt deleteList ks m = foldl (flip Map.delete) m ks foldRight :: (elt -> a -> a) -> a -> Map key elt -> a -foldRight = Map.fold +foldRight = Map.foldr foldRightWithKey :: (key -> elt -> a -> a) -> a -> Map key elt -> a foldRightWithKey = Map.foldrWithKey |