git.iko.soy/streamly
on master help sign in
Update src/Streamly/Internal/Data/Parser/ParserD.hs
5020f09Julian Ospald
src/Streamly/Internal/Data/Parser/ParserD.hs+1−1
compare with master
unifiedsplit
@@ -317,7 +317,7 @@ satisfy predicate = Parser step initial extract
317-- /Pre-release/
317-- /Pre-release/
318--
318--
319{-# INLINE next #-}
319{-# INLINE next #-}
320−next :: MonadCatch m => Parser m a (Maybe a)
320+next :: Monad m => Parser m a (Maybe a)
321next = Parser step initial extract
321next = Parser step initial extract
322 where
322 where
323 initial = pure $ IPartial ()
323 initial = pure $ IPartial ()