X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=lex.dcl;fp=lex.dcl;h=0000000000000000000000000000000000000000;hb=b4636110ab65f233ed40d4390b62c7799df3c949;hp=a887374897f439bf44ae4fd8547dbd4e88009ab5;hpb=4766205e7035a58c8a1fa1557b6e14577ed26f32;p=cc1516.git

diff --git a/lex.dcl b/lex.dcl
deleted file mode 100644
index a887374..0000000
--- a/lex.dcl
+++ /dev/null
@@ -1,57 +0,0 @@
-definition module lex
-
-from Data.Either import :: Either
-
-:: Token :== (Int, TokenValue)
-:: TokenValue
-	//Value tokens
-	= IdentToken [Char] // Identifier
-	| NumberToken Int   // Integer
-	| CharToken Char    // Character literal
-	//Keyword tokens
-	| VarToken          // var keyword
-	| ReturnToken       // return keyword
-	| IfToken           // if keyword
-	| ElseToken         // else keyword
-	| WhileToken        // while keyword
-	| TrueToken         // True keyword
-	| FalseToken        // False keyword
-	| VoidToken         // Void keyword
-	| IntTypeToken      // Int keyword
-	| CharTypeToken     // Char keyword
-	| BoolTypeToken     // Bool keyword
-	//Two character tokens
-	| DoubleColonToken  // ::
-	| NotEqualToken     // !=
-	| LesserEqToken     // <=
-	| GreaterEqToken    // >=
-	| EqualsToken       // ==
-	| AmpersandsToken   // &&
-	| PipesToken        // ||
-    | ArrowToken        // ->
-	//One character tokens
-	| BraceOpenToken    // (
-	| BraceCloseToken   // )
-	| CBraceOpenToken   // {
-	| CBraceCloseToken  // }
-	| SquareOpenToken   // [
-	| SquareCloseToken  // ]
-	| CommaToken        // ,
-	| ColonToken        // :
-	| SColonToken       // ;
-	| DotToken          // .
-	| PlusToken         // +
-	| DashToken         // -
-	| StarToken         // *
-	| SlashToken        // /
-	| PercentToken      // %
-	| AssignmentToken   // =
-	| LesserToken       // <
-	| BiggerToken       // >
-	| ExclamationToken  // !
-	//Special tokens
-	| EndOfFileToken    // EOF
-
-:: LexerOutput :== Either String [Token]
-
-lexer :: [Char] -> LexerOutput