Functions to handle commitment tree nodes for Sapling and Orchard #100

Merged
pitmutt merged 50 commits from rav001 into milestone2 2024-11-15 18:48:36 +00:00
Showing only changes of commit 4c3a188c32 - Show all commits

View file

@ -621,9 +621,9 @@ data SaplingRawTree = SaplingRawTree
deriving (BorshSize, ToBorsh, FromBorsh) via AsStruct SaplingRawTree deriving (BorshSize, ToBorsh, FromBorsh) via AsStruct SaplingRawTree
data SaplingTree = SaplingTree data SaplingTree = SaplingTree
{ ot_left :: !(Maybe HexString) { st_left :: !(Maybe HexString)
, ot_right :: !(Maybe HexString) , st_right :: !(Maybe HexString)
, ot_parents :: ![Maybe HexString] , st_parents :: ![Maybe HexString]
} deriving (Eq, Prelude.Show, Read) } deriving (Eq, Prelude.Show, Read)
data SaplingFrontier = SaplingFrontier data SaplingFrontier = SaplingFrontier