on master help sign in
Change the order of type vars for the sanity of type applications
a919e69Adithya Kumar
src/Streamly/Internal/Data/Stream/IsStream/Generate.hs+1−1
@@ -223,7 +223,7 @@ unfoldr step seed = fromStreamS (S.unfoldr step seed)
223--
223--
224-- /Since: 0.1.0/
224-- /Since: 0.1.0/
225{-# INLINE_EARLY unfoldrM #-}
225{-# INLINE_EARLY unfoldrM #-}
226−unfoldrM :: forall t m a b. (IsStream t, MonadAsync m) =>
226+unfoldrM :: forall t m b a. (IsStream t, MonadAsync m) =>
227 (b -> m (Maybe (a, b))) -> b -> t m a
227 (b -> m (Maybe (a, b))) -> b -> t m a
228unfoldrM step = fromStream . K.unfoldrMWith (IsStream.toConsK (consM @t)) step
228unfoldrM step = fromStream . K.unfoldrMWith (IsStream.toConsK (consM @t)) step
229
229