=> is right associative

impaler · Feb 20, 2013 · e5f2581 · e5f2581
1 parent 9971aef
commit e5f2581
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/parser.ml b/parser.ml
@@ -94,7 +94,7 @@ let precedence op =
 	| OpInterval -> 6, left
 	| OpBoolAnd -> 7, left
 	| OpBoolOr -> 8, left
-	| OpArrow -> 9, left
+	| OpArrow -> 9, right
 	| OpAssign | OpAssignOp _ -> 10, right
 
 let is_not_assign = function