From e5cf2ce4a424af01676b50e11ad9f4b58cf3fe43 Mon Sep 17 00:00:00 2001
From: disconcision <me@andrewblinn.com>
Date: Mon, 4 Nov 2024 15:35:10 -0500
Subject: [PATCH] added reverse application |>. removed bare pat tuple for now
 bc issues

---
 src/hazel/Grammar.re | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/hazel/Grammar.re b/src/hazel/Grammar.re
index df68a31e..8fb7f899 100644
--- a/src/hazel/Grammar.re
+++ b/src/hazel/Grammar.re
@@ -77,7 +77,7 @@ module Pat = {
     //ap
     p(seq([pat, brc(L, "("), pat, brc(R, ")")])),
     //bare tuple
-    p(~a=L, seq([pat, c(","), pat])),
+    //p(~a=L, seq([pat, c(","), pat])),
     p(operand),
   ];
 };
@@ -156,6 +156,8 @@ module Exp = {
     p(seq([neg_op, exp])),
     //ap
     p(fn_ap),
+    //Reverse-ap
+    p(~a=L, seq([exp, c("|>"), exp])),
     p(operand),
   ];
 };