@@ -811,8 +811,8 @@ quoted :: Parser [Char] ParserState Inline
811811quoted inlineParser = doubleQuoted inlineParser <|> singleQuoted inlineParser
812812
813813withQuoteContext :: QuoteContext
814− -> Parser [Char] ParserState a
815− -> Parser [Char] ParserState a
814+ -> Parser [tok] ParserState a
815+ -> Parser [tok] ParserState a
816816withQuoteContext context parser = do
817817 oldState <- getState
818818 let oldQuoteContext = stateQuoteContext oldState