Assign precedence and associativity to THEN

[tiger.ml.git] / tiger / src / lib / tiger / tiger_parser.mly

diff --git a/tiger/src/lib/tiger/tiger_parser.mly b/tiger/src/lib/tiger/tiger_parser.mly
index e8d32f6..610ea48 100644 (file)
--- a/tiger/src/lib/tiger/tiger_parser.mly
+++ b/tiger/src/lib/tiger/tiger_parser.mly
@@ -49,6 +49,10 @@
 %token WHILE
 
 /* from lowest precedence */
+%left THEN
+%left ELSE
+%nonassoc ASSIGN
+%left OF DO
 %left OR
 %left AND
 %nonassoc EQ NEQ GT LT GE LE