hoig
[cc1516.git] / src / lex.icl
index b3c76cd..a797b1c 100644 (file)
@@ -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