ouroboros-consensus
Safe HaskellNone
LanguageHaskell2010

Ouroboros.Consensus.Storage.LedgerDB.V2.Forker

Contents

Synopsis

Documentation

data ForkerEnv (m ∷ TypeType) (l ∷ (TypeTypeType) → Type) Source #

The state inside a forker.

Constructors

ForkerEnv 

Fields

Instances

Instances details
Generic (ForkerEnv m l) Source # 
Instance details

Defined in Ouroboros.Consensus.Storage.LedgerDB.V2.Forker

Associated Types

type Rep (ForkerEnv m l) 
Instance details

Defined in Ouroboros.Consensus.Storage.LedgerDB.V2.Forker

type Rep (ForkerEnv m l) = D1 ('MetaData "ForkerEnv" "Ouroboros.Consensus.Storage.LedgerDB.V2.Forker" "ouroboros-consensus-3.0.0.0-inplace" 'False) (C1 ('MetaCons "ForkerEnv" 'PrefixI 'True) ((S1 ('MetaSel ('Just "foeLedgerSeq") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (StrictTVar m (LedgerSeq m l))) :*: S1 ('MetaSel ('Just "foeSwitchVar") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (StrictTVar m (LedgerSeq m l)))) :*: (S1 ('MetaSel ('Just "foeTracer") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (Tracer m TraceForkerEvent)) :*: (S1 ('MetaSel ('Just "foeLedgerDbLock") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (RAWLock m ())) :*: S1 ('MetaSel ('Just "foeWasCommitted") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (StrictTVar m Bool))))))

Methods

fromForkerEnv m l → Rep (ForkerEnv m l) x #

toRep (ForkerEnv m l) x → ForkerEnv m l #

(IOLike m, NoThunks (l EmptyMK), NoThunks (TxIn l), NoThunks (TxOut l)) ⇒ NoThunks (ForkerEnv m l) Source # 
Instance details

Defined in Ouroboros.Consensus.Storage.LedgerDB.V2.Forker

type Rep (ForkerEnv m l) Source # 
Instance details

Defined in Ouroboros.Consensus.Storage.LedgerDB.V2.Forker

type Rep (ForkerEnv m l) = D1 ('MetaData "ForkerEnv" "Ouroboros.Consensus.Storage.LedgerDB.V2.Forker" "ouroboros-consensus-3.0.0.0-inplace" 'False) (C1 ('MetaCons "ForkerEnv" 'PrefixI 'True) ((S1 ('MetaSel ('Just "foeLedgerSeq") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (StrictTVar m (LedgerSeq m l))) :*: S1 ('MetaSel ('Just "foeSwitchVar") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (StrictTVar m (LedgerSeq m l)))) :*: (S1 ('MetaSel ('Just "foeTracer") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (Tracer m TraceForkerEvent)) :*: (S1 ('MetaSel ('Just "foeLedgerDbLock") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (RAWLock m ())) :*: S1 ('MetaSel ('Just "foeWasCommitted") 'NoSourceUnpackedness 'SourceStrict 'DecidedStrict) (Rec0 (StrictTVar m Bool))))))

implForkerCommit ∷ ∀ m (l ∷ LedgerStateKind). (IOLike m, GetTip l, StandardHash l) ⇒ ForkerEnv m l → STM m (m ()) Source #

implForkerGetLedgerState ∷ ∀ (m ∷ TypeType) l. (MonadSTM m, GetTip l) ⇒ ForkerEnv m l → STM m (l EmptyMK) Source #

The API