Safe Haskell | Safe-Inferred |
---|---|
Language | Haskell2010 |
Synopsis
- newtype PerEraBlockConfig xs = PerEraBlockConfig {}
- newtype PerEraChainOrderConfig xs = PerEraChainOrderConfig {}
- newtype PerEraCodecConfig xs = PerEraCodecConfig {}
- newtype PerEraConsensusConfig xs = PerEraConsensusConfig {}
- newtype PerEraLedgerConfig xs = PerEraLedgerConfig {}
- newtype PerEraStorageConfig xs = PerEraStorageConfig {}
- newtype SomeErasCanBeLeader xs = SomeErasCanBeLeader {}
- newtype OneEraApplyTxErr xs = OneEraApplyTxErr {}
- newtype OneEraBlock xs = OneEraBlock {
- getOneEraBlock ∷ NS I xs
- newtype OneEraCannotForge xs = OneEraCannotForge {}
- newtype OneEraEnvelopeErr xs = OneEraEnvelopeErr {}
- newtype OneEraForgeStateInfo xs = OneEraForgeStateInfo {}
- newtype OneEraForgeStateUpdateError xs = OneEraForgeStateUpdateError {}
- newtype OneEraGenTx xs = OneEraGenTx {
- getOneEraGenTx ∷ NS GenTx xs
- newtype OneEraGenTxId xs = OneEraGenTxId {}
- newtype OneEraHash (xs ∷ [k]) = OneEraHash {}
- newtype OneEraHeader xs = OneEraHeader {
- getOneEraHeader ∷ NS Header xs
- newtype OneEraIsLeader xs = OneEraIsLeader {}
- newtype OneEraLedgerError xs = OneEraLedgerError {}
- newtype OneEraLedgerEvent xs = OneEraLedgerEvent {}
- newtype OneEraLedgerUpdate xs = OneEraLedgerUpdate {}
- newtype OneEraLedgerWarning xs = OneEraLedgerWarning {}
- newtype OneEraSelectView xs = OneEraSelectView {}
- newtype OneEraTentativeHeaderState xs = OneEraTentativeHeaderState {}
- newtype OneEraTentativeHeaderView xs = OneEraTentativeHeaderView {}
- newtype OneEraTipInfo xs = OneEraTipInfo {}
- newtype OneEraValidateView xs = OneEraValidateView {}
- newtype OneEraValidatedGenTx xs = OneEraValidatedGenTx {}
- newtype OneEraValidationErr xs = OneEraValidationErr {}
- data EraMismatch = EraMismatch {}
- newtype MismatchEraInfo xs = MismatchEraInfo {}
- mismatchFutureEra ∷ SListI xs ⇒ MismatchEraInfo (x ': xs) → NS SingleEraInfo xs
- mismatchOneEra ∷ MismatchEraInfo '[b] → Void
- mkEraMismatch ∷ SListI xs ⇒ MismatchEraInfo xs → EraMismatch
- getSameValue ∷ ∀ xs a. (IsNonEmpty xs, Eq a, SListI xs, HasCallStack) ⇒ NP (K a) xs → a
- oneEraBlockHeader ∷ CanHardFork xs ⇒ OneEraBlock xs → OneEraHeader xs
Value for each era
newtype PerEraBlockConfig xs Source #
Instances
CanHardFork xs ⇒ NoThunks (PerEraBlockConfig xs) Source # | |
newtype PerEraChainOrderConfig xs Source #
newtype PerEraCodecConfig xs Source #
Instances
CanHardFork xs ⇒ NoThunks (PerEraCodecConfig xs) Source # | |
newtype PerEraConsensusConfig xs Source #
Instances
CanHardFork xs ⇒ NoThunks (PerEraConsensusConfig xs) Source # | |
newtype PerEraLedgerConfig xs Source #
Instances
CanHardFork xs ⇒ NoThunks (PerEraLedgerConfig xs) Source # | |
newtype PerEraStorageConfig xs Source #
Instances
CanHardFork xs ⇒ NoThunks (PerEraStorageConfig xs) Source # | |
Values for some eras
newtype SomeErasCanBeLeader xs Source #
Value for one era
newtype OneEraApplyTxErr xs Source #
Instances
CanHardFork xs ⇒ Show (OneEraApplyTxErr xs) Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.AcrossEras showsPrec ∷ Int → OneEraApplyTxErr xs → ShowS # show ∷ OneEraApplyTxErr xs → String # showList ∷ [OneEraApplyTxErr xs] → ShowS # | |
CanHardFork xs ⇒ Eq (OneEraApplyTxErr xs) Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.AcrossEras (==) ∷ OneEraApplyTxErr xs → OneEraApplyTxErr xs → Bool # (/=) ∷ OneEraApplyTxErr xs → OneEraApplyTxErr xs → Bool # |
newtype OneEraBlock xs Source #
OneEraBlock | |
|
Instances
CanHardFork xs ⇒ Show (OneEraBlock xs) Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.AcrossEras showsPrec ∷ Int → OneEraBlock xs → ShowS # show ∷ OneEraBlock xs → String # showList ∷ [OneEraBlock xs] → ShowS # |
newtype OneEraCannotForge xs Source #
Instances
CanHardFork xs ⇒ Show (OneEraCannotForge xs) Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.AcrossEras showsPrec ∷ Int → OneEraCannotForge xs → ShowS # show ∷ OneEraCannotForge xs → String # showList ∷ [OneEraCannotForge xs] → ShowS # |
newtype OneEraEnvelopeErr xs Source #
Instances
CanHardFork xs ⇒ Show (OneEraEnvelopeErr xs) Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.AcrossEras showsPrec ∷ Int → OneEraEnvelopeErr xs → ShowS # show ∷ OneEraEnvelopeErr xs → String # showList ∷ [OneEraEnvelopeErr xs] → ShowS # | |
CanHardFork xs ⇒ Eq (OneEraEnvelopeErr xs) Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.AcrossEras (==) ∷ OneEraEnvelopeErr xs → OneEraEnvelopeErr xs → Bool # (/=) ∷ OneEraEnvelopeErr xs → OneEraEnvelopeErr xs → Bool # | |
CanHardFork xs ⇒ NoThunks (OneEraEnvelopeErr xs) Source # | |
newtype OneEraForgeStateInfo xs Source #
Instances
CanHardFork xs ⇒ Show (OneEraForgeStateInfo xs) Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.AcrossEras showsPrec ∷ Int → OneEraForgeStateInfo xs → ShowS # show ∷ OneEraForgeStateInfo xs → String # showList ∷ [OneEraForgeStateInfo xs] → ShowS # |
newtype OneEraForgeStateUpdateError xs Source #
Instances
CanHardFork xs ⇒ Show (OneEraForgeStateUpdateError xs) Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.AcrossEras showsPrec ∷ Int → OneEraForgeStateUpdateError xs → ShowS # show ∷ OneEraForgeStateUpdateError xs → String # showList ∷ [OneEraForgeStateUpdateError xs] → ShowS # |
newtype OneEraGenTx xs Source #
OneEraGenTx | |
|
Instances
CanHardFork xs ⇒ Show (OneEraGenTx xs) Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.AcrossEras showsPrec ∷ Int → OneEraGenTx xs → ShowS # show ∷ OneEraGenTx xs → String # showList ∷ [OneEraGenTx xs] → ShowS # | |
CanHardFork xs ⇒ Eq (OneEraGenTx xs) Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.AcrossEras (==) ∷ OneEraGenTx xs → OneEraGenTx xs → Bool # (/=) ∷ OneEraGenTx xs → OneEraGenTx xs → Bool # | |
CanHardFork xs ⇒ NoThunks (OneEraGenTx xs) Source # | |
newtype OneEraGenTxId xs Source #
Instances
newtype OneEraHash (xs ∷ [k]) Source #
The hash for an era
This type is special: we don't use an NS here, because the hash by itself
should not allow us to differentiate between eras. If it did, the size
of the hash would necessarily have to increase, and that leads to trouble.
So, the type parameter xs
here is merely a phantom one, and we just store
the underlying raw hash.
Instances
newtype OneEraHeader xs Source #
Instances
CanHardFork xs ⇒ Show (OneEraHeader xs) Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.AcrossEras showsPrec ∷ Int → OneEraHeader xs → ShowS # show ∷ OneEraHeader xs → String # showList ∷ [OneEraHeader xs] → ShowS # | |
CanHardFork xs ⇒ NoThunks (OneEraHeader xs) Source # | |
newtype OneEraIsLeader xs Source #
newtype OneEraLedgerError xs Source #
Instances
CanHardFork xs ⇒ Show (OneEraLedgerError xs) Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.AcrossEras showsPrec ∷ Int → OneEraLedgerError xs → ShowS # show ∷ OneEraLedgerError xs → String # showList ∷ [OneEraLedgerError xs] → ShowS # | |
CanHardFork xs ⇒ Eq (OneEraLedgerError xs) Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.AcrossEras (==) ∷ OneEraLedgerError xs → OneEraLedgerError xs → Bool # (/=) ∷ OneEraLedgerError xs → OneEraLedgerError xs → Bool # | |
CanHardFork xs ⇒ NoThunks (OneEraLedgerError xs) Source # | |
newtype OneEraLedgerEvent xs Source #
newtype OneEraLedgerUpdate xs Source #
Instances
CanHardFork xs ⇒ Show (OneEraLedgerUpdate xs) Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.AcrossEras showsPrec ∷ Int → OneEraLedgerUpdate xs → ShowS # show ∷ OneEraLedgerUpdate xs → String # showList ∷ [OneEraLedgerUpdate xs] → ShowS # | |
CanHardFork xs ⇒ Eq (OneEraLedgerUpdate xs) Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.AcrossEras (==) ∷ OneEraLedgerUpdate xs → OneEraLedgerUpdate xs → Bool # (/=) ∷ OneEraLedgerUpdate xs → OneEraLedgerUpdate xs → Bool # |
newtype OneEraLedgerWarning xs Source #
Instances
CanHardFork xs ⇒ Show (OneEraLedgerWarning xs) Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.AcrossEras showsPrec ∷ Int → OneEraLedgerWarning xs → ShowS # show ∷ OneEraLedgerWarning xs → String # showList ∷ [OneEraLedgerWarning xs] → ShowS # | |
CanHardFork xs ⇒ Eq (OneEraLedgerWarning xs) Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.AcrossEras (==) ∷ OneEraLedgerWarning xs → OneEraLedgerWarning xs → Bool # (/=) ∷ OneEraLedgerWarning xs → OneEraLedgerWarning xs → Bool # |
newtype OneEraSelectView xs Source #
Instances
CanHardFork xs ⇒ Show (OneEraSelectView xs) Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.AcrossEras showsPrec ∷ Int → OneEraSelectView xs → ShowS # show ∷ OneEraSelectView xs → String # showList ∷ [OneEraSelectView xs] → ShowS # | |
CanHardFork xs ⇒ Eq (OneEraSelectView xs) Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.AcrossEras (==) ∷ OneEraSelectView xs → OneEraSelectView xs → Bool # (/=) ∷ OneEraSelectView xs → OneEraSelectView xs → Bool # | |
CanHardFork xs ⇒ NoThunks (OneEraSelectView xs) Source # | |
newtype OneEraTentativeHeaderState xs Source #
Instances
CanHardFork xs ⇒ Show (OneEraTentativeHeaderState xs) Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.AcrossEras showsPrec ∷ Int → OneEraTentativeHeaderState xs → ShowS # show ∷ OneEraTentativeHeaderState xs → String # showList ∷ [OneEraTentativeHeaderState xs] → ShowS # | |
CanHardFork xs ⇒ NoThunks (OneEraTentativeHeaderState xs) Source # | |
newtype OneEraTentativeHeaderView xs Source #
Instances
CanHardFork xs ⇒ Show (OneEraTentativeHeaderView xs) Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.AcrossEras showsPrec ∷ Int → OneEraTentativeHeaderView xs → ShowS # show ∷ OneEraTentativeHeaderView xs → String # showList ∷ [OneEraTentativeHeaderView xs] → ShowS # |
newtype OneEraTipInfo xs Source #
Instances
CanHardFork xs ⇒ Show (OneEraTipInfo xs) Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.AcrossEras showsPrec ∷ Int → OneEraTipInfo xs → ShowS # show ∷ OneEraTipInfo xs → String # showList ∷ [OneEraTipInfo xs] → ShowS # | |
CanHardFork xs ⇒ Eq (OneEraTipInfo xs) Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.AcrossEras (==) ∷ OneEraTipInfo xs → OneEraTipInfo xs → Bool # (/=) ∷ OneEraTipInfo xs → OneEraTipInfo xs → Bool # | |
CanHardFork xs ⇒ NoThunks (OneEraTipInfo xs) Source # | |
newtype OneEraValidateView xs Source #
newtype OneEraValidatedGenTx xs Source #
Instances
CanHardFork xs ⇒ Show (OneEraValidatedGenTx xs) Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.AcrossEras showsPrec ∷ Int → OneEraValidatedGenTx xs → ShowS # show ∷ OneEraValidatedGenTx xs → String # showList ∷ [OneEraValidatedGenTx xs] → ShowS # | |
CanHardFork xs ⇒ Eq (OneEraValidatedGenTx xs) Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.AcrossEras (==) ∷ OneEraValidatedGenTx xs → OneEraValidatedGenTx xs → Bool # (/=) ∷ OneEraValidatedGenTx xs → OneEraValidatedGenTx xs → Bool # | |
CanHardFork xs ⇒ NoThunks (OneEraValidatedGenTx xs) Source # | |
newtype OneEraValidationErr xs Source #
Instances
CanHardFork xs ⇒ Show (OneEraValidationErr xs) Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.AcrossEras showsPrec ∷ Int → OneEraValidationErr xs → ShowS # show ∷ OneEraValidationErr xs → String # showList ∷ [OneEraValidationErr xs] → ShowS # | |
CanHardFork xs ⇒ Eq (OneEraValidationErr xs) Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.AcrossEras (==) ∷ OneEraValidationErr xs → OneEraValidationErr xs → Bool # (/=) ∷ OneEraValidationErr xs → OneEraValidationErr xs → Bool # | |
CanHardFork xs ⇒ NoThunks (OneEraValidationErr xs) Source # | |
Value for two different eras
data EraMismatch Source #
Extra info for errors caused by applying a block, header, transaction, or query from one era to a ledger from a different era.
EraMismatch | |
|
Instances
newtype MismatchEraInfo xs Source #
MismatchEraInfo | |
|
Instances
All SingleEraBlock xs ⇒ Show (MismatchEraInfo xs) Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.AcrossEras showsPrec ∷ Int → MismatchEraInfo xs → ShowS # show ∷ MismatchEraInfo xs → String # showList ∷ [MismatchEraInfo xs] → ShowS # | |
All SingleEraBlock xs ⇒ Eq (MismatchEraInfo xs) Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.AcrossEras (==) ∷ MismatchEraInfo xs → MismatchEraInfo xs → Bool # (/=) ∷ MismatchEraInfo xs → MismatchEraInfo xs → Bool # | |
CanHardFork xs ⇒ NoThunks (MismatchEraInfo xs) Source # | |
mismatchFutureEra ∷ SListI xs ⇒ MismatchEraInfo (x ': xs) → NS SingleEraInfo xs Source #
A mismatch _must_ involve a future era
mismatchOneEra ∷ MismatchEraInfo '[b] → Void Source #
mkEraMismatch ∷ SListI xs ⇒ MismatchEraInfo xs → EraMismatch Source #
When a transaction or block from a certain era was applied to a ledger
from another era, we get a MismatchEraInfo
.
Given such a MismatchEraInfo
, return the name of the era of the
transaction/block and the name of the era of the ledger.
Utility
getSameValue ∷ ∀ xs a. (IsNonEmpty xs, Eq a, SListI xs, HasCallStack) ⇒ NP (K a) xs → a Source #
oneEraBlockHeader ∷ CanHardFork xs ⇒ OneEraBlock xs → OneEraHeader xs Source #