DHBW
/
gemstone
mirror of https://github.com/Servostar/gemstone.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

changed If else branches, so that the whole branch is under one stmt node

This commit is contained in:
Felix Müller 2024-05-15 10:29:47 +02:00
parent c24a430fd2
commit f11ade2ef2
1 changed files with 11 additions and 22 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

33
src/yacc/parser.y
View File

@ -25,10 +25,10 @@
%type <node_ptr> decl %type <node_ptr> decl
%type <node_ptr> definition %type <node_ptr> definition
%type <node_ptr> while %type <node_ptr> while
%type <node_ptr> branch
%type <node_ptr> funcall %type <node_ptr> funcall
%type <node_ptr> boxcall %type <node_ptr> boxcall
%type <node_ptr> branchelseifs %type <node_ptr> branchhalf
%type <node_ptr> branchfull
%type <node_ptr> branchelse %type <node_ptr> branchelse
%type <node_ptr> branchelseif %type <node_ptr> branchelseif
%type <node_ptr> branchif %type <node_ptr> branchif
@ -286,7 +286,7 @@ statement: assign {$$ = $1;}
| decl {$$ = $1;} | decl {$$ = $1;}
| definition {$$ = $1;} | definition {$$ = $1;}
| while {$$ = $1;} | while {$$ = $1;}
| branch {$$ = $1;} | branchfull {$$ = $1;}
| funcall {$$ = $1;} | funcall {$$ = $1;}
| boxcall{$$ = $1;}; | boxcall{$$ = $1;};
@ -304,26 +304,15 @@ branchelseif: KeyElse KeyIf expr '{' statementlist '}' { AST_NODE_PTR branch = A
AST_push_node(branch, $5); AST_push_node(branch, $5);
$$ = branch; }; $$ = branch; };
branchelseifs: branchelseifs branchelseif { AST_NODE_PTR branch = AST_new_node(AST_Stmt, NULL); branchfull: branchhalf { $$ = $1;};
AST_push_node(branch, $1); |branchhalf branchelse { AST_push_node($1 , $2);
AST_push_node(branch, $2); $$ = $1; }
$$ = branch; } branchhalf: branchif { AST_NODE_PTR branch = AST_new_node(AST_Stmt, NULL);
| branchelseif { $$ = $1; }; AST_push_node(branch, $1);
$$ = branch; }
| branchhalf branchelseif { AST_push_node($1 , $2);
$$ = $1; }
branch: branchif { $$ = $1; }
| branchif branchelseifs { AST_NODE_PTR branch = AST_new_node(AST_Stmt, NULL);
AST_push_node(branch, $1);
AST_push_node(branch, $2);
$$ = branch; }
| branchif branchelseifs branchelse { AST_NODE_PTR branch = AST_new_node(AST_Stmt, NULL);
AST_push_node(branch, $1);
AST_push_node(branch, $2);
AST_push_node(branch, $3);
$$ = branch; }
| branchif branchelse { AST_NODE_PTR branch = AST_new_node(AST_Stmt, NULL);
AST_push_node(branch, $1);
AST_push_node(branch, $2);
$$ = branch; };
while: KeyWhile expr '{' statementlist '}' { DEBUG("while"); }; while: KeyWhile expr '{' statementlist '}' { DEBUG("while"); };