diff options
author | Alex Auvolat <alex.auvolat@ansys.com> | 2014-07-01 15:42:57 +0200 |
---|---|---|
committer | Alex Auvolat <alex.auvolat@ansys.com> | 2014-07-01 15:42:57 +0200 |
commit | f97a886970bef9e1d6e8a1e217732d6ef8be087e (patch) | |
tree | f79d165af76f23fece80c5bcc5003d5e2b82bd38 /frontend/parser.mly | |
parent | 2d322a06b882542bab3d98cf08abefa906a54942 (diff) | |
download | scade-analyzer-f97a886970bef9e1d6e8a1e217732d6ef8be087e.tar.gz scade-analyzer-f97a886970bef9e1d6e8a1e217732d6ef8be087e.zip |
Adapt for real type with Apron ; not very efficient ATM.
Diffstat (limited to 'frontend/parser.mly')
-rw-r--r-- | frontend/parser.mly | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/frontend/parser.mly b/frontend/parser.mly index 4301a05..4e010ec 100644 --- a/frontend/parser.mly +++ b/frontend/parser.mly @@ -61,6 +61,10 @@ primary_expr: | FALSE { AST_bool_const false } | e=ext(IDENT) LPAREN l=separated_list(COMMA,ext(expr)) RPAREN { AST_instance (e, l, fst e ^ uid ()) } +| INT LPAREN e=ext(expr) RPAREN + { AST_cast(e, AST_TINT) } +| REAL LPAREN e=ext(expr) RPAREN + { AST_cast(e, AST_TREAL) } unary_expr: | e=primary_expr { e } |