Remove unused or repeated cases

This commit is contained in:
Iavor Diatchki 2022-10-26 12:07:05 -07:00
parent 31d30c1db7
commit 49540a1e15
2 changed files with 0 additions and 3 deletions

View File

@ -98,7 +98,6 @@ $white+ { emit $ White Space }
-- Please update the docs, if you add new entries.
"else" { emit $ KW KW_else }
"extern" { emit $ KW KW_extern }
"if" { emit $ KW KW_if }
"private" { emit $ KW KW_private }
"include" { emit $ KW KW_include }
@ -115,7 +114,6 @@ $white+ { emit $ White Space }
"import" { emit $ KW KW_import }
"as" { emit $ KW KW_as }
"hiding" { emit $ KW KW_hiding }
"newtype" { emit $ KW KW_newtype }
"down" { emit $ KW KW_down }
"by" { emit $ KW KW_by }

View File

@ -21,7 +21,6 @@ data TokenW = BlockComment | LineComment | Space | DocStr
deriving (Eq, Show, Generic, NFData)
data TokenKW = KW_else
| KW_extern
| KW_fin
| KW_if
| KW_private