X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=src%2Flex.dcl;h=a713e5d3a303cc61b4ca75ae1710e84fd4a0e4f7;hb=c126dc3a1f66f959407cf3cf33bcba01142591c6;hp=0b064b44a190cbf3dc33bbfbf675f5c8fe55e8c4;hpb=b4636110ab65f233ed40d4390b62c7799df3c949;p=cc1516.git

diff --git a/src/lex.dcl b/src/lex.dcl
index 0b064b4..a713e5d 100644
--- a/src/lex.dcl
+++ b/src/lex.dcl
@@ -2,7 +2,7 @@ definition module lex
 
 from Data.Either import :: Either
 
-:: Token :== (Int, TokenValue)
+:: Token :== (Int, Int, TokenValue)
 :: TokenValue
 	//Value tokens
 	= IdentToken [Char] // Identifier
@@ -55,6 +55,4 @@ from Data.Either import :: Either
 
 :: LexerOutput :== Either String [Token]
 
-(===) :: TokenValue Token -> Bool
-
 lexer :: [Char] -> LexerOutput