Exp :: { Exp }
-Exp : Exp1 BOp Exp1 { BExp $1 $2 $3 }
- | Ident '=' Exp { EAss $1 $3 }
+Exp : Ident '=' Exp { EAss $1 $3 }
+ | Exp1 BOp Exp1 { BExp $1 $2 $3 }
| Exp1 { $1 }
| Bool { EBool $1 }
| 'readInt' { EReadI }
| 'readBool' { EReadB }
- | Exp4 { $1 }
-
-
-Exp4 :: { Exp }
-Exp4 : '(' Exp ')' { $2 }
+ | '(' Exp ')' { $2 }
ListStm :: { [Stm] }