From d0ba74c7a1513743f91c6abd5a142000503ed32a Mon Sep 17 00:00:00 2001
From: Rene Vergara <rene@vergara.network>
Date: Thu, 14 Mar 2024 13:02:02 -0500
Subject: [PATCH] Fix #34

---
 src/ZcashHaskell/Types.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/ZcashHaskell/Types.hs b/src/ZcashHaskell/Types.hs
index 7a16ff7..7d72f94 100644
--- a/src/ZcashHaskell/Types.hs
+++ b/src/ZcashHaskell/Types.hs
@@ -44,7 +44,7 @@ import Haskoin.Address (Address)
 -- | A seed for generating private keys
 newtype Seed =
   Seed C.ByteString
-  deriving stock (Prelude.Show, GHC.Generic)
+  deriving stock (Eq, Prelude.Show, GHC.Generic)
   deriving anyclass (SOP.Generic, SOP.HasDatatypeInfo)
   deriving anyclass (Data.Structured.Show)
   deriving (BorshSize, ToBorsh, FromBorsh) via AsStruct Seed
@@ -55,7 +55,7 @@ instance ToBytes Seed where
 -- | A mnemonic phrase used to derive seeds
 newtype Phrase =
   Phrase BS.ByteString
-  deriving stock (Prelude.Show, GHC.Generic)
+  deriving stock (Eq, Prelude.Show, GHC.Generic)
   deriving anyclass (SOP.Generic, SOP.HasDatatypeInfo)
   deriving anyclass (Data.Structured.Show)
   deriving (BorshSize, ToBorsh, FromBorsh) via AsStruct Phrase