From 7ea35da44d33da6e61d32a98a3e5c5dfb9294893 Mon Sep 17 00:00:00 2001 From: Ranjeet Kumar Ranjan Date: Tue, 18 Oct 2022 17:52:04 +0530 Subject: [PATCH] Fix review comments --- core/src/Streamly/Internal/Data/Stream/Generate.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/core/src/Streamly/Internal/Data/Stream/Generate.hs b/core/src/Streamly/Internal/Data/Stream/Generate.hs index 57f8d840e..4ad1d8b72 100644 --- a/core/src/Streamly/Internal/Data/Stream/Generate.hs +++ b/core/src/Streamly/Internal/Data/Stream/Generate.hs @@ -182,21 +182,21 @@ repeat :: Monad m => a -> Stream m a repeat = fromStreamD . D.repeat -- | +-- >>> repeatM = Stream.sequence . repeat -- >>> repeatM = fix . Stream.consM -- >>> repeatM = cycle1 . Stream.fromEffect -- -- Generate a stream by repeatedly executing a monadic action forever. -- -- >>> :{ --- repeatAsync = +-- repeatAction = -- Stream.repeatM (threadDelay 1000000 >> print 1) -- & Stream.take 10 -- & Stream.fold Fold.drain -- :} -- --- /Concurrent, infinite (do not use with 'fromParallel')/ +-- /Pre-release/ -- --- @since 0.9.0 {-# INLINE_NORMAL repeatM #-} repeatM :: Monad m => m a -> Stream m a repeatM = Stream.sequence . repeat