Eatswap
/
DragonLisp
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix: more

This commit is contained in:
Eatswap 2022-12-10 01:08:45 +08:00
parent 900df4f9b5
commit a9f8ef6eef
Signed by: Eatswap
GPG Key ID: BE661106A1F3FA0B
1 changed files with 23 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
DragonLisp.y
View File

@ -58,7 +58,9 @@ namespace DragonLisp {
%token END 0 "EOF" %token END 0 "EOF"
%token <int64_t> NUMBER "number" %token <int64_t> NUMBER "number"
%type <DragonLisp::Token> operator %type <DragonLisp::Token> basic_operator
%type <DragonLisp::Token> arithmetic_operator
%type <DragonLisp::Token> comparsion_operator
%define parse.error verbose %define parse.error verbose
@ -72,19 +74,37 @@ R
| R S-Expr | R S-Expr
S-Expr S-Expr
: LPAREN operator NUMBER NUMBER RPAREN { : LPAREN basic_operator NUMBER NUMBER RPAREN {
std::printf("Operator -> %d, LHS -> %lld, RHS -> %lld\n", int($2), $3, $4); std::printf("Operator -> %d, LHS -> %lld, RHS -> %lld\n", int($2), $3, $4);
std::printf("This is S-Expr!\n"); std::printf("This is S-Expr!\n");
} }
; ;
operator basic_operator
: arithmetic_operator { $$ = $1; }
| boolean_operator { $$ = $1; }
| comparsion_operator { $$ = $1; }
;
arithmetic_operator
: PLUS { $$ = Token::PLUS; std::printf("I am plus +\n"); } : PLUS { $$ = Token::PLUS; std::printf("I am plus +\n"); }
| MINUS { $$ = Token::MINUS; std::printf("I am minus -\n"); } | MINUS { $$ = Token::MINUS; std::printf("I am minus -\n"); }
| STAR { $$ = Token::MULTIPLY; std::printf("I am star *\n"); } | STAR { $$ = Token::MULTIPLY; std::printf("I am star *\n"); }
| SLASH { $$ = Token::DIVIDE; std::printf("I am slash /\n"); } | SLASH { $$ = Token::DIVIDE; std::printf("I am slash /\n"); }
; ;
boolean_operator
:
;
comparsion_operator
: LE { $$ = Token::LE; }
| LT { $$ = Token::LT; }
| GE { $$ = Token::GE; }
| GT { $$ = Token::GT; }
| EQUAL { $$ = Token::EQUAL; }
| NE { $$ = Token::NE; }
%% %%
void DragonLisp::DLParser::error(const location_type& l, const std::string& msg) { void DragonLisp::DLParser::error(const location_type& l, const std::string& msg) {