??????
This commit is contained in:
parent
f5fa63a6df
commit
b9825fee55
1 changed files with 1 additions and 1 deletions
|
@ -64,7 +64,7 @@ syntaxChars : List Char
|
||||||
syntaxChars = ['(', ')', '[', ']', '{', '}', '"', '\'', ',', '.', ';']
|
syntaxChars = ['(', ')', '[', ']', '{', '}', '"', '\'', ',', '.', ';']
|
||||||
|
|
||||||
private
|
private
|
||||||
stra, isSymCont : Char -> Bool
|
isSymStart, isSymCont : Char -> Bool
|
||||||
isSymStart c = not (c `elem` syntaxChars) && isSymChar c
|
isSymStart c = not (c `elem` syntaxChars) && isSymChar c
|
||||||
isSymCont c = c == '\'' || isSymStart c
|
isSymCont c = c == '\'' || isSymStart c
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue