diff --git a/parser.ml b/parser.ml
index b2d99a7..f293b86 100644
--- a/parser.ml
+++ b/parser.ml
@@ -146,8 +146,8 @@ let rec expr pre seq =
     level;
     assoc;
     let_value;
-    apply;
     (either unary value) @> binop pre;
+    apply;
   ]
 
 (* level := "level" {"get" | "set"} [op] *)