Safe Haskell | None |
---|---|
Language | Haskell2010 |
Newtypes around type families so that they can be partially applied
Synopsis
-
newtype
WrapApplyTxErr
blk =
WrapApplyTxErr
{
- unwrapApplyTxErr :: ApplyTxErr blk
-
newtype
WrapCannotForge
blk =
WrapCannotForge
{
- unwrapCannotForge :: CannotForge blk
- newtype WrapEnvelopeErr blk = WrapEnvelopeErr { }
- newtype WrapForgeStateInfo blk = WrapForgeStateInfo { }
- newtype WrapForgeStateUpdateError blk = WrapForgeStateUpdateError { }
-
newtype
WrapGenTxId
blk =
WrapGenTxId
{
- unwrapGenTxId :: GenTxId blk
-
newtype
WrapHeaderHash
blk =
WrapHeaderHash
{
- unwrapHeaderHash :: HeaderHash blk
-
newtype
WrapLedgerConfig
blk =
WrapLedgerConfig
{
- unwrapLedgerConfig :: LedgerConfig blk
-
newtype
WrapLedgerErr
blk =
WrapLedgerErr
{
- unwrapLedgerErr :: LedgerError blk
-
newtype
WrapLedgerEvent
blk =
WrapLedgerEvent
{
- unwrapLedgerEvent :: AuxLedgerEvent ( LedgerState blk)
-
newtype
WrapLedgerUpdate
blk =
WrapLedgerUpdate
{
- unwrapLedgerUpdate :: LedgerUpdate blk
-
newtype
WrapLedgerWarning
blk =
WrapLedgerWarning
{
- unwrapLedgerWarning :: LedgerWarning blk
-
newtype
WrapTipInfo
blk =
WrapTipInfo
{
- unwrapTipInfo :: TipInfo blk
-
newtype
WrapCanBeLeader
blk =
WrapCanBeLeader
{
- unwrapCanBeLeader :: CanBeLeader ( BlockProtocol blk)
-
newtype
WrapChainDepState
blk =
WrapChainDepState
{
- unwrapChainDepState :: ChainDepState ( BlockProtocol blk)
- newtype WrapConsensusConfig blk = WrapConsensusConfig { }
-
newtype
WrapIsLeader
blk =
WrapIsLeader
{
- unwrapIsLeader :: IsLeader ( BlockProtocol blk)
-
newtype
WrapLedgerView
blk =
WrapLedgerView
{
- unwrapLedgerView :: LedgerView ( BlockProtocol blk)
-
newtype
WrapSelectView
blk =
WrapSelectView
{
- unwrapSelectView :: SelectView ( BlockProtocol blk)
-
newtype
WrapValidateView
blk =
WrapValidateView
{
- unwrapValidateView :: ValidateView ( BlockProtocol blk)
-
newtype
WrapValidatedGenTx
blk =
WrapValidatedGenTx
{
- unwrapValidatedGenTx :: Validated ( GenTx blk)
-
newtype
WrapValidationErr
blk =
WrapValidationErr
{
- unwrapValidationErr :: ValidationErr ( BlockProtocol blk)
- newtype WrapNodeToClientVersion blk = WrapNodeToClientVersion { }
- newtype WrapNodeToNodeVersion blk = WrapNodeToNodeVersion { }
- data family Ticked st :: Type
Block based
newtype WrapApplyTxErr blk Source #
Instances
newtype WrapCannotForge blk Source #
Instances
Isomorphic WrapCannotForge Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.Embed.Unary project :: NoHardForks blk => WrapCannotForge ( HardForkBlock '[blk]) -> WrapCannotForge blk Source # inject :: NoHardForks blk => WrapCannotForge blk -> WrapCannotForge ( HardForkBlock '[blk]) Source # |
|
Show ( CannotForge blk) => Show ( WrapCannotForge blk) Source # | |
Defined in Ouroboros.Consensus.TypeFamilyWrappers |
newtype WrapEnvelopeErr blk Source #
Instances
Isomorphic WrapEnvelopeErr Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.Embed.Unary project :: NoHardForks blk => WrapEnvelopeErr ( HardForkBlock '[blk]) -> WrapEnvelopeErr blk Source # inject :: NoHardForks blk => WrapEnvelopeErr blk -> WrapEnvelopeErr ( HardForkBlock '[blk]) Source # |
|
Eq ( OtherHeaderEnvelopeError blk) => Eq ( WrapEnvelopeErr blk) Source # | |
Defined in Ouroboros.Consensus.TypeFamilyWrappers (==) :: WrapEnvelopeErr blk -> WrapEnvelopeErr blk -> Bool Source # (/=) :: WrapEnvelopeErr blk -> WrapEnvelopeErr blk -> Bool Source # |
|
Show ( OtherHeaderEnvelopeError blk) => Show ( WrapEnvelopeErr blk) Source # | |
Defined in Ouroboros.Consensus.TypeFamilyWrappers |
|
NoThunks ( OtherHeaderEnvelopeError blk) => NoThunks ( WrapEnvelopeErr blk) Source # | |
Defined in Ouroboros.Consensus.TypeFamilyWrappers |
newtype WrapForgeStateInfo blk Source #
Instances
Isomorphic WrapForgeStateInfo Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.Embed.Unary project :: NoHardForks blk => WrapForgeStateInfo ( HardForkBlock '[blk]) -> WrapForgeStateInfo blk Source # inject :: NoHardForks blk => WrapForgeStateInfo blk -> WrapForgeStateInfo ( HardForkBlock '[blk]) Source # |
|
Show ( ForgeStateInfo blk) => Show ( WrapForgeStateInfo blk) Source # | |
Defined in Ouroboros.Consensus.TypeFamilyWrappers |
newtype WrapForgeStateUpdateError blk Source #
Instances
Isomorphic WrapForgeStateUpdateError Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.Embed.Unary project :: NoHardForks blk => WrapForgeStateUpdateError ( HardForkBlock '[blk]) -> WrapForgeStateUpdateError blk Source # inject :: NoHardForks blk => WrapForgeStateUpdateError blk -> WrapForgeStateUpdateError ( HardForkBlock '[blk]) Source # |
|
Show ( ForgeStateUpdateError blk) => Show ( WrapForgeStateUpdateError blk) Source # | |
Defined in Ouroboros.Consensus.TypeFamilyWrappers |
newtype WrapGenTxId blk Source #
WrapGenTxId | |
|
Instances
newtype WrapHeaderHash blk Source #
Instances
Isomorphic WrapHeaderHash Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.Embed.Unary project :: NoHardForks blk => WrapHeaderHash ( HardForkBlock '[blk]) -> WrapHeaderHash blk Source # inject :: NoHardForks blk => WrapHeaderHash blk -> WrapHeaderHash ( HardForkBlock '[blk]) Source # |
|
Inject WrapHeaderHash Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.Embed.Nary inject :: forall x (xs :: [ Type ]). CanHardFork xs => Exactly xs Bound -> Index xs x -> WrapHeaderHash x -> WrapHeaderHash ( HardForkBlock xs) Source # |
newtype WrapLedgerConfig blk Source #
newtype WrapLedgerErr blk Source #
Instances
Isomorphic WrapLedgerErr Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.Embed.Unary project :: NoHardForks blk => WrapLedgerErr ( HardForkBlock '[blk]) -> WrapLedgerErr blk Source # inject :: NoHardForks blk => WrapLedgerErr blk -> WrapLedgerErr ( HardForkBlock '[blk]) Source # |
|
Eq ( LedgerError blk) => Eq ( WrapLedgerErr blk) Source # | |
Defined in Ouroboros.Consensus.TypeFamilyWrappers (==) :: WrapLedgerErr blk -> WrapLedgerErr blk -> Bool Source # (/=) :: WrapLedgerErr blk -> WrapLedgerErr blk -> Bool Source # |
|
Show ( LedgerError blk) => Show ( WrapLedgerErr blk) Source # | |
Defined in Ouroboros.Consensus.TypeFamilyWrappers |
|
NoThunks ( LedgerError blk) => NoThunks ( WrapLedgerErr blk) Source # | |
Defined in Ouroboros.Consensus.TypeFamilyWrappers |
newtype WrapLedgerEvent blk Source #
newtype WrapLedgerUpdate blk Source #
Instances
Eq ( LedgerUpdate blk) => Eq ( WrapLedgerUpdate blk) Source # | |
Defined in Ouroboros.Consensus.TypeFamilyWrappers (==) :: WrapLedgerUpdate blk -> WrapLedgerUpdate blk -> Bool Source # (/=) :: WrapLedgerUpdate blk -> WrapLedgerUpdate blk -> Bool Source # |
|
Show ( LedgerUpdate blk) => Show ( WrapLedgerUpdate blk) Source # | |
Defined in Ouroboros.Consensus.TypeFamilyWrappers |
newtype WrapLedgerWarning blk Source #
Instances
Eq ( LedgerWarning blk) => Eq ( WrapLedgerWarning blk) Source # | |
Defined in Ouroboros.Consensus.TypeFamilyWrappers (==) :: WrapLedgerWarning blk -> WrapLedgerWarning blk -> Bool Source # (/=) :: WrapLedgerWarning blk -> WrapLedgerWarning blk -> Bool Source # |
|
Show ( LedgerWarning blk) => Show ( WrapLedgerWarning blk) Source # | |
Defined in Ouroboros.Consensus.TypeFamilyWrappers |
newtype WrapTipInfo blk Source #
WrapTipInfo | |
|
Instances
Protocol based
newtype WrapCanBeLeader blk Source #
Instances
Isomorphic WrapCanBeLeader Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.Embed.Unary project :: NoHardForks blk => WrapCanBeLeader ( HardForkBlock '[blk]) -> WrapCanBeLeader blk Source # inject :: NoHardForks blk => WrapCanBeLeader blk -> WrapCanBeLeader ( HardForkBlock '[blk]) Source # |
newtype WrapChainDepState blk Source #
Instances
newtype WrapConsensusConfig blk Source #
newtype WrapIsLeader blk Source #
WrapIsLeader | |
|
Instances
Isomorphic WrapIsLeader Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.Embed.Unary project :: NoHardForks blk => WrapIsLeader ( HardForkBlock '[blk]) -> WrapIsLeader blk Source # inject :: NoHardForks blk => WrapIsLeader blk -> WrapIsLeader ( HardForkBlock '[blk]) Source # |
newtype WrapLedgerView blk Source #
Instances
newtype WrapSelectView blk Source #
Instances
newtype WrapValidateView blk Source #
newtype WrapValidatedGenTx blk Source #
A data family wrapper for
Validated
.
GenTx
Validated
is is data family, so this is an outlier in this module full of
type family wrappers. However, the standard functor composition operator
f
:.: g
incurs some type classes instances that are inappropriate when the
outer type constructor
f
is a family and hence non-parametric (eg
requires @
Eq
(f
:.: g)
Eq1
f)). The bespoke composition
WrapValidatedGenTx
therefore serves much the same purpose as the other
wrappers in this module.
WrapValidatedGenTx | |
|
Instances
Isomorphic WrapValidatedGenTx Source # | |
Defined in Ouroboros.Consensus.HardFork.Combinator.Embed.Unary project :: NoHardForks blk => WrapValidatedGenTx ( HardForkBlock '[blk]) -> WrapValidatedGenTx blk Source # inject :: NoHardForks blk => WrapValidatedGenTx blk -> WrapValidatedGenTx ( HardForkBlock '[blk]) Source # |
|
Eq ( Validated ( GenTx blk)) => Eq ( WrapValidatedGenTx blk) Source # | |
Defined in Ouroboros.Consensus.TypeFamilyWrappers (==) :: WrapValidatedGenTx blk -> WrapValidatedGenTx blk -> Bool Source # (/=) :: WrapValidatedGenTx blk -> WrapValidatedGenTx blk -> Bool Source # |
|
Show ( Validated ( GenTx blk)) => Show ( WrapValidatedGenTx blk) Source # | |
Defined in Ouroboros.Consensus.TypeFamilyWrappers |
|
NoThunks ( Validated ( GenTx blk)) => NoThunks ( WrapValidatedGenTx blk) Source # | |
Defined in Ouroboros.Consensus.TypeFamilyWrappers |
newtype WrapValidationErr blk Source #
Instances
Eq ( ValidationErr ( BlockProtocol blk)) => Eq ( WrapValidationErr blk) Source # | |
Defined in Ouroboros.Consensus.TypeFamilyWrappers (==) :: WrapValidationErr blk -> WrapValidationErr blk -> Bool Source # (/=) :: WrapValidationErr blk -> WrapValidationErr blk -> Bool Source # |
|
Show ( ValidationErr ( BlockProtocol blk)) => Show ( WrapValidationErr blk) Source # | |
Defined in Ouroboros.Consensus.TypeFamilyWrappers |
|
NoThunks ( ValidationErr ( BlockProtocol blk)) => NoThunks ( WrapValidationErr blk) Source # | |
Defined in Ouroboros.Consensus.TypeFamilyWrappers |
Versioning
newtype WrapNodeToClientVersion blk Source #
Instances
Eq ( BlockNodeToClientVersion blk) => Eq ( WrapNodeToClientVersion blk) Source # | |
Defined in Ouroboros.Consensus.TypeFamilyWrappers (==) :: WrapNodeToClientVersion blk -> WrapNodeToClientVersion blk -> Bool Source # (/=) :: WrapNodeToClientVersion blk -> WrapNodeToClientVersion blk -> Bool Source # |
|
Show ( BlockNodeToClientVersion blk) => Show ( WrapNodeToClientVersion blk) Source # | |
Defined in Ouroboros.Consensus.TypeFamilyWrappers |
newtype WrapNodeToNodeVersion blk Source #
Instances
Eq ( BlockNodeToNodeVersion blk) => Eq ( WrapNodeToNodeVersion blk) Source # | |
Defined in Ouroboros.Consensus.TypeFamilyWrappers (==) :: WrapNodeToNodeVersion blk -> WrapNodeToNodeVersion blk -> Bool Source # (/=) :: WrapNodeToNodeVersion blk -> WrapNodeToNodeVersion blk -> Bool Source # |
|
Show ( BlockNodeToNodeVersion blk) => Show ( WrapNodeToNodeVersion blk) Source # | |
Defined in Ouroboros.Consensus.TypeFamilyWrappers |
Type family instances
data family Ticked st :: Type Source #
" Ticked " piece of state (
LedgerState
,
LedgerView
,
ChainIndepState
)
Ticking refers to the passage of time (the ticking of the clock). When a piece of state is marked as ticked, it means that time-related changes have been applied to the state (or forecast).
Some examples of time related changes:
- Scheduled delegations might have been applied in Byron
- New leader schedule computed for Shelley
- Transition from Byron to Shelley activated in the hard fork combinator.
- Nonces switched out at the start of a new epoch.