Skip to content
Snippets Groups Projects
Commit 5d147e12 authored by Eelco Dolstra's avatar Eelco Dolstra
Browse files

Add a unary integer negation operator

This allows saying "-1" instead of "builtins.sub 0 1".
parent 159e621d
No related branches found
No related tags found
No related merge requests found
...@@ -270,11 +270,12 @@ void yyerror(YYLTYPE * loc, yyscan_t scanner, ParseData * data, const char * err ...@@ -270,11 +270,12 @@ void yyerror(YYLTYPE * loc, yyscan_t scanner, ParseData * data, const char * err
%left AND %left AND
%nonassoc EQ NEQ %nonassoc EQ NEQ
%right UPDATE %right UPDATE
%left NEG %left NOT
%left '+' %left '+'
%right CONCAT %right CONCAT
%nonassoc '?' %nonassoc '?'
%nonassoc '~' %nonassoc '~'
%nonassoc NEGATE
%% %%
...@@ -306,7 +307,8 @@ expr_if ...@@ -306,7 +307,8 @@ expr_if
; ;
expr_op expr_op
: '!' expr_op %prec NEG { $$ = new ExprOpNot($2); } : '!' expr_op %prec NOT { $$ = new ExprOpNot($2); }
| '-' expr_op %prec NEGATE { $$ = new ExprApp(new ExprApp(new ExprVar(data->symbols.create("__sub")), new ExprInt(0)), $2); }
| expr_op EQ expr_op { $$ = new ExprOpEq($1, $3); } | expr_op EQ expr_op { $$ = new ExprOpEq($1, $3); }
| expr_op NEQ expr_op { $$ = new ExprOpNEq($1, $3); } | expr_op NEQ expr_op { $$ = new ExprOpNEq($1, $3); }
| expr_op AND expr_op { $$ = new ExprOpAnd($1, $3); } | expr_op AND expr_op { $$ = new ExprOpAnd($1, $3); }
......
1854 1843
...@@ -16,6 +16,11 @@ let { ...@@ -16,6 +16,11 @@ let {
range = range_ []; range = range_ [];
*/ */
body = sum (range 1 50) + 123 + 456; x = 12;
body = sum
[ (sum (range 1 50))
(123 + 456)
(0 + -10 + -(-11) + -x)
];
} }
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment