definition module lex
-import Data.Either
+from Data.Either import :: Either
:: Token :== (Int, TokenValue)
:: TokenValue
//Value tokens
= IdentToken [Char] // Identifier
- | NumberToken [Char]// Integer
+ | NumberToken Int // Integer
| CharToken Char // Character literal
//Keyword tokens
| VarToken // var keyword