Add support for backslashes to identifiers
This commit is contained in:
parent
3ab3126bbf
commit
fe7c01f6c2
|
@ -26,7 +26,7 @@ whitespace :: Parser String Unit
|
|||
whitespace = void $ many space
|
||||
|
||||
identifier :: Parser String String
|
||||
identifier = (charsToString <$> many1 (letter <|> digit <|> char '_')) <* whitespace
|
||||
identifier = (charsToString <$> many1 (letter <|> digit <|> char '_' <|> char '\\')) <* whitespace
|
||||
|
||||
expr :: Parser String (Expr Metavariable)
|
||||
expr = (defer $ \_ -> atom) <|> (defer $ \_ -> metavariable)
|
||||
|
|
Loading…
Reference in New Issue
Block a user