import Control.Arrow.ArrowZero to help nhc98's type checker

diff --git a/Data/Foldable.hs b/Data/Foldable.hs
index 1111a37..7c34b77 100644 (file)
--- a/Data/Foldable.hs
+++ b/Data/Foldable.hs
@@ -59,6 +59,7 @@ import Prelude hiding (foldl, foldr, foldl1, foldr1, mapM_, sequence_,
                elem, notElem, concat, concatMap, and, or, any, all,
                sum, product, maximum, minimum)
 import qualified Prelude (foldl, foldr, foldl1, foldr1)
+import Control.Arrow (ArrowZero(..))
 import Control.Applicative
 import Control.Monad (MonadPlus(..))
 import Data.Maybe (fromMaybe, listToMaybe)