git.iko.soy/typeable/pandoc
on master help sign in
Refined constraint for HasQuoteContext instance.
3c427fcJohn MacFarlane
src/Text/Pandoc/Parsing.hs+1−1
compare with master
unifiedsplit
@@ -960,7 +960,7 @@ class HasQuoteContext st m where
960 getQuoteContext :: (Stream s m t) => ParsecT s st m QuoteContext
960 getQuoteContext :: (Stream s m t) => ParsecT s st m QuoteContext
961 withQuoteContext :: QuoteContext -> ParsecT s st m a -> ParsecT s st m a
961 withQuoteContext :: QuoteContext -> ParsecT s st m a -> ParsecT s st m a
962
962
963−instance Monad m => HasQuoteContext ParserState m where
963+instance PandocMonad m => HasQuoteContext ParserState m where
964 getQuoteContext = stateQuoteContext <$> getState
964 getQuoteContext = stateQuoteContext <$> getState
965 withQuoteContext context parser = do
965 withQuoteContext context parser = do
966 oldState <- getState
966 oldState <- getState