Safe Haskell | Safe-Inferred |
---|---|
Language | Haskell2010 |
Documentation
class (Show (LedgerWarning blk), Show (LedgerUpdate blk), Eq (LedgerWarning blk), Eq (LedgerUpdate blk), Condense (LedgerUpdate blk)) ⇒ InspectLedger blk where Source #
Nothing
type LedgerWarning blk ∷ Type Source #
type LedgerWarning blk = Void
type LedgerUpdate blk ∷ Type Source #
type LedgerUpdate blk = Void
∷ TopLevelConfig blk | |
→ LedgerState blk | Before |
→ LedgerState blk | After |
→ [LedgerEvent blk] |
Inspect the ledger
The point of the inspection is to see if the state of the ledger might indicate a potential misconfiguration of the node.
TODO: We might at some point need to generalize this to ExtLedgerState
instead. That doesn't fit quite so neatly with the HFC at present, so
leaving it at this for now.
default inspectLedger ∷ (LedgerWarning blk ~ Void, LedgerUpdate blk ~ Void) ⇒ TopLevelConfig blk → LedgerState blk → LedgerState blk → [LedgerEvent blk] Source #
Instances
data LedgerEvent blk Source #
LedgerWarning (LedgerWarning blk) | |
LedgerUpdate (LedgerUpdate blk) |
Instances
InspectLedger blk ⇒ Show (LedgerEvent blk) Source # | |
Defined in Ouroboros.Consensus.Ledger.Inspect showsPrec ∷ Int → LedgerEvent blk → ShowS # show ∷ LedgerEvent blk → String # showList ∷ [LedgerEvent blk] → ShowS # | |
InspectLedger blk ⇒ Eq (LedgerEvent blk) Source # | |
Defined in Ouroboros.Consensus.Ledger.Inspect (==) ∷ LedgerEvent blk → LedgerEvent blk → Bool # (/=) ∷ LedgerEvent blk → LedgerEvent blk → Bool # |
castLedgerEvent ∷ (LedgerWarning blk ~ LedgerWarning blk', LedgerUpdate blk ~ LedgerUpdate blk') ⇒ LedgerEvent blk → LedgerEvent blk' Source #
partitionLedgerEvents ∷ [LedgerEvent blk] → ([LedgerWarning blk], [LedgerUpdate blk]) Source #