diff --git a/src/Control/Monad/Catch/Pure.hs b/src/Control/Monad/Catch/Pure.hs
index 7c89e17b18c6de0946d26aa2dbfc57df601ce265..4ddc74c5473e5b016f628cb8d79764cbc275d333 100644
--- a/src/Control/Monad/Catch/Pure.hs
+++ b/src/Control/Monad/Catch/Pure.hs
@@ -56,7 +56,9 @@ import Control.Applicative
 import Control.Monad.Catch
 import Control.Monad.Reader as Reader
 import Control.Monad.RWS
+#if __GLASGOW_HASKELL__ < 710
 import Data.Foldable
+#endif
 import Data.Functor.Identity
 import Data.Traversable as Traversable