matching on mixfix
This commit is contained in:
@@ -9,7 +9,7 @@ keywords = ["let", "in", "where", "case", "of", "data", "U",
|
||||
"ptype", "pfunc", "module", "infixl", "infixr", "infix"]
|
||||
|
||||
specialOps : List String
|
||||
specialOps = ["->", ":", "=>", ":="]
|
||||
specialOps = ["->", ":", "=>", ":=", "="]
|
||||
|
||||
checkKW : String -> Token Kind
|
||||
checkKW s = if elem s keywords then Tok Keyword s else Tok Ident s
|
||||
|
||||
Reference in New Issue
Block a user