lex . and ω (and #)
This commit is contained in:
parent
49c43ad296
commit
1dd4ff0e22
3 changed files with 10 additions and 4 deletions
|
@ -113,6 +113,7 @@ tests = "lexer" :- [
|
|||
acceptsWith' "'a" [Symbol "a"],
|
||||
acceptsWith' "'ab" [Symbol "ab"],
|
||||
acceptsWith' "'_b" [Symbol "_b"],
|
||||
acceptsWith' "a.b.c" [Name "a", P Dot, Name "b", P Dot, Name "c"],
|
||||
rejects' "'",
|
||||
rejects' "1abc"
|
||||
],
|
||||
|
@ -124,6 +125,8 @@ tests = "lexer" :- [
|
|||
acceptsWith' "in" [K In],
|
||||
acceptsWith' "case" [K Case],
|
||||
acceptsWith' "of" [K Of],
|
||||
acceptsWith' "ω" [K Omega],
|
||||
acceptsWith' "#" [K Omega],
|
||||
acceptsWith' "funk" [Name "funk"]
|
||||
],
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue