From 8ba98a86805c886719057f9df0d5a74c58c6dabd Mon Sep 17 00:00:00 2001
From: Jan Tuomi <jans.tuomi@gmail.com>
Date: Fri, 9 Dec 2022 18:55:21 +0200
Subject: Add do builtin

---
 src/Utils.hs | 1 +
 1 file changed, 1 insertion(+)

(limited to 'src/Utils.hs')

diff --git a/src/Utils.hs b/src/Utils.hs
index 379740d..76b3830 100644
--- a/src/Utils.hs
+++ b/src/Utils.hs
@@ -188,6 +188,7 @@ instance (Eq ASTNode) where
     ASTVector a == ASTVector b = a == b
     ASTFunctionCall a == ASTFunctionCall b = a == b
     ASTHashMap a == ASTHashMap b = a == b
+    ASTRecord ah _ hma == ASTRecord bh _ hmb = ah == bh && hma == hmb
     ASTUnit == ASTUnit = True
     ASTHole == _ = True
     _ == ASTHole = True
-- 
cgit v1.3