git.iko.soy/streamly
on master help sign in
Add INLINE annotation on "onArray"
e25db62Harendra Kumar
benchmark/ArrayOps.hs+1
compare with master
unifiedsplit
@@ -276,6 +276,7 @@ sequence :: (S.IsStream t, S.MonadAsync m)
276 => (t m Int -> S.SerialT m Int) -> t m (m Int) -> m ()
276 => (t m Int -> S.SerialT m Int) -> t m (m Int) -> m ()
277 -}
277 -}
278
278
279+{-# INLINE onArray #-}
279onArray
280onArray
280 :: MonadIO m => (S.SerialT m Int -> S.SerialT m Int)
281 :: MonadIO m => (S.SerialT m Int -> S.SerialT m Int)
281 -> Stream Int
282 -> Stream Int