Merge pull request 'Fix #34' (#35) from rav001 into dev040

Reviewed-on: #35
This commit is contained in:
pitmutt 2024-03-14 18:04:47 +00:00 committed by Vergara Technologies LLC
commit 749472e515
Signed by: Vergara Technologies LLC
GPG key ID: 99DB473BB4715618

View file

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