From d239a2435cf0bb01072dd592ba8e174ec80ff3d5 Mon Sep 17 00:00:00 2001
From: disconcision <me@andrewblinn.com>
Date: Mon, 4 Nov 2024 15:58:45 -0500
Subject: [PATCH] fix precedence for |> and comparisions

---
 src/hazel/Grammar.re | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/src/hazel/Grammar.re b/src/hazel/Grammar.re
index 30c1d594..52469f5d 100644
--- a/src/hazel/Grammar.re
+++ b/src/hazel/Grammar.re
@@ -137,6 +137,8 @@ module Exp = {
     //let
     p(let_),
     p(type_def),
+    //Reverse-ap
+    p(~a=L, seq([exp, c("|>"), exp])),
     //fun
     p(
       seq([kw(~space=(false, true), "fun"), nt(Pat.sort), op("->"), exp]),
@@ -152,17 +154,15 @@ module Exp = {
         exp,
       ]),
     ),
+    //Comparison
+    p(~a=L, seq([exp, comp_op_int, exp])),
+    p(~a=L, seq([exp, comp_op_float, exp])),
     //Math operations
     p(~a=L, seq([exp, add_op, exp])),
     p(~a=L, seq([exp, mult_op, exp])),
     p(seq([neg_op, exp])),
-    //Comparison
-    p(~a=L, seq([exp, comp_op_int, exp])),
-    p(~a=L, seq([exp, comp_op_float, exp])),
     //ap
     p(fn_ap),
-    //Reverse-ap
-    p(~a=L, seq([exp, c("|>"), exp])),
     p(operand),
   ];
 };