4af8b71 · streamly · git.iko.soy

git.iko.soy/streamly

on master help sign in

Uncomment the signature of iterateUnfold

4af8b71Harendra Kumar5 years ago

src/Streamly/Internal/Data/Stream/IsStream/Expand.hs+8−12

compare with master

unifiedsplit

@@ -154,6 +154,7 @@ module Streamly.Internal.Data.Stream.IsStream.Expand

154 , iterateMapWith

155 , iterateSmapMWith

156 , iterateMapLeftsWith

157+ , iterateUnfold

157

158

158 -- * Deprecated

159 -- * Deprecated

159 , concatUnfold

160 , concatUnfold

@@ -962,13 +963,6 @@ intercalateSuffix :: (IsStream t, Monad m)

962intercalateSuffix unf seed str = fromStreamD $ D.unfoldMany unf

963intercalateSuffix unf seed str = fromStreamD $ D.unfoldMany unf

963 $ D.intersperseSuffix (return seed) (toStreamD str)

964 $ D.intersperseSuffix (return seed) (toStreamD str)

964

965

965−{-

966−{-# INLINE iterateUnfold #-}

967−iterateUnfold :: (IsStream t, MonadAsync m)

968− => Unfold m a a -> t m a -> t m a

969−iterateUnfold unf xs = undefined

970−-}

971−

972------------------------------------------------------------------------------

966------------------------------------------------------------------------------

973-- Combine N Streams - concatMap

967-- Combine N Streams - concatMap

974------------------------------------------------------------------------------

968------------------------------------------------------------------------------

@@ -1075,12 +1069,14 @@ iterateMapWith combine f = IsStream.concatMapWith combine go

1075 where

1069 where

1076 go x = fromPure x `combine` IsStream.concatMapWith combine go (f x)

1070 go x = fromPure x `combine` IsStream.concatMapWith combine go (f x)

1077

1071

1078−{-

1072+-- | Same as @iterateMapWith Stream.serial@ but more efficient due to stream

1073+-- fusion.

1074+--

1075+-- /Unimplemented/

1079{-# INLINE iterateUnfold #-}

1076{-# INLINE iterateUnfold #-}

1080−iterateUnfold :: (IsStream t, MonadAsync m)

1077+iterateUnfold :: -- (IsStream t, MonadAsync m) =>

1081− => Unfold m a a -> t m a -> t m a

1078+ Unfold m a a -> t m a -> t m a

1082−iterateUnfold unf xs = undefined

1079+iterateUnfold = undefined

1083−-}

1084

1080

1085------------------------------------------------------------------------------

1081------------------------------------------------------------------------------

1086-- Flattening Graphs

1082-- Flattening Graphs