Day6 and let identifiers contain ?

This commit is contained in:
2024-11-30 17:07:49 -08:00
parent 71cf4f39f5
commit 53a0f96207
9 changed files with 412 additions and 40 deletions

View File

@@ -11,7 +11,7 @@ keywords = ["let", "in", "where", "case", "of", "data", "U", "do",
"", "forall",
"class", "instance",
"if", "then", "else",
"$", "λ",
"$", "λ", "?",
"->", "", ":", "=>", ":=", "=", "<-", "\\", "_", "|"]
checkKW : String -> Token Kind
@@ -27,7 +27,7 @@ identMore : Lexer
identMore = alphaNum <|> exact "'" <|> exact "_"
singleton : Lexer
singleton = oneOf "()\\{}[],?."
singleton = oneOf "()\\{}[],."
quo : Recognise True
quo = is '"'