@@ -132,7 +132,7 @@ module Streamly.Mem.Array
132 , transformWith
132 , transformWith
134 -- * Folding Arrays
134 -- * Folding Arrays
135− , foldWith
135+ -- , foldWith
136 , foldArray
136 , foldArray
@@ -486,6 +486,6 @@ foldArray f arr = FL.foldl' f (A.read arr)
486-- | Fold an array using a stream fold operation.
486-- | Fold an array using a stream fold operation.
488-- @since 0.7.0
488-- @since 0.7.0
489−{-# INLINE foldWith #-}
489+{-# INLINE _foldWith #-}
490−foldWith :: (MonadIO m, Storable a) => (SerialT m a -> m b) -> Array a -> m b
490+_foldWith :: (MonadIO m, Storable a) => (SerialT m a -> m b) -> Array a -> m b
491−foldWith f arr = f (A.read arr)
491+_foldWith f arr = f (A.read arr)