zydronium/SBSPSS
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Browse source
This commit is contained in:
Paul 2001-01-02 16:02:35 +00:00
parent ec9c8c2ab5
commit 5e0a9da493
6 changed files with 702 additions and 798 deletions
Download patch file Download diff file Expand all files Collapse all files

584
Utils/Scripter/parser.cpp
View file

@ -261,12 +261,12 @@ s_baseTreeNode=yyattribute(1 - 1).treenode;
case 15: case 15:
{ {
#ifdef YYDEBUG #ifdef YYDEBUG
YYSTYPE YYFAR* yya[2]; YYSTYPE YYFAR* yya[4];
yyinitdebug((void YYFAR**)yya, 2); yyinitdebug((void YYFAR**)yya, 4);
#endif #endif
{ {
#line 138 "C:\\spongebob\\Utils\\scripter\\parser.y" #line 138 "C:\\spongebob\\Utils\\scripter\\parser.y"
(*(YYSTYPE YYFAR*)yyvalptr).treenode=yyattribute(1 - 1).treenode; (*(YYSTYPE YYFAR*)yyvalptr).treenode=new CTreeNode(EQUAL_EXPR,yyattribute(1 - 3).treenode,yyattribute(3 - 3).treenode);
#line 271 "C:\\spongebob\\Utils\\scripter\\parser.cpp" #line 271 "C:\\spongebob\\Utils\\scripter\\parser.cpp"
} }
} }
@ -274,12 +274,12 @@ s_baseTreeNode=yyattribute(1 - 1).treenode;
case 16: case 16:
{ {
#ifdef YYDEBUG #ifdef YYDEBUG
YYSTYPE YYFAR* yya[2]; YYSTYPE YYFAR* yya[4];
yyinitdebug((void YYFAR**)yya, 2); yyinitdebug((void YYFAR**)yya, 4);
#endif #endif
{ {
#line 139 "C:\\spongebob\\Utils\\scripter\\parser.y" #line 139 "C:\\spongebob\\Utils\\scripter\\parser.y"
(*(YYSTYPE YYFAR*)yyvalptr).treenode=yyattribute(1 - 1).treenode; (*(YYSTYPE YYFAR*)yyvalptr).treenode=new CTreeNode(NOTEQUAL_EXPR,yyattribute(1 - 3).treenode,yyattribute(3 - 3).treenode);
#line 284 "C:\\spongebob\\Utils\\scripter\\parser.cpp" #line 284 "C:\\spongebob\\Utils\\scripter\\parser.cpp"
} }
} }
@ -287,12 +287,12 @@ s_baseTreeNode=yyattribute(1 - 1).treenode;
case 17: case 17:
{ {
#ifdef YYDEBUG #ifdef YYDEBUG
YYSTYPE YYFAR* yya[2]; YYSTYPE YYFAR* yya[4];
yyinitdebug((void YYFAR**)yya, 2); yyinitdebug((void YYFAR**)yya, 4);
#endif #endif
{ {
#line 140 "C:\\spongebob\\Utils\\scripter\\parser.y" #line 140 "C:\\spongebob\\Utils\\scripter\\parser.y"
(*(YYSTYPE YYFAR*)yyvalptr).treenode=yyattribute(1 - 1).treenode; (*(YYSTYPE YYFAR*)yyvalptr).treenode=new CTreeNode(LESSTHAN_EXPR,yyattribute(1 - 3).treenode,yyattribute(3 - 3).treenode);
#line 297 "C:\\spongebob\\Utils\\scripter\\parser.cpp" #line 297 "C:\\spongebob\\Utils\\scripter\\parser.cpp"
} }
} }
@ -300,12 +300,12 @@ s_baseTreeNode=yyattribute(1 - 1).treenode;
case 18: case 18:
{ {
#ifdef YYDEBUG #ifdef YYDEBUG
YYSTYPE YYFAR* yya[2]; YYSTYPE YYFAR* yya[4];
yyinitdebug((void YYFAR**)yya, 2); yyinitdebug((void YYFAR**)yya, 4);
#endif #endif
{ {
#line 141 "C:\\spongebob\\Utils\\scripter\\parser.y" #line 141 "C:\\spongebob\\Utils\\scripter\\parser.y"
(*(YYSTYPE YYFAR*)yyvalptr).treenode=yyattribute(1 - 1).treenode; (*(YYSTYPE YYFAR*)yyvalptr).treenode=new CTreeNode(GREATERTHAN_EXPR,yyattribute(1 - 3).treenode,yyattribute(3 - 3).treenode);
#line 310 "C:\\spongebob\\Utils\\scripter\\parser.cpp" #line 310 "C:\\spongebob\\Utils\\scripter\\parser.cpp"
} }
} }
@ -313,12 +313,12 @@ s_baseTreeNode=yyattribute(1 - 1).treenode;
case 19: case 19:
{ {
#ifdef YYDEBUG #ifdef YYDEBUG
YYSTYPE YYFAR* yya[4]; YYSTYPE YYFAR* yya[2];
yyinitdebug((void YYFAR**)yya, 4); yyinitdebug((void YYFAR**)yya, 2);
#endif #endif
{ {
#line 145 "C:\\spongebob\\Utils\\scripter\\parser.y" #line 146 "C:\\spongebob\\Utils\\scripter\\parser.y"
(*(YYSTYPE YYFAR*)yyvalptr).treenode=new CTreeNode(EQUAL_EXPR,yyattribute(1 - 3).treenode,yyattribute(3 - 3).treenode); (*(YYSTYPE YYFAR*)yyvalptr).treenode=new CTreeNode(VARIABLE_EXPR,yyattribute(1 - 1).variableIdx);
#line 323 "C:\\spongebob\\Utils\\scripter\\parser.cpp" #line 323 "C:\\spongebob\\Utils\\scripter\\parser.cpp"
} }
} }
@ -326,12 +326,12 @@ s_baseTreeNode=yyattribute(1 - 1).treenode;
case 20: case 20:
{ {
#ifdef YYDEBUG #ifdef YYDEBUG
YYSTYPE YYFAR* yya[4]; YYSTYPE YYFAR* yya[2];
yyinitdebug((void YYFAR**)yya, 4); yyinitdebug((void YYFAR**)yya, 2);
#endif #endif
{ {
#line 149 "C:\\spongebob\\Utils\\scripter\\parser.y" #line 150 "C:\\spongebob\\Utils\\scripter\\parser.y"
(*(YYSTYPE YYFAR*)yyvalptr).treenode=new CTreeNode(NOTEQUAL_EXPR,yyattribute(1 - 3).treenode,yyattribute(3 - 3).treenode); (*(YYSTYPE YYFAR*)yyvalptr).treenode=new CTreeNode(VALUE_EXPR,yyattribute(1 - 1).value);
#line 336 "C:\\spongebob\\Utils\\scripter\\parser.cpp" #line 336 "C:\\spongebob\\Utils\\scripter\\parser.cpp"
} }
} }
@ -343,8 +343,8 @@ s_baseTreeNode=yyattribute(1 - 1).treenode;
yyinitdebug((void YYFAR**)yya, 4); yyinitdebug((void YYFAR**)yya, 4);
#endif #endif
{ {
#line 153 "C:\\spongebob\\Utils\\scripter\\parser.y" #line 151 "C:\\spongebob\\Utils\\scripter\\parser.y"
(*(YYSTYPE YYFAR*)yyvalptr).treenode=new CTreeNode(LESSTHAN_EXPR,yyattribute(1 - 3).treenode,yyattribute(3 - 3).treenode); (*(YYSTYPE YYFAR*)yyvalptr).treenode=yyattribute(2 - 3).treenode;
#line 349 "C:\\spongebob\\Utils\\scripter\\parser.cpp" #line 349 "C:\\spongebob\\Utils\\scripter\\parser.cpp"
} }
} }
@ -352,12 +352,12 @@ s_baseTreeNode=yyattribute(1 - 1).treenode;
case 22: case 22:
{ {
#ifdef YYDEBUG #ifdef YYDEBUG
YYSTYPE YYFAR* yya[4]; YYSTYPE YYFAR* yya[2];
yyinitdebug((void YYFAR**)yya, 4); yyinitdebug((void YYFAR**)yya, 2);
#endif #endif
{ {
#line 157 "C:\\spongebob\\Utils\\scripter\\parser.y" #line 152 "C:\\spongebob\\Utils\\scripter\\parser.y"
(*(YYSTYPE YYFAR*)yyvalptr).treenode=new CTreeNode(GREATERTHAN_EXPR,yyattribute(1 - 3).treenode,yyattribute(3 - 3).treenode); (*(YYSTYPE YYFAR*)yyvalptr).treenode=new CTreeNode(VARIABLE_EXPR,yyattribute(1 - 1).variableIdx);
#line 362 "C:\\spongebob\\Utils\\scripter\\parser.cpp" #line 362 "C:\\spongebob\\Utils\\scripter\\parser.cpp"
} }
} }
@ -365,12 +365,12 @@ s_baseTreeNode=yyattribute(1 - 1).treenode;
case 23: case 23:
{ {
#ifdef YYDEBUG #ifdef YYDEBUG
YYSTYPE YYFAR* yya[2]; YYSTYPE YYFAR* yya[4];
yyinitdebug((void YYFAR**)yya, 2); yyinitdebug((void YYFAR**)yya, 4);
#endif #endif
{ {
#line 162 "C:\\spongebob\\Utils\\scripter\\parser.y" #line 155 "C:\\spongebob\\Utils\\scripter\\parser.y"
(*(YYSTYPE YYFAR*)yyvalptr).treenode=new CTreeNode(VARIABLE_EXPR,yyattribute(1 - 1).variableIdx); (*(YYSTYPE YYFAR*)yyvalptr).treenode=new CTreeNode(PLUS_EXPR,yyattribute(1 - 3).treenode,yyattribute(3 - 3).treenode);
#line 375 "C:\\spongebob\\Utils\\scripter\\parser.cpp" #line 375 "C:\\spongebob\\Utils\\scripter\\parser.cpp"
} }
} }
@ -378,12 +378,12 @@ s_baseTreeNode=yyattribute(1 - 1).treenode;
case 24: case 24:
{ {
#ifdef YYDEBUG #ifdef YYDEBUG
YYSTYPE YYFAR* yya[2]; YYSTYPE YYFAR* yya[4];
yyinitdebug((void YYFAR**)yya, 2); yyinitdebug((void YYFAR**)yya, 4);
#endif #endif
{ {
#line 166 "C:\\spongebob\\Utils\\scripter\\parser.y" #line 156 "C:\\spongebob\\Utils\\scripter\\parser.y"
(*(YYSTYPE YYFAR*)yyvalptr).treenode=new CTreeNode(VALUE_EXPR,yyattribute(1 - 1).value); (*(YYSTYPE YYFAR*)yyvalptr).treenode=new CTreeNode(SUBTRACT_EXPR,yyattribute(1 - 3).treenode,yyattribute(3 - 3).treenode);
#line 388 "C:\\spongebob\\Utils\\scripter\\parser.cpp" #line 388 "C:\\spongebob\\Utils\\scripter\\parser.cpp"
} }
} }
@ -395,8 +395,8 @@ s_baseTreeNode=yyattribute(1 - 1).treenode;
yyinitdebug((void YYFAR**)yya, 4); yyinitdebug((void YYFAR**)yya, 4);
#endif #endif
{ {
#line 167 "C:\\spongebob\\Utils\\scripter\\parser.y" #line 157 "C:\\spongebob\\Utils\\scripter\\parser.y"
(*(YYSTYPE YYFAR*)yyvalptr).treenode=yyattribute(2 - 3).treenode; (*(YYSTYPE YYFAR*)yyvalptr).treenode=new CTreeNode(MULTIPLY_EXPR,yyattribute(1 - 3).treenode,yyattribute(3 - 3).treenode);
#line 401 "C:\\spongebob\\Utils\\scripter\\parser.cpp" #line 401 "C:\\spongebob\\Utils\\scripter\\parser.cpp"
} }
} }
@ -404,12 +404,12 @@ s_baseTreeNode=yyattribute(1 - 1).treenode;
case 26: case 26:
{ {
#ifdef YYDEBUG #ifdef YYDEBUG
YYSTYPE YYFAR* yya[2]; YYSTYPE YYFAR* yya[4];
yyinitdebug((void YYFAR**)yya, 2); yyinitdebug((void YYFAR**)yya, 4);
#endif #endif
{ {
#line 168 "C:\\spongebob\\Utils\\scripter\\parser.y" #line 158 "C:\\spongebob\\Utils\\scripter\\parser.y"
(*(YYSTYPE YYFAR*)yyvalptr).treenode=new CTreeNode(VARIABLE_EXPR,yyattribute(1 - 1).variableIdx); (*(YYSTYPE YYFAR*)yyvalptr).treenode=new CTreeNode(DIVIDE_EXPR,yyattribute(1 - 3).treenode,yyattribute(3 - 3).treenode);
#line 414 "C:\\spongebob\\Utils\\scripter\\parser.cpp" #line 414 "C:\\spongebob\\Utils\\scripter\\parser.cpp"
} }
} }
@ -417,12 +417,12 @@ s_baseTreeNode=yyattribute(1 - 1).treenode;
case 27: case 27:
{ {
#ifdef YYDEBUG #ifdef YYDEBUG
YYSTYPE YYFAR* yya[4]; YYSTYPE YYFAR* yya[2];
yyinitdebug((void YYFAR**)yya, 4); yyinitdebug((void YYFAR**)yya, 2);
#endif #endif
{ {
#line 171 "C:\\spongebob\\Utils\\scripter\\parser.y" #line 159 "C:\\spongebob\\Utils\\scripter\\parser.y"
(*(YYSTYPE YYFAR*)yyvalptr).treenode=new CTreeNode(PLUS_EXPR,yyattribute(1 - 3).treenode,yyattribute(3 - 3).treenode); (*(YYSTYPE YYFAR*)yyvalptr).treenode=yyattribute(1 - 1).treenode;
#line 427 "C:\\spongebob\\Utils\\scripter\\parser.cpp" #line 427 "C:\\spongebob\\Utils\\scripter\\parser.cpp"
} }
} }
@ -430,78 +430,26 @@ s_baseTreeNode=yyattribute(1 - 1).treenode;
case 28: case 28:
{ {
#ifdef YYDEBUG #ifdef YYDEBUG
YYSTYPE YYFAR* yya[4]; YYSTYPE YYFAR* yya[3];
yyinitdebug((void YYFAR**)yya, 4); yyinitdebug((void YYFAR**)yya, 3);
#endif #endif
{ {
#line 172 "C:\\spongebob\\Utils\\scripter\\parser.y" #line 164 "C:\\spongebob\\Utils\\scripter\\parser.y"
(*(YYSTYPE YYFAR*)yyvalptr).treenode=new CTreeNode(SUBTRACT_EXPR,yyattribute(1 - 3).treenode,yyattribute(3 - 3).treenode); if(yyattribute(1 - 2).functionNumber!=-1){m_functionNumber=yyattribute(1 - 2).functionNumber;m_functionArgs=getFunctionArgs(yyattribute(1 - 2).functionNumber);}
#line 440 "C:\\spongebob\\Utils\\scripter\\parser.cpp" #line 440 "C:\\spongebob\\Utils\\scripter\\parser.cpp"
} }
} }
break; break;
case 29: case 29:
{ {
#ifdef YYDEBUG
YYSTYPE YYFAR* yya[4];
yyinitdebug((void YYFAR**)yya, 4);
#endif
{
#line 173 "C:\\spongebob\\Utils\\scripter\\parser.y"
(*(YYSTYPE YYFAR*)yyvalptr).treenode=new CTreeNode(MULTIPLY_EXPR,yyattribute(1 - 3).treenode,yyattribute(3 - 3).treenode);
#line 453 "C:\\spongebob\\Utils\\scripter\\parser.cpp"
}
}
break;
case 30:
{
#ifdef YYDEBUG
YYSTYPE YYFAR* yya[4];
yyinitdebug((void YYFAR**)yya, 4);
#endif
{
#line 174 "C:\\spongebob\\Utils\\scripter\\parser.y"
(*(YYSTYPE YYFAR*)yyvalptr).treenode=new CTreeNode(DIVIDE_EXPR,yyattribute(1 - 3).treenode,yyattribute(3 - 3).treenode);
#line 466 "C:\\spongebob\\Utils\\scripter\\parser.cpp"
}
}
break;
case 31:
{
#ifdef YYDEBUG
YYSTYPE YYFAR* yya[2];
yyinitdebug((void YYFAR**)yya, 2);
#endif
{
#line 175 "C:\\spongebob\\Utils\\scripter\\parser.y"
(*(YYSTYPE YYFAR*)yyvalptr).treenode=yyattribute(1 - 1).treenode;
#line 479 "C:\\spongebob\\Utils\\scripter\\parser.cpp"
}
}
break;
case 32:
{
#ifdef YYDEBUG
YYSTYPE YYFAR* yya[3];
yyinitdebug((void YYFAR**)yya, 3);
#endif
{
#line 180 "C:\\spongebob\\Utils\\scripter\\parser.y"
if(yyattribute(1 - 2).functionNumber!=-1){m_functionNumber=yyattribute(1 - 2).functionNumber;m_functionArgs=getFunctionArgs(yyattribute(1 - 2).functionNumber);}
#line 492 "C:\\spongebob\\Utils\\scripter\\parser.cpp"
}
}
break;
case 33:
{
#ifdef YYDEBUG #ifdef YYDEBUG
YYSTYPE YYFAR* yya[5]; YYSTYPE YYFAR* yya[5];
yyinitdebug((void YYFAR**)yya, 5); yyinitdebug((void YYFAR**)yya, 5);
#endif #endif
{ {
#line 181 "C:\\spongebob\\Utils\\scripter\\parser.y" #line 165 "C:\\spongebob\\Utils\\scripter\\parser.y"
(*(YYSTYPE YYFAR*)yyvalptr).treenode=new CTreeNode(STMT_LIST,m_functionArgs,new CTreeNode(FUNCTION_EXPR,m_functionNumber)); (*(YYSTYPE YYFAR*)yyvalptr).treenode=new CTreeNode(STMT_LIST,m_functionArgs,new CTreeNode(FUNCTION_EXPR,m_functionNumber));
#line 505 "C:\\spongebob\\Utils\\scripter\\parser.cpp" #line 453 "C:\\spongebob\\Utils\\scripter\\parser.cpp"
} }
} }
break; break;
@ -510,14 +458,14 @@ if(yyattribute(1 - 2).functionNumber!=-1){m_functionNumber=yyattribute(1 - 2).fu
break; break;
} }
} }
#line 186 "C:\\spongebob\\Utils\\scripter\\parser.y" #line 170 "C:\\spongebob\\Utils\\scripter\\parser.y"
///////////////////////////////////////////////////////////////////////////// /////////////////////////////////////////////////////////////////////////////
// programs section // programs section
#line 521 "C:\\spongebob\\Utils\\scripter\\parser.cpp" #line 469 "C:\\spongebob\\Utils\\scripter\\parser.cpp"
void YYPARSENAME::yytables() void YYPARSENAME::yytables()
{ {
yyattribute_size = sizeof(YYSTYPE); yyattribute_size = sizeof(YYSTYPE);
@ -563,32 +511,28 @@ void YYPARSENAME::yytables()
"statement: END_STMT", "statement: END_STMT",
"statement: STOP END_STMT", "statement: STOP END_STMT",
"statement: PAUSE END_STMT", "statement: PAUSE END_STMT",
"statement: PRINT OPEN_PAR value CLOSE_PAR END_STMT", "statement: PRINT OPEN_PAR expression CLOSE_PAR END_STMT",
"statement: assign_expression END_STMT", "statement: assign_expression END_STMT",
"statement: IF OPEN_PAR expression CLOSE_PAR statement", "statement: IF OPEN_PAR conditional CLOSE_PAR statement",
"statement: IF OPEN_PAR expression CLOSE_PAR statement ELSE statement", "statement: IF OPEN_PAR conditional CLOSE_PAR statement ELSE statement",
"statement: WHILE OPEN_PAR expression CLOSE_PAR statement", "statement: WHILE OPEN_PAR conditional CLOSE_PAR statement",
"statement: DO statement WHILE OPEN_PAR expression CLOSE_PAR END_STMT", "statement: DO statement WHILE OPEN_PAR conditional CLOSE_PAR END_STMT",
"statement: BEGIN_CS statement_list END_CS", "statement: BEGIN_CS statement_list END_CS",
"statement: function END_STMT", "statement: function END_STMT",
"assign_expression: variable ASSIGN value", "assign_expression: variable ASSIGN expression",
"expression: equal_expression", "conditional: expression EQUAL expression",
"expression: notequal_expression", "conditional: expression NOTEQUAL expression",
"expression: lessthan_expression", "conditional: expression LESSTHAN expression",
"expression: greaterthan_expression", "conditional: expression GREATERTHAN expression",
"equal_expression: value EQUAL value",
"notequal_expression: value NOTEQUAL value",
"lessthan_expression: value LESSTHAN value",
"greaterthan_expression: value GREATERTHAN value",
"variable: VARIABLE", "variable: VARIABLE",
"value: VALUE", "expression: VALUE",
"value: OPEN_PAR value CLOSE_PAR", "expression: OPEN_PAR expression CLOSE_PAR",
"value: VARIABLE", "expression: VARIABLE",
"value: value PLUS value", "expression: expression PLUS expression",
"value: value SUBTRACT value", "expression: expression SUBTRACT expression",
"value: value MULTIPLY value", "expression: expression MULTIPLY expression",
"value: value DIVIDE value", "expression: expression DIVIDE expression",
"value: function", "expression: function",
"$$1:", "$$1:",
"function: FUNCTION OPEN_PAR $$1 CLOSE_PAR" "function: FUNCTION OPEN_PAR $$1 CLOSE_PAR"
}; };
@ -612,114 +556,110 @@ void YYPARSENAME::yytables()
{ 3, 3, 12 }, { 3, 3, 12 },
{ 3, 2, 13 }, { 3, 2, 13 },
{ 4, 3, 14 }, { 4, 3, 14 },
{ 5, 1, 15 }, { 5, 3, 15 },
{ 5, 1, 16 }, { 5, 3, 16 },
{ 5, 1, 17 }, { 5, 3, 17 },
{ 5, 1, 18 }, { 5, 3, 18 },
{ 6, 3, 19 }, { 6, 1, 19 },
{ 7, 3, 20 }, { 7, 1, 20 },
{ 8, 3, 21 }, { 7, 3, 21 },
{ 9, 3, 22 }, { 7, 1, 22 },
{ 10, 1, 23 }, { 7, 3, 23 },
{ 11, 1, 24 }, { 7, 3, 24 },
{ 11, 3, 25 }, { 7, 3, 25 },
{ 11, 1, 26 }, { 7, 3, 26 },
{ 11, 3, 27 }, { 7, 1, 27 },
{ 11, 3, 28 }, { 9, 0, 28 },
{ 11, 3, 29 }, { 8, 4, 29 }
{ 11, 3, 30 },
{ 11, 1, 31 },
{ 13, 0, 32 },
{ 12, 4, 33 }
}; };
yyreduction = reduction; yyreduction = reduction;
static const yytokenaction_t YYNEARFAR YYBASED_CODE tokenaction[] = { static const yytokenaction_t YYNEARFAR YYBASED_CODE tokenaction[] = {
{ 71, YYAT_SHIFT, 3 }, { 67, YYAT_SHIFT, 3 },
{ 71, YYAT_SHIFT, 4 }, { 67, YYAT_SHIFT, 4 },
{ 72, YYAT_SHIFT, 74 }, { 68, YYAT_SHIFT, 70 },
{ 71, YYAT_SHIFT, 5 }, { 67, YYAT_SHIFT, 5 },
{ 71, YYAT_SHIFT, 6 }, { 67, YYAT_SHIFT, 6 },
{ 71, YYAT_SHIFT, 7 }, { 67, YYAT_SHIFT, 7 },
{ 71, YYAT_SHIFT, 8 }, { 67, YYAT_SHIFT, 8 },
{ 2, YYAT_SHIFT, 3 }, { 2, YYAT_SHIFT, 3 },
{ 2, YYAT_SHIFT, 4 }, { 2, YYAT_SHIFT, 4 },
{ 69, YYAT_SHIFT, 72 }, { 65, YYAT_SHIFT, 68 },
{ 2, YYAT_SHIFT, 5 }, { 2, YYAT_SHIFT, 5 },
{ 2, YYAT_SHIFT, 6 }, { 2, YYAT_SHIFT, 6 },
{ 2, YYAT_SHIFT, 7 }, { 2, YYAT_SHIFT, 7 },
{ 2, YYAT_SHIFT, 8 }, { 2, YYAT_SHIFT, 8 },
{ 59, YYAT_SHIFT, 71 }, { 55, YYAT_SHIFT, 67 },
{ 56, YYAT_SHIFT, 70 }, { 52, YYAT_SHIFT, 66 },
{ 71, YYAT_SHIFT, 9 }, { 67, YYAT_SHIFT, 9 },
{ 42, YYAT_SHIFT, 57 }, { 38, YYAT_SHIFT, 53 },
{ 40, YYAT_SHIFT, 56 }, { 36, YYAT_SHIFT, 52 },
{ 71, YYAT_SHIFT, 10 }, { 67, YYAT_SHIFT, 10 },
{ 39, YYAT_SHIFT, 55 }, { 35, YYAT_SHIFT, 51 },
{ 38, YYAT_SHIFT, 54 }, { 34, YYAT_SHIFT, 50 },
{ 71, YYAT_SHIFT, 11 }, { 67, YYAT_SHIFT, 11 },
{ 2, YYAT_SHIFT, 9 }, { 2, YYAT_SHIFT, 9 },
{ 71, YYAT_SHIFT, 12 }, { 67, YYAT_SHIFT, 12 },
{ 31, YYAT_SHIFT, 45 }, { 31, YYAT_SHIFT, 41 },
{ 2, YYAT_SHIFT, 10 }, { 2, YYAT_SHIFT, 10 },
{ 23, YYAT_SHIFT, 41 }, { 23, YYAT_SHIFT, 37 },
{ 20, YYAT_SHIFT, 39 }, { 20, YYAT_SHIFT, 35 },
{ 2, YYAT_SHIFT, 11 }, { 2, YYAT_SHIFT, 11 },
{ 16, YYAT_SHIFT, 27 }, { 16, YYAT_SHIFT, 27 },
{ 2, YYAT_SHIFT, 12 }, { 2, YYAT_SHIFT, 12 },
{ 36, YYAT_SHIFT, 46 }, { 32, YYAT_SHIFT, 42 },
{ 36, YYAT_SHIFT, 47 }, { 32, YYAT_SHIFT, 43 },
{ 36, YYAT_SHIFT, 48 }, { 32, YYAT_SHIFT, 44 },
{ 36, YYAT_SHIFT, 49 }, { 32, YYAT_SHIFT, 45 },
{ 15, YYAT_SHIFT, 26 }, { 15, YYAT_SHIFT, 26 },
{ 44, YYAT_SHIFT, 50 }, { 40, YYAT_SHIFT, 46 },
{ 44, YYAT_SHIFT, 51 }, { 40, YYAT_SHIFT, 47 },
{ 44, YYAT_SHIFT, 52 }, { 40, YYAT_SHIFT, 48 },
{ 44, YYAT_SHIFT, 53 }, { 40, YYAT_SHIFT, 49 },
{ 55, YYAT_SHIFT, 28 }, { 51, YYAT_SHIFT, 28 },
{ 36, YYAT_ERROR, 0 }, { 32, YYAT_ERROR, 0 },
{ 44, YYAT_SHIFT, 58 }, { 40, YYAT_SHIFT, 54 },
{ 14, YYAT_SHIFT, 25 }, { 14, YYAT_SHIFT, 25 },
{ 12, YYAT_SHIFT, 24 }, { 12, YYAT_SHIFT, 24 },
{ 55, YYAT_SHIFT, 29 }, { 51, YYAT_SHIFT, 29 },
{ 55, YYAT_SHIFT, 30 }, { 51, YYAT_SHIFT, 30 },
{ 55, YYAT_SHIFT, 12 }, { 51, YYAT_SHIFT, 12 },
{ 67, YYAT_SHIFT, 50 }, { 63, YYAT_SHIFT, 46 },
{ 67, YYAT_SHIFT, 51 }, { 63, YYAT_SHIFT, 47 },
{ 67, YYAT_SHIFT, 52 }, { 63, YYAT_SHIFT, 48 },
{ 67, YYAT_SHIFT, 53 }, { 63, YYAT_SHIFT, 49 },
{ 66, YYAT_SHIFT, 50 }, { 62, YYAT_SHIFT, 46 },
{ 66, YYAT_SHIFT, 51 }, { 62, YYAT_SHIFT, 47 },
{ 66, YYAT_SHIFT, 52 }, { 62, YYAT_SHIFT, 48 },
{ 66, YYAT_SHIFT, 53 }, { 62, YYAT_SHIFT, 49 },
{ 65, YYAT_SHIFT, 50 }, { 61, YYAT_SHIFT, 46 },
{ 65, YYAT_SHIFT, 51 }, { 61, YYAT_SHIFT, 47 },
{ 65, YYAT_SHIFT, 52 }, { 61, YYAT_SHIFT, 48 },
{ 65, YYAT_SHIFT, 53 }, { 61, YYAT_SHIFT, 49 },
{ 64, YYAT_SHIFT, 50 }, { 60, YYAT_SHIFT, 46 },
{ 64, YYAT_SHIFT, 51 }, { 60, YYAT_SHIFT, 47 },
{ 64, YYAT_SHIFT, 52 }, { 60, YYAT_SHIFT, 48 },
{ 64, YYAT_SHIFT, 53 }, { 60, YYAT_SHIFT, 49 },
{ 63, YYAT_SHIFT, 50 }, { 59, YYAT_SHIFT, 46 },
{ 63, YYAT_SHIFT, 51 }, { 59, YYAT_SHIFT, 47 },
{ 63, YYAT_SHIFT, 52 }, { 59, YYAT_SHIFT, 48 },
{ 63, YYAT_SHIFT, 53 }, { 59, YYAT_SHIFT, 49 },
{ 62, YYAT_SHIFT, 50 }, { 58, YYAT_SHIFT, 46 },
{ 62, YYAT_SHIFT, 51 }, { 58, YYAT_SHIFT, 47 },
{ 62, YYAT_SHIFT, 52 }, { 58, YYAT_SHIFT, 48 },
{ 62, YYAT_SHIFT, 53 }, { 58, YYAT_SHIFT, 49 },
{ 61, YYAT_SHIFT, 50 }, { 57, YYAT_SHIFT, 46 },
{ 61, YYAT_SHIFT, 51 }, { 57, YYAT_SHIFT, 47 },
{ 61, YYAT_SHIFT, 52 }, { 57, YYAT_SHIFT, 48 },
{ 61, YYAT_SHIFT, 53 }, { 57, YYAT_SHIFT, 49 },
{ 60, YYAT_SHIFT, 50 }, { 56, YYAT_SHIFT, 46 },
{ 60, YYAT_SHIFT, 51 }, { 56, YYAT_SHIFT, 47 },
{ 60, YYAT_SHIFT, 52 }, { 56, YYAT_SHIFT, 48 },
{ 60, YYAT_SHIFT, 53 }, { 56, YYAT_SHIFT, 49 },
{ 43, YYAT_SHIFT, 50 }, { 39, YYAT_SHIFT, 46 },
{ 43, YYAT_SHIFT, 51 }, { 39, YYAT_SHIFT, 47 },
{ 43, YYAT_SHIFT, 52 }, { 39, YYAT_SHIFT, 48 },
{ 43, YYAT_SHIFT, 53 }, { 39, YYAT_SHIFT, 49 },
{ 8, YYAT_SHIFT, 22 }, { 8, YYAT_SHIFT, 22 },
{ 7, YYAT_SHIFT, 21 }, { 7, YYAT_SHIFT, 21 },
{ 5, YYAT_SHIFT, 19 }, { 5, YYAT_SHIFT, 19 },
@ -734,75 +674,71 @@ void YYPARSENAME::yytables()
{ 0, 0, YYAT_REDUCE, 3 }, { 0, 0, YYAT_REDUCE, 3 },
{ 90, 1, YYAT_ERROR, 0 }, { 90, 1, YYAT_ERROR, 0 },
{ -250, 1, YYAT_REDUCE, 1 }, { -250, 1, YYAT_REDUCE, 1 },
{ -184, 1, YYAT_DEFAULT, 72 }, { -184, 1, YYAT_DEFAULT, 68 },
{ -186, 1, YYAT_DEFAULT, 39 }, { -186, 1, YYAT_DEFAULT, 35 },
{ -187, 1, YYAT_DEFAULT, 39 }, { -187, 1, YYAT_DEFAULT, 35 },
{ 0, 0, YYAT_DEFAULT, 71 }, { 0, 0, YYAT_DEFAULT, 67 },
{ -187, 1, YYAT_DEFAULT, 72 }, { -187, 1, YYAT_DEFAULT, 68 },
{ -189, 1, YYAT_DEFAULT, 39 }, { -189, 1, YYAT_DEFAULT, 35 },
{ 0, 0, YYAT_REDUCE, 4 }, { 0, 0, YYAT_REDUCE, 4 },
{ 0, 0, YYAT_REDUCE, 3 }, { 0, 0, YYAT_REDUCE, 3 },
{ 0, 0, YYAT_REDUCE, 24 }, { 0, 0, YYAT_REDUCE, 20 },
{ -229, 1, YYAT_DEFAULT, 39 }, { -229, 1, YYAT_DEFAULT, 35 },
{ 0, 0, YYAT_REDUCE, 2 }, { 0, 0, YYAT_REDUCE, 2 },
{ -229, 1, YYAT_DEFAULT, 72 }, { -229, 1, YYAT_DEFAULT, 68 },
{ -228, 1, YYAT_ERROR, 0 }, { -228, 1, YYAT_ERROR, 0 },
{ -243, 1, YYAT_DEFAULT, 72 }, { -243, 1, YYAT_DEFAULT, 68 },
{ 0, 0, YYAT_REDUCE, 5 }, { 0, 0, YYAT_REDUCE, 5 },
{ 0, 0, YYAT_DEFAULT, 55 }, { 0, 0, YYAT_DEFAULT, 51 },
{ 0, 0, YYAT_DEFAULT, 55 }, { 0, 0, YYAT_DEFAULT, 51 },
{ -232, 1, YYAT_ERROR, 0 }, { -232, 1, YYAT_ERROR, 0 },
{ 0, 0, YYAT_REDUCE, 6 }, { 0, 0, YYAT_REDUCE, 6 },
{ 0, 0, YYAT_DEFAULT, 55 }, { 0, 0, YYAT_DEFAULT, 51 },
{ -250, 1, YYAT_DEFAULT, 71 }, { -250, 1, YYAT_DEFAULT, 67 },
{ 0, 0, YYAT_REDUCE, 33 }, { 0, 0, YYAT_REDUCE, 29 },
{ 0, 0, YYAT_REDUCE, 8 }, { 0, 0, YYAT_REDUCE, 8 },
{ 0, 0, YYAT_DEFAULT, 55 }, { 0, 0, YYAT_DEFAULT, 51 },
{ 0, 0, YYAT_REDUCE, 14 }, { 0, 0, YYAT_REDUCE, 14 },
{ 0, 0, YYAT_DEFAULT, 55 }, { 0, 0, YYAT_DEFAULT, 51 },
{ 0, 0, YYAT_REDUCE, 27 }, { 0, 0, YYAT_REDUCE, 23 },
{ 0, 0, YYAT_REDUCE, 25 }, { 0, 0, YYAT_REDUCE, 21 },
{ -250, 1, YYAT_DEFAULT, 69 }, { -250, 1, YYAT_DEFAULT, 65 },
{ 0, 0, YYAT_REDUCE, 16 }, { -233, 1, YYAT_DEFAULT, 40 },
{ 0, 0, YYAT_REDUCE, 17 }, { 0, 0, YYAT_REDUCE, 28 },
{ 0, 0, YYAT_REDUCE, 18 }, { -254, 1, YYAT_DEFAULT, 65 },
{ 0, 0, YYAT_REDUCE, 19 },
{ -233, 1, YYAT_DEFAULT, 44 },
{ 0, 0, YYAT_REDUCE, 32 },
{ -254, 1, YYAT_DEFAULT, 69 },
{ -254, 1, YYAT_ERROR, 0 }, { -254, 1, YYAT_ERROR, 0 },
{ -257, 1, YYAT_DEFAULT, 44 }, { -257, 1, YYAT_DEFAULT, 40 },
{ 0, 0, YYAT_REDUCE, 13 }, { 0, 0, YYAT_REDUCE, 13 },
{ -258, 1, YYAT_DEFAULT, 69 }, { -258, 1, YYAT_DEFAULT, 65 },
{ -188, 1, YYAT_REDUCE, 15 }, { -188, 1, YYAT_REDUCE, 15 },
{ -232, 1, YYAT_DEFAULT, 69 }, { -232, 1, YYAT_DEFAULT, 65 },
{ 0, 0, YYAT_DEFAULT, 71 }, { 0, 0, YYAT_DEFAULT, 67 },
{ 0, 0, YYAT_DEFAULT, 55 }, { 0, 0, YYAT_DEFAULT, 51 },
{ 0, 0, YYAT_DEFAULT, 55 }, { 0, 0, YYAT_DEFAULT, 51 },
{ 0, 0, YYAT_DEFAULT, 55 }, { 0, 0, YYAT_DEFAULT, 51 },
{ 0, 0, YYAT_DEFAULT, 55 }, { 0, 0, YYAT_DEFAULT, 51 },
{ 0, 0, YYAT_DEFAULT, 55 }, { 0, 0, YYAT_DEFAULT, 51 },
{ 0, 0, YYAT_DEFAULT, 55 }, { 0, 0, YYAT_DEFAULT, 51 },
{ 0, 0, YYAT_DEFAULT, 55 }, { 0, 0, YYAT_DEFAULT, 51 },
{ 0, 0, YYAT_DEFAULT, 55 }, { 0, 0, YYAT_DEFAULT, 51 },
{ 0, 0, YYAT_DEFAULT, 71 }, { 0, 0, YYAT_DEFAULT, 67 },
{ -233, 1, YYAT_DEFAULT, 39 }, { -233, 1, YYAT_DEFAULT, 35 },
{ -258, 1, YYAT_DEFAULT, 72 }, { -258, 1, YYAT_DEFAULT, 68 },
{ 0, 0, YYAT_REDUCE, 34 }, { 0, 0, YYAT_REDUCE, 30 },
{ 0, 0, YYAT_REDUCE, 26 }, { 0, 0, YYAT_REDUCE, 22 },
{ -245, 1, YYAT_REDUCE, 9 }, { -245, 1, YYAT_REDUCE, 9 },
{ -192, 1, YYAT_REDUCE, 20 }, { -192, 1, YYAT_REDUCE, 16 },
{ -196, 1, YYAT_REDUCE, 21 }, { -196, 1, YYAT_REDUCE, 17 },
{ -200, 1, YYAT_REDUCE, 22 }, { -200, 1, YYAT_REDUCE, 18 },
{ -204, 1, YYAT_REDUCE, 23 }, { -204, 1, YYAT_REDUCE, 19 },
{ -208, 1, YYAT_REDUCE, 28 }, { -208, 1, YYAT_REDUCE, 24 },
{ -212, 1, YYAT_REDUCE, 29 }, { -212, 1, YYAT_REDUCE, 25 },
{ -216, 1, YYAT_REDUCE, 30 }, { -216, 1, YYAT_REDUCE, 26 },
{ -220, 1, YYAT_REDUCE, 31 }, { -220, 1, YYAT_REDUCE, 27 },
{ 0, 0, YYAT_REDUCE, 11 }, { 0, 0, YYAT_REDUCE, 11 },
{ -266, 1, YYAT_ERROR, 0 }, { -266, 1, YYAT_ERROR, 0 },
{ 0, 0, YYAT_REDUCE, 7 }, { 0, 0, YYAT_REDUCE, 7 },
{ -257, 1, YYAT_DEFAULT, 72 }, { -257, 1, YYAT_DEFAULT, 68 },
{ -271, 1, YYAT_ERROR, 0 }, { -271, 1, YYAT_ERROR, 0 },
{ 0, 0, YYAT_REDUCE, 10 }, { 0, 0, YYAT_REDUCE, 10 },
{ 0, 0, YYAT_REDUCE, 12 } { 0, 0, YYAT_REDUCE, 12 }
@ -810,54 +746,50 @@ void YYPARSENAME::yytables()
yystateaction = stateaction; yystateaction = stateaction;
static const yynontermgoto_t YYNEARFAR YYBASED_CODE nontermgoto[] = { static const yynontermgoto_t YYNEARFAR YYBASED_CODE nontermgoto[] = {
{ 55, 69 }, { 67, 69 },
{ 55, 32 }, { 67, 14 },
{ 55, 33 }, { 51, 65 },
{ 55, 34 }, { 67, 15 },
{ 55, 35 }, { 51, 32 },
{ 54, 68 }, { 67, 16 },
{ 55, 36 }, { 49, 63 },
{ 71, 73 }, { 49, 33 },
{ 71, 14 },
{ 53, 67 },
{ 53, 37 },
{ 0, 1 }, { 0, 1 },
{ 0, 2 }, { 0, 2 },
{ 52, 66 },
{ 71, 15 },
{ 51, 65 },
{ 71, 16 },
{ 50, 64 }, { 50, 64 },
{ 49, 63 },
{ 48, 62 }, { 48, 62 },
{ 47, 61 }, { 47, 61 },
{ 46, 60 }, { 46, 60 },
{ 45, 59 }, { 45, 59 },
{ 28, 44 }, { 44, 58 },
{ 26, 43 }, { 43, 57 },
{ 24, 42 }, { 42, 56 },
{ 41, 55 },
{ 28, 40 },
{ 26, 39 },
{ 24, 38 },
{ 23, 13 }, { 23, 13 },
{ 22, 40 }, { 22, 36 },
{ 19, 38 }, { 19, 34 },
{ 18, 31 }, { 18, 31 },
{ 10, 23 }, { 10, 23 },
{ 6, 20 } { 6, 20 }
}; };
yynontermgoto = nontermgoto; yynontermgoto = nontermgoto;
yynontermgoto_size = 32; yynontermgoto_size = 28;
static const yystategoto_t YYNEARFAR YYBASED_CODE stategoto[] = { static const yystategoto_t YYNEARFAR YYBASED_CODE stategoto[] = {
{ 10, -1 }, { 7, -1 },
{ 0, -1 }, { 0, -1 },
{ 0, 23 }, { 0, 23 },
{ 0, -1 }, { 0, -1 },
{ 0, -1 }, { 0, -1 },
{ 0, -1 }, { 0, -1 },
{ 28, 71 }, { 24, 67 },
{ 0, -1 }, { 0, -1 },
{ 0, -1 }, { 0, -1 },
{ 0, -1 }, { 0, -1 },
{ 28, -1 }, { 24, -1 },
{ 0, -1 }, { 0, -1 },
{ 0, -1 }, { 0, -1 },
{ 0, -1 }, { 0, -1 },
@ -865,17 +797,40 @@ void YYPARSENAME::yytables()
{ 0, -1 }, { 0, -1 },
{ 0, -1 }, { 0, -1 },
{ 0, -1 }, { 0, -1 },
{ 24, 55 }, { 20, 51 },
{ 23, 55 }, { 19, 51 },
{ 0, -1 }, { 0, -1 },
{ 0, -1 }, { 0, -1 },
{ 16, 53 }, { 16, 49 },
{ 23, 71 }, { 19, 67 },
{ 12, -1 }, { 12, -1 },
{ 0, -1 }, { 0, -1 },
{ 13, 53 }, { 13, 49 },
{ 0, -1 }, { 0, -1 },
{ 12, 53 }, { 12, 49 },
{ 0, -1 },
{ 0, -1 },
{ 0, -1 },
{ 0, -1 },
{ 0, -1 },
{ 0, -1 },
{ 0, -1 },
{ 0, -1 },
{ 0, -1 },
{ 0, -1 },
{ 0, -1 },
{ 0, -1 },
{ 15, 67 },
{ 10, 49 },
{ 9, 49 },
{ 8, 49 },
{ 7, 49 },
{ 6, 49 },
{ 5, 49 },
{ 4, 49 },
{ -1, -1 },
{ 7, 67 },
{ -3, 49 },
{ 0, -1 }, { 0, -1 },
{ 0, -1 }, { 0, -1 },
{ 0, -1 }, { 0, -1 },
@ -891,34 +846,7 @@ void YYPARSENAME::yytables()
{ 0, -1 }, { 0, -1 },
{ 0, -1 }, { 0, -1 },
{ 0, -1 }, { 0, -1 },
{ 0, -1 }, { -3, -1 },
{ 19, 71 },
{ 10, 53 },
{ 9, 53 },
{ 8, 53 },
{ 7, 53 },
{ 6, 53 },
{ 4, 53 },
{ 2, 53 },
{ -2, -1 },
{ 2, 71 },
{ -5, 53 },
{ 0, -1 },
{ 0, -1 },
{ 0, -1 },
{ 0, -1 },
{ 0, -1 },
{ 0, -1 },
{ 0, -1 },
{ 0, -1 },
{ 0, -1 },
{ 0, -1 },
{ 0, -1 },
{ 0, -1 },
{ 0, -1 },
{ 0, -1 },
{ 0, -1 },
{ 4, -1 },
{ 0, -1 }, { 0, -1 },
{ 0, -1 }, { 0, -1 },
{ 0, -1 } { 0, -1 }

776
Utils/Scripter/parser.v
View file

File diff suppressed because it is too large Load diff

58
Utils/Scripter/parser.y
View file

@ -92,9 +92,9 @@ private:
%type <treenode> program statement_list statement %type <treenode> program statement_list statement
%type <treenode> assign_expression %type <treenode> assign_expression
%type <treenode> expression equal_expression notequal_expression lessthan_expression greaterthan_expression %type <treenode> conditional
%type <treenode> variable %type <treenode> variable
%type <treenode> value %type <treenode> expression
%type <treenode> function %type <treenode> function
%% %%
@ -118,43 +118,27 @@ statement
:END_STMT {$$=new CTreeNode(EMPTY_STMT);} :END_STMT {$$=new CTreeNode(EMPTY_STMT);}
|STOP END_STMT {$$=new CTreeNode(STOP_STMT);} |STOP END_STMT {$$=new CTreeNode(STOP_STMT);}
|PAUSE END_STMT {$$=new CTreeNode(PAUSE_STMT);} |PAUSE END_STMT {$$=new CTreeNode(PAUSE_STMT);}
|PRINT OPEN_PAR value CLOSE_PAR END_STMT {$$=new CTreeNode(PRINT_STMT,$3);} |PRINT OPEN_PAR expression CLOSE_PAR END_STMT {$$=new CTreeNode(PRINT_STMT,$3);}
|assign_expression END_STMT {$$=$1;} |assign_expression END_STMT {$$=$1;}
|IF OPEN_PAR expression CLOSE_PAR statement {$$=new CTreeNode(IF_STMT,$3,$5);} |IF OPEN_PAR conditional CLOSE_PAR statement {$$=new CTreeNode(IF_STMT,$3,$5);}
|IF OPEN_PAR expression CLOSE_PAR statement ELSE statement {$$=new CTreeNode(IFELSE_STMT,$3,$5,$7);} |IF OPEN_PAR conditional CLOSE_PAR statement ELSE statement {$$=new CTreeNode(IFELSE_STMT,$3,$5,$7);}
|WHILE OPEN_PAR expression CLOSE_PAR statement {$$=new CTreeNode(WHILE_STMT,$3,$5);} |WHILE OPEN_PAR conditional CLOSE_PAR statement {$$=new CTreeNode(WHILE_STMT,$3,$5);}
|DO statement WHILE OPEN_PAR expression CLOSE_PAR END_STMT {$$=new CTreeNode(DOWHILE_STMT,$2,$5);} |DO statement WHILE OPEN_PAR conditional CLOSE_PAR END_STMT {$$=new CTreeNode(DOWHILE_STMT,$2,$5);}
|BEGIN_CS statement_list END_CS {$$=new CTreeNode(STMT_LIST,$2);} |BEGIN_CS statement_list END_CS {$$=new CTreeNode(STMT_LIST,$2);}
|function END_STMT {$$=new CTreeNode(STMT_LIST,$1,new CTreeNode(POP_STMT));} |function END_STMT {$$=new CTreeNode(STMT_LIST,$1,new CTreeNode(POP_STMT));}
; ;
assign_expression assign_expression
:variable ASSIGN value {$$=new CTreeNode(ASSIGN_EXPR,$1,$3);} :variable ASSIGN expression {$$=new CTreeNode(ASSIGN_EXPR,$1,$3);}
; ;
expression conditional
:equal_expression {$$=$1;} :expression EQUAL expression {$$=new CTreeNode(EQUAL_EXPR,$1,$3);}
|notequal_expression {$$=$1;} |expression NOTEQUAL expression {$$=new CTreeNode(NOTEQUAL_EXPR,$1,$3);}
|lessthan_expression {$$=$1;} |expression LESSTHAN expression {$$=new CTreeNode(LESSTHAN_EXPR,$1,$3);}
|greaterthan_expression {$$=$1;} |expression GREATERTHAN expression {$$=new CTreeNode(GREATERTHAN_EXPR,$1,$3);}
;
equal_expression
:value EQUAL value {$$=new CTreeNode(EQUAL_EXPR,$1,$3);}
;
notequal_expression
:value NOTEQUAL value {$$=new CTreeNode(NOTEQUAL_EXPR,$1,$3);}
;
lessthan_expression
:value LESSTHAN value {$$=new CTreeNode(LESSTHAN_EXPR,$1,$3);}
;
greaterthan_expression
:value GREATERTHAN value {$$=new CTreeNode(GREATERTHAN_EXPR,$1,$3);}
; ;
@ -162,16 +146,16 @@ variable
:VARIABLE {$$=new CTreeNode(VARIABLE_EXPR,$1);} // variable id :VARIABLE {$$=new CTreeNode(VARIABLE_EXPR,$1);} // variable id
; ;
value expression
:VALUE {$$=new CTreeNode(VALUE_EXPR,$1);} :VALUE {$$=new CTreeNode(VALUE_EXPR,$1);}
|OPEN_PAR value CLOSE_PAR {$$=$2;} |OPEN_PAR expression CLOSE_PAR {$$=$2;}
|VARIABLE {$$=new CTreeNode(VARIABLE_EXPR,$1);} // variable value |VARIABLE {$$=new CTreeNode(VARIABLE_EXPR,$1);} // variable value
// |PLUS value {$$=$2;} // |PLUS expression {$$=$2;}
// |SUBTRACT value {$$=new CTreeNode(STMT_LIST,CTreeNodeCTreeNode(VALUE_EXPR,$2);} // |SUBTRACT expression {$$=new CTreeNode(STMT_LIST,CTreeNodeCTreeNode(VALUE_EXPR,$2);}
|value PLUS value {$$=new CTreeNode(PLUS_EXPR,$1,$3);} |expression PLUS expression {$$=new CTreeNode(PLUS_EXPR,$1,$3);}
|value SUBTRACT value {$$=new CTreeNode(SUBTRACT_EXPR,$1,$3);} |expression SUBTRACT expression {$$=new CTreeNode(SUBTRACT_EXPR,$1,$3);}
|value MULTIPLY value {$$=new CTreeNode(MULTIPLY_EXPR,$1,$3);} |expression MULTIPLY expression {$$=new CTreeNode(MULTIPLY_EXPR,$1,$3);}
|value DIVIDE value {$$=new CTreeNode(DIVIDE_EXPR,$1,$3);} |expression DIVIDE expression {$$=new CTreeNode(DIVIDE_EXPR,$1,$3);}
|function {$$=$1;} |function {$$=$1;}
; ;

34
Utils/Scripter/prepro.cpp
View file

@ -64,6 +64,7 @@ static int ppf_define(char *_cmd);
static int ppf_include(char *_cmd); static int ppf_include(char *_cmd);
static int ppf_print(char *_cmd); static int ppf_print(char *_cmd);
static int ppf_undefine(char *_cmd); static int ppf_undefine(char *_cmd);
static int ppf_ignore(char *_cmd);
static int addMacro(char *_name,char *_replacement); static int addMacro(char *_name,char *_replacement);
static int removeMacro(char *_name); static int removeMacro(char *_name);
@ -78,6 +79,12 @@ static PreproCmd s_preproCmds[]=
{ "include", ppf_include }, { "include", ppf_include },
{ "print", ppf_print }, { "print", ppf_print },
{ "undef", ppf_undefine }, { "undef", ppf_undefine },
// This is bad but it means we can use the include files generated by parkgrab
// ( might have to fix this one day.. )
{ "ifdef", ppf_ignore },
{ "ifndef", ppf_ignore },
{ "endif", ppf_ignore },
}; };
static int s_numPreproCmds=sizeof(s_preproCmds)/sizeof(PreproCmd); static int s_numPreproCmds=sizeof(s_preproCmds)/sizeof(PreproCmd);
@ -110,7 +117,7 @@ extern int preprocessorCmd(char *_cmd)
} }
printf("UNKNOWN PREPROCESSOR CMD '%s'\n",_cmd); printf("UNKNOWN PREPROCESSOR CMD '%s'\n",_cmd);
return true; return false;
} }
@ -186,6 +193,19 @@ static int ppf_undefine(char *_cmd)
} }
/*----------------------------------------------------------------------
Function:
Purpose:
Params:
Returns:
---------------------------------------------------------------------- */
static int ppf_ignore(char *_cmd)
{
printf("PRE-PROCESSOR COMMAND IGNORED..\n");
return true;
}
/*---------------------------------------------------------------------- /*----------------------------------------------------------------------
Function: Function:
Purpose: Purpose:
@ -211,9 +231,16 @@ static int addMacro(char *_name,char *_replacement)
// Create new macro // Create new macro
newMac=(Macro*)malloc(sizeof(Macro)); newMac=(Macro*)malloc(sizeof(Macro));
newMac->m_name=(char*)malloc(strlen(_name)+1); newMac->m_name=(char*)malloc(strlen(_name)+1);
newMac->m_replacement=(char*)malloc(strlen(_replacement)+1);
strcpy(newMac->m_name,_name); strcpy(newMac->m_name,_name);
if(_replacement)
{
newMac->m_replacement=(char*)malloc(strlen(_replacement)+1);
strcpy(newMac->m_replacement,_replacement); strcpy(newMac->m_replacement,_replacement);
}
else
{
newMac->m_replacement=NULL;
}
// Insert it into the list // Insert it into the list
mac=s_macros; mac=s_macros;
@ -265,7 +292,10 @@ static int removeMacro(char *_name)
s_macros=mac->m_next; s_macros=mac->m_next;
} }
free(mac->m_name); free(mac->m_name);
if(mac->m_replacement)
{
free(mac->m_replacement); free(mac->m_replacement);
}
free(mac); free(mac);
return true; return true;
} }

14
data/Scripts/test.scr
View file

@ -1,6 +1,8 @@
#include data/scripts/defs/defs.scr #include data/scripts/defs/defs.scr
#include data/scripts/defs/charanim.scr #include data/scripts/defs/charanim.scr
#include out/usa/include/uigfx.h
/* /*
_setCharacterAnimation(CHAR_SPONGEBOB,ANIM_QUIET); _setCharacterAnimation(CHAR_SPONGEBOB,ANIM_QUIET);
@ -21,17 +23,18 @@ vx=velocity;
vy=velocity; vy=velocity;
while(1==1) while(1==1)
{ {
// Readout for fps :)
// readout for fps :)
$tmp0=_getFrameTime(); $tmp0=_getFrameTime();
$tmp5=50; $tmp5=50;
do{ do{
_drawSprite(4,$tmp5,50,10); _drawSprite(FRM__BUTU,$tmp5,50,0);
$tmp5=$tmp5+20; $tmp5=$tmp5+20;
$tmp0=$tmp0-1; $tmp0=$tmp0-1;
}while($tmp0>0); }while($tmp0>0);
_drawSprite(0,x,y,100);
// Bouncy thing
_drawSprite(FRM__BUTC,x,y,100);
$tmp0=_getFrameTime(); $tmp0=_getFrameTime();
do do
{ {
@ -61,6 +64,9 @@ while(1==1)
$tmp0=$tmp0-1; $tmp0=$tmp0-1;
} }
while($tmp0>0); while($tmp0>0);
// End of frame..
pause; pause;
} }
stop; stop;

BIN
tools/scripter.exe
View file

Binary file not shown.