From 9e408967cbdfa1d04e4bd4bc963399e7be78c0a7 Mon Sep 17 00:00:00 2001
From: lemon <lsof@mailbox.org>
Date: Fri, 19 Aug 2022 13:01:16 +0200
Subject: fix hashing and typeeq for enums

---
 src/type.cff | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'src/type.cff')

diff --git a/src/type.cff b/src/type.cff
index 593ec3c..713716b 100644
--- a/src/type.cff
+++ b/src/type.cff
@@ -40,6 +40,9 @@ struct TypeTraits {
 
       case Agg agg;
          h = fnv1a_i(h, agg.id);
+
+      case Enum enu;
+         h = fnv1a_i(h, enu.id);
       }
 
       return h;
@@ -87,6 +90,9 @@ struct TypeTraits {
       case Agg agg;
          let bgg = b.u.Agg;
          return agg.id == bgg.id;
+
+      case Enum enu;
+         return enu.id == b.u.Enum.id;
       }
       return #f;
    }
-- 
cgit v1.2.3