Skip to content

GitLab

Commit 13582d1d authored by Bas Lijnse's avatar Bas Lijnse
Browse files

Bugfix: added the backtick (`) character as allowed character in the lexing of identifiers.

parent 8d41d8de
Hide whitespace changes
Inline Side-by-side
Showing with 2 additions and 0 deletions
libraries/GenLib/GenParse.icl
View file @ 13582d1d
......@@ -172,6 +172,7 @@ where
Just '\'' -> lex_char 0 [] s
Just '"' -> lex_string 0 [] s
Just '_' -> lex_ident 1 ['_'] s
Just '`' -> lex_ident 1 ['`'] s
Just '+'
# (mc, s) = lexGetChar s
-> case mc of
......@@ -276,6 +277,7 @@ where
= case mc of
Nothing -> (mktoken num_chars acc_chars, s)
Just '_' -> lex_ident (inc num_chars) ['_':acc_chars] s
Just '`' -> lex_ident (inc num_chars) ['`':acc_chars] s
Just c
| isAlphanum c
-> lex_ident (inc num_chars) [c:acc_chars] s
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment