Add operator reserved names for the lexer

This commit is contained in:
John Wiegley 2014-07-04 02:06:43 -05:00
parent 2a931e52e1
commit 03d8ccc5bb
1 changed files with 11 additions and 1 deletions

View File

@ -25,7 +25,17 @@ lexer = P.makeTokenParser P.LanguageDef
, P.identLetter = alphaNum <|> char '_'
, P.opStart = oneOf ":!#$%&*+./<=>?@\\^|-~"
, P.opLetter = oneOf "@"
, P.reservedNames = []
, P.reservedNames =
[ "let", "in"
, "if", "then", "else"
, "true", "false"
, "null"
, "assert"
, "with"
, "rec"
, "inherit"
, "or"
]
, P.reservedOpNames = []
, P.caseSensitive = True
}