Changed the lexer to make it lex the new (user-defineable) operators
This commit is contained in:
parent
e648a87fd1
commit
7031ab7fb8
|
@ -43,7 +43,7 @@ $vertSpace = [\r\n]
|
|||
|
||||
@reserved = "[" | "]" | "(" | ")"
|
||||
| "::" | ":=" | ":" | "," | ";" | "&"
|
||||
| "?" | "!" | "="
|
||||
| "?" | "??" | "!" | "="
|
||||
| "\" | "/\" | "\/"
|
||||
| "+" | "-" | "*" | "/"
|
||||
| "><" | "<<" | ">>" | "<>"
|
||||
|
@ -52,6 +52,9 @@ $vertSpace = [\r\n]
|
|||
| "~"
|
||||
| "##"
|
||||
| "|"
|
||||
-- occam UDOs:
|
||||
| "@@" | "$$" | "%" | "%%" | "&&" | "<%" | "%>" | "<&" | "&>"
|
||||
| "<]" | "[>" | "<@" | "@>" | "@" | "++" | "!!" | "==" | "^"
|
||||
| "AFTER" | "ALT" | "AND" | "ANY" | "AT"
|
||||
| "BITAND" | "BITNOT" | "BITOR" | "BOOL" | "BYTE" | "BYTESIN"
|
||||
| "CASE" | "CHAN" | "CLAIM" | "CLONE"
|
||||
|
|
Loading…
Reference in New Issue
Block a user