Compare commits

...

3 commits

View file

@ -104,8 +104,7 @@ genSaplingSpendingKey seed = do
res = withPureBorshVarBuffer (rustWrapperSaplingSpendingkey seed) res = withPureBorshVarBuffer (rustWrapperSaplingSpendingkey seed)
-- --
-- | Attempts to generate a sapling Payment Address using an ExtendedSpendingKey -- | Attempts to generate a sapling Payment Address using an ExtendedSpendingKey and a Diversifier Index
-- | and a Diversifier Index
genSaplingPaymentAddress :: SaplingSpendingKey -> Int -> Maybe SaplingReceiver genSaplingPaymentAddress :: SaplingSpendingKey -> Int -> Maybe SaplingReceiver
genSaplingPaymentAddress extspk i = genSaplingPaymentAddress extspk i =
if BS.length res == 43 if BS.length res == 43