From 515f3688d3576cdfbba9346ffa8c38d746224675 Mon Sep 17 00:00:00 2001
From: Marvin Borner
Date: Fri, 4 Mar 2022 18:46:36 +0100
Subject: Cool syntax checks

---
 src/Fun/Tree.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/Fun/Tree.hs')

diff --git a/src/Fun/Tree.hs b/src/Fun/Tree.hs
index 7b21b17..28434cc 100644
--- a/src/Fun/Tree.hs
+++ b/src/Fun/Tree.hs
@@ -43,7 +43,7 @@ data FunctionPattern = FunctionPattern
   deriving Show
 
 data FunctionPatternElement = FunctionPatternParameter String | FunctionPatternString String | FunctionPatternNumber Integer | FunctionPatternWildcard | FunctionPatternSuperWildcard
-  deriving Show
+  deriving (Show, Eq, Ord)
 
 data FunctionBody = FunctionBody
   { bElements :: [FunctionBodyElement]
-- 
cgit v1.2.3