distinct form for opers that have no value

This commit is contained in:
aarne
2007-03-27 16:40:54 +00:00
parent 1c1acf1b97
commit 7c30d211c3
3 changed files with 9 additions and 10 deletions

View File

@@ -25,9 +25,11 @@ FTyp. Typing ::= Ident ":" Type ;
separator Typing ";" ;
EVar. Exp2 ::= "$" Ident ;
EOpr. Exp2 ::= "&" Ident ;
ECon. Exp2 ::= Ident ;
EVal. Exp2 ::= Integer ;
EStr. Exp2 ::= String ;
ECst. Exp2 ::= "(" Ident "@" [Exp] ")" ;
ERec. Exp2 ::= "{" [Assign] "}" ;
EApp. Exp1 ::= Exp1 Exp2 ;
ESel. Exp1 ::= Exp1 "!" Exp2 ;
@@ -36,7 +38,6 @@ ETab. Exp1 ::= "table" "{" [Case] "}" ;
ETbv. Exp1 ::= "table" "(" Type ")" "{" [Exp] "}" ;
ECat. Exp ::= Exp "++" Exp1 ;
EAbs. Exp ::= "\\" Ident "->" Exp ;
ECst. Exp2 ::= "(" Ident "@" [Exp] ")" ;
coercions Exp 2 ;