add tuples

[ccc.git] / parse.y

diff --git a/parse.y b/parse.y
index c79a1ec..4311833 100644 (file)
--- a/parse.y
+++ b/parse.y
@@ -114,6 +114,7 @@ expr
        | expr POWER expr { $$ = ast_binop($1, power, $3); }
        | MINUS expr { $$ = ast_unop(negate, $2); }
        | INVERSE expr %prec TIMES { $$ = ast_unop(inverse, $2); }
+       | BOPEN expr COMMA expr BCLOSE { $$ = ast_tuple($2, $4); }
        | BOPEN expr BCLOSE { $$ = $2; }
        | IDENT BOPEN fargs BCLOSE { $$ = ast_funcall($1, ast_list($3)); }
        | INTEGER