jeltz/heptagon
1
0
Fork 0
Code Issues Pull requests Releases Activity

permits to use = instead of returns

Browse source
This commit is contained in:
Léonard Gérard 2011-11-02 23:53:20 +01:00
parent abdf93c8c2
commit dfc0077859
1 changed files with 5 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
compiler/heptagon/parsing/hept_parser.mly
View file

@ -166,9 +166,12 @@ label_ty:
IDENT COLON ty_ident { $1, $3 }
;
returns: RETURNS | EQUAL {}
;
node_dec:
| n=node_or_fun f=ident pc=node_params LPAREN i=in_params RPAREN
RETURNS LPAREN o=out_params RPAREN
returns LPAREN o=out_params RPAREN
c=contract b=block(LET) TEL
{{ n_name = f;
n_stateful = n;
@ -656,7 +659,7 @@ interface_desc:
| type_dec { Itypedef $1 }
| const_dec { Iconstdef $1 }
| VAL n=node_or_fun f=ident pc=node_params LPAREN i=params_signature RPAREN
RETURNS LPAREN o=params_signature RPAREN
returns LPAREN o=params_signature RPAREN
{ Isignature({ sig_name = f;
sig_inputs = i;
sig_stateful = n;