outline voor presentatie

[cc1516.git] / lex.dcl

diff --git a/lex.dcl b/lex.dcl
index e78d495..a6cf7c6 100644 (file)
--- a/lex.dcl
+++ b/lex.dcl
@@ -3,10 +3,9 @@ definition module lex
 from Data.Either import :: Either
 from yard import :: Error
 
-:: Token = {
-       line :: Int,
-       column :: Int,
-       token :: TokenValue}
+from AST import :: Pos
+
+:: Token :== (Pos, TokenValue)
 :: TokenValue
        //Value tokens
        = IdentToken String // Identifier