Basic parser coming together.

2 files changed, 124 insertions, 0 deletions

diff --git a/src/parser.l b/src/parser.l
new file mode 100644
index 0000000..d5ff735
--- /dev/null
+++ b/src/parser.l
@@ -0,0 +1,43 @@
+%{
+#include <stdint.h>
+#include "parser.tab.h"
+%}
+
+%option noyywrap
+
+%x sitname
+%x comment
+%x tdqstr tsqstr
+%%
+
+[-{}<>=+/*,();]                                 { return yytext[0]; }
+
+game                                                    { return tokGame; }
+function                                                { return tokFunction; }
+situation                                               { return tokSituation; }
+while                                                   { return tokWhile; }
+for                                                             { return tokFor; }
+each                                                    { return tokEach; }
+in                                                              { return tokIn; }
+if                                                              { return tokIf; }
+then                                                    { return tokThen; }
+else                                                    { return tokElse; }
+command                                                 { return tokCommand; }
+goto                                                    { return tokGoto; }
+
+"<<"                                                    { BEGIN( sitname ); }
+<sitname>[- a-zA-Z0-9]+                 { printf("situation: %s\n", yytext ); return tokSituationName; }
+<sitname>">>"                                   { BEGIN( INITIAL ); }
+<sitname>.                                              REJECT;
+
+"//"[^\n]*                                              {}
+
+"/\*"                                                           { BEGIN( comment ); }
+<comment>"\*/"                                  { BEGIN( INITIAL ); }
+<comment>.                                              {}
+
+[a-zA-Z_][a-zA-Z0-9_]*                  { return tokIdent; }
+
+[ \t\n\r]+                                              {}
+
+%%
diff --git a/src/parser.y b/src/parser.y
new file mode 100644
index 0000000..b3da848
--- /dev/null
+++ b/src/parser.y
@@ -0,0 +1,81 @@
+%{
+#include <stdint.h>
+#include <stdio.h>
+
+int yylex();
+void yyerror( const char *error ) { printf("%s\n", error ); }
+%}
+
+%union {
+        int64_t iValue;
+        double dValue;
+        char *sValue;
+}
+
+%token tokGame
+%token tokFunction
+%token tokSituation
+%token tokWhile
+%token tokFor
+%token tokEach
+%token tokIn
+%token tokIf
+%token tokThen
+%token tokElse
+%token tokCommand
+%token tokSituationName
+%token tokIdent
+%token tokGoto
+%token tokString
+%token tokInt
+%token tokFloat
+%token tokBool
+%token tokNull
+
+%token eos 0 "end of stream"
+
+%left '(' ')' '[' ']'
+%left '*' '/'
+%left '-' '+'
+
+%%
+input:
+         | input situation
+         | input function
+         ;
+
+situation: tokSituation tokSituationName '{' cmpltExprList '}'
+                 ;
+
+function: tokFunction tokIdent '(' ')' '{' '}'
+                ;
+
+cmpltExprList:
+                         | cmpltExprList cmpltExpr
+                         ;
+
+cmpltExpr: expr ';'
+                 ;
+
+expr: tokInt
+        | tokFloat
+        | tokString
+        | tokBool
+        | tokNull
+        | tokSituationName
+        | expr '+' expr
+        | expr '-' expr
+        | expr '/' expr
+        | expr '*' expr
+        | '(' expr ')'
+        | expr '[' expr ']'
+        | tokGoto '(' expr ')'
+        ;
+%%
+
+int main()
+{
+        yyparse();
+        return 0;
+}
+