Add an INLINE pragma to IsStream.groups
commitaf20dfc12a2cb4560164426958ccdb3630935599
authorAdithya Kumar <adithya@composewell.com>
dateThu 10 Dec 2020, 17:48 (6 years ago)
parente19f645
src/Streamly/Internal/Data/Stream/IsStream.hs+1
@@ -3884,6 +3884,7 @@ groupsByRolling cmp f m = D.fromStreamD $ D.groupsRollingBy cmp f (D.toStreamD
38843884-- > [[1,1],[2,2]]
38853885--
38863886-- @since 0.7.0
3887+{-# INLINE groups #-}
38873888groups :: (IsStream t, Monad m, Eq a) => Fold m a b -> t m a -> t m b
38883889groups = groupsBy (==)
38893890