Add end pos to readSingleQuoted
This commit is contained in:
parent
29e8c0a16e
commit
8ff35fb4af
|
@ -1097,6 +1097,7 @@ readSingleQuoted = called "single quoted string" $ do
|
|||
when ('\n' `elem` string && not ("\n" `isPrefixOf` string)) $
|
||||
suggestForgotClosingQuote startPos endPos "single quoted string"
|
||||
|
||||
endPosOfStartId id
|
||||
return (T_SingleQuoted id string)
|
||||
|
||||
readSingleQuotedLiteral = do
|
||||
|
|
Loading…
Reference in New Issue