Safe Haskell | Safe-Inferred |
---|---|
Language | Haskell2010 |
Synopsis
- data WitVKey kr where
- pattern WitVKey ∷ Typeable kr ⇒ VKey kr → SignedDSIGN DSIGN (Hash HASH EraIndependentTxBody) → WitVKey kr
- witVKeyBytes ∷ WitVKey kr → ByteString
- witVKeyHash ∷ WitVKey kr → KeyHash 'Witness
- eqWitVKeyRaw ∷ Typeable kr ⇒ WitVKey kr → WitVKey kr → Bool
Documentation
data WitVKey kr where Source #
Proof/Witness that a transaction is authorized by the given key holder.
pattern WitVKey ∷ Typeable kr ⇒ VKey kr → SignedDSIGN DSIGN (Hash HASH EraIndependentTxBody) → WitVKey kr |
Instances
Generic (WitVKey kr) Source # | |
Show (WitVKey kr) Source # | |
Typeable kr ⇒ ToCBOR (WitVKey kr) Source # | |
Typeable kr ⇒ DecCBOR (Annotator (WitVKey kr)) Source # | |
Typeable kr ⇒ EncCBOR (WitVKey kr) Source # | Encodes memoized bytes created upon construction. |
Typeable kr ⇒ EqRaw (WitVKey kr) Source # | |
NFData (WitVKey kr) Source # | |
Defined in Cardano.Ledger.Keys.WitVKey | |
Eq (WitVKey kr) Source # | |
Typeable kr ⇒ Ord (WitVKey kr) Source # | |
Defined in Cardano.Ledger.Keys.WitVKey | |
Typeable kr ⇒ NoThunks (WitVKey kr) Source # | |
type Rep (WitVKey kr) Source # | |
Defined in Cardano.Ledger.Keys.WitVKey type Rep (WitVKey kr) = D1 ('MetaData "WitVKey" "Cardano.Ledger.Keys.WitVKey" "cardano-ledger-core-1.17.0.0-inplace" 'False) (C1 ('MetaCons "WitVKeyInternal" 'PrefixI 'True) ((S1 ('MetaSel ('Just "wvkKey") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (VKey kr)) :*: S1 ('MetaSel ('Just "wvkSig") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (SignedDSIGN DSIGN (Hash HASH EraIndependentTxBody)))) :*: (S1 ('MetaSel ('Just "wvkKeyHash") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (KeyHash 'Witness)) :*: S1 ('MetaSel ('Just "wvkBytes") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 ByteString)))) |
witVKeyBytes ∷ WitVKey kr → ByteString Source #
Access CBOR encoded representation of the witness. Evaluated lazily