@@ -256,7 +256,7 @@ import Streamly.Internal.Data.Stream.Serial (SerialT)
257import qualified Data.Map.Strict as Map
257import qualified Data.Map.Strict as Map
258import qualified Streamly.Internal.Data.Pipe.Type as Pipe
258import qualified Streamly.Internal.Data.Pipe.Type as Pipe
259−import qualified Streamly.Internal.Data.Stream.IsStream.Enumeration as Stream
259+-- import qualified Streamly.Internal.Data.Stream.IsStream.Enumeration as Stream
260import qualified Streamly.Internal.Data.Stream.StreamK as K
260import qualified Streamly.Internal.Data.Stream.StreamK as K
261import qualified Prelude
261import qualified Prelude
@@ -1617,8 +1617,9 @@ zip = zipWithM (curry return)
1618-- /Unimplemented/
1618-- /Unimplemented/
1619{-# INLINE indexed #-}
1619{-# INLINE indexed #-}
1620−indexed :: forall m a b. Monad m => Fold m (Int, a) b -> Fold m a b
1620+indexed :: -- forall m a b. Monad m =>
1621+ Fold m (Int, a) b -> Fold m a b
1621−indexed = zip (Stream.enumerateFrom 0 :: SerialT m Int)
1622+indexed = undefined -- zip (Stream.enumerateFrom 0 :: SerialT m Int)
1623-- | Change the predicate function of a Fold from @a -> b@ to accept an
1624-- | Change the predicate function of a Fold from @a -> b@ to accept an
1624-- additional state input @(s, a) -> b@. Convenient to filter with an
1625-- additional state input @(s, a) -> b@. Convenient to filter with an