Extend warnings about spaces around = to 'let'

This commit is contained in:
Vidar Holen 2021-08-08 15:48:50 -07:00
parent 4dd762253f
commit e5745568e8
2 changed files with 16 additions and 5 deletions

View file

@ -2810,7 +2810,7 @@ readLetSuffix = many1 (readIoRedirect <|> try readLetExpression <|> readCmdWord)
startPos <- getPosition
expression <- readStringForParser readCmdWord
let (unQuoted, newPos) = kludgeAwayQuotes expression startPos
subParse newPos readArithmeticContents unQuoted
subParse newPos (readArithmeticContents <* eof) unQuoted
kludgeAwayQuotes :: String -> SourcePos -> (String, SourcePos)
kludgeAwayQuotes s p =