Commit 36bd2bb5 authored by Michael Hanus 's avatar Michael Hanus

Fixes unintended character in strong constant

parent 022fdb45
Pipeline #322 failed with stages
......@@ -1392,7 +1392,7 @@ lex xs = case xs of
| otherwise -> []
where
isSingle c = c `elem` ",;()[]{}_`"
isSym c = c `elem` "!@#$%&+./<=>?\\^|:-~"
isSym c = c `elem` "!@#$%&*+./<=>?\\^|:-~"
isIdChar c = isAlphaNum c || c `elem` "_'"
lexFracExp s = case s of
('.':c:cs)
......
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