Revert "Refined constraint for HasQuoteContext instance."

This reverts commit 3c427fc17d.
This commit is contained in:
John MacFarlane 2017-02-20 15:44:33 +01:00
parent 3c427fc17d
commit b246e8e9af

View file

@ -960,7 +960,7 @@ class HasQuoteContext st m where
getQuoteContext :: (Stream s m t) => ParsecT s st m QuoteContext getQuoteContext :: (Stream s m t) => ParsecT s st m QuoteContext
withQuoteContext :: QuoteContext -> ParsecT s st m a -> ParsecT s st m a withQuoteContext :: QuoteContext -> ParsecT s st m a -> ParsecT s st m a
instance PandocMonad m => HasQuoteContext ParserState m where instance Monad m => HasQuoteContext ParserState m where
getQuoteContext = stateQuoteContext <$> getState getQuoteContext = stateQuoteContext <$> getState
withQuoteContext context parser = do withQuoteContext context parser = do
oldState <- getState oldState <- getState