Safe Haskell | Safe-Inferred |
---|---|
Language | Haskell2010 |
Cardano.Ledger.Api.Tx.Wits
Synopsis
- class (EraScript era, Eq (TxWits era), EqRaw (TxWits era), Show (TxWits era), Monoid (TxWits era), NoThunks (TxWits era), ToCBOR (TxWits era), EncCBOR (TxWits era), DecCBOR (Annotator (TxWits era)), ToExpr (TxWits era)) => EraTxWits era where
- mkBasicTxWits :: EraTxWits era => TxWits era
- addrTxWitsL :: EraTxWits era => Lens' (TxWits era) (Set (WitVKey 'Witness (EraCrypto era)))
- data KeyRole = Witness
- data WitVKey (kr :: KeyRole) c where
- witVKeyBytes :: forall (kr :: KeyRole) c. WitVKey kr c -> ByteString
- witVKeyHash :: forall (kr :: KeyRole) c. WitVKey kr c -> KeyHash 'Witness c
- bootAddrTxWitsL :: EraTxWits era => Lens' (TxWits era) (Set (BootstrapWitness (EraCrypto era)))
- data BootstrapWitness c
- scriptTxWitsL :: EraTxWits era => Lens' (TxWits era) (Map (ScriptHash (EraCrypto era)) (Script era))
- hashScriptTxWitsL :: EraTxWits era => Lens (TxWits era) (TxWits era) (Map (ScriptHash (EraCrypto era)) (Script era)) [Script era]
- class EraTxWits era => AlonzoEraTxWits era
- datsTxWitsL :: AlonzoEraTxWits era => Lens' (TxWits era) (TxDats era)
- hashDataTxWitsL :: AlonzoEraTxWits era => Lens (TxWits era) (TxWits era) (TxDats era) [Data era]
- data TxDats era where
- unTxDats :: TxDats era -> Map (DataHash (EraCrypto era)) (Data era)
- rdmrsTxWitsL :: AlonzoEraTxWits era => Lens' (TxWits era) (Redeemers era)
- data Redeemers era where
- unRedeemers :: Era era => Redeemers era -> Map RdmrPtr (Data era, ExUnits)
- data RdmrPtr = RdmrPtr !Tag !Word64
- data Tag
Shelley onwards
class (EraScript era, Eq (TxWits era), EqRaw (TxWits era), Show (TxWits era), Monoid (TxWits era), NoThunks (TxWits era), ToCBOR (TxWits era), EncCBOR (TxWits era), DecCBOR (Annotator (TxWits era)), ToExpr (TxWits era)) => EraTxWits era #
Minimal complete definition
addrTxWitsL, bootAddrTxWitsL, scriptTxWitsL, upgradeTxWits
mkBasicTxWits :: EraTxWits era => TxWits era #
Address witness
Constructors
Witness |
WitVKey
data WitVKey (kr :: KeyRole) c where #
Bundled Patterns
pattern WitVKey :: (Typeable kr, Crypto c) => VKey kr c -> SignedDSIGN c (Hash c EraIndependentTxBody) -> WitVKey kr c |
Instances
(Typeable kr, Crypto c) => DecCBOR (Annotator (WitVKey kr c)) | |
Generic (WitVKey kr c) | |
Crypto c => Show (WitVKey kr c) | |
(Typeable kr, Crypto c) => ToCBOR (WitVKey kr c) | |
Defined in Cardano.Ledger.Keys.WitVKey Methods toCBOR :: WitVKey kr c -> Encoding encodedSizeExpr :: (forall t. ToCBOR t => Proxy t -> Size) -> Proxy (WitVKey kr c) -> Size encodedListSizeExpr :: (forall t. ToCBOR t => Proxy t -> Size) -> Proxy [WitVKey kr c] -> Size | |
(Typeable kr, Crypto c) => EncCBOR (WitVKey kr c) | |
Defined in Cardano.Ledger.Keys.WitVKey Methods encCBOR :: WitVKey kr c -> Encoding encodedSizeExpr :: (forall t. EncCBOR t => Proxy t -> Size) -> Proxy (WitVKey kr c) -> Size encodedListSizeExpr :: (forall t. EncCBOR t => Proxy t -> Size) -> Proxy [WitVKey kr c] -> Size | |
(Crypto c, Typeable kr) => EqRaw (WitVKey kr c) | |
Defined in Cardano.Ledger.Keys.WitVKey | |
NFData (WitVKey kr c) | |
Defined in Cardano.Ledger.Keys.WitVKey | |
Crypto c => Eq (WitVKey kr c) | |
(Typeable kr, Crypto c) => Ord (WitVKey kr c) | |
Defined in Cardano.Ledger.Keys.WitVKey Methods compare :: WitVKey kr c -> WitVKey kr c -> Ordering Source # (<) :: WitVKey kr c -> WitVKey kr c -> Bool Source # (<=) :: WitVKey kr c -> WitVKey kr c -> Bool Source # (>) :: WitVKey kr c -> WitVKey kr c -> Bool Source # (>=) :: WitVKey kr c -> WitVKey kr c -> Bool Source # max :: WitVKey kr c -> WitVKey kr c -> WitVKey kr c Source # min :: WitVKey kr c -> WitVKey kr c -> WitVKey kr c Source # | |
(Crypto c, Typeable kr) => NoThunks (WitVKey kr c) | |
Crypto c => ToExpr (WitVKey kr c) | |
Defined in Cardano.Ledger.Keys.WitVKey | |
type Rep (WitVKey kr c) | |
Defined in Cardano.Ledger.Keys.WitVKey type Rep (WitVKey kr c) = D1 ('MetaData "WitVKey" "Cardano.Ledger.Keys.WitVKey" "cardano-ledger-core-1.9.0.0-1dQ7WLDbkZc8aXLEpNIvOr" 'False) (C1 ('MetaCons "WitVKeyInternal" 'PrefixI 'True) ((S1 ('MetaSel ('Just "wvkKey") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (VKey kr c)) :*: S1 ('MetaSel ('Just "wvkSig") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (SignedDSIGN c (Hash c EraIndependentTxBody)))) :*: (S1 ('MetaSel ('Just "wvkKeyHash") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (KeyHash 'Witness c)) :*: S1 ('MetaSel ('Just "wvkBytes") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 ByteString)))) |
witVKeyBytes :: forall (kr :: KeyRole) c. WitVKey kr c -> ByteString #
witVKeyHash :: forall (kr :: KeyRole) c. WitVKey kr c -> KeyHash 'Witness c #
Byron address witness
bootAddrTxWitsL :: EraTxWits era => Lens' (TxWits era) (Set (BootstrapWitness (EraCrypto era))) #
data BootstrapWitness c #
Instances
Script witness
scriptTxWitsL :: EraTxWits era => Lens' (TxWits era) (Map (ScriptHash (EraCrypto era)) (Script era)) #
hashScriptTxWitsL :: EraTxWits era => Lens (TxWits era) (TxWits era) (Map (ScriptHash (EraCrypto era)) (Script era)) [Script era] #
Alonzo onwards
class EraTxWits era => AlonzoEraTxWits era #
Minimal complete definition
Instances
(EraScript (AlonzoEra c), Crypto c) => AlonzoEraTxWits (AlonzoEra c) | |
Defined in Cardano.Ledger.Alonzo.TxWits |
datsTxWitsL :: AlonzoEraTxWits era => Lens' (TxWits era) (TxDats era) #
hashDataTxWitsL :: AlonzoEraTxWits era => Lens (TxWits era) (TxWits era) (TxDats era) [Data era] #
Bundled Patterns
pattern TxDats :: Era era => Map (DataHash (EraCrypto era)) (Data era) -> TxDats era | |
pattern TxDats' :: Map (DataHash (EraCrypto era)) (Data era) -> TxDats era |
Instances
Memoized TxDats | |
Defined in Cardano.Ledger.Alonzo.TxWits Methods getMemoBytes :: TxDats era -> MemoBytes (RawType TxDats) era wrapMemoBytes :: MemoBytes (RawType TxDats) era -> TxDats era | |
Era era => Monoid (TxDats era) | |
Era era => Semigroup (TxDats era) | |
Generic (TxDats era) | |
HashAlgorithm (HASH (EraCrypto era)) => Show (TxDats era) | |
Typeable era => ToCBOR (TxDats era) | |
Defined in Cardano.Ledger.Alonzo.TxWits Methods toCBOR :: TxDats era -> Encoding encodedSizeExpr :: (forall t. ToCBOR t => Proxy t -> Size) -> Proxy (TxDats era) -> Size encodedListSizeExpr :: (forall t. ToCBOR t => Proxy t -> Size) -> Proxy [TxDats era] -> Size | |
Era era => DecCBOR (Annotator (TxDats era)) | |
Era era => EncCBOR (TxDats era) | |
Defined in Cardano.Ledger.Alonzo.TxWits Methods encCBOR :: TxDats era -> Encoding encodedSizeExpr :: (forall t. EncCBOR t => Proxy t -> Size) -> Proxy (TxDats era) -> Size encodedListSizeExpr :: (forall t. EncCBOR t => Proxy t -> Size) -> Proxy [TxDats era] -> Size | |
SafeToHash (TxDats era) | |
Defined in Cardano.Ledger.Alonzo.TxWits Methods originalBytes :: TxDats era -> ByteString makeHashWithExplicitProxys :: HashAlgorithm (HASH c) => Proxy c -> Proxy index -> TxDats era -> SafeHash c index | |
NFData (TxDats era) | |
Defined in Cardano.Ledger.Alonzo.TxWits | |
Eq (TxDats era) | |
Typeable era => NoThunks (TxDats era) | |
ToExpr (Data era) => ToExpr (TxDats era) | |
Defined in Cardano.Ledger.Alonzo.TxWits | |
type RawType TxDats | |
Defined in Cardano.Ledger.Alonzo.TxWits type RawType TxDats = TxDatsRaw | |
type Rep (TxDats era) | |
Defined in Cardano.Ledger.Alonzo.TxWits type Rep (TxDats era) = D1 ('MetaData "TxDats" "Cardano.Ledger.Alonzo.TxWits" "cardano-ledger-alonzo-1.5.1.0-1MT8TTvKeeyGoJw1KVxcth" 'True) (C1 ('MetaCons "TxDatsConstr" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (MemoBytes TxDatsRaw era)))) |
rdmrsTxWitsL :: AlonzoEraTxWits era => Lens' (TxWits era) (Redeemers era) #
Instances
Memoized Redeemers | |
Defined in Cardano.Ledger.Alonzo.TxWits Methods getMemoBytes :: Redeemers era -> MemoBytes (RawType Redeemers) era wrapMemoBytes :: MemoBytes (RawType Redeemers) era -> Redeemers era | |
Generic (Redeemers era) | |
HashAlgorithm (HASH (EraCrypto era)) => Show (Redeemers era) | |
Typeable era => ToCBOR (Redeemers era) | |
Defined in Cardano.Ledger.Alonzo.TxWits Methods toCBOR :: Redeemers era -> Encoding encodedSizeExpr :: (forall t. ToCBOR t => Proxy t -> Size) -> Proxy (Redeemers era) -> Size encodedListSizeExpr :: (forall t. ToCBOR t => Proxy t -> Size) -> Proxy [Redeemers era] -> Size | |
Era era => DecCBOR (Annotator (Redeemers era)) | |
Era era => EncCBOR (Redeemers era) | |
Defined in Cardano.Ledger.Alonzo.TxWits Methods encCBOR :: Redeemers era -> Encoding encodedSizeExpr :: (forall t. EncCBOR t => Proxy t -> Size) -> Proxy (Redeemers era) -> Size encodedListSizeExpr :: (forall t. EncCBOR t => Proxy t -> Size) -> Proxy [Redeemers era] -> Size | |
SafeToHash (Redeemers era) | |
Defined in Cardano.Ledger.Alonzo.TxWits Methods originalBytes :: Redeemers era -> ByteString makeHashWithExplicitProxys :: HashAlgorithm (HASH c) => Proxy c -> Proxy index -> Redeemers era -> SafeHash c index | |
NFData (Redeemers era) | |
Defined in Cardano.Ledger.Alonzo.TxWits | |
Eq (Redeemers era) | |
Typeable era => NoThunks (Redeemers era) | |
ToExpr (Redeemers era) | |
Defined in Cardano.Ledger.Alonzo.TxWits | |
type RawType Redeemers | |
Defined in Cardano.Ledger.Alonzo.TxWits type RawType Redeemers = RedeemersRaw | |
type Rep (Redeemers era) | |
Defined in Cardano.Ledger.Alonzo.TxWits |
Instances
Instances
Bounded Tag | |
Enum Tag | |
Defined in Cardano.Ledger.Alonzo.Scripts | |
Generic Tag | |
Show Tag | |
DecCBOR Tag | |
EncCBOR Tag | |
Defined in Cardano.Ledger.Alonzo.Scripts Methods encodedSizeExpr :: (forall t. EncCBOR t => Proxy t -> Size) -> Proxy Tag -> Size encodedListSizeExpr :: (forall t. EncCBOR t => Proxy t -> Size) -> Proxy [Tag] -> Size | |
NFData Tag | |
Defined in Cardano.Ledger.Alonzo.Scripts | |
Eq Tag | |
Ord Tag | |
NoThunks Tag | |
ToExpr Tag | |
Defined in Cardano.Ledger.Alonzo.Scripts | |
type Rep Tag | |
Defined in Cardano.Ledger.Alonzo.Scripts type Rep Tag = D1 ('MetaData "Tag" "Cardano.Ledger.Alonzo.Scripts" "cardano-ledger-alonzo-1.5.1.0-1MT8TTvKeeyGoJw1KVxcth" 'False) ((C1 ('MetaCons "Spend" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Mint" 'PrefixI 'False) (U1 :: Type -> Type)) :+: (C1 ('MetaCons "Cert" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Rewrd" 'PrefixI 'False) (U1 :: Type -> Type))) |