on master help sign in
Add INLINE pragma to replicate
7c6eac8Harendra Kumar
src/Streamly/Prelude.hs+1
@@ -747,6 +747,7 @@ replicateMSerial n = fromStreamS . S.replicateM n
747-- Generate a stream of length @n@ by repeating a value @n@ times.
747-- Generate a stream of length @n@ by repeating a value @n@ times.
748--
748--
749-- @since 0.6.0
749-- @since 0.6.0
750+{-# INLINE_NORMAL replicate #-}
750replicate :: (IsStream t, Monad m) => Int -> a -> t m a
751replicate :: (IsStream t, Monad m) => Int -> a -> t m a
751replicate n = fromStreamS . S.replicate n
752replicate n = fromStreamS . S.replicate n
752
753