X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=src%2Flex.icl;h=a797b1c4ee410ac3095c46bf5e68f5655c7c47cd;hb=0f1c66df34b0f65709756b070884c33b94e6a9ba;hp=b3c76cd1ff70053bf30c57b575a2a96f7ec1a248;hpb=0deec3b5e205945dc8cf8a00ca8cff4c96f42552;p=cc1516.git

diff --git a/src/lex.icl b/src/lex.icl
index b3c76cd..a797b1c 100644
--- a/src/lex.icl
+++ b/src/lex.icl
@@ -18,6 +18,8 @@ lexProgram :: Parser Char [Token]
 lexProgram = catMaybes <$> some lexToken <* eof
 	>>= \ts->pure $ (map (\t->(0, 0, t)) ts)
 
+//Of hier een record van maken
+//lexToken :: Parser Char (Maybe (Int, Int, Int, TokenValue))
 lexToken :: Parser Char (Maybe TokenValue)
 lexToken = 
     //Comments