X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=lex.dcl;h=46a3ab817beb372ea231fe0cf9696faa14ef348a;hb=8de73bb36ae068011c2c1b1fc9b3c9091a897997;hp=56c3765319aa20a5e2293816785c7bf84034d58c;hpb=011c22770609138b54195d330232bc2a1e88d0ae;p=cc1516.git diff --git a/lex.dcl b/lex.dcl index 56c3765..46a3ab8 100644 --- a/lex.dcl +++ b/lex.dcl @@ -5,7 +5,7 @@ import Data.Either :: Token //Value tokens = IdentToken [Char] // Identifier - | NumberToken Int // Integer + | NumberToken [Char]// Integer | CharToken Char // Character literal //Keyword tokens | VarToken // var keyword @@ -44,6 +44,7 @@ import Data.Either | AmpersandsToken // && | PipesToken // || | ArrowToken // -> + | EndOfFileToken // EOF :: LexerOutput :== Either String [Token]