From d2cf5dea70acbffb6039dc5eda31c8ff03b8f43e Mon Sep 17 00:00:00 2001 From: Erik de Castro Lopo Date: Mon, 30 Jan 2017 11:47:00 -0500 Subject: Fix deprecation warnings from containers The functions that were causing warnings were deprecated in containers 0.5 and GHC is already using containers 0.5.9.1. Test Plan: validate Reviewers: rwbarton, bgamari, hsyl20, austin, dfeuer Reviewed By: dfeuer Subscribers: thomie Differential Revision: https://phabricator.haskell.org/D3036 --- compiler/utils/FiniteMap.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'compiler/utils/FiniteMap.hs') 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 -- cgit v1.2.1