@@ -1605,7 +1605,7 @@ import Control.Monad.Trans.Class (MonadTrans (lift))
1605-- import qualified Streaming.Prelude as SG
1605-- import qualified Streaming.Prelude as SG
1607-- -- | streaming to streamly
1607-- -- | streaming to streamly
1608−-- fromStreaming :: (IsStream t, Monad m) => SG.Stream (SG.Of a) m r -> t m a
1608+-- fromStreaming :: (IsStream t, MonadAsync m) => SG.Stream (SG.Of a) m r -> t m a
1609-- fromStreaming = S.unfoldrM SG.uncons
1609-- fromStreaming = S.unfoldrM SG.uncons
1611-- -- | streamly to streaming
1611-- -- | streamly to streaming