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

Fixed a problem with simple_exp

Browse source 
This enables the parser to accept both
	m.x.y
and (m.x).y
This commit is contained in:
Cédric Pasteur 2010-07-28 09:36:56 +02:00
parent d4f441ae19
commit 7945ef9eb8
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -385,14 +385,15 @@ exps:
| nonmtexps {$1} | nonmtexps {$1}
; ;
simple_exp: e=_simple_exp { mk_exp e (Loc($startpos,$endpos)) } simple_exp:
| e=_simple_exp { mk_exp e (Loc($startpos,$endpos)) }
| LPAREN exp RPAREN { $2 }
_simple_exp: _simple_exp:
| IDENT { Evar $1 } | IDENT { Evar $1 }
| const { Econst $1 } | const { Econst $1 }
| LBRACE field_exp_list RBRACE { Estruct $2 } | LBRACE field_exp_list RBRACE { Estruct $2 }
| LBRACKET array_exp_list RBRACKET { mk_call Earray $2 } | LBRACKET array_exp_list RBRACKET { mk_call Earray $2 }
| LPAREN tuple_exp RPAREN { mk_call Etuple $2 } | LPAREN tuple_exp RPAREN { mk_call Etuple $2 }
| LPAREN _exp RPAREN { $2 }
| simple_exp DOT c=longname | simple_exp DOT c=longname
{ mk_call ~params:[mk_constructor_exp c (Loc($startpos(c),$endpos(c)))] { mk_call ~params:[mk_constructor_exp c (Loc($startpos(c),$endpos(c)))]
Efield [$1] } Efield [$1] }